fringe-mode (was Re: scroll-bar-mode and &optional?)

[Kim F. Storm]

address@hidden (Pavel Janík) writes:

> BTW - shouldn't we also have fringe-mode with the similar semantics like
> scroll-bar-mode?  E.g. user can turn right-fringe off by
> 
> (modify-frame-parameters (selected-frame) '((right-fringe . 0)))

> 
> Shouldn't then we provide a function for him to do that more
> straightforward?

It should probably do something like this:

(defun fringe-mode ()  ;; this version toggles only
   (interactive)
   (let ((fp (frame-parameters nil)))
     (modify-frame-parameters nil
       (if (and (= (cdr (assoc 'left-fringe fp)) 0) (= (cdr (assoc 
'right-fringe fp)) 0))
           '((left-fringe . nil) (right-fringe . nil))               
         '((left-fringe . 0) (right-fringe . 0))))))

> 
> BTW - left-fringe and right-fringe frame parameters are not documented in
> the GNU Emacs Lisp Reference Manual.

They are described in NEWS  (supposing that the manual editors will
document them).


-- 
Kim F. Storm <address@hidden> http://www.cua.dk