|
From: | Tassilo Horn |
Subject: | Re: A project-files implementation for Git projects |
Date: | Fri, 13 Sep 2019 22:38:15 +0200 |
User-agent: | Gnus/5.13 (Gnus v5.13) Emacs/27.0.50 (gnu/linux) |
Hi again, someone told me a better way to query the tracked files from subversion which is much faster and requires no network call off-list. --8<---------------cut here---------------start------------->8--- (defun vc-svn-list-files (&optional dir) (let ((default-directory (or dir default-directory)) files) (with-temp-buffer (vc-svn-command t 0 "." "info" "--recursive" "--show-item" "relative-url" "--show-item" "kind") (goto-char (point-min)) (while (re-search-forward "^file\s+\\(.*\\)$" nil t) (setq files (cons (expand-file-name (match-string 1)) files)))) (nreverse files))) --8<---------------cut here---------------end--------------->8--- I've also pushed my changes to the branch scratch/tsdh-vc-list-files for review. Bye, Tassilo
[Prev in Thread] | Current Thread | [Next in Thread] |