[Lxr-commits] CVS: lxr/lib/LXR SimpleParse.pm,1.14,1.15

[Malcolm B. <mb...@us...>]

Update of /cvsroot/lxr/lxr/lib/LXR
In directory sc8-pr-cvs1:/tmp/cvs-serv7644/lib/LXR

Modified Files:
	SimpleParse.pm 
Log Message:
Apply patch 629550: tabwidth=0 breaks genxref.  Make sure the tabwidth read
from a vi modeline is never 0.


Index: SimpleParse.pm
===================================================================
RCS file: /cvsroot/lxr/lxr/lib/LXR/SimpleParse.pm,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -d -r1.14 -r1.15
--- SimpleParse.pm	14 Nov 2001 15:03:29 -0000	1.14
+++ SimpleParse.pm	22 Mar 2003 01:00:58 -0000	1.15
@@ -100,7 +100,8 @@
 			
 			if ($. <= 2 &&
 				$line =~ /^.*-[*]-.*?[ \t;]tab-width:[ \t]*([0-9]+).*-[*]-/) {
-				$tabwidth = $1;
+				# make sure there really is a non-zero tabwidth
+				if ($1) { $tabwidth = $1; }
 			}
 			
 #			&untabify($line, $tabwidth); # We inline this for performance.