From 4b7b409e682c98f05ceeb9e3c0e9de65900b6f79 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Mon, 6 Feb 2006 18:41:04 +0000
Subject: [PATCH] Fix more brokenness.

---
 v7/src/edwin/htmlmode.scm | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/v7/src/edwin/htmlmode.scm b/v7/src/edwin/htmlmode.scm
index 6441fee4b..c571d5bf1 100644
--- a/v7/src/edwin/htmlmode.scm
+++ b/v7/src/edwin/htmlmode.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: htmlmode.scm,v 1.13 2006/02/06 18:26:54 cph Exp $
+$Id: htmlmode.scm,v 1.14 2006/02/06 18:41:04 cph Exp $
 
 Copyright 1999,2000,2001,2002,2003,2006 Massachusetts Institute of Technology
 
@@ -43,6 +43,7 @@ USA.
     (local-set-variable! comment-indent-hook xml-comment-indentation buffer)
     (local-set-variable! comment-start "<!-- " buffer)
     (local-set-variable! comment-end " -->" buffer)
+    (local-set-variable! comment-multi-line #t buffer)
     (local-set-variable!
      sentence-end
      "[.?!][]\"')}]*\\(<[^>]*>\\)*\\($\\| $\\|\t\\|  \\)[ \t\n]*"
@@ -97,10 +98,9 @@ USA.
   mark
   0)
 
-;; Backwards compatibility:
-(define edwin-mode$html edwin-mode$xml)
-(define edwin-command$html-mode edwin-command$xml-mode)
-(define edwin-variable$html-mode-hook edwin-variable$xml-mode-hook)
-(define edwin-variable$html-mode-abbrev-table
-  edwin-variable$xml-mode-abbrev-table)
+;; Backwards compatibility
+(define-editor-alias mode html xml)
+(define-editor-alias command html-mode xml-mode)
+(define-editor-alias variable html-mode-hook xml-mode-hook)
+(define-editor-alias variable html-mode-abbrev-table xml-mode-abbrev-table)
 (define html-syntax-table xml-syntax-table)
\ No newline at end of file
-- 
2.25.1