# HG changeset patch
# User Aidan Kehoe <kehoea@parhasard.net>
# Date 1308941975 -3600
# Node ID dc88f282ddc346bc5298a95734012370bea4a430
# Parent  9a046b2e64943a1bc9f4b470eaaae5aa3a5d50c1# Parent  b3b28406da8c505b39669ed07eb6d3713e4c692c
Merge.

diff -r 9a046b2e6494 -r dc88f282ddc3 lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Jun 23 08:55:35 2011 +0200
+++ b/lisp/ChangeLog	Fri Jun 24 19:59:35 2011 +0100
@@ -4,6 +4,12 @@
 	* frame.el (get-other-frame): Add missing first argument THIS to
 	the call to NEXT-FRAME.
 
+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 9a046b2e6494 -r dc88f282ddc3 lisp/view-less.el
--- a/lisp/view-less.el	Thu Jun 23 08:55:35 2011 +0200
+++ b/lisp/view-less.el	Fri Jun 24 19:59:35 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.")