Skip to content
Snippets Groups Projects
Commit 9ded4a79 authored by Andreas Romeyke's avatar Andreas Romeyke
Browse files

- simplified argument

parent 432ab490
No related branches found
No related tags found
No related merge requests found
......@@ -22,7 +22,7 @@ Examples:
* Are there lines with regex "ma[tc]?h"?
$0 log --match "ma[tc]?h"
* Give me a trace of specific sip
$0 log --trace-sip sip293144
$0 log --trace sip293144
DESCR
sub description {
......@@ -41,7 +41,7 @@ sub opt_spec {
["todate=s" => "search ending with date"],
["level=s@" => "levels to search for. Levels could be: 'error', 'warn', 'info', 'debug'. You could use multiple levels by repeating"],
["match=s" => "perl regex to search for" => {default=>".*"}],
["trace-sip=s" => "trace a sip with given ID (SIP-ID or Deposit-ID)"],
["trace=s" => "trace a sip/IE with given ID (SIP-ID or Deposit-ID or IE PID)"],
);
}
......@@ -125,8 +125,8 @@ sub execute {
}
# prepare trace
my $with_trace;
if (defined $opt->trace_sip) {
$with_trace = $opt->trace_sip;
if (defined $opt->trace) {
$with_trace = $opt->trace;
if (defined $opt->colorize) {
$output_filter = sub { colorize($_[0], $opt, $match_rx); };
} else {
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment