checking truncate-lines in w3m-check-current-position

[TSUCHIYA Masatoshi <tsuchiya@xxxxxxxxxxxxxxxxxxxxxxx>]

w3m-check-current-position() について，以下の変更が commit されていま
す．

    2003-11-18  Katsumi Yamaoka  <yamaoka@jpl.org>

        * w3m.el (w3m-check-current-position): Don't allow horizontal
        scrolling when `truncate-lines' is nil.

このため，emacs-w3m のバッファで M-x toggle-truncate-lines RET すると，
カーソル位置のアンカーの URI が表示されません．

;; いや，滅多にしない操作ですけどね．

w3m-check-current-position() 内で truncate-lines をチェックしなければ
ならない理由があるのでなければ，末尾のパッチのように変更したらいいので
はないかと思うのですが，いかがでしょうか?

-- 
土屋 雅稔 ( TSUCHIYA Masatoshi )

--- w3m.el	24 Jan 2004 06:00:33 -0000	1.985
+++ w3m.el	26 Jan 2004 05:47:41 -0000
@@ -6375,7 +6375,8 @@
 
 (defun w3m-auto-show ()
   "Scroll horizontally so that the point is visible."
-  (when (and w3m-auto-show
+  (when (and truncate-lines
+	     w3m-auto-show
 	     (not w3m-horizontal-scroll-done)
 	     (not (and (eq last-command this-command)
 		       (or (eq (point) (point-min))
@@ -6667,8 +6668,7 @@
   "Run `w3m-after-cursor-move-hook' if the point gets away from the window.
 This function is designed as the hook function which is registered to
 `post-command-hook' by `w3m-buffer-setup'."
-  (when (and truncate-lines
-	     (/= (point) (car w3m-current-position)))
+  (when (/= (point) (car w3m-current-position))
     (run-hooks 'w3m-after-cursor-move-hook)))
 
 (defun w3m-buffer-setup ()