branch: elpa-admin
commit 28b66f78c1a0cf8a4ea903c203b7a35f20b51853
Author: Stefan Monnier <monn...@iro.umontreal.ca>
Commit: Stefan Monnier <monn...@iro.umontreal.ca>
* elpa-admin.el (elpaa--get-last-release): Don't return snapshot versions
---
elpa-admin.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/elpa-admin.el b/elpa-admin.el
index 64e37dc..a466312 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -242,7 +242,8 @@ Assumes that the current worktree holds a snapshot version."
(cond
((null vl)
(elpaa--message "Invalid previous release version"))
- ((member -4 vl)
+ ((or (equal vers "0") (< (apply #'min vl) 0))
+ ;; FIXME: Maybe we could look further into the past?
(elpaa--message "Previous version was also snapshot"))
(t
(cons (package-version-join vl) rev))))))))))
