Bugfix to *Help.

Detail:
  Internationalisation of *Help code (ie probably dating back to RISC OS 3.1)
  broke the Escape condition checking. This is particularly nasty if you
  do *Help . on a machine with slow hardware scrolling!
Admin:
  Not tested.

Version 5.35, 4.79.2.89. Tagged as 'Kernel-5_35-4_79_2_89'

VersionASM

@@ -13,11 +13,11 @@
                         GBLS    Module_ComponentPath
 Module_MajorVersion     SETS    "5.35"
 Module_Version          SETA    535
-Module_MinorVersion     SETS    "4.79.2.88"
-Module_Date             SETS    "12 Sep 2005"
-Module_ApplicationDate  SETS    "12-Sep-05"
+Module_MinorVersion     SETS    "4.79.2.89"
+Module_Date             SETS    "15 Sep 2005"
+Module_ApplicationDate  SETS    "15-Sep-05"
 Module_ComponentName    SETS    "Kernel"
 Module_ComponentPath    SETS    "RiscOS/Sources/Kernel"
-Module_FullVersion      SETS    "5.35 (4.79.2.88)"
-Module_HelpVersion      SETS    "5.35 (12 Sep 2005) 4.79.2.88"
+Module_FullVersion      SETS    "5.35 (4.79.2.89)"
+Module_HelpVersion      SETS    "5.35 (15 Sep 2005) 4.79.2.89"
                         END

VersionNum

@@ -5,19 +5,19 @@
  *
  */
 #define Module_MajorVersion_CMHG        5.35
-#define Module_MinorVersion_CMHG        4.79.2.88
-#define Module_Date_CMHG                12 Sep 2005
+#define Module_MinorVersion_CMHG        4.79.2.89
+#define Module_Date_CMHG                15 Sep 2005
 
 #define Module_MajorVersion             "5.35"
 #define Module_Version                  535
-#define Module_MinorVersion             "4.79.2.88"
-#define Module_Date                     "12 Sep 2005"
+#define Module_MinorVersion             "4.79.2.89"
+#define Module_Date                     "15 Sep 2005"
 
-#define Module_ApplicationDate          "12-Sep-05"
+#define Module_ApplicationDate          "15-Sep-05"
 
 #define Module_ComponentName            "Kernel"
 #define Module_ComponentPath            "RiscOS/Sources/Kernel"
 
-#define Module_FullVersion              "5.35 (4.79.2.88)"
-#define Module_HelpVersion              "5.35 (12 Sep 2005) 4.79.2.88"
+#define Module_FullVersion              "5.35 (4.79.2.89)"
+#define Module_HelpVersion              "5.35 (15 Sep 2005) 4.79.2.89"
 #define Module_LibraryVersionInfo       "5:35"

s/SysComms

@@ -439,14 +439,14 @@ PrintMatch      ROUT
         Push   "r0-r4, lr"
         SWI     XOS_ReadEscapeState
         BLCS    AckEscape
-
+        BVS     %FT99
         SWI     XOS_WriteI+CR
         MOVVC   r4,r3
         BL      WriteS_Translated_UseR4
         =       "HelpFound:==> Help on keyword %0",0
         ALIGN
         SWIVC   XOS_NewLine
-        STRVS   R0, [stack]
+99      STRVS   R0, [stack]
         MOV     R7, #1
         Pull   "r0-r4, PC"
       |