From d6faa42e32e659e8eb018583de87f19c092b0434 Mon Sep 17 00:00:00 2001
From: David Schmenk <dschmenk@gmail.com>
Date: Mon, 7 Jul 2014 22:15:57 -0700
Subject: [PATCH] Switch to new when/is/otherwise with break

---
 src/vmsrc/a1cmd.pla  | 2 ++
 src/vmsrc/cmd.pla    | 8 +++++++-
 src/vmsrc/soscmd.pla | 4 ++++
 3 files changed, 13 insertions(+), 1 deletion(-)

diff --git a/src/vmsrc/a1cmd.pla b/src/vmsrc/a1cmd.pla
index 4f5008c..7954e5f 100644
--- a/src/vmsrc/a1cmd.pla
+++ b/src/vmsrc/a1cmd.pla
@@ -994,8 +994,10 @@ while 1
 	        quit
 	    is 'M'
 	        syscall($02)
+		break
 	    is '+'
 	        execmod(cmdptr)
+		break
 	    otherwise
 	        prstr(@huhstr)
         wend
diff --git a/src/vmsrc/cmd.pla b/src/vmsrc/cmd.pla
index e6f9a23..0dc4a51 100644
--- a/src/vmsrc/cmd.pla
+++ b/src/vmsrc/cmd.pla
@@ -1278,16 +1278,22 @@ while 1
         when toupper(parsecmd(cmdptr))
             is 'Q'
 	        reboot()
+		break
 	    is 'C'
 	        catalog(cmdptr)
+		break
 	    is 'P'
 	        setpfx(cmdptr)
+		break
 	    is 'V'
-	        volumes();
+	        volumes()
+		break
 	    is '-'
 	        execsys(cmdptr)
+		break
 	    is '+'
 	        execmod(cmdptr)
+		break
 	    otherwise
 	        prstr(@huhstr)
         wend
diff --git a/src/vmsrc/soscmd.pla b/src/vmsrc/soscmd.pla
index a40efd0..f338656 100644
--- a/src/vmsrc/soscmd.pla
+++ b/src/vmsrc/soscmd.pla
@@ -1276,13 +1276,17 @@ while 1
 	        quit
 	    is 'C'
 	        catalog(cmdptr)
+		break
 	    is 'P'
 	        setpfx(cmdptr)
+		break
 	    is 'V'
 	        volumes
+		break
 	    is '+'
 	        execmod(cmdptr)
 		write(refcons, @textmode, 3)
+		break
 	    otherwise
 	        prstr(@huhstr)
         wend