projects
/
catagits/Catalyst-Runtime.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(from parent 1:
38cb5be
)
Don't override debug flag if set
Christian Hansen [Fri, 17 Jun 2005 02:34:56 +0000 (
02:34
+0000)]
lib/Catalyst.pm
patch
|
blob
|
blame
|
history
diff --git
a/lib/Catalyst.pm
b/lib/Catalyst.pm
index
a412efa
..
61439c2
100644
(file)
--- a/
lib/Catalyst.pm
+++ b/
lib/Catalyst.pm
@@
-149,7
+149,7
@@
sub import {
foreach (@arguments) {
if ( /^-Debug$/ ) {
- $flags->{log} = 1
+ $flags->{log} = ( $flags->{log} ) ? 'debug,' . $flags->{log} : 'debug';
}
elsif (/^-(\w+)=?(.*)$/) {
$flags->{ lc $1 } = $2;