unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
* [PATCH] * subr.el: Support for snapshot versions in version-regexp-alist
@ 2013-10-31 10:29 Bozhidar Batsov
  2013-11-01 17:36 ` Stefan Monnier
  0 siblings, 1 reply; 7+ messages in thread
From: Bozhidar Batsov @ 2013-10-31 10:29 UTC (permalink / raw)
  To: emacs-devel


[-- Attachment #1.1: Type: text/plain, Size: 406 bytes --]

Hi everyone,  

Currently there is no support in `version-regexp-alist' for dealing with snapshot releases, so I’ve added some. I’ve also updated the treatment of x.x-cvs and x.x-date versions as they are actually snapshot releases, not alpha releases. Version ending with git and bzr are now treated the same way as cvs.

Hopefully you’ll find this patch useful.  

--  
Cheers,
Bozhidar


[-- Attachment #1.2: Type: text/html, Size: 778 bytes --]

[-- Attachment #2: 0001-subr.el-Support-for-snapshot-versions-in-version-reg.patch --]
[-- Type: application/octet-stream, Size: 2098 bytes --]

From b72a0387470f58af2936002c49235b236a7121ef Mon Sep 17 00:00:00 2001
From: Bozhidar Batsov <bozhidar@batsov.com>
Date: Thu, 31 Oct 2013 12:19:14 +0200
Subject: [PATCH] * subr.el: Support for snapshot versions in
 version-regexp-alist.

---
 lisp/subr.el | 15 ++++++++++-----
 1 file changed, 10 insertions(+), 5 deletions(-)

diff --git a/lisp/subr.el b/lisp/subr.el
index 4df9c9a..0556211 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -4478,11 +4478,12 @@ Usually the separator is \".\", but it can be any other string.")
 
 
 (defconst version-regexp-alist
-  '(("^[-_+ ]?alpha$"           . -3)
-    ("^[-_+]$"                  . -3) ; treat "1.2.3-20050920" and "1.2-3" as alpha releases
-    ("^[-_+ ]cvs$"              . -3) ; treat "1.2.3-CVS" as alpha release
-    ("^[-_+ ]?beta$"            . -2)
-    ("^[-_+ ]?\\(pre\\|rcc\\)$" . -1))
+  '(("^[-_+ ]?snapshot$"              . -4)
+    ("^[-_+]$"                        . -4) ; treat "1.2.3-20050920" and "1.2-3" as snapshot releases
+    ("^[-_+ ]?\\(cvs\\|git\\|bzr\\)$" . -4) ; treat "1.2.3-CVS" as snapshot release
+    ("^[-_+ ]?alpha$"                 . -3)
+    ("^[-_+ ]?beta$"                  . -2)
+    ("^[-_+ ]?\\(pre\\|rcc\\)$"       . -1))
   "Specify association between non-numeric version and its priority.
 
 This association is used to handle version string like \"1.0pre2\",
@@ -4490,6 +4491,8 @@ This association is used to handle version string like \"1.0pre2\",
 non-numeric part of a version string to an integer.  For example:
 
    String Version    Integer List Version
+   \"0.9snapshot\"     (0  9 -4)
+   \"1.0-git\"         (1  0 -4)
    \"1.0pre2\"         (1  0 -1 2)
    \"1.0PRE2\"         (1  0 -1 2)
    \"22.8beta3\"       (22 8 -2 3)
@@ -4546,6 +4549,8 @@ Examples of version conversion:
    \"0.9alpha1\"       (0  9 -3 1)
    \"0.9AlphA1\"       (0  9 -3 1)
    \"0.9alpha\"        (0  9 -3)
+   \"0.9snapshot\"     (0  9 -4)
+   \"1.0-git\"         (1  0 -4)
 
 See documentation for `version-separator' and `version-regexp-alist'."
   (or (and (stringp ver) (> (length ver) 0))
-- 
1.8.4


^ permalink raw reply related	[flat|nested] 7+ messages in thread
end of thread, other threads:[~2013-11-02 10:57 UTC | newest]

Thread overview: 7+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2013-10-31 10:29 [PATCH] * subr.el: Support for snapshot versions in version-regexp-alist Bozhidar Batsov
2013-11-01 17:36 ` Stefan Monnier
2013-11-01 18:55   ` Bozhidar Batsov
2013-11-01 19:13     ` Stefan Monnier
2013-11-01 19:52       ` Bozhidar Batsov
2013-11-02 10:25         ` Bozhidar Batsov
2013-11-02 10:57           ` Bozhidar Batsov

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).