comment out un-used code in build search url in search package.

I was going to start on making this function more robust and remove the
hard-coded nature of it but cleary I got distracted and never actually started
it. I know it will need to include the 'build-url' functions in the utils
package but until I get around to actually refactoring this function, I'm going
to leave the code commented out.

src/search.lisp

@@ -54,7 +54,7 @@ site is running in and use the beta or prod. URL's to connect to meilisearch.
 the base URL."
   (if (ritherdon-archive.config:developmentp)
       (concatenate 'string "http://localhost:7700" path)
-      (utils:build-url-root)
+      ;; (utils:build-url-root)
       (concatenate 'string "https://www.nera.com" path)))
 
 (defun delete-entry (id)