# HG changeset patch
# User Aidan Kehoe <kehoea@parhasard.net>
# Date 1308941892 -3600
# Node ID b3b28406da8c505b39669ed07eb6d3713e4c692c
# Parent  2a6a8da4dd7c1ab2c8455e82a4901ca853db1790
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.

diff -r 2a6a8da4dd7c -r b3b28406da8c lisp/ChangeLog
--- 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):
diff -r 2a6a8da4dd7c -r b3b28406da8c lisp/view-less.el
--- 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.")