mirror of
https://github.com/gryf/wmaker.git
synced 2026-01-06 13:54:12 +01:00
utils: Include the SHEXEC in the wm-oldmenu2new script
The script wm-oldmenu2new can now convert the SHEXEC lines. Requested-by: Doug Barton <dougb@FreeBSD.org>
This commit is contained in:
committed by
Carlos R. Mafra
parent
a568686b39
commit
f2585dc1f7
@@ -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=();
|
||||
|
||||
Reference in New Issue
Block a user