Show
Ignore:
Timestamp:
08/10/06 11:19:54 (2 years ago)
Author:
miyoshi
Message:

Sync up with Emacs CVS HEAD.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/lisp/longlines.el

    r4111 r4140  
    4545 
    4646(defcustom longlines-auto-wrap t 
    47   "*Non-nil means long lines are automatically wrapped after each command. 
     47  "Non-nil means long lines are automatically wrapped after each command. 
    4848Otherwise, you can perform filling using `fill-paragraph' or 
    4949`auto-fill-mode'.  In any case, the soft newlines will be removed 
     
    5353 
    5454(defcustom longlines-wrap-follows-window-size nil 
    55   "*Non-nil means wrapping and filling happen at the edge of the window. 
     55  "Non-nil means wrapping and filling happen at the edge of the window. 
    5656Otherwise, `fill-column' is used, regardless of the window size.  This 
    5757does not work well when the buffer is displayed in multiple windows 
     
    6161 
    6262(defcustom longlines-show-hard-newlines nil 
    63   "*Non-nil means each hard newline is marked on the screen. 
     63  "Non-nil means each hard newline is marked on the screen. 
    6464\(The variable `longlines-show-effect' controls what they look like.) 
    6565You can also enable the display temporarily, using the command 
     
    6969 
    7070(defcustom longlines-show-effect (propertize "|\n" 'face 'escape-glyph) 
    71   "*A string to display when showing hard newlines. 
     71  "A string to display when showing hard newlines. 
    7272This is used when `longlines-show-hard-newlines' is on." 
    7373  :group 'longlines 
     
    203203  (let* ((pmin (min beg end)) 
    204204         (pmax (max beg end)) 
    205          (pos (text-property-not-all pmin pmax 'hard nil))) 
     205         (pos (text-property-not-all pmin pmax 'hard nil)) 
     206         (inhibit-read-only t)) 
    206207    (while pos 
    207208      (put-text-property pos (1+ pos) 'display