Acre 5.0.6+137 2019-02-26 12.45

the-carlisle-group · Feb 26, 2019 · 33abe90 · 33abe90
1 parent e154df8
commit 33abe90
Show file tree

Hide file tree

Showing 6 changed files with 17 additions and 5 deletions.
diff --git a/APLSource/_code-0/EditArray-11.aplf b/APLSource/_code-0/EditArray-11.aplf
@@ -13,7 +13,7 @@
      z←fixValue fqn type new
      old≡⍎fqn:''
      0=dat←whichProject fqn:fqn
-     fqn⊣logMsg MS.DK,⊃if≢dat setChange fqn type new
+     fqn⊣logMsg MS.DS,⊃if≢dat setChange fqn type new
 
 ⍝ Phil 2018-10-17 12.53
  }
diff --git a/APLSource/_code-0/allMessages-8.aplf b/APLSource/_code-0/allMessages-8.aplf
@@ -75,6 +75,7 @@
          ⍵.DP←'Startup - '
          ⍵.DQ←'Editing first valid item only: '
          ⍵.DR←'No valid items supplied'
+         ⍵.DS←'⎕Saved: '
 
          ⍵.EF←'Comparing '
          ⍵.EG←'change changes'

diff --git a/APLSource/_code-0/editFix-10.aplf b/APLSource/_code-0/editFix-10.aplf
@@ -24,7 +24,7 @@
      (oldval≡newval←⊃2⊃getValue,⊂fqn):                 ⍝ unchanged
      type←⊃nameClass fqn
      z←⍴dat∘putChange⍣(new⍱(⊂fqn)∊dat.changed)⊢fqn oldval type
-     z←logMsg MS.DK,⊃dat setChange fqn type newval
+     z←logMsg MS.DS,⊃dat setChange fqn type newval
 ⍝ ⍺ probably missing
 ⍝ ⍵ 'Start' or 'Close' or callback argument
 ⍝ ← 0 for 'Start' and 'Close' - else none

diff --git a/APLSource/_code-0/logMsg-8.aplf b/APLSource/_code-0/logMsg-8.aplf
@@ -4,7 +4,8 @@
      hd←nout{⍵((⍵≠' ')\'=')}⍺⊣''
      da←hd,ms
      dt←DT.(dt2fm ts2dt ⎕TS),' '
-     SV.errmsgs,←da/⍨'!'=⊃¨da  ⍝ reset in userCmdRun
+     SV.errmsgs,←da/⍨'!'=⊃¨da           ⍝ reset in userCmdRun
+     (z/da)←{⎕←1↓⍵}/0,⍪da/⍨z←'⎕'=⊃¨da   ⍝ to session
      dd←MP.log{(⊢↑⍨1000⌊≢)⍵,⍺}←dt∘,¨da
      ~_NEXISTS SV.logfile:ms
      fd←⎕UCS MS.HI ⎕UCS⊃,/UT.EN,,∘UT.(CR LF)¨dd

diff --git a/APLSource/_code-0/releaseNotes-80.aplf b/APLSource/_code-0/releaseNotes-80.aplf
@@ -1,5 +1,5 @@
  releaseNotes←{2↓¨1↓¯1↓⎕NR⊃⎕SI
-⍝ Acre 5.0.6+135 2019-02-24 23.08
+⍝ Acre 5.0.6+137 2019-02-26 12.45
 ⍝
 ⍝ Acre Desktop - Release Notes
 ⍝ ============================
@@ -8,5 +8,16 @@
 ⍝ Keys required by acre are still "corrected" for case but others remain as
 ⍝ typed. However, required or not, multiple keys that resolve to the same
 ⍝ name when case is ignored will be reduced to the first alphabetically.
+⍝
+⍝ The "Saved: #.project.whatever" message issued from an edit is now sent
+⍝ to the session in addition to the log window and file.
+⍝
+⍝ The default state of the message log window is now hidden.
+⍝       ]acre.log show
+⍝       ⎕UCMD'acre.log show'
+⍝ or
+⍝       ⎕SE.acreAPI.log'show'
+⍝ bring it into view and can be added to the "StartUp" parameter in
+⍝ "acre.config" or a function already called thence.
 ⍝-----------------------------
  }
diff --git a/APLSource/_code-0/setEnvironment-8.aplf b/APLSource/_code-0/setEnvironment-8.aplf
@@ -17,7 +17,6 @@
      SV.sessionstart←sessionStart''
      z←editFix'Start'                 ⍝ sets other stuff in SV
      z←logMsg⍕getVersion''
-     z←logCtrl'show'
      z←⍴⎕SE MS.FY _is_ setAPI''
      ##.run←⎕THIS.codeHook
      1:SV.setupcomplete←1