Bug#17376: patch

[Torsten Werner <twerner@intercomm.de>]

The following patch for controllib.pl should fix the bug:
 
------------------------------------------------------------------------
--- /root/controllib.pl Fri Oct 23 00:03:57 1998
+++ controllib.pl       Tue Feb 23 08:44:48 1999
@@ -1,3 +1,4 @@
+use POSIX qw(:errno_h errno);
 
 $parsechangelog= 'dpkg-parsechangelog';
 
@@ -101,7 +102,7 @@
                 $substvar{$1}= $';
             }
             close(SV);
-        } elsif ($! !~ m/no such file or directory/i) {
+        } elsif (POSIX::errno() != ENOENT) {
             &error("unable to open substvars file $varlistfile: $!");
         }
     }
------------------------------------------------------------------------
 
-- System Information
Debian Release: 2.1
Kernel Version: Linux ppip01 2.0.34 #1 Mon Jul 27 15:43:31 CEST 1998 i686 unknow 
Versions of the packages dpkg-dev depends on:
hi  perl            5.004.04-6     Larry Wall's Practical Extracting and Report

-- 
Torsten Werner
University of Technology Dresden
email: twerner@intercomm.de
phone/fax: +49 3501 530061/11