- print "Press a key: ".$M;
- ReadMode 4; # Turn off controls keys
- while (not defined ($x = ReadKey(-1))) {
- # No key yet
- }
- ReadMode 0; # Reset tty mode before exiting
-
- print $N.$/.$/;
- if (defined($menu_commands{$x})) {
- $command = $menu_commands{$x};
- } elsif ($x eq "\n") {
- $command= 'exit';
- } elsif ($x eq "x") {
- print <<"EOF";
-
- ${B}lqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqk${N}
- $HLINE Select a window manager (unsorted list): $HLINE
- $HLINE Press any other key to return to the main menu. $HLINE
- ${B}tqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqu${N}
- $HLINE ${W}d${N}wm ${W}e${N}vilwm ${W}f${N}luxbox f${W}v${N}wm fvwm${W}2${N} fvwm-${W}c${N}rystal $HLINE
- $HLINE w${W}9${N}wm ${W}w${N}indowlab wm${W}i${N}i wmi-${W}n${N}g $HLINE
- ${B}mqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqj${N}
+ print "Press a key: ".$M;
+ ReadMode 4; # Turn off controls keys
+ while (not defined ($x = ReadKey(-1))) {
+ # No key yet
+ }
+ ReadMode 0; # Reset tty mode before exiting
+
+ print $N.$/.$/;
+ if (defined($menu_commands{$x})) {
+ $command = $menu_commands{$x};
+ } elsif ($x eq "\n") {
+ $command= 'exit';
+ } elsif ($x eq "x") {
+ print <<"EOF";
+
+ ${B}lqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqk${N}
+ $HLINE Select a window manager (unsorted list): $HLINE
+ $HLINE Press any other key to return to the main menu. $HLINE
+ ${B}tqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqu${N}
+ $HLINE ${W}d${N}wm ${W}e${N}vilwm ${W}f${N}luxbox f${W}v${N}wm fvwm${W}2${N} fvwm-${W}c${N}rystal ion${W}3 ${N}$HLINE
+ $HLINE ${W}j${N}wm pe${W}k${N}wm ${W}p${N}wm3 ${W}t${N}wm ${W}r${N}atpoison w${W}9${N}wm ${W}w${N}indowlab ${N}$HLINE
+ $HLINE wm${W}i${N}i wmi-${W}n${N}g ${N}$HLINE
+ ${B}mqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqj${N}