diff options
| -rwxr-xr-x | localmarkdown2sms | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/localmarkdown2sms b/localmarkdown2sms index 6466eb9..6a4a9cf 100755 --- a/localmarkdown2sms +++ b/localmarkdown2sms @@ -55,12 +55,12 @@ foreach my $file (read_dir( $path )) { $key = lc($1); $i = 0; if (lc($content) ne $key) { - warn( "key \"$key\" extracted from fuzzy content: \"$content\"" ); + warn( "key \"$key\" extracted from fuzzy string \"$content\" in file \"$file\"" ); } if (!defined( $delay{$key})) { $delay{$key}[0] = 0; } else { - warn( "skipping non-unique key: \"$key\"" ); + warn( "skipping non-unique key \"$key\" in file \"$file\"" ); $key = undef; } # delay @@ -73,13 +73,13 @@ foreach my $file (read_dir( $path )) { } $delay{$key}[$i] += $delay; if ($content ne $1) { - warn( "delay (${delay}s) resolved from fuzzy content: \"$content\"" ); + warn( "delay (${delay}s) resolved from fuzzy string \"$content\" in file \"$file\"" ); } } else { - warn( "skipping non-key'ed delay line: \"$1\"" ); + warn( "skipping non-key'ed delay line \"$1\" in file \"$file\"" ); } } else { - warn( "skipping non-parsable headline: \"$line\""); + warn( "skipping non-parsable headline \"$line\" in file \"$file\""); } # reply } else { @@ -93,7 +93,7 @@ foreach my $file (read_dir( $path )) { if ( defined( $key )) { $reply{$key}[$i] = $content; } else { - warn( "skipping non-key'ed content: \"$1\"" ); + warn( "skipping non-key'ed content \"$1\" in file \"$file\"" ); } } } |