Parcourir la source

update git-command

pull/1/head
10sr il y a 12 ans
Parent
révision
61631c9d36
1 fichiers modifiés avec 3 ajouts et 1 suppressions
  1. +3
    -1
      emacs.el

+ 3
- 1
emacs.el Voir le fichier

@@ -1605,12 +1605,14 @@ when SEC is nil, stop auto save if enabled."
(abbreviate-file-name default-directory))
nil
'git-command-history)))
(let ((dir default-directory) (bf (get-buffer-create "*Git Output*"))
(let ((dir default-directory)
(bf (get-buffer-create "*Git Output*"))
;; (process-environment `(,@process-environment))
;; (comint-preoutput-filter-functions '(ansi-color-apply . nil))
;; (comint-output-filter-functions (cons 'ansi-color-process-output
;; comint-output-filter-functions))
)
(delete-windows-on bf t)
(shell-command (concat "git "
cmd)
bf)


Chargement…
Annuler
Enregistrer