Removed debug stuff

lib/helpers.xqy

@@ -3,10 +3,10 @@ xquery version "1.0-ml";
 module namespace h = "helpers";
 
 declare function h:link_to_index() {
-  <a href="/index.xqy" xmlns="http://www.w3.org/1999/xhtml">Back to main</a> } ;
+  <a href="/" xmlns="http://www.w3.org/1999/xhtml">Back to main</a> } ;
 
 declare function h:link_to_new() {
-  <a href="/new.xqy" xmlns="http://www.w3.org/1999/xhtml">Add new</a> } ;
+  <a href="/new" xmlns="http://www.w3.org/1999/xhtml">Add new</a> } ;
 
 declare function h:link_to_show( $path ) {
-  fn:concat( '/show.xqy?uri=', $path ) }; 
+  fn:concat( '/show', $path ) }; 

new.xqy

@@ -48,14 +48,6 @@ xdmp:set-response-content-type( "application/xhtml+xml" ),
                  let $xpaths := xdmp:get-request-field-names()
                    let $values := for $field in $xpaths
                      return xdmp:get-request-field($field)[1]
-
-let $_ := xdmp:log($salt)
-let $_ := xdmp:log($title)
-let $_ := xdmp:log($dir)
-let $_ := xdmp:log($path)
-let $_ := xdmp:log(fn:string-join($xpaths, ", "))
-let $_ := xdmp:log(fn:string-join($values, ", "))
-
                    return (xdmp:document-insert( $path,
                      gen:process-fields( $xpaths, $values ) ),
                      <p>New Post created</p>)

rewrite.xqy

@@ -0,0 +1,31 @@
+(:
+ : supporting all paths
+ :)
+declare function local:get-uri-encoded-fields() {
+  let $fields := fn:string-join( for $field in xdmp:get-request-field-names()
+    return fn:concat( $field, "=", 
+      xdmp:url-encode(xdmp:get-request-field( $field ) ) ), "&" )
+  return if ($fields) then fn:concat("?", $fields) else "" } ; 
+
+declare function local:default( $path ) {
+  fn:concat( $path, local:get-uri-encoded-fields() ) } ;
+declare function local:requested-root ( $path ) { fn:matches($path, "^/$") } ;
+declare function local:requested-new ( $path ) { 
+  fn:matches($path, "^/new$") } ;
+declare function local:requested-show ( $path ) { 
+  fn:matches($path, "^/show/\.*") } ;
+
+declare function local:show( $path ) {
+   fn:concat( "show.xqy?uri=/", fn:replace($path, "^/show/(\.*)", "$2") ) };
+
+let $path := xdmp:get-request-path()
+  return 
+    if ( local:requested-root ( $path ) )
+    then "index.xqy"
+    else 
+      if ( local:requested-new ( $path ) )
+      then fn:concat( "new.xqy", local:get-uri-encoded-fields() )
+      else 
+        if ( local:requested-show ( $path ) )
+        then local:show( $path )
+        else fn:concat( $path, local:get-uri-encoded-fields() )