The code for retreiving COMMIT-ID does not work in Windows.

This commit is contained in:
Juan Jose Garcia Ripoll 2010-02-25 12:00:51 +01:00
parent f0f15c7d72
commit 28ceeaa405

View file

@ -30,7 +30,8 @@
;;; * Create commit version number
;;;
(setq si::+commit-id+ "0")
(setq si::+commit-id+ "UNKNOWN")
#-windows
(when (probe-file "@top_srcdir@/../.git/")
(when (zerop (si::system "(cd \"@top_srcdir@\" && git log --format=oneline -1) > COMMIT-ID"))
(let* ((file (print (open "COMMIT-ID" :direction :input :element-type :default