[nongnu] externals/caml d8a2f7d 165/197: caml-types.el: Fix missing format argument

[Stefan Monnier]

branch: externals/caml
commit d8a2f7deaf83ab6d1e323733149397889f17c26e
Author: Chunhui He <hchunhui@mail.ustc.edu.cn>
Commit: Chunhui He <hchunhui@mail.ustc.edu.cn>

    caml-types.el: Fix missing format argument
    
    Now the emacs mode can not show the kind of call at point. Emacs shows the
    following message:
    
      let: Wrong number of arguments: (lambda (info format) "Displays INFO 
using the given FORMAT." (message (format format info)) (save-current-buffer 
(set-buffer caml-types-buffer) (erase-buffer) (insert info))), 1
    
    This issue was introduced in commit 5fa4e02. It extracted the feedback logic
    to function caml-types-feedback, but deleted the format argument by 
accident.
    So let's fix it.
    
    Fixes: 5fa4e02 ("caml-types.el: Extract the feedback logic to a separate 
function.")
---
 caml-types.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/caml-types.el b/caml-types.el
index 306fa5c..cc5d915 100644
--- a/caml-types.el
+++ b/caml-types.el
@@ -221,7 +221,7 @@ See `caml-types-location-re' for annotation file format."
               (right (caml-types-get-pos target-buf (elt node 1)))
               (kind (cdr (assoc "call" (elt node 2)))))
           (move-overlay caml-types-expr-ovl left right target-buf)
-          (caml-types-feedback kind)))))
+          (caml-types-feedback kind "%s call")))))
     (if (and (= arg 4)
              (not (window-live-p (get-buffer-window caml-types-buffer))))
         (display-buffer caml-types-buffer))