comparison lisp/log-view.el @ 107617:c5f9e4613394

Merge from mainline.
author Eli Zaretskii <eliz@gnu.org>
date Sat, 16 Jan 2010 06:57:09 -0500
parents 49daa9e9669f
children dc9565b08f10 8027e412df98
comparison
equal deleted inserted replaced
107616:fa5ad3eee9f5 107617:c5f9e4613394
1 ;;; log-view.el --- Major mode for browsing RCS/CVS/SCCS log output 1 ;;; log-view.el --- Major mode for browsing RCS/CVS/SCCS log output
2 2
3 ;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 3 ;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
4 ;; 2008, 2009 Free Software Foundation, Inc. 4 ;; 2008, 2009, 2010 Free Software Foundation, Inc.
5 5
6 ;; Author: Stefan Monnier <monnier@iro.umontreal.ca> 6 ;; Author: Stefan Monnier <monnier@iro.umontreal.ca>
7 ;; Keywords: rcs sccs cvs log version-control tools 7 ;; Keywords: rcs sccs cvs log version-control tools
8 8
9 ;; This file is part of GNU Emacs. 9 ;; This file is part of GNU Emacs.
119 119
120 (defgroup log-view nil 120 (defgroup log-view nil
121 "Major mode for browsing log output of RCS/CVS/SCCS." 121 "Major mode for browsing log output of RCS/CVS/SCCS."
122 :group 'pcl-cvs 122 :group 'pcl-cvs
123 :prefix "log-view-") 123 :prefix "log-view-")
124
125 ;; Needed because log-view-mode-map inherits from widget-keymap. (Bug#5311)
126 (require 'wid-edit)
124 127
125 (easy-mmode-defmap log-view-mode-map 128 (easy-mmode-defmap log-view-mode-map
126 '(("z" . kill-this-buffer) 129 '(("z" . kill-this-buffer)
127 ("q" . quit-window) 130 ("q" . quit-window)
128 ("m" . log-view-toggle-mark-entry) 131 ("m" . log-view-toggle-mark-entry)