--- loncom/build/piml_parse.pl 2002/01/31 17:32:25 1.2 +++ loncom/build/piml_parse.pl 2002/01/31 17:37:19 1.3 @@ -3,7 +3,7 @@ # The LearningOnline Network with CAPA # piml_parse.pl - Linux Packaging Markup Language parser # -# $Id: piml_parse.pl,v 1.2 2002/01/31 17:32:25 harris41 Exp $ +# $Id: piml_parse.pl,v 1.3 2002/01/31 17:37:19 harris41 Exp $ # # Written by Scott Harrison, harris41@msu.edu # @@ -30,7 +30,7 @@ # http://www.lon-capa.org/ # # YEAR=2002 -# 1/28 - Scott Harrison +# 1/28,1/29,1/30,1/31 - Scott Harrison # ### @@ -76,7 +76,7 @@ END # ------------------------------------------------- Grab command line arguments my $mode; -if (@ARGV==4) { +if (@ARGV==3) { $mode = shift @ARGV; } else {