From ff32445cb7c3f2b9028ae05e8d7ad184b57a5e54 Mon Sep 17 00:00:00 2001
From: "Guillermo J. Rozas" <edu/mit/csail/zurich/gjr>
Date: Tue, 26 May 1992 16:10:17 +0000
Subject: [PATCH] Rename tags to tagutl because of conflicts on DOS.

---
 v7/src/edwin/decls.scm  | 4 ++--
 v7/src/edwin/ed-ffi.scm | 2 +-
 v7/src/edwin/edwin.ldr  | 4 ++--
 v7/src/edwin/edwin.pkg  | 4 ++--
 v7/src/edwin/make.scm   | 4 ++--
 5 files changed, 9 insertions(+), 9 deletions(-)

diff --git a/v7/src/edwin/decls.scm b/v7/src/edwin/decls.scm
index a3aefaa7b..359cb9582 100644
--- a/v7/src/edwin/decls.scm
+++ b/v7/src/edwin/decls.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/decls.scm,v 1.37 1992/05/12 15:45:23 mhwu Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/decls.scm,v 1.38 1992/05/26 16:09:32 jinx Exp $
 
 Copyright (c) 1989-92 Massachusetts Institute of Technology
 
@@ -183,7 +183,7 @@ MIT in each case. |#
 		"shell"
 		"simple"
 		"syntax"
-		"tags"
+		"tagutl"
 		"techinfo"
 		"telnet"
 		"texcom"
diff --git a/v7/src/edwin/ed-ffi.scm b/v7/src/edwin/ed-ffi.scm
index 6aba6fae7..65f2342cb 100644
--- a/v7/src/edwin/ed-ffi.scm
+++ b/v7/src/edwin/ed-ffi.scm
@@ -203,7 +203,7 @@
 	       edwin-syntax-table)
     ("syntax"  (edwin)
 	       edwin-syntax-table)
-    ("tags"    (edwin tags)
+    ("tagutl"  (edwin tags)
 	       edwin-syntax-table)
     ("techinfo"   (edwin)
 	       edwin-syntax-table)
diff --git a/v7/src/edwin/edwin.ldr b/v7/src/edwin/edwin.ldr
index 0174e89fb..88af7d217 100644
--- a/v7/src/edwin/edwin.ldr
+++ b/v7/src/edwin/edwin.ldr
@@ -1,5 +1,5 @@
 ;;; -*-Scheme-*-
-;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/edwin.ldr,v 1.31 1992/05/12 18:42:40 mhwu Exp $
+;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/edwin.ldr,v 1.32 1992/05/26 16:08:50 jinx Exp $
 ;;; program to load package contents
 ;;; **** This program (unlike most .ldr files) is not generated by a program.
 
@@ -147,7 +147,7 @@
       (load "sercom" environment)
       (load "iserch" (->environment '(EDWIN INCREMENTAL-SEARCH)))
       (load "shell" environment)
-      (load "tags" (->environment '(EDWIN TAGS)))
+      (load "tagutl" (->environment '(EDWIN TAGS)))
       (load "texcom" environment)
       (load "wincom" environment)
       (load "scrcom" environment)
diff --git a/v7/src/edwin/edwin.pkg b/v7/src/edwin/edwin.pkg
index 0359f01bf..701d6fe4d 100644
--- a/v7/src/edwin/edwin.pkg
+++ b/v7/src/edwin/edwin.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/edwin.pkg,v 1.92 1992/05/21 17:59:25 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/edwin.pkg,v 1.93 1992/05/26 16:08:57 jinx Exp $
 
 Copyright (c) 1989-92 Massachusetts Institute of Technology
 
@@ -801,7 +801,7 @@ MIT in each case. |#
   (parent (edwin)))
 
 (define-package (edwin tags)
-  (files "tags")
+  (files "tagutl")
   (parent (edwin))
   (export (edwin)
 	  edwin-command$find-tag
diff --git a/v7/src/edwin/make.scm b/v7/src/edwin/make.scm
index 4aa557b87..88ef96795 100644
--- a/v7/src/edwin/make.scm
+++ b/v7/src/edwin/make.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/make.scm,v 3.70 1992/05/12 18:19:26 mhwu Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/make.scm,v 3.71 1992/05/26 16:10:17 jinx Exp $
 
 Copyright (c) 1989-92 Massachusetts Institute of Technology
 
@@ -40,4 +40,4 @@ MIT in each case. |#
  "edwin"
  `((os-type . ,(intern (microcode-identification-item 'OS-NAME-STRING))))
  'QUERY)
-(add-system! (make-system "Edwin" 3 69 '()))
\ No newline at end of file
+(add-system! (make-system "Edwin" 3 70 '()))
\ No newline at end of file
-- 
2.25.1