Changeset 1412 in ProjectBuilder for projects/md2mb/devel/md2mb/bin/md2mb.pl

Timestamp:

Feb 22, 2012, 12:16:12 AM (12 years ago)

Author:

Bruno Cornec

Message:

• In case formail is not found suggest to install procmail.

File:

• projects/md2mb/devel/md2mb/bin/md2mb.pl (modified) (2 diffs)

projects/md2mb/devel/md2mb/bin/md2mb.pl

@@ -29 +29 @@
     mkpath("$newroot",0, 0755) if ((not -d "$newroot") && (not $nrisfile));
 }
-system("$cmd </dev/null >/dev/null 2>/dev/null") == 0 or die "cannot find formail on your \$PATH!\nAborting";
+system("$cmd </dev/null >/dev/null 2>/dev/null") == 0 or die "cannot find formail on your \$PATH!\nTry installing procmail\nAborting";
 
 find(\&md2mb,($oldroot));
@@ -62 +62 @@
 $destname =~ s|\.([^/]+)\.directory/|$1.sbd/|g;
 # Here we create the target dir and target name
-my $cdir = dirname("$newroot/$destname");
 my $outputfile="$newroot/$destname";
+my $cdir = dirname("$outputfile");
 # Handle case where target file name is empty
 $outputfile="$newroot" if ($destname =~ /^\s*$/);