Author: junrue Date: Fri Jul 7 02:35:23 2006 New Revision: 181 Modified: trunk/src/uitoolkit/widgets/edit.lisp Log: somehow missed a stray call to obsolete replace-edit-wordbreak-func Modified: trunk/src/uitoolkit/widgets/edit.lisp ============================================================================== --- trunk/src/uitoolkit/widgets/edit.lisp (original) +++ trunk/src/uitoolkit/widgets/edit.lisp Fri Jul 7 02:35:23 2006 @@ -95,9 +95,7 @@ ex-style (increment-widget-id (thread-context))))) (setf (slot-value self 'gfs:handle) hwnd))) - (init-control self) - (if (find :auto-hscroll (style-of self)) - (replace-edit-wordbreak-func self))) + (init-control self)) (defmethod line-count ((self edit)) (if (gfs:disposed-p self)