--- a/ApplicationModel.st	Fri Feb 21 19:13:20 2020 +0100
+++ b/ApplicationModel.st	Fri Feb 21 19:16:38 2020 +0100
@@ -2958,7 +2958,11 @@
 showMeHowItWorks:minorKey inAny:setOfMajorKeys
     "start a ShowMeHowItWorks presentation.
      This is controlled by a spec, which is read from the resources/shows folder,
-     and is named <appClassName>_<lang>.show"
+     and is named either:
+        <appClassName>_<lang>       - a folder containing a start.show file
+     or:
+        <appClassName>_<lang>.show  - a show description file
+    "
 
     |fn rsrcDir|
 
@@ -2975,6 +2979,9 @@
         ].
 
         {
+            { ('_',Smalltalk language) . Smalltalk language }  .
+            { ('_en') . 'en' }                                 .
+            { '' . 'en' }                                      .  
             { ('_',Smalltalk language,'.show') . Smalltalk language }  .
             { ('_en','.show') . 'en' }                                 .
             { '.show' . 'en' }