Debugging sanitize.
This commit is contained in:
parent
e6725fb9f3
commit
d9d7a86dbd
@ -147,9 +147,10 @@ FossilRepo >> remote: anUrlString [
|
|||||||
{ #category : #utilities }
|
{ #category : #utilities }
|
||||||
FossilRepo >> sanitize: aFileNameWithRelativePath [
|
FossilRepo >> sanitize: aFileNameWithRelativePath [
|
||||||
"I dicern if my argument concerns to a versioned or an unversioned file,
|
"I dicern if my argument concerns to a versioned or an unversioned file,
|
||||||
and return a relative path to put the fileb."
|
and return a relative path to put the file."
|
||||||
|
|
||||||
(aFileNameWithRelativePath beginsWith: '/uv')
|
(aFileNameWithRelativePath beginsWith: '/uv')
|
||||||
|
ifFalse: [ ^ aFileNameWithRelativePath ]
|
||||||
ifTrue: [ ^ (aFileNameWithRelativePath copyFrom: 5 to: aFileNameWithRelativePath size) ]
|
ifTrue: [ ^ (aFileNameWithRelativePath copyFrom: 5 to: aFileNameWithRelativePath size) ]
|
||||||
]
|
]
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user