bin/shell-replace

diff --git a/bin/shell-replace b/bin/shell-replace
index 46e807dfd6596db4d67de6438458bed4b9624a40..2b5198d12faf639230c7385ccffc34bb3e6a3839 100755 (executable)
--- a/bin/shell-replace
+++ b/bin/shell-replace
@@ -196,7 +196,8 @@ sub cmd {
        my $cmd = join(' ',@_);
 
        my $hcmd;
-       open($hcmd,"-|",$cmd) or die "$!: $?:  $@";
+       open($hcmd,"-|","bash","-lc",$cmd) or die "$!: $?:  $@";
+       # NB 29.05.26 open($hcmd,"-|",$cmd) or die "$!: $?:  $@";
        my @cmd = <$hcmd>;
        close $hcmd;
        return wantarray ? @cmd : join('',@cmd);