class: FileApplicationNoteBook
when searching for a matched pattern, start the search from
the top.
--- a/FileApplicationNoteBook.st Sat Feb 07 15:22:03 2015 +0100
+++ b/FileApplicationNoteBook.st Sat Feb 07 15:27:49 2015 +0100
@@ -5921,6 +5921,7 @@
pattern := aContentsPattern string withoutSeparators. "/ is that a good idea ?
pattern notEmpty ifTrue:[
+ editView perform:#cursorHome ifNotUnderstood:[].
editView rememberSearchPattern:pattern.
editView searchFwd:pattern ignoreCase:ign.
]
@@ -7497,10 +7498,10 @@
!FileApplicationNoteBook class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.313 2015-02-06 23:10:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.314 2015-02-07 14:27:49 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.313 2015-02-06 23:10:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.314 2015-02-07 14:27:49 cg Exp $'
! !