;;; -*-Scheme-*-
;;;
-;;; $Id: debian-changelog.scm,v 1.3 2001/02/06 04:30:29 cph Exp $
+;;; $Id: debian-changelog.scm,v 1.4 2001/02/13 18:44:58 cph Exp $
;;;
;;; Copyright (c) 2001 Massachusetts Institute of Technology
;;;
Key bindings:
-\\{debian-changelog-mode-map}"
+\\{debian-changelog}"
(lambda (buffer)
(local-set-variable! left-margin 2 buffer)
(local-set-variable! fill-prefix " " buffer)
(event-distributor/invoke! (ref-variable debian-changelog-mode-hook buffer)
buffer)))
-(define-variable debian-changelog-mode-hook
- "An event distributor that is invoked when entering Debian changelog mode."
- (make-event-distributor))
-
(define-key 'debian-changelog '(#\C-c #\C-a) 'debian-changelog-add-entry)
(define-key 'debian-changelog '(#\C-c #\C-f)
'debian-changelog-finalize-last-version)
;;; -*-Scheme-*-
;;;
-;;; $Id: loadef.scm,v 1.44 2001/02/05 21:48:37 cph Exp $
+;;; $Id: loadef.scm,v 1.45 2001/02/13 18:45:04 cph Exp $
;;;
;;; Copyright (c) 1986, 1989-2001 Massachusetts Institute of Technology
;;;
This defaults to the value of `user-mail-address'."
#f
string-or-false?)
+
+(define-variable debian-changelog-mode-hook
+ "An event distributor that is invoked when entering Debian changelog mode."
+ (make-event-distributor))
\f
;;;; DOS-specific commands