no message

original commit: 64aa10a18ebd3b762d3ca9d83bb6dc7289a0e895
This commit is contained in:
Robby Findler 2001-08-02 15:43:56 +00:00
parent 088212d957
commit dbf287df47

View File

@ -1162,13 +1162,13 @@
(reset-search-anchor (get-searching-edit)))))
(super-on-focus on?))]
[after-insert
(lambda ()
(super-after-insert)
(lambda (x y)
(super-after-insert x y)
(unless dont-search
(search #f)))]
[after-delete
(lambda ()
(super-after-delete)
(lambda (x y)
(super-after-delete x y)
(unless dont-search
(search #f)))])
(sequence (apply super-init args))))