github/melpa
1
0
Fork 0
mirror of https://github.com/correl/melpa.git synced 2024-11-14 19:19:32 +00:00
Code Issues Projects Releases Packages Wiki Activity

fossil 1.21 (as used on the server) uses _FOSSIL_ instead of the newer .fslckout to store local data

Browse source
This commit is contained in:
Dieter Deyke 2014-07-10 08:06:59 +02:00
parent f3f68295a3
commit 9a93420140
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
package-build.el
View file

@ -333,7 +333,8 @@ seconds; the server cuts off after 10 requests in 20 seconds.")
(let ((repo (plist-get config :url)))
(with-current-buffer (get-buffer-create "*package-build-checkout*")
(cond
((and (file-exists-p (expand-file-name ".fslckout" dir))
((and (or (file-exists-p (expand-file-name ".fslckout" dir))
(file-exists-p (expand-file-name "_FOSSIL_" dir)))
(string-equal (pb/fossil-repo dir) repo))
(pb/princ-exists dir)
(pb/run-process dir "fossil" "update"))
@ -598,6 +599,7 @@ Optionally PRETTY-PRINT the data."
"--exclude=.git*"
"--exclude=_darcs"
"--exclude=.fslckout"
"--exclude=_FOSSIL_"
"--exclude=.bzr"
"--exclude=.hg"
(or (mapcar (lambda (fn) (concat dir "/" fn)) files) (list dir))))