Codebase list liblog-report-perl / v0.07
distribution Log-Report-0.07.tar.gz Mark Overmeer authored 16 years ago Mark Overmeer committed 6 years ago
4 changed file(s) with 14 addition(s) and 6 deletion(s). Raw diff Collapse all Expand all
+3
-1
ChangeLog less more
00
11 ==== version history of Log::Report
22
3 version 0.06:
3 version 0.07:
4
5 version 0.06: Sat Jun 9 10:33:23 CEST 2007
46 Improvements:
57 - t/51syslog.t compares required version via UNIVERSAL::VERSION
68 (cpan-tester David Cantrell) Other version checks adapted as well.
+1
-1
Makefile.PL less more
33
44 WriteMakefile
55 ( NAME => 'Log::Report'
6 , VERSION => '0.06'
6 , VERSION => '0.07'
77 , PREREQ_PM =>
88 { Test::More => 0.47
99 , Test::Pod => 1.00
+3
-1
lib/Log/Report/Dispatcher.pm less more
275275 . "\n";
276276 }
277277
278 setlocale(LC_ALL, $oldloc);
278 setlocale(LC_ALL, $oldloc)
279 if defined $oldloc;
280
279281 $text;
280282 }
281283
+7
-3
lib/Log/Report/Lexicon/Index.pm less more
107107 my $index = $self->index;
108108 keys %$index or return undef;
109109
110 my ($lang,$terr,$cs,$modif) = parse_locale $locale
111 or error "illegal locale '{locale}', when looking for {domain}"
112 , locale => $locale, domain => $domain;
110 my ($lang,$terr,$cs,$modif) = parse_locale $locale;
111 unless(defined $lang)
112 { # avoid problem with recursion, not translatable
113 defined $locale or $locale = '<undef>';
114 warn "illegal locale $locale, when looking for $domain";
115 return undef;
116 }
113117
114118 $terr = defined $terr ? '_'.$terr : '';
115119 $cs = defined $cs ? '.'.$cs : '';