# HG changeset patch # User Luc Teirlinck # Date 1122921616 0 # Node ID 0f4b5a77af2c6b1008fc2bd66e3891dab9a7066a # Parent 37b0b02afa4e38309229befdca1e13b2474fef4d (all): Prevent bug if user sets `indicate-buffer-boundaries' outside Custom. diff -r 37b0b02afa4e -r 0f4b5a77af2c lisp/cus-start.el --- a/lisp/cus-start.el Mon Aug 01 17:20:04 2005 +0000 +++ b/lisp/cus-start.el Mon Aug 01 18:40:16 2005 +0000 @@ -72,8 +72,7 @@ (const :tag "No indicators" nil) (const :tag "On left, with arrows" left) (const :tag "On right, with arrows" right) - (const :tag "On left, no arrows" t) - (set :tag "Other" + (set :tag "Pick your own design" (choice :tag "Default" :value (t . left) (const :tag "Do not show" (t . nil)) @@ -98,7 +97,8 @@ :value (down . left) (const :tag "Do not show" (down . nil)) (const :tag "On the left" (down . left)) - (const :tag "On the right" (down . right))))) + (const :tag "On the right" (down . right)))) + (other :tag "On left, no arrows" t)) "22.1") (scroll-up-aggressively windows (choice (const :tag "off" nil) number)