Couple of minor improvements

Author: aplteam

APLSource/CodeBrowser-11/History-1.aplf

@@ -1,4 +1,9 @@
  History
+⍝ * Version 1.0.2
+⍝   * Help polished.
+⍝   * "Make" updated.
+⍝   * Bug fixes:
+⍝     * The `lines` parameter did not work when specified via the user command interface.
 ⍝ * Version 1.0.1
 ⍝   * New parameter `lines` introduced which defaults to 20, defining the number of lines to be
 ⍝     be displayed in terms of lines.

APLSource/CodeBrowser-11/Version-1.aplf

@@ -1,3 +1,3 @@
  r←Version
 ⍝ See also `History`
- r←'CodeBrowser' '1.0.1.35' '2018-10-10'
+ r←'CodeBrowser' '1.0.2.48' '2019-07-31'

CodeBrowser.dws

@@ -975,14 +975,20 @@ <h3 id="CodeBrowser">1. <a href="#CodeBrowser">CodeBrowser</a></h3>
 <button title="Hide" class="accordion expanded">Hide</button>
 <button title="Brings previous object to the top" onClick="jump2bookmark('bookmark_00029')">Previous</button>
 <button title="Brings next object to the top" onClick="jump2bookmark('bookmark_00031')">Next</button>
-<p class="caption">29. <a href="#CodeBrowser">CodeBrowser</a>.History (6 lines)</p>
+<p class="caption">29. <a href="#CodeBrowser">CodeBrowser</a>.History (12 lines)</p>
 <div class="accordion-content">
 <pre><code>     ∇ History
-[1]   ⍝ * Version 1.0.1
-[2]   ⍝   * New parameter `lines` introduced which defaults to 20, defining the number of lines to be
-[3]   ⍝     be displayed in terms of lines.
-[4]   ⍝   * The `-gui` parameter is Windows only but did not check; now it does (in the user command).
-[5]   ⍝ * Version 1.0.0
+[1]   ⍝ * Version 1.0.2
+[2]   ⍝   * Help polished.
+[3]   ⍝   * "Make" updated.
+[4]   ⍝   * Bug fixes:
+[5]   ⍝     * The `lines` parameter did not work when specified via the user command interface.
+[6]   ⍝ * Version 1.0.1
+[7]   ⍝   * New parameter `lines` introduced which defaults to 20, defining the number of lines to be
+[8]   ⍝     be displayed in terms of lines.
+[9]   ⍝   * The `-gui` parameter is Windows only but did not check; now it does (in the user command).
+[10]  ⍝\\
+[11]  ⍝ For information regarding older versions see &lt;https://github.com/aplteam/CodeBrowser/releases&gt;
      ∇
 </code></pre>
 </div>
@@ -1419,7 +1425,7 @@ <h3 id="CodeBrowser">1. <a href="#CodeBrowser">CodeBrowser</a></h3>
 <div class="accordion-content">
 <pre><code>     ∇ r←Version
 [1]   ⍝ See also `History`
-[2]    r←'CodeBrowser' '1.0.1.35' '2018-10-10'
+[2]    r←'CodeBrowser' '1.0.2.48' '2019-07-31'
      ∇
 </code></pre>
 </div>
@@ -1501,7 +1507,7 @@ <h3 id="CodeBrowser">1. <a href="#CodeBrowser">CodeBrowser</a></h3>
 <div id="CodeBrowser.html">
 <p class="caption">5. <a href="#CodeBrowser">CodeBrowser</a>.html</p>
 </div>
-<pre><code>Rank: 1; Shape: 1387; Depth: 2; Data Representation: 326</code></pre>
+<pre><code>Rank: 1; Shape: 1393; Depth: 2; Data Representation: 326</code></pre>
 <div id="CodeBrowser.level">
 <p class="caption">6. <a href="#CodeBrowser">CodeBrowser</a>.level</p>
 </div>
@@ -2878,7 +2884,7 @@ <h3 id="CodeBrowser.GUI">1.1. <a href="#CodeBrowser">CodeBrowser</a>.<a href="#C
 <div id="bookmark_00103"></div>
 <footer>
 <hr>
-<p>Create 2018-10-12 22:58:38 by kai</p>
+<p>Created 2019-07-31 16:35:19 by kai</p>
 </footer>
 <div id="parameters">
 <hr>
@@ -2888,9 +2894,9 @@ <h2 class="center">Parameters</h2>
 <tbody>
 <tr><td>backgroundColorPrint</td><td>1</td></tr>
 <tr><td>caption             </td><td>CodeBrowser on itself</td></tr>
-<tr><td>cssfilename         </td><td> ../codebrowser_styles.css </td></tr>
-<tr><td>filename            </td><td>../CodeBrowser_CodeReview.html</td></tr>
-<tr><td>footer              </td><td>Create 2018-10-12 22:58:38 by kai</td></tr>
+<tr><td>cssfilename         </td><td> codebrowser_styles.css </td></tr>
+<tr><td>filename            </td><td>CodeBrowser_CodeReview.html</td></tr>
+<tr><td>footer              </td><td>Created 2019-07-31 16:35:19 by kai</td></tr>
 <tr><td>ignore              </td><td>  </td></tr>
 <tr><td>ignoreEmpty         </td><td>1</td></tr>
 <tr><td>info                </td><td></td></tr>
