On 6/23/05, Miles Bader <[EMAIL PROTECTED]> wrote: > I didn't realize this when I sent those messages, but you first have to do: > > (require 'fringe)
BTW, loading fringe resets `default-indicate-buffer-boundaries'. That's Not Good. I have no problem with "M-x customize-variable fringe-indicators" setting it (it is clearly documented in the `fringe-indicators' docstring), but just (require 'fringe) should not change my defaults. I propose the following patch (but people more experienced on customize will have perhaps a better fix): if `fringe-indicators' is set, it takes precedence over `default-indicate-buffer-boundaries', which seems sensible. -- /L/e/k/t/u Index: lisp/fringe.el =================================================================== RCS file: /cvsroot/emacs/emacs/lisp/fringe.el,v retrieving revision 1.17 diff -u -2 -r1.17 fringe.el --- lisp/fringe.el 9 Feb 2005 15:50:42 -0000 1.17 +++ lisp/fringe.el 23 Jun 2005 11:47:26 -0000 @@ -281,4 +281,10 @@ (t nil)))) +(defun initialize-fringe-indicators (ignore value) + (set-fringe-indicators-1 nil + (or value + fringe-indicators + default-indicate-buffer-boundaries))) + ;;;###autoload (defcustom fringe-indicators nil @@ -293,5 +299,6 @@ :group 'fringe :require 'fringe - :set 'set-fringe-indicators-1) + :set 'set-fringe-indicators-1 + :initialize 'initialize-fringe-indicators) (provide 'fringe) _______________________________________________ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel