--- a/AbstractFileApplicationNoteBookComponent.st Tue Feb 04 13:28:53 2003 +0100
+++ b/AbstractFileApplicationNoteBookComponent.st Thu Feb 06 18:20:52 2003 +0100
@@ -33,6 +33,10 @@
!AbstractFileApplicationNoteBookComponent methodsFor:'accessing'!
+notify:msg
+ self notifyChannel value:msg
+!
+
notifyChannel
notifyChannel isNil ifTrue:[
self masterApplication notNil ifTrue:[
@@ -189,5 +193,5 @@
!AbstractFileApplicationNoteBookComponent class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileApplicationNoteBookComponent.st,v 1.5 2003-02-03 11:19:51 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileApplicationNoteBookComponent.st,v 1.6 2003-02-06 17:20:20 cg Exp $'
! !
--- a/FileApplicationNoteBook.st Tue Feb 04 13:28:53 2003 +0100
+++ b/FileApplicationNoteBook.st Thu Feb 06 18:20:52 2003 +0100
@@ -1,77 +1,77 @@
"{ Package: 'stx:libtool' }"
AbstractFileBrowser subclass:#FileApplicationNoteBook
- instanceVariableNames:'canvasHolder selectedEditorPage listOfApplications tabMenuIndex
- tabList selectionHistoryList privateTabList'
- classVariableNames:''
- poolDictionaries:''
- category:'Interface-Tools-File'
+ instanceVariableNames:'canvasHolder selectedEditorPage listOfApplications tabMenuIndex
+ tabList selectionHistoryList privateTabList'
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Interface-Tools-File'
!
AbstractFileApplicationNoteBookComponent subclass:#ArchiveViewApplication
- instanceVariableNames:'archiveFileList enableStopButton fileTable currentSortOrder
- selectionHolder tableColumns commandProcess errorListHolder
- viewErrorList temporaryDirectory enableRemoveErrorOutput
- errorListVisibilityHolder hasListEntriesHolder archiver process
- terminateByMe columnDescriptors inDropMode'
- classVariableNames:''
- poolDictionaries:''
- privateIn:FileApplicationNoteBook
+ instanceVariableNames:'archiveFileList enableStopButton fileTable currentSortOrder
+ selectionHolder tableColumns commandProcess errorListHolder
+ viewErrorList temporaryDirectory enableRemoveErrorOutput
+ errorListVisibilityHolder hasListEntriesHolder archiver process
+ terminateByMe columnDescriptors inDropMode'
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:FileApplicationNoteBook
!
Object subclass:#ArchivItem
- instanceVariableNames:'fileName size dateAndTime permissions icon ownerGroup method crc
- compressSize ratio version type isDirectory'
- classVariableNames:''
- poolDictionaries:''
- privateIn:FileApplicationNoteBook::ArchiveViewApplication
+ instanceVariableNames:'fileName size dateAndTime permissions icon ownerGroup method crc
+ compressSize ratio version type isDirectory'
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:FileApplicationNoteBook::ArchiveViewApplication
!
AbstractFileApplicationNoteBookComponent subclass:#CommandResult
- instanceVariableNames:'resultStream enableStopButton process labelHolder'
- classVariableNames:''
- poolDictionaries:''
- privateIn:FileApplicationNoteBook
+ instanceVariableNames:'resultStream enableStopButton process labelHolder'
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:FileApplicationNoteBook
!
AbstractFileApplicationNoteBookComponent subclass:#HtmlViewApplication
- instanceVariableNames:'htmlView labelHolder infoLabelHolder'
- classVariableNames:''
- poolDictionaries:''
- privateIn:FileApplicationNoteBook
+ instanceVariableNames:'htmlView labelHolder infoLabelHolder'
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:FileApplicationNoteBook
!
AbstractFileApplicationNoteBookComponent subclass:#ImageViewApplication
- instanceVariableNames:'imageFile imageView image fitSize fitMode'
- classVariableNames:''
- poolDictionaries:''
- privateIn:FileApplicationNoteBook
+ instanceVariableNames:'imageFile imageView image fitSize fitMode'
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:FileApplicationNoteBook
!
AbstractFileApplicationNoteBookComponent subclass:#Terminal
- instanceVariableNames:'terminalView'
- classVariableNames:''
- poolDictionaries:''
- privateIn:FileApplicationNoteBook
+ instanceVariableNames:'terminalView'
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:FileApplicationNoteBook
!
AbstractFileApplicationNoteBookComponent subclass:#TextEditor
- instanceVariableNames:'fileContentsModel doSaveFile modifiedChannel editView enableSave
- enableReload presentation changeItemProcess closeApplication
- semaChangeItem printAsHexDump itemChanged itemRemoved
- enableHexToggle textEditorChangeModificationTime md5CheckSum
- viewModifiedChannel'
- classVariableNames:''
- poolDictionaries:''
- privateIn:FileApplicationNoteBook
+ instanceVariableNames:'fileContentsModel doSaveFile modifiedChannel editView enableSave
+ enableReload presentation changeItemProcess closeApplication
+ semaChangeItem printAsHexDump itemChanged itemRemoved
+ enableHexToggle textEditorChangeModificationTime md5CheckSum
+ viewModifiedChannel'
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:FileApplicationNoteBook
!
AbstractFileApplicationNoteBookComponent subclass:#XViewApplication
- instanceVariableNames:'xView xFile vncServerPID vncPortNr vncConnection viewerPID
- vncLock vncServerIsTerminated xItem ext'
- classVariableNames:''
- poolDictionaries:''
- privateIn:FileApplicationNoteBook
+ instanceVariableNames:'xView xFile vncServerPID vncPortNr vncConnection viewerPID
+ vncLock vncServerIsTerminated xItem ext'
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:FileApplicationNoteBook
!
@@ -3806,7 +3806,8 @@
dir recursiveMakeDirectory.
].
editView saveAs:(self fileName).
-"/ self notify:self fileName asString, ' saved'.
+
+ self notify:self fileName asString, ' saved'.
self semaChangeItem critical:[
textEditorChangeModificationTime := nil.
self itemChanged value:false.
@@ -4927,5 +4928,5 @@
!FileApplicationNoteBook class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.57 2003-02-04 12:28:53 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.58 2003-02-06 17:20:52 cg Exp $'
! !