From f2585dc1f74796628739efde5c61081c2b8c1b35 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Rodolfo=20Garc=C3=ADa=20Pe=C3=B1as=20=28kix=29?= Date: Sat, 18 Feb 2012 12:10:22 +0100 Subject: [PATCH] utils: Include the SHEXEC in the wm-oldmenu2new script The script wm-oldmenu2new can now convert the SHEXEC lines. Requested-by: Doug Barton --- util/wm-oldmenu2new | 2 ++ 1 file changed, 2 insertions(+) diff --git a/util/wm-oldmenu2new b/util/wm-oldmenu2new index 6cdc7c2b..5ac80155 100755 --- a/util/wm-oldmenu2new +++ b/util/wm-oldmenu2new @@ -129,6 +129,7 @@ perl - $T <<-'EOF' > $T-p for (@foo2) { s/^(\s*)"([^"]*)"\s\s*END/\1),/; s/^(\s*)"([^"]*)"\s\s*EXEC\s\s*(.*)$/\1($v\n\1"\2",$v\n\1EXEC,$v\n\1"\3"$v\n\1),/; + s/^(\s*)"([^"]*)"\s\s*SHEXEC\s\s*(.*)$/\1($v\n\1"\2",$v\n\1SHEXEC,$v\n\1"\3"$v\n\1),/; push @foo,split "\n"; } @foo2=(); @@ -146,6 +147,7 @@ s/^(\s*)"([^"]*)"\s\s*OPEN_MENU\s\s*(.*)$/\1($v\n\1"\2",$v\n\1OPEN_MENU,$v\n\1"\ for (@foo) { s/^(\s*)([^ ]*)\s\s*END/\1),/; s/^(\s*)([^ ]*)\s\s*EXEC\s\s*(.*)$/\1($v\n\1"\2",$v\n\1EXEC,$v\n\1"\3"$v\n\1),/; + s/^(\s*)([^ ]*)\s\s*SHEXEC\s\s*(.*)$/\1($v\n\1"\2",$v\n\1SHEXEC,$v\n\1"\3"$v\n\1),/; push @foo2,split "\n"; } @foo=(); -- 2.11.4.GIT