diff options
Diffstat (limited to 'tools')
| -rwxr-xr-x | tools/distclean | 2 | ||||
| -rw-r--r-- | tools/p1.pl | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/tools/distclean b/tools/distclean index 961cc801..1ddc7532 100755 --- a/tools/distclean +++ b/tools/distclean | |||
| @@ -37,7 +37,7 @@ find . -type f -name Makefile.in -print| xargs rm -f | |||
| 37 | rm -f aclocal.m4 compile config.guess config.h.in config.sub configure depcomp | 37 | rm -f aclocal.m4 compile config.guess config.h.in config.sub configure depcomp |
| 38 | rm -f m4/Makefile.am | 38 | rm -f m4/Makefile.am |
| 39 | 39 | ||
| 40 | echo "$0: Removing miscelanious files..." | 40 | echo "$0: Removing miscellaneous files..." |
| 41 | rm -f po/*.gmo po/stamp-po | 41 | rm -f po/*.gmo po/stamp-po |
| 42 | rm -f lib/tests/*.Po | 42 | rm -f lib/tests/*.Po |
| 43 | rm -f doc/developer-guidelines.html | 43 | rm -f doc/developer-guidelines.html |
diff --git a/tools/p1.pl b/tools/p1.pl index 9cbe6dc0..ea80c334 100644 --- a/tools/p1.pl +++ b/tools/p1.pl | |||
| @@ -30,7 +30,7 @@ use IO::File; | |||
| 30 | 30 | ||
| 31 | sub TIEHANDLE { | 31 | sub TIEHANDLE { |
| 32 | my ($class, $fn) = @_; | 32 | my ($class, $fn) = @_; |
| 33 | my $handle = new IO::File "> $fn" or die "Cannot open embedded work filei $!\n"; | 33 | my $handle = new IO::File "> $fn" or die "Cannot open embedded work file $!\n"; |
| 34 | bless { FH => $handle, Value => 0}, $class; | 34 | bless { FH => $handle, Value => 0}, $class; |
| 35 | } | 35 | } |
| 36 | 36 | ||
