Mercurial > emacs
comparison lisp/cus-start.el @ 64711:5d202bf110c9
(all): Make `indicate-buffer-boundaries' display values set outside
Custom once again correctly in Custom buffer.
| author | Luc Teirlinck <teirllm@auburn.edu> |
|---|---|
| date | Tue, 02 Aug 2005 02:00:20 +0000 |
| parents | 7abd21bd0a77 |
| children | b991ecaae196 |
comparison
equal
deleted
inserted
replaced
| 64710:0135928f4763 | 64711:5d202bf110c9 |
|---|---|
| 70 fringe | 70 fringe |
| 71 (choice | 71 (choice |
| 72 (const :tag "No indicators" nil) | 72 (const :tag "No indicators" nil) |
| 73 (const :tag "On left, with arrows" left) | 73 (const :tag "On left, with arrows" left) |
| 74 (const :tag "On right, with arrows" right) | 74 (const :tag "On right, with arrows" right) |
| 75 (list :tag "Pick your own design" | 75 (set :tag "Pick your own design" |
| 76 :value ((t . nil)) | 76 :value ((t . nil)) |
| 77 (choice :tag "Default" | 77 :format "%{%t%}:\n%v\n%d" |
| 78 (const :tag "Do not show" (t . nil)) | 78 :doc "You can specify a default and then override it \ |
| 79 (const :tag "On the left" (t . left)) | 79 for individual indicators. |
| 80 (const :tag "On the right" (t . right))) | 80 Leaving \"Default\" unchecked is equivalent with specifying a default of |
| 81 (set :inline t | 81 \"Do not show\"." |
| 82 :tag "Override default for" | 82 (choice :tag "Default" |
| 83 (choice :tag "Top" | 83 :value (t . nil) |
| 84 :value (top . left) | 84 (const :tag "Do not show" (t . nil)) |
| 85 (const :tag "Do not show" (top . nil)) | 85 (const :tag "On the left" (t . left)) |
| 86 (const :tag "On the left" (top . left)) | 86 (const :tag "On the right" (t . right))) |
| 87 (const :tag "On the right" (top . right))) | 87 (choice :tag "Top" |
| 88 (choice :tag "Bottom" | 88 :value (top . left) |
| 89 :value (bottom . left) | 89 (const :tag "Do not show" (top . nil)) |
| 90 (const :tag "Do not show" (bottom . nil)) | 90 (const :tag "On the left" (top . left)) |
| 91 (const :tag "On the left" (bottom . left)) | 91 (const :tag "On the right" (top . right))) |
| 92 (const :tag "On the right" (bottom . right))) | 92 (choice :tag "Bottom" |
| 93 (choice :tag "Up arrow" | 93 :value (bottom . left) |
| 94 :value (up . left) | 94 (const :tag "Do not show" (bottom . nil)) |
| 95 (const :tag "Do not show" (up . nil)) | 95 (const :tag "On the left" (bottom . left)) |
| 96 (const :tag "On the left" (up . left)) | 96 (const :tag "On the right" (bottom . right))) |
| 97 (const :tag "On the right" (up . right))) | 97 (choice :tag "Up arrow" |
| 98 (choice :tag "Down arrow" | 98 :value (up . left) |
| 99 :value (down . left) | 99 (const :tag "Do not show" (up . nil)) |
| 100 (const :tag "Do not show" (down . nil)) | 100 (const :tag "On the left" (up . left)) |
| 101 (const :tag "On the left" (down . left)) | 101 (const :tag "On the right" (up . right))) |
| 102 (const :tag "On the right" (down . right))))) | 102 (choice :tag "Down arrow" |
| 103 :value (down . left) | |
| 104 (const :tag "Do not show" (down . nil)) | |
| 105 (const :tag "On the left" (down . left)) | |
| 106 (const :tag "On the right" (down . right)))) | |
| 103 (other :tag "On left, no arrows" t)) | 107 (other :tag "On left, no arrows" t)) |
| 104 "22.1") | 108 "22.1") |
| 105 (scroll-up-aggressively windows | 109 (scroll-up-aggressively windows |
| 106 (choice (const :tag "off" nil) number) | 110 (choice (const :tag "off" nil) number) |
| 107 "21.1") | 111 "21.1") |