fixes #187 FileSelector support S3 (hdfs et al) in IsValueValidPath - I actually left ValueIsValidPath false in this case, but I am hiding the error icon if a web address is used (e.g. starts with alphanumerics + :// )

Author: rjackey

test/+wt/+test/FileSelector.m

@@ -170,6 +170,28 @@ function testFileEditField(testCase)
             %testCase.verifyTrue(logical(testCase.Widget.WarnImage.Visible));
 
         end %function
+
+            
+        function testWebAddress(testCase)
+            
+            % Get the edit field
+            editControl = testCase.Widget.EditControl;
+            
+            % Set the type
+            testCase.verifySetProperty("SelectionType", "folder");
+            
+            % Type a valid value
+            newValue = "s3://abucket/afolder";
+            testCase.verifyTypeAction(editControl, newValue, "Value");
+            
+            % Verify the ValueIsValidPath value (false because not local
+            % folder)
+            testCase.verifyFalse(testCase.Widget.ValueIsValidPath)
+
+            % Verify the warn image does not show (we ignore web address)
+            testCase.verifyFalse(logical(testCase.Widget.WarnImage.Visible));
+            
+        end %function
 
 
         function testRootDirectoryAndHistory(testCase)

widgets/+wt/+utility/cleanPath.m

@@ -1,4 +1,4 @@
-function path = cleanPath(path)
+function out = cleanPath(in)
 % cleanPath - Utility to clean and standardize a file/folder path
 %
 % This function will clean and standardize a file or folder path. It
@@ -24,15 +24,60 @@
 %         "C:\Program Files\MATLAB"
 %
 
-%   Copyright 2020-2025 The MathWorks Inc.
+%   Copyright 2020-2026 The MathWorks Inc.
 % ---------------------------------------------------------------------
 
-% File separator - in case of regional variants
-fsep = regexptranslate("escape",filesep);
+arguments
+    in string    % accepts string arrays of any size
+end
 
-% Pattern for regexp
-fsepOpts = join(["\\","/",fsep],"|");
-pattern = "^\s+|(?<=\S)(\s|" + fsepOpts + ")+$";
+if isempty(in)
+    out = in;
+    return
+end
 
-% Perform replacement
-path = regexprep(path,pattern,"");
+fs = filesep;
+sz = size(in);
+out = strings(sz); % allocate same size
+
+for idx = 1:numel(in)
+    sIn = char(in(idx));
+    if strlength(in(idx)) == 0
+        out(idx) = in(idx);
+        continue
+    end
+
+    % If URI-like (scheme://) then leave unchanged
+    if ~isempty(regexp(sIn, '^[A-Za-z][A-Za-z0-9+.\-]*://', 'once'))
+        out(idx) = in(idx);
+        continue
+    end
+
+    % Detect UNC-style leading slashes
+    isUNC = ~isempty(regexp(sIn, '^[\\/]{2,}', 'once'));
+
+    % Collapse any run of slashes/backslashes to single platform filesep
+    s = regexprep(sIn, '[\\/]+', fs);
+
+    if isUNC
+        % Remove any leading separators then ensure exactly two leading filesep
+        s = regexprep(s, ['^' regexptranslate('escape', fs) '+'], '');
+        s = [repmat(fs,1,2) s];
+    else
+        % Preserve drive-letter prefix like 'C:' and ensure at most one filesep after it
+        m = regexp(sIn, '^([A-Za-z]:)[\\/]*', 'tokens', 'once');
+        if ~isempty(m)
+            drive = m{1};
+            % Strip any leading drive+sep from s, then reapply drive and single filesep if needed
+            s = regexprep(s, ['^' regexptranslate('escape', drive) regexptranslate('escape', fs) '?'], '');
+            if isempty(s)
+                s = drive;
+            else
+                s = [drive fs s];
+            end
+        end
+    end
+
+    out(idx) = string(s);
+end
+end

widgets/+wt/FileSelector.m

@@ -209,7 +209,8 @@ function update(obj)
             end %if obj.ShowHistory
 
             % Show the warning icon?
-            showWarn = strlength(obj.Value) && ~obj.ValueIsValidPath;
+            isWeb = startsWith(obj.Value, alphanumericsPattern + "://");
+            showWarn = strlength(obj.Value) && ~obj.ValueIsValidPath && ~isWeb;
             obj.WarnImage.Visible = showWarn;
 
             % Set warning icon tooltip