[openxcat-cvs] openxcat/lib/openXcat Base.pm,1.25,1.26

[Jason B. <br...@us...>]

Update of /cvsroot/openxcat/openxcat/lib/openXcat
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11271

Modified Files:
	Base.pm 
Log Message:
Fix file line range specifying a single line number

Index: Base.pm
===================================================================
RCS file: /cvsroot/openxcat/openxcat/lib/openXcat/Base.pm,v
retrieving revision 1.25
retrieving revision 1.26
diff -u -d -r1.25 -r1.26
--- Base.pm	30 Nov 2004 19:50:16 -0000	1.25
+++ Base.pm	1 Dec 2004 15:23:41 -0000	1.26
@@ -407,7 +407,7 @@
     if ( defined($range) && $range ) {
       $range =~ /(\d+)(-)?(\d*)/;
       my $beg = $1 - 1;
-      my $end = $1;
+      my $end = $beg;
       if ( $2 ) {
 	      if ( $3 ) {
 	        $end = $3 - 1;