PubPubContent method's recovering after GT crash.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2023-05-21 20:55:46 -05:00
parent ae75337739
commit 473c262454
1 changed files with 1 additions and 0 deletions

View File

@ -48,6 +48,7 @@ PubPubContent >> printOn: aStream [
PubPubContent >> shortName [
| sanitized |
sanitized := (self title splitOn: $:) first.
sanitized := sanitized copyReplaceAll: '' with: ''.
sanitized := sanitized asCamelCase.
sanitized at: 1 put: sanitized first asLowercase.
^ sanitized