X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=lib%2FClearcase%2FUCM%2FFolder.pm;h=0d0da46d4bccae756ceb6b1be0724d405ca7f817;hb=a70e80a6af6e31d56b120348bc8bc23cdd6543f5;hp=d606d62f193c5ecd1de68cb87db6601615093fc8;hpb=201c4691639017573d7caf7bf03de6bf12db6614;p=clearscm.git

diff --git a/lib/Clearcase/UCM/Folder.pm b/lib/Clearcase/UCM/Folder.pm
index d606d62..0d0da46 100644
--- a/lib/Clearcase/UCM/Folder.pm
+++ b/lib/Clearcase/UCM/Folder.pm
@@ -96,7 +96,11 @@ Returns:
     "mkfolder $comment -in " . $class->{parent} . ' ' . $name . '@' . $pvob->tag
   );
 
-  return $class->updateFolderInfo;
+  return if $status;
+
+  ($status, @output) = $class->updateFolderInfo;
+
+  return $status ? undef : $class;
 } # new
   
 sub name () {
@@ -416,6 +420,7 @@ sub updateFolderInfo () {
 
   return $self;
 } # updateFolderInfo
+
 1;
 
 =head1 DEPENDENCIES