[Emacs-diffs] trunk r117146: Fix subword-mode motion

[Daniel Colascione]

------------------------------------------------------------
revno: 117146
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/17580
committer: Daniel Colascione <address@hidden>
branch nick: trunk
timestamp: Sat 2014-05-24 13:43:40 -0700
message:
  Fix subword-mode motion
  
  * lisp/progmodes/subword.el (subword-find-word-boundary): Move point to
  correct spot before search.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/progmodes/subword.el      subword.el-20091121171556-bypaf8oo9ygoo13w-1

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2014-05-24 19:51:52 +0000
+++ b/lisp/ChangeLog    2014-05-24 20:43:40 +0000
@@ -1,5 +1,8 @@
 2014-05-24  Daniel Colascione  <address@hidden>
 
+       * progmodes/subword.el (subword-find-word-boundary): Move point to
+       correct spot before search. (Bug#17580)
+
        * emacs-lisp/nadvice.el (defun): Write in eval-and-compile to avoid
        breaking the build.
 

=== modified file 'lisp/progmodes/subword.el'
--- a/lisp/progmodes/subword.el 2014-03-23 07:36:26 +0000
+++ b/lisp/progmodes/subword.el 2014-05-24 20:43:40 +0000
@@ -355,8 +355,10 @@
         (save-restriction
           (if (< pos limit)
               (progn
+                (goto-char pos)
                 (narrow-to-region (point-min) limit)
                 (funcall subword-forward-function))
+            (goto-char (1+ pos))
             (narrow-to-region limit (point-max))
             (funcall subword-backward-function))
           (point))))))