From 8b9338613f6785b5b4f0f17137e16582a062e3b6 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Tue, 13 Feb 2001 18:45:04 +0000 Subject: [PATCH] Move debian-changelog-mode-hook into "loadef.scm". --- v7/src/edwin/debian-changelog.scm | 8 ++------ v7/src/edwin/loadef.scm | 6 +++++- 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/v7/src/edwin/debian-changelog.scm b/v7/src/edwin/debian-changelog.scm index b3c723652..f8331718a 100644 --- a/v7/src/edwin/debian-changelog.scm +++ b/v7/src/edwin/debian-changelog.scm @@ -1,6 +1,6 @@ ;;; -*-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 ;;; @@ -34,7 +34,7 @@ Runs `debian-changelog-mode-hook' if it exists. Key bindings: -\\{debian-changelog-mode-map}" +\\{debian-changelog}" (lambda (buffer) (local-set-variable! left-margin 2 buffer) (local-set-variable! fill-prefix " " buffer) @@ -53,10 +53,6 @@ Key bindings: (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) diff --git a/v7/src/edwin/loadef.scm b/v7/src/edwin/loadef.scm index 67025d566..af375a29d 100644 --- a/v7/src/edwin/loadef.scm +++ b/v7/src/edwin/loadef.scm @@ -1,6 +1,6 @@ ;;; -*-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 ;;; @@ -386,6 +386,10 @@ This defaults to the value `mail-full-name'." 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)) ;;;; DOS-specific commands -- 2.25.1