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

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

[elpa] externals/vc-hgcmd 0b052a6 69/87: Suppress untrusted hgrc warning


From: Stefan Monnier
Subject: [elpa] externals/vc-hgcmd 0b052a6 69/87: Suppress untrusted hgrc warning
Date: Sat, 5 Jun 2021 16:11:49 -0400 (EDT)

branch: externals/vc-hgcmd
commit 0b052a6e38b58a123ab48001473dab1df2eaa4c6
Author: muffinmad <andreyk.mad@gmail.com>
Commit: muffinmad <andreyk.mad@gmail.com>

    Suppress untrusted hgrc warning
---
 vc-hgcmd.el | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/vc-hgcmd.el b/vc-hgcmd.el
index 065e23b..c5aab45 100644
--- a/vc-hgcmd.el
+++ b/vc-hgcmd.el
@@ -5,7 +5,7 @@
 ;; Author: Andrii Kolomoiets <andreyk.mad@gmail.com>
 ;; Keywords: vc
 ;; URL: https://github.com/muffinmad/emacs-vc-hgcmd
-;; Package-Version: 1.8
+;; Package-Version: 1.8.1
 ;; Package-Requires: ((emacs "25.1"))
 
 ;; This file is NOT part of GNU Emacs.
@@ -475,7 +475,7 @@ Insert output to process buffer and check if amount of data 
is enought to parse
           (when (or (stringp output-buffer) (buffer-live-p output-buffer))
             (with-current-buffer output-buffer
               (setq mode-line-process
-                    (propertize (format " [running %s...]" (car 
(vc-hgcmd--command-command cmd)))
+                    (propertize (format " [running %s...]" (car command))
                                 'face 'mode-line-emphasis
                                 'help-echo
                                 "A command is in progress in this buffer"))))
@@ -483,7 +483,10 @@ Insert output to process buffer and check if amount of 
data is enought to parse
            process
            (concat
             "runcommand\n"
-            (let* ((args (mapconcat #'vc-hgcmd--encode-command-arg command 
"\0"))
+            (let* ((args (mapconcat #'vc-hgcmd--encode-command-arg
+                                    (append '("--config" 
"ui.report_untrusted=0")
+                                            command)
+                                    "\0"))
                    (binary-data (bindat-pack '((l u32)) `((l . ,(length 
args))))))
               (concat (if tty
                           (vc-hgcmd--data-for-tty binary-data)



reply via email to

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