From 4f3f6df26560263f3b8b40785d00bbbd277d5a0c Mon Sep 17 00:00:00 2001 From: minima Date: Thu, 17 Oct 2002 03:06:16 +0000 Subject: [PATCH] fix blank spaces --- perl/DXCommandmode.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm index 42b2efbb..9e9a708e 100644 --- a/perl/DXCommandmode.pm +++ b/perl/DXCommandmode.pm @@ -470,7 +470,7 @@ sub run_cmd return (); } } - return map {s/[^\s]\s+$//; $_} @ans; + return map {s/([^\s])\s+$/$1/; $_} @ans; } # -- 2.43.0