update packages
This commit is contained in:
@@ -77,8 +77,9 @@
|
||||
(arg (if (oref obj global) "--global" "--local")))
|
||||
(oset obj variable variable)
|
||||
(oset obj value
|
||||
(and (zerop (magit-process-git t "config" "--bool" arg variable))
|
||||
(buffer-substring (point-min) (1- (point-max)))))))
|
||||
(with-temp-buffer
|
||||
(and (zerop (magit-process-git t "config" "--bool" arg variable))
|
||||
(buffer-substring (point-min) (1- (point-max))))))))
|
||||
|
||||
;;;; Read
|
||||
|
||||
@@ -186,8 +187,7 @@
|
||||
(pcase-let ((`(,fallback . ,choices) (magit--git-variable-list-choices obj)))
|
||||
(concat
|
||||
(propertize "[" 'face 'transient-inactive-value)
|
||||
(mapconcat #'identity choices
|
||||
(propertize "|" 'face 'transient-inactive-value))
|
||||
(string-join choices (propertize "|" 'face 'transient-inactive-value))
|
||||
(and fallback (propertize "|" 'face 'transient-inactive-value))
|
||||
fallback
|
||||
(propertize "]" 'face 'transient-inactive-value)))))
|
||||
@@ -240,11 +240,15 @@
|
||||
;; Local Variables:
|
||||
;; read-symbol-shorthands: (
|
||||
;; ("and$" . "cond-let--and$")
|
||||
;; ("and>" . "cond-let--and>")
|
||||
;; ("and-let" . "cond-let--and-let")
|
||||
;; ("if-let" . "cond-let--if-let")
|
||||
;; ("thread$" . "cond-let--thread$")
|
||||
;; ("when$" . "cond-let--when$")
|
||||
;; ("and-let*" . "cond-let--and-let*")
|
||||
;; ("and-let" . "cond-let--and-let")
|
||||
;; ("if-let*" . "cond-let--if-let*")
|
||||
;; ("if-let" . "cond-let--if-let")
|
||||
;; ("when-let*" . "cond-let--when-let*")
|
||||
;; ("when-let" . "cond-let--when-let")
|
||||
;; ("while-let*" . "cond-let--while-let*")
|
||||
;; ("while-let" . "cond-let--while-let")
|
||||
;; ("match-string" . "match-string")
|
||||
;; ("match-str" . "match-string-no-properties"))
|
||||
|
||||
Reference in New Issue
Block a user