--- a/Tools__ToDoListEntry.st Thu Mar 15 20:29:31 2007 +0100
+++ b/Tools__ToDoListEntry.st Thu Mar 15 22:46:43 2007 +0100
@@ -10,38 +10,6 @@
!
-!ToDoListEntry class methodsFor:'notification'!
-
-notifyTodo:msg position:position
- className:className selector:selector
- severity:severityOrSeveritySymbol priority:priorityOrPrioritySymbol
- equalityParameter:equalityParameter checkAction:checkAction
-
- |entry brwsr|
-
- (brwsr := Tools::ToDoListBrowser current) isNil ifTrue:[^ self ].
-
- entry := self new.
- entry
- severity:severityOrSeveritySymbol
- priority:priorityOrPrioritySymbol
- timestamp:(Timestamp now)
- message:msg
- className:className
- selector:selector
- checkAction:checkAction
- equalityParameter:equalityParameter
- position:position.
-
- (Tools::ToDoNotification notNil and:[Tools::ToDoNotification isHandled]) ifTrue:[
- Tools::ToDoNotification raiseRequestWith:entry
- ] ifFalse:[
- brwsr addEntry:entry
- ].
-
- "Created: / 15-03-2007 / 18:08:06 / cg"
-! !
-
!ToDoListEntry methodsFor:'accessing'!
list:something
@@ -210,5 +178,5 @@
!ToDoListEntry class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__ToDoListEntry.st,v 1.5 2007-03-15 17:08:05 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__ToDoListEntry.st,v 1.6 2007-03-15 21:46:43 cg Exp $'
! !