~ chicken-core (chicken-5) 8b1afe9cd72e1a152926215f3bb730709a5c4e91
commit 8b1afe9cd72e1a152926215f3bb730709a5c4e91
Author: Peter Bex <peter.bex@xs4all.nl>
AuthorDate: Wed Aug 7 21:16:49 2013 +0200
Commit: Peter Bex <peter.bex@xs4all.nl>
CommitDate: Wed Aug 7 21:16:49 2013 +0200
Fix 'setversion' script; make it executable and restore the 'huh' variable's item in the list returned by version parser
diff --git a/scripts/setversion b/scripts/setversion
old mode 100644
new mode 100755
index a05988ee..01660086
--- a/scripts/setversion
+++ b/scripts/setversion
@@ -35,7 +35,8 @@ exec csi -s "$0" "$@"
(list (irregex-match-substring m 0)
(irregex-match-substring m 1)
(irregex-match-substring m 2)
- (irregex-match-substring m 3))))
+ (irregex-match-substring m 3)
+ (irregex-match-substring m 4))))
(define (main args)
(let ((major (##sys#fudge 41))
Trap