Tests UC_[101,102,200,201,202] & Open_90 fixed

Author: aplteam

APLSource/Cider/History.apla

@@ -5,6 +5,7 @@
  '  * License issues fixed'
  '  * Bug fixes'
  '    * #125'
+ '    * Test_UC_[100,101,200,201,202] fixed (_OK was niot assigned when it should)'
  '* 0.48.3 ⋄ 2025-08-09'
  '  * Packages updated (APLProcess!)'
  '* 0.48.2 ⋄ 2025-07-12'
@@ -211,107 +212,4 @@
  '    * `CloseProject` might have carried out unnecessary check functions'
  '    * The user commands `AddTatinPackages` and `AddNuGetPackages` crashed when no project was specified and "q" (for "quit")'
  '      was entered instead of selecting one of multiple currently opened projects '
- '* 0.39.0 ⋄ 2024-01-25'
- '  * NuGet interface improved (tx Alexander Block)'
- '  * New global config parameter introduced: `AskForDirChange`'
- '  * New global config parameter introduced: `ReportGitStatus` '
- '  * The config property "tatinVars", when present, was used to establish which sub-namspace of a project'
- '    would eventually become a package. This was used in order to inject the namespace `TatinVars` into that'
- '    sub-namespace rather than the root of the project.'
- '    Now Cider always injects `TatinVars` into the root of the project, but in addition it establishes a '
- '    reference `TatinVars` in the sub-namespace defined by "tatinVars" pointing to `TatinVars` in the root of'
- '    the project. '
- '  * Bug fixes'
- '    * `]packageConfig -edit` did not update the workspace (`TatinVars`) '
- '    * OpenProject crashed when [?] was specified as argument but no aliases were defined'
- '    * `InjectTatinVars` did not check whether "tatinVars", when available and not empty, points to a '
- '      sub-namespace of the project''s root'
- '* 0.38.0 ⋄ 2023-12-17'
- '  * BREAKING CHANGE: API function `GetAliasFileContent` renamed: `GetCiderAliasFileContent`'
- '  * Optional property `tatinVars` added to the Cider config file and `InjectTatinVars` changed accordingly'
- '  * `CheckTargetNamespaceAndLinkFolder` improved in terms of error messages and better questions '
- '  * Documentation improved'
- '  * New version of FilesAndDirs integrated which addresses the problem that RmDirByForce with ''/..'' dir not'
- '    work on Linux and Mac OS.'
- '  * Bug fix in `InjectTatinVars`: TatinVars was injected into the project root rather than the package root'
- '* 0.37.5 ⋄ 2023-11-07'
- '  * Bug fixes'
- '    * The user command ]UpdateCider signalled a VALUE ERROR in case it updated Cider sucessfully: missing explicit result.'
- '* 0.37.4 ⋄ 2023-10-13'
- '  * Bug fixes'
- '    * When attempting to open a package with NuGet dependencies in Dyalog priot 19.0 Cider kept silent over '
- '      the fact that such a version does not support NuGet. It now prints a message to the session.'
- '    * Reloading Tatin packages after using `AddTatinDependencies` sometimes failed.'
- '    * ListTatinPackages now prints "No dependencies found" to the session rather than returning an empty matrix.'
- '* 0.37.3 ⋄ 2023-10-10'
- '  * Installation folder was missing the `SessionExtensions` level'
- '* 0.37.2 ⋄ 2023-10-08'
- '  * In the documentation the function `LoadCider` was wrong: no left argument (1) was passed to `GetProgramFilesFolder`'
- '  * `OpenProject` did not give any feedback if no argument was specfied, no aliases were defined and the current dir is not a project folder'
- '* 0.37.1 ⋄ 2023-10-07'
- '  * Bug fix in `]Cider.UpdateCider`   '
- '  * Documentation regarding the installation and upgrading procedure corrected'
- '  * `Make` amended'
- '* 0.37.0 ⋄ 2023-10-03'
- '  * `]AddTatinDependencies` now loads the added dependencies as well'
- '  * Bug fixes'
- '    * `AddTatinDependencies` prints now better mesages to the session'
- '    * `GetCiderGlobalConfigFileContent` is now more robust and reports better messages'
- '    * Deleting everything in the editor window when a new project is about to be created should'
- '      have been treated as "cancel the process" but wasn''t'
- '* 0.36.0 ⋄ 2023-09-23'
- '  * Documentation now in line with latest changes to the installatin routine'
- '* 0.35.0 ⋄ 2023-09-22'
- '  * User commands implemented:'
- '    * `]Cider.AddTatinDependencies`'
- '    * `]Cider.AddNuGetDependencies`'
- '    * `]Cider.ListTatinDependencies`'
- '    * `]Cider.ListNuGetDependencies`'
- '  * API equivalents for the newly introduced user commands implemented: `AddTatinDependencies`, '
- '    `AddNuGetDependencies`, `ListTatinDependencies`, `ListNuGetDependencies`'
- '  * `OpenProject` now loads NuGet dependencies, if any'
- '  * The default of `checkPackageVersions` in `CreateOpenParms` is now 0, preventing the API function from'
- '    asking the user. (The user command `OpenProject` will asign `⍬` however)'
- '  * `]Cider.UpdateCider` added as a user command, though the corresponding API function is still missing'
- '  * Bug fixes:'
- '    * There were refs missing in the user command script in case of DEVELOPMENT←1'
- '* 0.34.0 ⋄ 2023-09-14'
- '  * `OpenProject` does not report anymore anything but serious stuff and final success to `⎕SE`, but watch '
- '    out for the global config parameter `verbose` and the user command flags `-verbose` and `-batch`'
- '  * `OpenProject`s `quiet` flag has been retired'
- '  * `OpenProject` has now a parameter `verbose` & `batch`; the latter is for tests & build procedures etc'
- '  * `]OpenProject` has now a -verbose flag and a `-batch` flag'
- '  * Cider honours a variable `verbose` in its global configuration file. By default no such file exists,'
- '    meaning that the default is 0. If it does exist it might or might nor carry `verbose`. '
- '  * Cider deletes Link-specific vars in its config file that equal their defaults anyway'
- '  * Under rare circumstances `]Cider.Help` produced an error ("File not found") rather than showing the help'
- '* 0.33.0 ⋄ 2023-09-05'
- '  * `Cider` is now an ordinary namespace rather than a class script.'
- '  * `LoadTatinPackages` now reports the URL the packages were loaded from, but only if they were loaded'
- '    from more than one place.'
- '* 0.32.0 ⋄ 2023-08-25'
- '  * `APLGit2` is now part of `Cider` and therefore always available'
- '  * Bug fixes'
- '    * The function `GetCiderGlobalConfigHomeFolder` crashed when Cider was not properly installed'
- '    * Loading Tatin packages did not act appropriately when there were packages installed but they'
- '      did not fit to the dependency list and/or the build list'
- '    * Inconsistencies between the build list and the dependency file were not discovered. Now Cider'
- '      does a re-install if the user permits that.'
- '    * It was possible to load a package and then open it as a project; this is now prevented'
- '* 0.31.1 ⋄ 2023-08-05'
- '  * Version 0.30.0 wrongly pretended to be a beta release when it wasn''t'
- '* 0.31.0 ⋄ 2023-08-04'
- '  * Step added to `OpenProject`: checks for a non-empty variable `ToDo` in the root of the project now'
- '  * When Cider is asked for "Make" it checks for a variable `ToDo` now and reports its findings'
- '  * In case the user function `ExecuteAfterProjectOpen` is causing trouble the error message is more'
- '    prominently emphasized now.'
- '  * The newly introduced flag `ignoreUserExec` can be used to prevent the execution of the user function'
- '    by a particular call of `OpenProject`'
- '* 0.30.1 ⋄ 2023-07-23'
- '  * Bug fix in `CheckForTatinPackages`'
- '* 0.30.0 ⋄ 2023-07-07'
- '  * Without a parameter, OpenProject now offers all aliases for selection'
- '  * When `make` and/or `test` point to an APL object no error is thrown anymore. Instead a warning'
- '    is issued.'
- '  * Bug fix: new projects got a parameter `githubUsername` injected which is not used anymore'
 )

