[LON-CAPA-cvs] cvs: loncom /build make_rpm.pl

[harris41]

harris41		Wed Apr 10 01:58:17 2002 EDT

  Modified files:              
    /loncom/build	make_rpm.pl 
  Log:
  removing a potential argument typo problem
  
  
Index: loncom/build/make_rpm.pl
diff -u loncom/build/make_rpm.pl:1.17 loncom/build/make_rpm.pl:1.18
--- loncom/build/make_rpm.pl:1.17	Sun Apr  7 16:35:41 2002
+++ loncom/build/make_rpm.pl	Wed Apr 10 01:58:17 2002
@@ -8,7 +8,7 @@
 # The LearningOnline Network with CAPA
 # make_rpm.pl - make RedHat package manager file (A CLEAN AND CONFIGURABLE WAY)
 #
-# $Id: make_rpm.pl,v 1.17 2002/04/07 20:35:41 harris41 Exp $
+# $Id: make_rpm.pl,v 1.18 2002/04/10 05:58:17 harris41 Exp $
 #
 # Written by Scott Harrison, harris41@msu.edu
 #
@@ -87,6 +87,9 @@
 my ($tag,$version,$configuration_files,$documentation_files,
     $pathprefix,$customize)=@ARGV;
 @ARGV=(); # read standard input based on a pipe, not a command-line argument
+
+# standardize pathprefix argument
+$pathprefix=~s/\/$//; # OTHERWISE THE BEGINNING SLASH MIGHT BE REMOVED
 
 if (!$version) {# version should be defined and string length greater than zero
     print(<<END);