# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1025380371 0
# Node ID 4cc4a5d2bae2f32ac3ab2f021ffba1c1175cef6c
# Parent  f6567777cef8df13be5f1b10b67c81793ba2652a
(cvs-mode-map): Bind ! to `force'.

diff -r f6567777cef8 -r 4cc4a5d2bae2 lisp/pcvs-defs.el
--- a/lisp/pcvs-defs.el	Sat Jun 29 19:52:14 2002 +0000
+++ b/lisp/pcvs-defs.el	Sat Jun 29 19:52:51 2002 +0000
@@ -4,7 +4,7 @@
 
 ;; Author: Stefan Monnier <monnier@cs.yale.edu>
 ;; Keywords: pcl-cvs
-;; Revision: $Id: pcvs-defs.el,v 1.17 2001/12/20 18:42:44 pj Exp $
+;; Revision: $Id: pcvs-defs.el,v 1.18 2002/06/22 20:24:42 monnier Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -105,7 +105,7 @@
 
 (defcustom cvs-auto-remove-directories 'handled
   "*If ALL, directory entries will never be shown.
-If HANLDED, only non-handled directories will be shown.
+If HANDLED, only non-handled directories will be shown.
 If EMPTY, only non-empty directories will be shown."
   :group 'pcl-cvs
   :type '(choice (const :tag "No" nil) (const all) (const handled) (const empty)))
@@ -325,6 +325,7 @@
     ("z" .	kill-this-buffer)
     ("F" .	cvs-mode-set-flags)
     ("\M-f" .	cvs-mode-force-command)
+    ("!" .	cvs-mode-force-command)
     ("\C-c\C-c" . cvs-mode-kill-process)
     ;; marking
     ("m" .	cvs-mode-mark)