Mercurial > hg > xemacs-beta
changeset 5527:b3b28406da8c
Add a custom group that applies to view-mode-line-string.
lisp/ChangeLog addition:
2011-06-24 Aidan Kehoe <kehoea@parhasard.net>
* view-less.el (view):
Add a custom group to this file, so view-mode-line-string has an
associated custom group automatically.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Fri, 24 Jun 2011 19:58:12 +0100 |
| parents | 2a6a8da4dd7c |
| children | dc88f282ddc3 |
| files | lisp/ChangeLog lisp/view-less.el |
| diffstat | 2 files changed, 11 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun Jun 19 19:47:13 2011 +0100 +++ b/lisp/ChangeLog Fri Jun 24 19:58:12 2011 +0100 @@ -1,3 +1,9 @@ +2011-06-24 Aidan Kehoe <kehoea@parhasard.net> + + * view-less.el (view): + Add a custom group to this file, so view-mode-line-string has an + associated custom group automatically. + 2011-06-19 Aidan Kehoe <kehoea@parhasard.net> * cl-macs.el (cl-defsubst-expand):
--- a/lisp/view-less.el Sun Jun 19 19:47:13 2011 +0100 +++ b/lisp/view-less.el Fri Jun 24 19:58:12 2011 +0100 @@ -38,6 +38,11 @@ ;;; Code: +(defgroup view nil + "Peruse file or buffer without editing." + :link '(function-link view-mode) + :group 'wp) + (defvar view-search-string "" "Last string searched for with view-search functions.")