Tools__CompilerWarningToDoListEntry.st
changeset 7752 f5d194e7eec3
parent 7734 ad472c84adea
child 7792 0a805d4414cb
equal deleted inserted replaced
7751:3883a5a494f0 7752:f5d194e7eec3
    14 
    14 
    15 new
    15 new
    16     ^ self basicNew initialize
    16     ^ self basicNew initialize
    17 
    17 
    18     "Created: / 20-11-2006 / 14:58:52 / cg"
    18     "Created: / 20-11-2006 / 14:58:52 / cg"
       
    19 ! !
       
    20 
       
    21 !CompilerWarningToDoListEntry class methodsFor:'notification'!
       
    22 
       
    23 notifyTodo:msg position:position
       
    24      className:className selector:selector
       
    25      severity:severityOrSeveritySymbol priority:priorityOrPrioritySymbol
       
    26      equalityParameter:equalityParameter checkAction:checkAction
       
    27 
       
    28     |entry brwsr|
       
    29 
       
    30     (brwsr := Tools::ToDoListBrowser current) isNil ifTrue:[^ self ].
       
    31 
       
    32     entry := self new.
       
    33     entry
       
    34         severity:severityOrSeveritySymbol
       
    35         priority:priorityOrPrioritySymbol
       
    36         timestamp:(Timestamp now)
       
    37         message:msg
       
    38         className:className
       
    39         selector:selector
       
    40         checkAction:checkAction
       
    41         equalityParameter:equalityParameter
       
    42         position:position.
       
    43 
       
    44     (Tools::ToDoNotification notNil and:[Tools::ToDoNotification isHandled]) ifTrue:[
       
    45         Tools::ToDoNotification raiseRequestWith:entry
       
    46     ] ifFalse:[
       
    47         brwsr addEntry:entry
       
    48     ].
       
    49 
       
    50     "Created: / 15-03-2007 / 18:08:06 / cg"
    19 ! !
    51 ! !
    20 
    52 
    21 !CompilerWarningToDoListEntry methodsFor:'accessing'!
    53 !CompilerWarningToDoListEntry methodsFor:'accessing'!
    22 
    54 
    23 className
    55 className
   100 
   132 
   101 severity:severityArg priority:priorityArg timestamp:timestampArg 
   133 severity:severityArg priority:priorityArg timestamp:timestampArg 
   102         message:msgArg className:classNameArg selector:selectorArg 
   134         message:msgArg className:classNameArg selector:selectorArg 
   103         checkAction:checkActionArg equalityParameter:equalityParameterArg
   135         checkAction:checkActionArg equalityParameter:equalityParameterArg
   104         position:positionArg
   136         position:positionArg
       
   137 
   105     self
   138     self
   106         severity:severityArg 
   139         severity:severityArg 
   107         priority:priorityArg 
   140         priority:priorityArg 
   108         timestamp:timestampArg 
   141         timestamp:timestampArg 
   109         message:msgArg.
   142         message:msgArg.
   214 ! !
   247 ! !
   215 
   248 
   216 !CompilerWarningToDoListEntry class methodsFor:'documentation'!
   249 !CompilerWarningToDoListEntry class methodsFor:'documentation'!
   217 
   250 
   218 version
   251 version
   219     ^ '$Header: /cvs/stx/stx/libtool/Tools__CompilerWarningToDoListEntry.st,v 1.6 2007-03-13 17:18:24 cg Exp $'
   252     ^ '$Header: /cvs/stx/stx/libtool/Tools__CompilerWarningToDoListEntry.st,v 1.7 2007-03-15 21:46:46 cg Exp $'
   220 ! !
   253 ! !