Add warning about bash4isms.
authorMikko Värri <vmj@linuxbox.fi>
Sat, 8 Oct 2011 13:04:28 +0000 (16:04 +0300)
committerMikko Värri <vmj@linuxbox.fi>
Sat, 8 Oct 2011 13:04:28 +0000 (16:04 +0300)
lib/Slackware/File.pm

index be9c9eb..85dd6c0 100644 (file)
@@ -47,6 +47,11 @@ sub new {
         # Try to see if the ".new" file exists
         # without prefix
         $fsname =~ s/\.new$//;
+        # Bash installs /bin/bash4.new, which is
+        # moved to /bin/bash by the doinst.sh.
+        # Try to see if there's more of those.
+        print "WARNING: " . $fsname . "{,.new}: Does not exist\n"
+            unless -e $fsname;
     }
     if (-e $fsname) {
         $self->{fsname} = $fsname;