This bug has really bad consequences if not fixed. I'm pretty sure it was
the source of one of our servers going down alot. So, please update your
images.
Peace and Luck!
Je77
'From Squeak2.7 of 5 January 2000 [latest update: #1762] on 21 March 2000 at 2:36:58
pm'!
!IdFormatter class methodsFor: 'instance creation' stamp: 'je77 3/21/2000
14:33'!
saveAppend
| instance |
instance _ self new.
instance idBlock:
[:text | ''].
instance startBlock: [:id | ''].
instance endBlock: [:id
| ''].
instance transitionBlock: [:idOld :idNew | ''].
instance formatter:
[:text :request :page :book |
(request settingsIncludes: 'appendId')
ifTrue: [request settingsAt: 'appendId' put: 1 + (request settingsAt:
'appendId')]
ifFalse: [request settingsAt: 'appendId' put: 1].
((request settingsAt: 'appendId') asString = (request appendId))
ifTrue: [((page settings at: 'saveFormatter' ifAbsent: [book settings at:
'saveFormatter']) format: (request append) request: request page: page book: book),
String cr, '+', String cr]
ifFalse: ['+', String cr]].
^instance! !