added inner call that should have been there all along ...

svn: r4135
This commit is contained in:
Robby Findler 2006-08-24 17:32:00 +00:00
parent a64ac3680e
commit 67f7a794eb

View File

@ -780,7 +780,8 @@ If the namespace does not, they are colored the unbound color.
(define/augment (after-set-next-settings settings)
(let ([frame (get-top-level-window)])
(when frame
(send frame update-button-visibility/settings settings))))
(send frame update-button-visibility/settings settings)))
(inner (void) after-set-next-settings settings))
(super-new)))))