FilenameWidgetWithHistory.st
changeset 3474 cde8a45f74f0
parent 3473 6bc7203cb7b7
child 3546 b3269a9dec19
equal deleted inserted replaced
3473:6bc7203cb7b7 3474:cde8a45f74f0
    66 ! !
    66 ! !
    67 
    67 
    68 !FilenameWidgetWithHistory methodsFor:'accessing'!
    68 !FilenameWidgetWithHistory methodsFor:'accessing'!
    69 
    69 
    70 historyList
    70 historyList
    71     ^ history ? #()
    71     history isNil ifTrue:[
    72 !
    72         history := nil asValue
    73 
    73     ].
    74 historyList:aCollection
    74     ^ history
    75     history := aCollection
       
    76 !
    75 !
    77 
    76 
    78 model
    77 model
    79     ^ fileNameEntryField model
    78     ^ fileNameEntryField model
    80 !
    79 !
   185 ! !
   184 ! !
   186 
   185 
   187 !FilenameWidgetWithHistory class methodsFor:'documentation'!
   186 !FilenameWidgetWithHistory class methodsFor:'documentation'!
   188 
   187 
   189 version
   188 version
   190     ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.6 2008-07-11 18:51:19 cg Exp $'
   189     ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.7 2008-07-11 19:40:24 cg Exp $'
   191 ! !
   190 ! !