Minor fix for next-single-char-property-change usage.

* lisp/comint.el (comint-next-prompt): next-single-char-property-change
and prev-single-char-property-change never return nil.

Fixes: debbugs:8657

2 files changed, 4 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f0f438e540e..27c914b0424 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2012-02-06  Chong Yidong  <cyd@gnu.org>
 
+        * comint.el (comint-next-prompt): next-single-char-property-change
+        and prev-single-char-property-change never return nil (Bug#8657).
+
         * custom.el (defcustom): Doc fix (Bug#9711).
 
 2012-02-05  Chong Yidong  <cyd@gnu.org>
diff --git a/lisp/comint.el b/lisp/comint.el
index 2d0ae6920f9..975291471df 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -2513,7 +2513,7 @@ text matching `comint-prompt-regexp'."
               (if (> n 0)
                   (next-single-char-property-change pos 'field)
                 (previous-single-char-property-change pos 'field)))
-        (cond ((or (null pos) (= pos prev-pos))
+        (cond ((= pos prev-pos)
                ;; Ran off the end of the buffer.
                (when (> n 0)
                  ;; There's always an input field at the end of the