diff options
author | Tatsuhiko Miyagawa <miyagawa@bulknews.net> | 2013-08-17 11:22:43 -0700 |
---|---|---|
committer | Tatsuhiko Miyagawa <miyagawa@bulknews.net> | 2013-08-17 11:22:43 -0700 |
commit | c251c9a455b41852bc74905b7e6388364592b875 (patch) | |
tree | 8cf33901448853c924fde6cb118206c40da84011 /lib | |
parent | 7f0f11daef8b3806799aeaa0f2745166a32ee41d (diff) | |
download | carton-c251c9a455b41852bc74905b7e6388364592b875.tar.gz |
workaround carton help/perldoc Carton for case insensitive filesystem
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Carton/CLI.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Carton/CLI.pm b/lib/Carton/CLI.pm index 8679ec4..6efe9ac 100644 --- a/lib/Carton/CLI.pm +++ b/lib/Carton/CLI.pm @@ -134,7 +134,7 @@ sub error { sub cmd_help { my $self = shift; - my $module = $_[0] ? ("Carton::Doc::" . ucfirst $_[0]) : "Carton"; + my $module = $_[0] ? ("Carton::Doc::" . ucfirst $_[0]) : "Carton.pm"; system "perldoc", $module; } |