From aa97d2e6379f36c2a2ddc670772a1aa29fb7f377 Mon Sep 17 00:00:00 2001
From: mark <mark>
Date: Sun, 29 Jan 2012 06:15:12 +0000
Subject: [PATCH] don't try to run empty export commands on replace, #16143

---
 FS/FS/part_export/shellcommands.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/FS/FS/part_export/shellcommands.pm b/FS/FS/part_export/shellcommands.pm
index 418ff14ac..59146306d 100644
--- a/FS/FS/part_export/shellcommands.pm
+++ b/FS/FS/part_export/shellcommands.pm
@@ -353,6 +353,7 @@ sub _export_command {
   $locale = shell_quote $locale;
 
   my $command_string = eval(qq("$command"));
+
   my @ssh_cmd_args = (
     user          => $self->option('user') || 'root',
     host          => $self->machine,
@@ -377,6 +378,7 @@ sub _export_command {
 sub _export_replace {
   my($self, $new, $old ) = (shift, shift, shift);
   my $command = $self->option('usermod');
+  return '' if $command =~ /^\s*$/;
   my $stdin = $self->option('usermod_stdin');
   no strict 'vars';
   {
-- 
2.11.0