Guys, you really must take some perl courses.

-- 
Torvalds' goal for Linux is very simple: World Domination
Stallman's goal for GNU is even simpler: Freedom
diff -urN backup/tools/update-catalog sgml-base-1.26+nmu3+dfs2/tools/update-catalog
--- backup/tools/update-catalog	2012-05-28 22:11:52.000000000 +0300
+++ sgml-base-1.26+nmu3/tools/update-catalog	2012-08-09 20:49:29.000000000 +0300
@@ -247,7 +247,7 @@
     my($supercat)="/var/lib/sgml-base/supercatalog";
     opendir(CATDIR, $catdir)
         or die "cannot open catalog directory $catdir: $!";
-    while( readdir CATDIR )
+    while( $_ = readdir CATDIR )
     {
         m/^[^.].*\.cat$/ or next;
         push(@cats, $catdir . "/" . $_);

Reply via email to