From 48ead2b86a37344ad5a71bb35fbf8d9e20ebf9ea Mon Sep 17 00:00:00 2001 From: martinahansen Date: Thu, 29 Oct 2009 10:46:50 +0000 Subject: [PATCH] corrected error message in dir_create git-svn-id: http://biopieces.googlecode.com/svn/trunk@715 74ccb610-7750-0410-82ae-013aeee3265d --- code_perl/Maasha/Filesys.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/code_perl/Maasha/Filesys.pm b/code_perl/Maasha/Filesys.pm index 4033064..ad6259b 100644 --- a/code_perl/Maasha/Filesys.pm +++ b/code_perl/Maasha/Filesys.pm @@ -324,7 +324,7 @@ sub dir_create # Returns nothing. if ( -d $path ) { - Maasha::Common::error( qq(Directory already exists "$path": $!) ); + Maasha::Common::error( qq(Directory already exists "$path") ); } else { mkdir $path or Maasha::Common::error( qq(Could not create directory "$path": $!) ); } -- 2.39.5