From f948765436a567af2ca2f5b8c7f675a49cf63ef5 Mon Sep 17 00:00:00 2001 From: ivan Date: Thu, 16 Jan 2003 02:58:20 +0000 Subject: [PATCH] don't run empty shellcommands --- FS/FS/part_export/shellcommands.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/FS/FS/part_export/shellcommands.pm b/FS/FS/part_export/shellcommands.pm index dbd4017f8..f592a838a 100644 --- a/FS/FS/part_export/shellcommands.pm +++ b/FS/FS/part_export/shellcommands.pm @@ -33,6 +33,7 @@ sub _export_unsuspend { sub _export_command { my ( $self, $action, $svc_acct) = (shift, shift, shift); my $command = $self->option($action); + return '' if $command =~ /^\s*$/; my $stdin = $self->option($action."_stdin"); no strict 'vars'; -- 2.11.0