Re: line-line-move-visual: was line motion problem

[Chong Yidong <cyd@stupidchicken.com>]

Stefan Monnier <monnier@iro.umontreal.ca> writes:

> I think it should not be linked to word-wrap but to visual-line-mode
> (or longlines-mode).
> A side-benefit is that it can then be all done in Elisp.

Oh I see what you mean: something like this?  (i.e., making
visual-line-mode modify fringe-indicator-alist)?


*** trunk/lisp/simple.el.~1.935.~ 2008-07-18
01:10000 -0400
--- trunk/lisp/simple.el      2008-07-19 23:39:47.000000000
-0400
***************
*** 4482,4490 ****
    (if visual-line-mode
        (progn
        (set (make-local-variable 'line-move-visual) t)
!       (setq word-wrap t))
      (kill-local-variable 'line-move-visual)
!     (kill-local-variable 'word-wrap)))
  
  (defun turn-on-visual-line-mode ()
    (visual-line-mode 1))
--- 4482,4494 ----
    (if visual-line-mode
        (progn
        (set (make-local-variable 'line-move-visual) t)
!       (setq word-wrap t)
!       (setq fringe-indicator-alist (copy-tree fringe-indicator-alist))
!       (setcdr (assq 'continuation fringe-indicator-alist)
!               (list nil nil nil nil)))
      (kill-local-variable 'line-move-visual)
!     (kill-local-variable 'word-wrap)
!     (kill-local-variable 'fringe-indicator-alist)))
  
  (defun turn-on-visual-line-mode ()
    (visual-line-mode 1))