diff options
Diffstat (limited to 'lib/ManaTools/Shared')
-rw-r--r-- | lib/ManaTools/Shared/JournalCtl.pm | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/lib/ManaTools/Shared/JournalCtl.pm b/lib/ManaTools/Shared/JournalCtl.pm index 11945384..ac1a6c75 100644 --- a/lib/ManaTools/Shared/JournalCtl.pm +++ b/lib/ManaTools/Shared/JournalCtl.pm @@ -84,6 +84,12 @@ has 'unit' => ( default => "", ); +has 'identifier' => ( + is => 'rw', + isa => 'Str', + default => "", +); + #============================================================= =head2 getLog @@ -123,6 +129,9 @@ sub getLog { if ($self->priority ne "") { $params .= " --priority=" . $self->priority; } + if ($self->identifier ne "") { + $params .= " --identifier=" . $self->identifier; + } $ENV{'PATH'} = '/usr/sbin:/usr/bin'; my $jctl = "/usr/bin/journalctl " . $params; |