Исправлена командная строка

common.inc

@@ -6,6 +6,7 @@
 
 % max command line length
 /cmdlinelength 512 def
+/boot.ed .undef def
 
 % - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
 %
@@ -599,6 +600,7 @@
   bootpromptmap
 
   boot.show {
+    ed.color setcolor
     boot.ed over edit.init
     "" ne { boot.ed ' ' edit.input } if
   } {
@@ -1002,6 +1004,19 @@
 /boot.pos.init {
   /boot.label.len txt_bootoptions strsize pop def
   /boot.pos { boot.label.len 10 add small_layout { 410 } { 510 } ifelse } def
+  /boot.ed.width screen.size pop boot.pos pop sub 20 sub def
+  /boot.ed.height fontheight 2 add def
+
+  boot.ed .undef ne {
+    boot.ed 2 get free
+    boot.pos exch 10 add 
+        boot.ed 0 rot put
+        boot.ed 1 rot put
+    % save background behind boot parameters field
+    boot.ed dup 0 get exch 1 get
+    over over moveto boot.ed.width boot.ed.height savescreen
+    boot.ed 2 rot put
+  } if
 } def
 
 /init {

main.inc

@@ -64,6 +64,7 @@
   boot.pos moveto
 
   boot.show {
+    boot.text.options setcolor
     txt_bootoptions showright
 
     currenttransparency

theme_colors.inc

@@ -1,3 +1,4 @@
 /title.bg            0x3f81f1          newcolor
 /timer.color         lightgray          newcolor
 /panel.high          0x43b3fe          newcolor
+/ed.color            white             newcolor

window.inc

@@ -161,7 +161,7 @@
     dup 0 ne {
       window.current .ed get .undef ne {
         window.current .ed.font get setfont
-        window.current .color.fg get setcolor
+        ed.color setcolor
         window.current .ed get exch edit.input
         0
       } if
@@ -385,7 +385,7 @@
       window.current .ed.font get
         window.current .ed.focus get window.current .ed.pw_field get eq { pwmode } if
         setfont
-      window.current .color.fg get setcolor
+      ed.color setcolor
 
       window.current .ed.focus get get exch edit.input
       0