Rename weblabels to librejs.

* guix-web (run-route): Call librejs.
  (weblabels): Renamed.
  (librejs): New procedure.

1 files changed, 4 insertions, 3 deletions

diff --git a/guix-web b/guix-web
index 1a63e69..24e7c6e 100755
--- a/guix-web
+++ b/guix-web
@@ -131,8 +131,8 @@
      (render-json (all-packages-json)))
     ((GET "package" name)
      (render-html (view-package name)))
-    ((GET "weblabels")
-     (render-html (weblabels)))
+    ((GET "librejs")
+     (render-html (librejs)))
     (_ #f)))
 
 (define (all-packages-json)
@@ -220,7 +220,6 @@
                     "versions"
                     "version"))))
 
-(define (weblabels)
     (main-layout
      name
      `((h1 ,name (span (@ (class "badge"))
@@ -229,6 +228,8 @@
            ,@(map (lambda (p)
                     `(li ,(describe-package p)))
                   packages))))))
+
+(define (librejs)
   (define (weblabel js)
     `(tr
       (td