APLSource/TestCases/Test_Open_090.aplf

@@ -5,7 +5,7 @@
 
  #.⎕SHADOW'TEMP' ⋄ 'TEMP'#.⎕NS''
  parms←##.Cider.CreateOpenParms ⍬
- parms.folder←##.CiderConfig.HOME,'\TestData\LxProject'
+ parms.folder←##.CiderConfig.HOME,'/TestData/LxProject'
  parms.parent←'#.TEMP'
  ##.Cider.C.AddAutomation'YesOrNo' 'ExecLX@' 'y'
  (success log)←##.Cider.OpenProject parms

APLSource/TestCases/Test_UC_100.aplf

@@ -14,5 +14,6 @@
  ns←##.Cider.Get_JSON5 #.Cider.CiderConfig.HOME,'/cider.config'
  expected←FilesAndDirs.EnforceSlash∘FilesAndDirs.AddTrailingSep¨{⍵↑⍨¯1+⍵⍳'='}¨ns.CIDER.(dependencies dependencies_dev).tatin
  →T.PassesIf∧/expected∊res[;1]
+ R←T._OK
 
 ⍝Done

APLSource/TestCases/Test_UC_101.aplf

@@ -21,6 +21,7 @@
  →T.GoToTidyUp~∧/res[;1]∊0 1
  →T.GoToTidyUp~∧/res[;1]∊0 1
  →T.GoToTidyUp~∧/{2≤⍵+.='-'}¨res[;2]
+ R←T._OK
 
 ∆TidyUp:
  #.Cider.Cider.CommTools.Cleanup

APLSource/TestCases/Test_UC_200.aplf

@@ -9,4 +9,5 @@
  :If ~∨/'Not found:'⍷∊res
      →T.PassesIf∨/'*** Link config file'⍷∊res
  :EndIf
+ R←T._OK
 ⍝Done

APLSource/TestCases/Test_UC_201.aplf

@@ -20,6 +20,7 @@
  json←⊃⎕NGET tempDir,'/Boo-Project/APLSource/.linkconfig'
  ns←⎕JSON⍠('Dialect' 'JSON5')⊢json
  →T.GoToTidyUp 2≠ns.CiderTest
+ R←T._OK
 
 ∆TidyUp:
  ref.Cleanup

APLSource/TestCases/Test_UC_202.aplf

@@ -14,6 +14,7 @@
  (rc msg res)←stop ∆UCMD'LinkConfig  ',tempDir,'/Boo-Project -delete'
  Assert rc=0
  →T.GoToTidyUp 0≠⎕NEXISTS tempDir,'/Boo-Project/APLSource/.linkconfig'
+ R←T._OK
 
 ∆TidyUp:
  ref.Cleanup