Commits

carl douglas committed f8b3cd1

Actually call git tag in fact.

Comments (0)

Files changed (1)

            (qs (car (glob "*.release-info")))
            (if *update-meta-file* (qs (car (glob "*.meta"))) "")))
 
+(define (tag! release-version)
+  (system* "git tag ~A" release-version))
+
 (define (push-all!)
   (system* "git push --all"))
 
     (update-release-info! release-version)
     (when *update-meta-file* (update-meta!))
     (commit-all! egg-name release-version)
+    (tag! release-version)
     (push-all!)))
 
 (define *update-meta-file* #t)