diff options
| author | fukachan <fukachan> | 2004-03-17 04:30:19 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2004-03-17 04:30:19 +0000 |
| commit | 78448ce19658306f853d5ba80a0dcd516357e074 (patch) | |
| tree | a410b19a70f3a24755a533d53f63d1174b725cc2 /fml/lib/FML/Merge | |
| parent | 03b6f873619d17808f3ad0385fd6552656edc14d (diff) | |
| download | fml8-78448ce19658306f853d5ba80a0dcd516357e074.tar.gz fml8-78448ce19658306f853d5ba80a0dcd516357e074.tar.bz2 fml8-78448ce19658306f853d5ba80a0dcd516357e074.zip | |
clean up message alignment
Diffstat (limited to 'fml/lib/FML/Merge')
| -rw-r--r-- | fml/lib/FML/Merge/FML4/List.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/fml/lib/FML/Merge/FML4/List.pm b/fml/lib/FML/Merge/FML4/List.pm index b154d0e1..e0b311b3 100644 --- a/fml/lib/FML/Merge/FML4/List.pm +++ b/fml/lib/FML/Merge/FML4/List.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: List.pm,v 1.1.1.1 2004/03/16 12:58:20 fukachan Exp $ +# $FML: List.pm,v 1.2 2004/03/17 04:08:35 fukachan Exp $ # package FML::Merge::FML4::List; @@ -130,11 +130,12 @@ sub _write_without_comment my $tmp = sprintf("%s.new.%s", $dst, $$); unless (-f $src) { - print STDERR "ignore $src -> $dst\n"; + print STDERR "warning: $src not found, so not converted.\n"; return; } - print STDERR "cat $src > $dst\n"; + print STDERR "creating $dst\n"; + print STDERR " from $src\n"; use FileHandle; my $rh = new FileHandle $src; |