app superclasses - handle better the default session naming when adding a new session in a multisession app, also remove an extra call to update

Author: rjackey

widgets/+wt/+apps/AbstractSessionApp.m

@@ -2,7 +2,7 @@
         ?wt.apps.BaseMultiSessionApp}) AbstractSessionApp < wt.apps.BaseApp
     % Abstract base class for Widgets Toolbox app with 1+ sessions
 
-%   Copyright 2024-2025 The MathWorks Inc.
+    % Copyright 2024-2025 The MathWorks Inc.
 
 
     %% Abstract Public Properties
@@ -248,11 +248,12 @@ function saveSession_Internal(app, useSaveAs, session)
                 cleanupObj = onCleanup(@()delete(dlg));
 
                 % Save the session
+                % This will trigger update if path updates and/or session
+                % is no longer dirty
                 session.save(sessionPath);
 
-                % Update the app in case filepath changed
+                % Update the title
                 app.updateTitle()
-                app.update()
 
             end %if strlength(sessionPath)
 

widgets/+wt/+apps/BaseMultiSessionApp.m

@@ -28,6 +28,12 @@
         % Number of sessions loaded
         NumSessions (1,1) double
 
+        % Names of sessions loaded
+        SessionNames (:,1) string
+
+        % Names of sessions for display, with * for unsaved session
+        SessionDisplayNames (:,1) string
+
         % Currently selected session
         SelectedSession wt.model.BaseSession
 
@@ -57,6 +63,27 @@
             value = numel(app.Session);
         end
 
+        function value = get.SessionNames(app)
+            numSessions = app.NumSessions;
+            value = repmat("",numSessions,1');
+            if numSessions > 0
+                isValidSession = isvalid(app.Session);
+                value(isValidSession) = [app.Session(isValidSession).Name];
+            end
+        end
+
+        function value = get.SessionDisplayNames(app)
+            numSessions = app.NumSessions;
+            value = repmat("",numSessions,1');
+            if numSessions > 0
+                isValidSession = isvalid(app.Session);
+                value(isValidSession) = [app.Session(isValidSession).Name];
+                isDirty = false(numSessions, 1);
+                isDirty(isValidSession) = [app.Session(isValidSession).Dirty];
+                value(isDirty) = value(isDirty) + " *";
+            end
+        end
+
         function value = get.SelectedSession(app)
             value = app.Session( app.SelectedSessionIndex );
         end
@@ -126,11 +153,22 @@ function close(app)
             % Store the session
             % This also triggers app.update(), app.updateTitle()
             if isempty(app.Session)
+
                 app.Session = session;
+
             else
+
+                % Ensure a unique name
+                thisName = matlab.lang.makeUniqueStrings(...
+                    session.Name, app.SessionNames);
+                session.FilePath = thisName;
+                session.Dirty = false;
+
+                % Append the session
                 app.Session(end+1) = session;
-                % Don't select by default, but concrete app may do this
-            end
+                % Don't select it by default, but concrete app may do this
+
+            end %if
 
         end %function
 

widgets/+wt/+model/BaseSession.m

@@ -65,6 +65,7 @@
             end
         end
     end
+    
 
 
     %% Public methods (subclass may override these)
@@ -138,28 +139,6 @@ function save(session, filePath)
     end %methods
 
 
-    % %% Hidden methods
-    % methods (Hidden)
-    % 
-    %     function setFilePathSilently(obj, filePath)
-    %         % Set FilePath without triggering change notifications
-    % 
-    %         % Define arguments
-    %         arguments
-    %             obj (1,1) wt.model.BaseModel
-    %             filePath (1,1) string
-    %         end
-    % 
-    %         oldValue = obj.EnableChangeListeners;
-    %         obj.EnableChangeListeners = false;
-    %         obj.FilePath = filePath;
-    %         obj.EnableChangeListeners = oldValue;
-    % 
-    %     end %function
-    % 
-    % end %methods
-
-
     %% Protected methods (subclass may override these)
     methods (Access = protected)
 
@@ -200,7 +179,7 @@ function onModelChanged(obj,evt)
         end %function
 
     end %methods
-
+    
 
     %% Accessors
     methods