emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] externals/caml 0a919f4 034/197: patch par Didier le Botlan pour


From: Stefan Monnier
Subject: [nongnu] externals/caml 0a919f4 034/197: patch par Didier le Botlan pour les commentaires
Date: Sat, 21 Nov 2020 01:19:33 -0500 (EST)

branch: externals/caml
commit 0a919f43e3f827769a83433f0ed53a57c972f75c
Author: Jacques Garrigue <garrigue at math.nagoya-u.ac.jp>
Commit: Jacques Garrigue <garrigue at math.nagoya-u.ac.jp>

    patch par Didier le Botlan pour les commentaires
    
    
    git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3296 
f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
---
 caml.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/caml.el b/caml.el
index 46e4a6f..e0389ff 100644
--- a/caml.el
+++ b/caml.el
@@ -1422,11 +1422,15 @@ matching nodes to determine KEYWORD's final 
indentation.")
      ((looking-at comment-start-skip)
       (current-column))
      ((caml-in-comment-p)
-      (let ((closing (looking-at "\\*)")))
+      (let ((closing (looking-at "\\*)"))
+           (comment-mark (looking-at "\\*")))
         (caml-backward-comment)
         (looking-at comment-start-skip)
         (+ (current-column)
-           (if closing 0 caml-comment-indent))))
+           (cond
+           (closing 1)
+           (comment-mark 1)
+           (t caml-comment-indent)))))
      (t (let* ((leading (looking-at caml-leading-kwops-regexp))
                (assoc-val (if leading (assoc (caml-match-string 0)
                                              caml-leading-kwops-alist)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]