Upper case the FreeBSD loader prompt.

On OFW based machines, it is just too confusing having the firmware and
OS loader giving the same prompt.  This is a nice compromise that 99% of the
users on non-OFW platforms will probably not even notice.

2 files changed, 2 insertions, 2 deletions

diff --git a/sys/boot/common/interp.c b/sys/boot/common/interp.c
index d53a7ee..7ebab61 100644
--- a/sys/boot/common/interp.c
+++ b/sys/boot/common/interp.c
@@ -118,7 +118,7 @@ interact(void)
     if (getenv("prompt") == NULL)
 	setenv("prompt", "${interpret}", 1);
     if (getenv("interpret") == NULL)
-        setenv("interpret", "ok", 1);
+        setenv("interpret", "OK", 1);
     
 
     for (;;) {
diff --git a/sys/boot/common/interp_forth.c b/sys/boot/common/interp_forth.c
index a77fb6c..b4604d9 100644
--- a/sys/boot/common/interp_forth.c
+++ b/sys/boot/common/interp_forth.c
@@ -299,7 +299,7 @@ bf_run(char *line)
     
     if (result == VM_USEREXIT)
 	panic("interpreter exit");
-    setenv("interpret", bf_vm->state ? "" : "ok", 1);
+    setenv("interpret", bf_vm->state ? "" : "OK", 1);
 
     return result;
 }