Skip to content

Commit d39c4b9

Browse files
authored
Merge pull request #790 from intersystems/directory-casing
Fixes production and other export with unexpected directory casing
2 parents c11a771 + 0262167 commit d39c4b9

File tree

2 files changed

+3
-3
lines changed

2 files changed

+3
-3
lines changed

CHANGELOG.md

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -21,6 +21,7 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
2121
- Changing remotes in the git project settings pages now works if remote is not already defined (#746)
2222
- User-specific basic mode setting can now be changed when settingsUIReadOnly is set (#775)
2323
- Fixed an error displaying the Web UI after reverting a commit (#776)
24+
- Fixed errors exporting items when directory casing does not match mappings (#781)
2425
- Improved accessibility of UI when tabbing through items (#764)
2526

2627
## [2.11.0] - 2025-04-23

cls/SourceControl/Git/Utils.cls

Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -748,11 +748,11 @@ ClassMethod Exists(ByRef pFilename) As %Boolean
748748
If ##class(%File).Exists(pFilename) {
749749
Return 1
750750
}
751-
Set tDirectory = ##class(%File).ParentDirectoryName(pFilename)
751+
Set tDirectory = ##class(%File).GetDirectory(pFilename)
752752
If '##class(%File).DirectoryExists(tDirectory) {
753753
Return 0
754754
}
755-
Set tName = $Piece(pFilename, tDirectory, 2, *)
755+
Set tName = ##class(%File).GetFilename(pFilename)
756756
Set tFileName = $Piece(tName, ".", 1, * - 1)
757757
Set tFileExt = $Piece(tName, ".", *)
758758
for tExt = $$$LOWER(tFileExt), $$$UPPER(tFileExt) {
@@ -3219,4 +3219,3 @@ ClassMethod IsSchemaStandard(pName As %String = "") As %Boolean [ Internal ]
32193219
}
32203220

32213221
}
3222-

0 commit comments

Comments
 (0)