mirror/autoconf
2
0
Fork 0
mirror of git://git.sv.gnu.org/autoconf synced 2025-03-01 14:16:02 +08:00
Code Issues Packages Projects Releases Wiki Activity

* lib/Autom4te/FileUtils.pm (&update_file): s/cannot not/cannot/g.

Browse Source 
Reported by Gary Vaughan.
* bin/autom4te.in (handle_m4): Likewise.
This commit is contained in:
Akim Demaille 2003-09-09 15:44:56 +00:00
parent 620582b4b8
commit 254863003e
3 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ChangeLog
View File

@ -1,3 +1,9 @@
2003-09-09 Akim Demaille <akim@epita.fr>
* lib/Autom4te/FileUtils.pm (&update_file): s/cannot not/cannot/g.
Reported by Gary Vaughan.
* bin/autom4te.in (handle_m4): Likewise.
2003-09-09 Akim Demaille <akim@epita.fr> 2003-09-09 Akim Demaille <akim@epita.fr>
* lib/Autom4te/FileUtils.pm (&update_file): Be sure not to leave * lib/Autom4te/FileUtils.pm (&update_file): Be sure not to leave

2
bin/autom4te.in
View File

@ -472,7 +472,7 @@ sub handle_m4 ($@)
{ {
use File::Copy; use File::Copy;
move ("${file}t", "$file") move ("${file}t", "$file")
or fatal "cannot not rename ${file}t as $file: $!"; or fatal "cannot rename ${file}t as $file: $!";
} }
} }

10
lib/Autom4te/FileUtils.pm
View File

@ -145,7 +145,7 @@ sub update_file ($$)
print $out $_; print $out $_;
} }
$in->close; $in->close;
unlink ($from) || fatal "cannot not remove $from: $!"; unlink ($from) || fatal "cannot remove $from: $!";
return; return;
} }
@ -154,7 +154,7 @@ sub update_file ($$)
# File didn't change, so don't update its mod time. # File didn't change, so don't update its mod time.
msg 'note', "`$to' is unchanged"; msg 'note', "`$to' is unchanged";
unlink ($from) unlink ($from)
or fatal "cannot not remove $from: $!"; or fatal "cannot remove $from: $!";
return return
} }
@ -162,15 +162,15 @@ sub update_file ($$)
{ {
# Back up and install the new one. # Back up and install the new one.
move ("$to", "$to$SIMPLE_BACKUP_SUFFIX") move ("$to", "$to$SIMPLE_BACKUP_SUFFIX")
or fatal "cannot not backup $to: $!"; or fatal "cannot backup $to: $!";
move ("$from", "$to") move ("$from", "$to")
or fatal "cannot not rename $from as $to: $!"; or fatal "cannot rename $from as $to: $!";
msg 'note', "`$to' is updated"; msg 'note', "`$to' is updated";
} }
else else
{ {
move ("$from", "$to") move ("$from", "$to")
or fatal "cannot not rename $from as $to: $!"; or fatal "cannot rename $from as $to: $!";
msg 'note', "`$to' is created"; msg 'note', "`$to' is created";
} }
} }