[siesta-commit] siesta/bin nacho,1.38,1.39

[prev] [thread] [next] [lurker] [Date index for 2003/03/15]

Update of /cvsroot/siesta/siesta/bin
In directory sc8-pr-cvs1:/tmp/cvs-serv29656

Modified Files:
	nacho 
Log Message:
be a bit more tight about our lexical oddness


Index: nacho
===================================================================
RCS file: /cvsroot/siesta/siesta/bin/nacho,v
retrieving revision 1.38
retrieving revision 1.39
diff -u -d -r1.38 -r1.39
--- nacho	15 Mar 2003 17:00:35 -0000	1.38
+++ nacho	15 Mar 2003 17:02:43 -0000	1.39
@@ -55,13 +55,11 @@
 # Connect
 _connect_database(@storage);
 
-no strict qw(refs);
-
-# call the appropriate subroutine
-#eval {
-&$mode(@ARGV);
-
-#die usage()."\n" if $@;
+{
+    no strict 'refs';
+    # call the appropriate subroutine
+    &$mode(@ARGV);
+}
 
 exit 0;
 

• [siesta-commit] siesta/bin nacho,1.38,1.39 clampr 17:02 on 15 Mar 2003

Generated at 13:57 on 01 Jul 2004 by mariachi 0.52