Merge pull request #610 from intersystems/fix-607

fix: report deletion of things that aren't classes

CHANGELOG.md

@@ -57,6 +57,7 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 - #544: When installing a package from remote repo, IPM specifies `includePrerelease` and `includeSnapshots` in HTTP request. Correctly-behaving zpm registry should respect that.
 - #557: When comparing semver against semver expressions, exclude prereleases and snapshots from the range maximum.
 - #559: Allow treating the "w" in SemVer x.y.z-w as a post-release rather than pre-release.
+- #607: Uninstall reports deletion of non-classes
 
 ### Security
 -

src/cls/IPM/Lifecycle/Base.cls

@@ -281,9 +281,9 @@ Method %Clean(ByRef pParams) As %Status
 					}
 
 					Set tName = $Piece(tChildKey,".",1,*-1)
-					Set tExt = $Piece(tChildKey,".",*)
-          Continue:tExt=""
-          Continue:tName=""
+					Set tExt = $ZConvert($Piece(tChildKey,".",*),"U")
+					Continue:tExt=""
+					Continue:tName=""
 					Set tDeleteArray(tExt,tName) = ""
 				}
 			}
@@ -344,6 +344,9 @@ Method %Clean(ByRef pParams) As %Status
 							Continue
 						}
 
+						If tVerbose {
+							Write !,"Deleting ",tFullName
+						}
 						Set tDelSC = ##class(%Library.RoutineMgr).Delete(tFullName)
 						If $$$ISERR(tDelSC) {
 							Write !,"WARNING: "_$System.Status.GetErrorText(tDelSC)