Remove SHIFT+LEFT_ARROW = delete for Apple ][ (shift key mod)

src/toolsrc/sb.pla

@@ -90,7 +90,7 @@ word              = $0450,$04D0,$0550,$05D0,$0650,$06D0,$0750,$07D0
 // Editor variables
 //
 byte nullstr      = ""
-byte version      = "PLASMA ][ SANDBOX VERSION 00.94"
+byte version      = "PLASMA ][ SANDBOX VERSION 00.95"
 byte errorstr     = "ERROR: $"
 byte okstr        = "OK"
 byte outofmem     = "OUT OF MEMORY!"
@@ -1202,7 +1202,7 @@ def readtxt(filename)
     byte txtbuf[81], refnum, i, j
 
     refnum = open(filename, iobuffer)
-    if refnum
+    if refnum and not perr
         newline(refnum, $7F, $0D)
         repeat
             txtbuf = read(refnum, @txtbuf + 1, maxlnlen)
@@ -1214,7 +1214,6 @@ def readtxt(filename)
             fin
             if !(numlines & $0F); cout('.'); fin
         until txtbuf == 0 or numlines == maxlines
-        close(refnum)
 	//
 	// Make sure there is a blank line at the end of the buffer
 	//
@@ -1223,6 +1222,7 @@ def readtxt(filename)
 	    numlines = numlines + 1
 	fin
     fin
+    if refnum; close(refnum); fin
 end
 def writetxt(filename)
     byte txtbuf[81], refnum
@@ -1483,10 +1483,10 @@ def keyin2
         key = $FC // |
     elsif key == keyctrly
         key = $FE // ~
-    elsif key == keyarrowleft
-        if ^pushbttn3 < 128
-            key = $FF
-        fin
+//    elsif key == keyarrowleft
+//        if ^pushbttn3 < 128
+//            key = $FF
+//        fin
     elsif key >= $C0 and flags < shiftlock
         if ^pushbttn3 < 128
             if key == $C0