equal
deleted
inserted
replaced
2293 s := self source. |
2293 s := self source. |
2294 s isNil ifTrue:[^ nil]. |
2294 s isNil ifTrue:[^ nil]. |
2295 list := HistoryManager getAllHistoriesFrom:s. |
2295 list := HistoryManager getAllHistoriesFrom:s. |
2296 list size == 0 ifTrue:[^ nil]. |
2296 list size == 0 ifTrue:[^ nil]. |
2297 histLine := list last. |
2297 histLine := list last. |
2298 ^ AbsoluteTime |
2298 ^ Timestamp |
2299 fromDate:histLine date |
2299 fromDate:histLine date |
2300 andTime:histLine time |
2300 andTime:histLine time |
2301 |
2301 |
2302 " |
2302 " |
2303 (Method compiledMethodAt:#modificationTime) modificationTime |
2303 (Method compiledMethodAt:#modificationTime) modificationTime |
2304 (Method compiledMethodAt:#isMethod) modificationTime |
2304 (Method compiledMethodAt:#isMethod) modificationTime |
2305 " |
2305 " |
2911 ! ! |
2911 ! ! |
2912 |
2912 |
2913 !Method class methodsFor:'documentation'! |
2913 !Method class methodsFor:'documentation'! |
2914 |
2914 |
2915 version |
2915 version |
2916 ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.270 2004-03-17 10:13:55 ca Exp $' |
2916 ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.271 2004-03-20 15:36:46 stefan Exp $' |
2917 ! ! |
2917 ! ! |
2918 |
2918 |
2919 Method initialize! |
2919 Method initialize! |