* message.el (message-beginning-of-line): Fix XEmacs warning for last

[gnus] / lisp / message.el

diff --git a/lisp/message.el b/lisp/message.el
index 6e1e964..e9a069d 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -6344,7 +6344,8 @@ between beginning of field and beginning of line."
        (goto-char
         (if (and eoh (or (< eoh here) (= bol here)))
             eoh bol)))
-    (if (and (boundp 'visual-line-mode) visual-line-mode)
+    (if (and (not (featurep 'xemacs))
+            (boundp 'visual-line-mode) visual-line-mode)
        (beginning-of-visual-line n)
       (beginning-of-line n))))