Make international help (or lack of) choice based on switch passed in rather...

Make international help (or lack of) choice based on switch passed in rather than the bitfield definition in Hdr:ModHand.

Makes help work on RISC OS 3.10 again.

Version 0.27. Tagged as 'Filter-0_27'

VersionASM

@@ -11,13 +11,13 @@
                         GBLS    Module_HelpVersion
                         GBLS    Module_ComponentName
                         GBLS    Module_ComponentPath
-Module_MajorVersion     SETS    "0.26"
-Module_Version          SETA    26
+Module_MajorVersion     SETS    "0.27"
+Module_Version          SETA    27
 Module_MinorVersion     SETS    ""
-Module_Date             SETS    "10 Jan 2012"
-Module_ApplicationDate  SETS    "10-Jan-12"
+Module_Date             SETS    "12 Jan 2012"
+Module_ApplicationDate  SETS    "12-Jan-12"
 Module_ComponentName    SETS    "Filter"
 Module_ComponentPath    SETS    "castle/RiscOS/Sources/Desktop/Filter"
-Module_FullVersion      SETS    "0.26"
-Module_HelpVersion      SETS    "0.26 (10 Jan 2012)"
+Module_FullVersion      SETS    "0.27"
+Module_HelpVersion      SETS    "0.27 (12 Jan 2012)"
                         END

VersionNum

-/* (0.26)
+/* (0.27)
  *
  * This file is automatically maintained by srccommit, do not edit manually.
  * Last processed by srccommit version: 1.1.
  *
  */
-#define Module_MajorVersion_CMHG        0.26
+#define Module_MajorVersion_CMHG        0.27
 #define Module_MinorVersion_CMHG        
-#define Module_Date_CMHG                10 Jan 2012
+#define Module_Date_CMHG                12 Jan 2012
 
-#define Module_MajorVersion             "0.26"
-#define Module_Version                  26
+#define Module_MajorVersion             "0.27"
+#define Module_Version                  27
 #define Module_MinorVersion             ""
-#define Module_Date                     "10 Jan 2012"
+#define Module_Date                     "12 Jan 2012"
 
-#define Module_ApplicationDate          "10-Jan-12"
+#define Module_ApplicationDate          "12-Jan-12"
 
 #define Module_ComponentName            "Filter"
 #define Module_ComponentPath            "castle/RiscOS/Sources/Desktop/Filter"
 
-#define Module_FullVersion              "0.26"
-#define Module_HelpVersion              "0.26 (10 Jan 2012)"
-#define Module_LibraryVersionInfo       "0:26"
+#define Module_FullVersion              "0.27"
+#define Module_HelpVersion              "0.27 (12 Jan 2012)"
+#define Module_LibraryVersionInfo       "0:27"

s/FilterMgr

@@ -70,6 +70,10 @@ Module_BaseAddr
         GBLL    standalone
 standalone      SETL {FALSE}            ; Build-in Messages file and i/f to ResourceFS
     ]
+    [ :LNOT: :DEF: international_help
+        GBLL    international_help
+international_help SETL {TRUE}          ; Default to RISC OS 3.60+ internationalisation
+    ]
 
 debug           SETL {FALSE}            ; ONLY FALSE IF NO DEBUGGING
 hostvdu         SETL {TRUE}             ; True to send debug to tube

s/ModHead

@@ -29,11 +29,11 @@ MySWIBase       *       Module_SWISystemBase + FilterSWI * Module_SWIChunkSize
         DCD     Filter_SWIdecode  - Module_BaseAddr
         DCD     Filter_SWInames   - Module_BaseAddr
         DCD     0
- [ International_Help <> 0
+      [ international_help
         DCD     message_file_name - Module_BaseAddr
- |
+      |
         DCD     0
- ]
+      ]
       [ :LNOT: No32bitCode
         DCD     ModuleFlags       - Module_BaseAddr
       ]
@@ -41,11 +41,9 @@ MySWIBase       *       Module_SWISystemBase + FilterSWI * Module_SWIChunkSize
 ; ----------------------------------------------------------------------------------------------------------------------
 Title   DCB     "FilterManager",0
 Helpstr DCB     "Filter Manager",9,"$Module_HelpVersion"
-      [ standalone
-        =       "  (Standalone)"
-      ]
         DCB     0
-                ALIGN
+        ALIGN
+
 ; ----------------------------------------------------------------------------------------------------------------------
 
 prefilter_token         DCB     "PreFT",0
@@ -516,21 +514,23 @@ writefield_dashed
 
 ; ----------------------------------------------------------------------------------------------------------------------
 Helptable
-; ----------------------------------------------------------------------------------------------------------------------
-Filtercommand
-        Command "Filters",0,0,International_Help
+      [ international_help
+        Command "Filters", 0, 0, International_Help
         DCB     0
-; ----------------------------------------------------------------------------------------------------------------------
- [ International_Help=0
-Filters_Help
-        DCB     "*Filters displays all Wimp filters currently active."
+      |
+        Command "Filters", 0, 0, 0
         DCB     0
-Filters_Syntax
-        DCB     "Syntax: *Filters",0
- |
+      ]
+; ----------------------------------------------------------------------------------------------------------------------
+      [ international_help
 Filters_Help    DCB     "HFLMFLT", 0
 Filters_Syntax  DCB     "SFLMFLT", 0
- ]
+      |
+Filters_Help
+        DCB     "*Filters displays all Wimp filters currently active.", 0
+Filters_Syntax
+        DCB     "Syntax: *Filters", 0
+      ]
         ALIGN
 ; ----------------------------------------------------------------------------------------------------------------------
 ;       Module initialisation point