From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 6 Feb 2001 04:19:13 +0000 (+0000)
Subject: New code to do Debian changelogs.
X-Git-Tag: 20090517-FFI~2978
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=6732c4fd72cdafc5ff7630068333d70187c573da;p=mit-scheme.git

New code to do Debian changelogs.
---

diff --git a/v7/src/edwin/Makefile.in b/v7/src/edwin/Makefile.in
index dc70ed031..f763a99c0 100644
--- a/v7/src/edwin/Makefile.in
+++ b/v7/src/edwin/Makefile.in
@@ -1,6 +1,6 @@
-# $Id: Makefile.in,v 1.3 2000/12/25 05:43:43 cph Exp $
+# $Id: Makefile.in,v 1.4 2001/02/06 04:15:35 cph Exp $
 #
-# Copyright (c) 2000 Massachusetts Institute of Technology
+# Copyright (c) 2000-2001 Massachusetts Institute of Technology
 #
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -63,8 +63,8 @@ mkinstalldirs = $(SHELL) $(top_srcdir)/mkinstalldirs
 AUXDIR = @AUXDIR@
 EDDIR = $(AUXDIR)/edwin
 EODIR = $(EDDIR)/autoload
-EDOPTS = eystep manual midas nntp pasmod print pwedit pwparse snr sort \
-	 techinfo telnet tximod verilog vhdl webster
+EDOPTS = debian-changelog eystep manual midas nntp pasmod print pwedit \
+	 pwparse snr sort techinfo telnet tximod verilog vhdl webster
 
 all:
 	echo "No ALL action"
diff --git a/v7/src/edwin/fileio.scm b/v7/src/edwin/fileio.scm
index 090e05323..6be0ed5de 100644
--- a/v7/src/edwin/fileio.scm
+++ b/v7/src/edwin/fileio.scm
@@ -1,8 +1,8 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: fileio.scm,v 1.152 2000/03/25 20:32:40 cph Exp $
+;;; $Id: fileio.scm,v 1.153 2001/02/06 04:19:13 cph Exp $
 ;;;
-;;; Copyright (c) 1986, 1989-2000 Massachusetts Institute of Technology
+;;; Copyright (c) 1986, 1989-2001 Massachusetts Institute of Technology
 ;;;
 ;;; This program is free software; you can redistribute it and/or
 ;;; modify it under the terms of the GNU General Public License as
@@ -319,7 +319,7 @@ of the predicates is satisfied, the file is written in the usual way."
   "Alist of filename patterns vs corresponding major modes.
 Each element looks like (REGEXP . MODE).
 Visiting a file whose name matches REGEXP causes MODE to be used."
-  '()
+  '((".+/debian/changelog$" . DEBIAN-CHANGELOG))
   string->mode-alist?)
 
 (define-variable file-type-to-major-mode