mirror of
https://github.com/gryf/wmaker.git
synced 2026-02-22 18:15:49 +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) {
|
for (@foo2) {
|
||||||
s/^(\s*)"([^"]*)"\s\s*END/\1),/;
|
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*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";
|
push @foo,split "\n";
|
||||||
}
|
}
|
||||||
@foo2=();
|
@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) {
|
for (@foo) {
|
||||||
s/^(\s*)([^ ]*)\s\s*END/\1),/;
|
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*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";
|
push @foo2,split "\n";
|
||||||
}
|
}
|
||||||
@foo=();
|
@foo=();
|
||||||
|
|||||||
Reference in New Issue
Block a user