@@ -2908,7 +2914,7 @@ <h2 class="center">Parameters</h2>
 <tr><td>recursive           </td><td>1</td></tr>
 <tr><td>showParms           </td><td>1</td></tr>
 <tr><td>twoSidedPrint       </td><td>0</td></tr>
-<tr><td>version             </td><td>CodeBrowser 1.0.1.35 from 2018-10-10</td></tr>
+<tr><td>version             </td><td>CodeBrowser 1.0.2.48 from 2019-07-31</td></tr>
 <tr><td>viewInBrowser       </td><td>0</td></tr>
 </tbody>
 </table>

CodeBrowser_CodeReview.html

@@ -3,7 +3,7 @@
 ⍝ The workspace "CodeBrowse.dws" must be a sibling of this user command script.
 ⍝ The WS is copied into a namespace ⎕SE.CodeBrowser which is deleted afterwards except when -load is specified.
 ⍝ Kai Jaeger ⋄ APL Team Ltd
-⍝ Version 1.0.3 - 2018-10-10
+⍝ Version 1.0.4 - 2019-07-31
 
     ∇ r←List;⎕IO;⎕ML
       :Access Shared Public
@@ -65,7 +65,7 @@
       :EndIf
     ∇
 
-    ∇ r←level Help Cmd;⎕IO;⎕ML;ref
+    ∇ r←level Help Cmd;⎕IO;⎕ML;ref;parms
       ⎕IO←1 ⋄ ⎕ML←1
       :Access Shared Public
       r←''
@@ -94,14 +94,22 @@
           r,←⊂'-load        If you specify this flag then all other flags are ignored. CodeBrowser is copied into ⎕SE permanently.'
           r,←⊂'-version     If you specify this flag then all other flags are ignored. Returns CodeBrowser''s version number.'
           r,←⊂'             You then have two functions at your disposal: ⎕SE.CodeBrowser.CreateParms and ⎕SE.CodeBrowser.Run.'
+          r,←⊂'For processing CodeBrowser''s code by CodeBrowser execute ]CodeBrowser -??'
+          r,←⊂'For getting CodeBrowser''s internal documentation execute ]CodeBrowser -???'
       :Case 1
+          ref←⍎'CodeBrowser'⎕SE.⎕NS''
+          'Could not find/load CodeBrowser'⎕SIGNAL 11/⍨~Load ⍬
+          parms←ref.CodeBrowser.CreateParms''
+          parms.viewInBrowser←1
+          parms.cssfilename←((ref.FilesAndDirs.NormalizePath '%USERPROFILE%'),'\Documents\MyUCMDs\CodeBrowser\' ),parms.cssfilename
+          parms.footer←'Created with CoderBrowser version ',⊃{⍺,' from ',⍵}/1↓ref⍎'CodeBrowser.Version' 
+          parms ref.CodeBrowser.Run(⍕ref),'.CodeBrowser'
+      :Case 2
           ⎕SE.⎕SHADOW'CodeBrowser'
           ref←⍎'CodeBrowser'⎕SE.⎕NS''
           'Could not find/load CodeBrowser'⎕SIGNAL 11/⍨~Load ⍬
           {}⎕SE.UCMD']ADOC ⎕SE.CodeBrowser.CodeBrowser'
           r,←⊂'Watch your default browser'
-      :Case 2
-          r←⊂'Not available'
       :EndSelect
     ∇
 
@@ -144,6 +152,7 @@
     ∇
 
     ∇ parms←parms Args2Parms args
+      parms.lines←args.lines  ⍝ Already processed
       :If 0≢args.ignore
           '"ignore": invalid data type'⎕SIGNAL 11/⍨' '≠1↑0⍴∊args.ignore
           parms.ignore←args.ignore

CodeBrowser_uc.dyalog

@@ -1,7 +1 @@
-:Namespace
-    CaseCode←'On'
-    KeepHistory←'On'
-    Open←''
-    ProjectSpace←'#._CodeBrowser'
-    StartUp←''
-:EndNamespace
+[   CaseCode←'On'   Open←''   ProjectSpace←'#._CodeBrowser'   StartUp←'']

Make/Make.DWS

@@ -1 +1 @@
-<tool name="CodeBrowser">  <version>1.0.1</version>  <date>2018-10-10</date>  <container>#._CodeBrowser</container>  <needs>    <script>APLTreeUtils</script>    <script>FilesAndDirs</script>    <script>OS</script>    <script>Tester</script>    <script>MarkAPL</script>  </needs>  <wsid>Development</wsid>  <autoload>1</autoload>  <buildid>35</buildid></tool>
+<tool name="CodeBrowser">  <version>1.0.2</version>  <date>2019-07-31</date>  <container>#._CodeBrowser</container>  <needs>    <script>APLTreeUtils</script>    <script>FilesAndDirs</script>    <script>OS</script>    <script development="true">Tester</script>    <script>MarkAPL</script>  </needs>  <autoload>1</autoload>  <lx>⍝#.CodeBrowser.Run [namespace(s)]</lx>  <buildid>48</buildid></tool>