Fix usage of deprecated method startsWith:

hpi-swa · Nov 30, 2023 · 9d83699 · 9d83699
1 parent b655086
commit 9d83699
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/src/Squot.package/SqueakWorkingCopy.class/instance/handleMovedImageFrom.to.doMove..st b/src/Squot.package/SqueakWorkingCopy.class/instance/handleMovedImageFrom.to.doMove..st
@@ -4,7 +4,7 @@ handleMovedImageFrom: oldHash to: newHash doMove: doMove
  oldPrefix := self refsBaseNameForHash: oldHash.
  newPrefix := self refsBaseNameForHash: newHash.
  self withUnitOfWork: [
- oldRefs := self allReferences select: [:each | each startsWith: oldPrefix].
+ oldRefs := self allReferences select: [:each | each beginsWith: oldPrefix].
  oldRefs do: [:oldRef | | newRef |
  newRef := newPrefix, (oldRef allButFirst: oldPrefix size).
  self unitOfWork
@@ -13,9 +13,9 @@ handleMovedImageFrom: oldHash to: newHash doMove: doMove
  with: newRef].
  self allReferences do: [:each | | ref target |
  ref := self unitOfWork ref: each.
- ((ref name startsWith: newPrefix)
+ ((ref name beginsWith: newPrefix)
  and: [ref isSymbolic]
- and: [(target := ref targetRef) startsWith: oldPrefix])
+ and: [(target := ref targetRef) beginsWith: oldPrefix])
  ifTrue: [
  self unitOfWork
  updateSymbolicRef: ref name

diff --git a/src/Squot.package/SqueakWorkingCopy.class/methodProperties.json b/src/Squot.package/SqueakWorkingCopy.class/methodProperties.json
@@ -71,7 +71,7 @@
  "gitInitialize" : "mad 6/4/2023 13:42",
  "handleCredentialsDuring:" : "mad 9/18/2023 14:13",
  "handleCredentialsDuring:ifCanceled:" : "mad 10/17/2023 12:11",
- "handleMovedImageFrom:to:doMove:" : "mad 11/28/2023 19:25",
+ "handleMovedImageFrom:to:doMove:" : "mad 11/30/2023 21:43",
  "headCommit" : "mad 6/3/2023 15:35",
  "headCommitHash" : "mad 6/3/2023 15:34",
  "headFSCommit" : "mad 10/21/2023 23:43",