For #702, change assumptions about version format so we can host mino…

…r version updates of docs

src/apidoc/controller/rewrite.xqm

@@ -52,8 +52,8 @@ declare variable $QUERY-STRING := substring-after($URL-ORIG, '?');
 declare variable $QUERY-STRING-FIELDS := xdmp:get-request-field-names() ;
 
 declare variable $VERSION-SPECIFIED := (
-  if (matches($PATH, '^/\d\.\d$')) then substring-after($PATH, '/')
-  else if (matches($PATH, '^/\d\.\d/')) then substring-before(
+  if (matches($PATH, '^/\d+\.\d+(-\d+)?$')) then substring-after($PATH, '/')
+  else if (matches($PATH, '^/\d+\.\d+(-\d+)?/')) then substring-before(
     substring-after($PATH, '/'), '/')
   else "") ;
 

src/apidoc/model/data-access.xqy

@@ -60,7 +60,7 @@ declare variable $TYPE-JS-PAT := '(.+[^\?\*\+])([\?\*\+])?' ;
 declare function api:version-dir($version as xs:string)
 as xs:string
 {
-  if (matches($version, '^\d+\.\d+$')) then concat("/apidoc/", $version, "/")
+  if (matches($version, '^\d+\.\d+(-\d+)?$')) then concat("/apidoc/", $version, "/")
   else error((), 'APIDOC-BADVERSION', xdmp:describe($version))
 };
 

src/apidoc/setup/toc.xqm

@@ -1272,7 +1272,7 @@ as element(toc:node)
     (: By now the JavaScript translation should already have happened. :)
     case $api:MODE-REST return api:reverse-translate-REST-resource-name(
       (: For 5.0 hide the verb. :)
-      if (xs:double($version) gt 5.0) then $function-name
+      if ($version ne "5.0") then $function-name
       else api:name-from-REST-fullname($function-name))
     default return $function-name)
   let $href as xs:string := (

src/js/rundmc_init.js

@@ -352,8 +352,8 @@ function versionSelectInit() {
       var oldQuery = window.location.search;
       // Handle different positioning of version strings.
       var newQuery = oldQuery
-          .replace(/\?v=\d+\.\d+/, "?v=" + version)
-          .replace(/&v=\d+\.\d+/, "&v=" + version);
+          .replace(/\?v=\d+\.\d+(?:-\d+)?/, "?v=" + version)
+          .replace(/&v=\d+\.\d+(?:-\d+)?/, "&v=" + version);
       // Handle no version string.
       if (newQuery == oldQuery) newQuery += "&v=" + version;
 
@@ -365,11 +365,11 @@ function versionSelectInit() {
     var newPath = oldPath;
     if (version == defaultVersion) {
       LOG.debug("using default", defaultVersion);
-      newPath = oldPath.replace(/^\/\d+\.\d+/, "");
-    } else if (oldPath.match(/^\/\d+\.\d+/)) {
+      newPath = oldPath.replace(/^\/\d+\.\d+(?:-\d+)?/, "");
+    } else if (oldPath.match(/^\/\d+\.\d+(?:-\d+)?/)) {
       LOG.debug("replacing old with", version);
       newPath = oldPath.replace(
-          /^\/\d+\.\d+/, "/" + version);
+          /^\/\d+\.\d+(?:-\d+)?/, "/" + version);
     } else {
       LOG.debug("prepending", version);
       newPath = '/' + version + oldPath;

src/model/data-access.xqy

@@ -80,7 +80,7 @@ declare variable $server-versions-available as xs:string+ := cts:uris(
   (), (),
   cts:document-query(
     $server-versions ! concat('/apidoc/', ., '/index.xml')))
-! replace(., '/apidoc/(\d+\.\d+)/index.xml', '$1') ;
+! replace(., '/apidoc/(\d+\.\d+(-\d+)?)/index.xml', '$1') ;
 declare variable $server-version-nodes-available as element()+ := (
   $server-version-nodes[@number = $server-versions-available]) ;
 
@@ -1002,7 +1002,7 @@ as xs:string?
 {
   (for $v in distinct-values($list ! normalize-space(.))
     where $v = $server-versions-available
-    order by xs:double($v) descending
+    order by $v descending
     return $v)[1]
 };