about summary refs log tree commit diff
path: root/web
diff options
context:
space:
mode:
Diffstat (limited to 'web')
-rw-r--r--web/gn-uri.scm7
1 files changed, 4 insertions, 3 deletions
diff --git a/web/gn-uri.scm b/web/gn-uri.scm
index f275bcd..5d95cd8 100644
--- a/web/gn-uri.scm
+++ b/web/gn-uri.scm
@@ -22,11 +22,12 @@
             ))
 
 
-
 (define (normalize-id str)
   ;; (string-replace-substring (string-downcase str) " " "_")
-  (string-replace-substring str " " "_")
-  )
+  (match str
+    (#f "unknown")
+    (_ (string-replace-substring str " " "_"))
+  ))
 
 (define (url-parse-id uri)
   (if uri