[elpa] externals/smalltalk-mode c81b497 21/34: Fix smalltalk-mode.el

[Stefan Monnier]

branch: externals/smalltalk-mode
commit c81b497ea3a6167fe13da8e4eac9c8e747ab7cc7
Author: Mathieu Suen <address@hidden>
Commit: Paolo Bonzini <address@hidden>

    Fix smalltalk-mode.el
---
 smalltalk-mode.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/smalltalk-mode.el b/smalltalk-mode.el
index 02ff72a..867c437 100644
--- a/smalltalk-mode.el
+++ b/smalltalk-mode.el
@@ -1009,7 +1009,7 @@ Whitespace is defined as spaces, tabs, and comments."
       (let ((new-hit-point (funcall search)))
        (if (and new-hit-point
                 (or (not current) (> new-hit-point current)))
-           (new-hit-point)
+           new-hit-point
          current))))
   (let ((curr-hit-point (smalltalk-current-class-point)))
     (setq curr-hit-point