Commit ab1d960a authored Oct 10, 2014 by Francois-Rene Rideau

tools: yet another tweak about debian package versions.

parent ddbbf177

tools/release.lisp

+1 −1

Changes for tools/release.lisp: 1 added line, 1 removed line.
Original line number	Diff line number	Diff line
		@@ -176,7 +176,7 @@

		(defun publish-debian-package (&optional release)
		"publish a debian package"
		(let ((changes (strcat "cl-asdf_" (debian-version-from-file release)
		(let ((changes (strcat "cl-asdf_" (debian-version-without-epoch (debian-version-from-file release))
		"_" (debian-architecture) ".changes")))
		(run* `(dput mentors ,(pn "../" changes)))))

tools/version.lisp

+8 −0

Changes for tools/version.lisp: 8 added lines, 0 removed lines.
Original line number	Diff line number	Diff line
		@@ -28,6 +28,14 @@
		;; (C) rel = nil is for debian-native packages, e.g. base-passwd or cowbuilder
		(values ver epoch rel)))

		(defun debian-version-string (ver epoch rel)
		(format nil "~@[~D:~]~A~@[-~A~]" epoch ver rel))

		(defun debian-version-without-epoch (version-string)
		(multiple-value-bind (ver epoch rel) (parse-debian-version version-string)
		(declare (ignore epoch))
		(debian-version-string ver nil rel)))

		(defparameter version (version-from-file))

		;;; Bumping the version of ASDF