From a70239045e7e83eb7add099032cfd02d0011fea9 Mon Sep 17 00:00:00 2001 From: Daouda Lo Date: Sat, 27 Oct 2001 15:39:44 +0000 Subject: return value at end of module --- perl-install/devices.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'perl-install/devices.pm') diff --git a/perl-install/devices.pm b/perl-install/devices.pm index 598d551a4..7228f9410 100644 --- a/perl-install/devices.pm +++ b/perl-install/devices.pm @@ -8,9 +8,6 @@ use run_program; use log; use c; -1; - - sub size($) { local *F; sysopen F, $_[0], 0 or log::l("open $_[0]: $!"), return 0; @@ -156,3 +153,5 @@ sub make($) { $file; } + +1; -- cgit v1.2.1