perfsonar development work

Author: fernandes
Date: 2008-04-16 09:02:20 -0400 (Wed, 16 Apr 2008)
New Revision: 3701

Modified:
   branches/rpm/package_maker.pl
Log:
Bug fix: now trimming `pwd` return value when creating file ~/.rpmmacros


Modified: branches/rpm/package_maker.pl
===================================================================
--- branches/rpm/package_maker.pl       2008-04-16 12:50:18 UTC (rev 3700)
+++ branches/rpm/package_maker.pl       2008-04-16 13:02:20 UTC (rev 3701)
@@ -448,8 +448,9 @@
 
 sub createRpmBuildTree(){
        my $currdir = `pwd`;
+       chomp($currdir);
        
-    open( RPMMACROS, "> ~/.rpmmacros");
+    open( RPMMACROS, "> ~/.rpmmacros") or die "There was a problem opening 
the file ~/.rpmmacros for writing.";
     print RPMMACROS "\%_topdir               $currdir/rpmbuild\n";
     print RPMMACROS "\%_tmppath              $currdir/rpmbuild/TMP";
     close RPMMACROS;