<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"><html><head><meta content="text/html;charset=UTF-8" http-equiv="Content-Type"></head><body ><div style="font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10pt;"><div>Hi folks,<br></div><div><br></div><div>messing about with the new-fangled git stuff.<br></div><div><br></div><div>I am 'Add Git remote" thing , click 'ok' and MNU on<br></div><div><br></div><div>Text >>includesSubstring.<br></div><div><br></div><div>I replace aName (which is a Text) with aName string and all works as expected.</div><blockquote style="border: 1px solid rgb(204, 204, 204); padding: 7px; background-color: rgb(245, 245, 245);"><div><div>validateReferenceName: aName<br></div><div>"See <a href="https://git-scm.com/docs/git-check-ref-format" target="_blank">https://git-scm.com/docs/git-check-ref-format</a>"<br></div><div><br></div><div>| tokens illegalCharacters |<br></div><div>illegalCharacters := '[?+~^\*: '.<br></div><div>(aName includesAnyOf: illegalCharacters) ifTrue: [<br></div><div>GitInvalidReferenceName signal: 'A reference name can not include whitespace or any of the following characters: ' , illegalCharacters.].<br></div><div>aName isEmpty ifTrue: [GitInvalidReferenceName signal: 'A reference name can not be empty'].<br></div><div>(aName string includesSubstring: '..') ifTrue: [GitInvalidReferenceName signal: 'A reference name can not include the string ''..'''].<br></div><div>(aName string ncludesSubstring: '@{') ifTrue: [GitInvalidReferenceName signal: 'A reference name can not include the string ''@{'''].<br></div><div>(aName string includesSubstring: '//') ifTrue: [GitInvalidReferenceName signal: 'A reference name can not include two consecutive slashes'].<br></div><div>(aName string first = $/ or: [aName last = $/]) ifTrue: [GitInvalidReferenceName signal: 'A reference name can not start or end with a slash'].<br></div><div>(aName string endsWith: '@') ifTrue: [GitInvalidReferenceName signal: '''@'' is not a valid reference name'].<br></div><div><br></div><div>tokens := aName string findTokens: '/'.<br></div><div>(tokens anySatisfy: [:t | (t first = $.) or: [t endsWith: '.lock']]) ifTrue: [<br></div><div>GitInvalidReferenceName signal: 'A reference component can not start with a dot or end with .lock'].<br></div></div></blockquote><div>hth.<br></div><div><br></div><div>btw, books in pillar format (?) for squeakbooks.org/com will be hosted on github eventually and then hopefully auto-published on the website.<br></div><div><br></div><div>hence, the git-tools stuff work.<br></div><div><br></div><div><br></div></div><br></body></html>