diff options
author | P. J. McDermott <pjm@nac.net> | 2012-09-10 22:12:56 (EDT) |
---|---|---|
committer | P. J. McDermott <pjm@nac.net> | 2012-09-10 22:12:56 (EDT) |
commit | c07faea2674fb796a9c1547fe924a798fbe084b3 (patch) | |
tree | 20eece585400c0f155f2b74e0c26ed0c22ea55a9 /lib/Text | |
parent | c14216c2fe1f9fd569af8445a8fe24b8c8b0c7ae (diff) |
Diffstat (limited to 'lib/Text')
-rw-r--r-- | lib/Text/MarkdownBook/Book.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Text/MarkdownBook/Book.pm b/lib/Text/MarkdownBook/Book.pm index 137a9fa..fa041c5 100644 --- a/lib/Text/MarkdownBook/Book.pm +++ b/lib/Text/MarkdownBook/Book.pm @@ -30,7 +30,7 @@ sub new $self = {}; bless($self, $class); - unless ($format =~ m/^[a-z]+/) { + unless ($format =~ m/^[a-z]+$/) { Carp::croak('Invalid format "' . $format . '"'); } eval { |