From c3f6a8654cb8b28d9eec454804974d17c4858721 Mon Sep 17 00:00:00 2001
From: Michael Olson <mwolson@gnu.org>
Date: Thu, 29 Dec 2005 23:13:30 +0000
Subject: [PATCH] Fix comment markup.

* lisp/muse-latex.el (muse-latex-markup-strings): Fix typo.  Thanks to
  Ken Brown for the detailed report.

* lisp/muse-publish.el (muse-publish-markup-comment): Publish the ending
  tag as read-only as a temporary workaround.  We should make the
  beginning tag read-only also, but this is already taken care of in
  muse--main.
  (muse-publish-comment-tag): Markup up comment region as read-only.
git-archimport-id: mwolson@gnu.org--2005/muse--rel--3.02--patch-40
---
 ChangeLog            | 24 ++++++++++++++++++++++++
 ChangeLog.main       | 14 ++++++++++++++
 lisp/muse-latex.el   |  2 +-
 lisp/muse-publish.el |  3 ++-
 4 files changed, 41 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 6bca3e8..9bdb99b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -2,6 +2,30 @@
 # arch-tag: automatic-ChangeLog--mwolson@gnu.org--2005/muse--rel--3.02
 #
 
+2005-12-29 23:13:30 GMT	Michael Olson <mwolson@gnu.org>	patch-40
+
+    Summary:
+      Fix comment markup.
+    Revision:
+      muse--rel--3.02--patch-40
+
+    * lisp/muse-latex.el (muse-latex-markup-strings): Fix typo.  Thanks to
+      Ken Brown for the detailed report.
+    
+    * lisp/muse-publish.el (muse-publish-markup-comment): Publish the ending
+      tag as read-only as a temporary workaround.  We should make the
+      beginning tag read-only also, but this is already taken care of in
+      muse--main.
+      (muse-publish-comment-tag): Markup up comment region as read-only.
+
+    modified files:
+     ChangeLog ChangeLog.main lisp/muse-latex.el
+     lisp/muse-publish.el
+
+    new patches:
+     mwolson@gnu.org--2005/muse--main--1.0--patch-329
+
+
 2005-12-27 16:28:31 GMT	Michael Olson <mwolson@gnu.org>	patch-39
 
     Summary:
diff --git a/ChangeLog.main b/ChangeLog.main
index 61b5609..ed41fdc 100644
--- a/ChangeLog.main
+++ b/ChangeLog.main
@@ -2,6 +2,20 @@
 # arch-tag: automatic-ChangeLog--mwolson@gnu.org--2005/muse--main--1.0
 #
 
+2005-12-29 23:02:18 GMT	Michael Olson <mwolson@gnu.org>	patch-329
+
+    Summary:
+      muse-latex: Fix comment markup.
+    Revision:
+      muse--main--1.0--patch-329
+
+    * lisp/muse-latex.el (muse-latex-markup-strings): Fix typo in
+      comment-end.  Thanks to Ken Brown for reporting this.
+
+    modified files:
+     ChangeLog lisp/muse-latex.el
+
+
 2005-12-26 22:26:56 GMT	Michael Olson <mwolson@gnu.org>	patch-323
 
     Summary:
diff --git a/lisp/muse-latex.el b/lisp/muse-latex.el
index af1c4b6..5447fd2 100644
--- a/lisp/muse-latex.el
+++ b/lisp/muse-latex.el
@@ -163,7 +163,7 @@ For more on the structure of this list, see
     (email-addr      . "\\verb|%s|")
     (emdash          . "---")
     (comment-begin   . "\\comment{")
-    (commend-end     . "}")
+    (comment-end     . "}")
     (rule            . "\\bigskip")
     (no-break-space  . "~")
     (enddots         . "\\ldots{}")
diff --git a/lisp/muse-publish.el b/lisp/muse-publish.el
index e0aa231..f42bad7 100644
--- a/lisp/muse-publish.el
+++ b/lisp/muse-publish.el
@@ -681,7 +681,7 @@ the file is published no matter what."
       ""
     (goto-char (match-end 0))
     (insert (muse-markup-text 'comment-end))
-    (muse-publish-mark-read-only (match-beginning 1) (match-end 1))
+    (muse-publish-mark-read-only (match-beginning 1) (point))
     (goto-char (match-beginning 1))
     (insert (muse-markup-text 'comment-begin))
     (delete-region (match-beginning 0) (1- (match-beginning 1)))))
@@ -1180,6 +1180,7 @@ like read-only from being inadvertently deleted."
       (delete-region beg end)
     (goto-char end)
     (insert (muse-markup-text 'comment-end))
+    (muse-publish-mark-read-only beg (point))
     (goto-char beg)
     (insert (muse-markup-text 'comment-begin))))
 
-- 
2.11.4.GIT