moved algol60 and honu docs to experimental category

remove empty doc categories

collects/algol60/info.rkt

@@ -2,4 +2,4 @@
 
 (define tools '(("tool.ss")))
 (define tool-names '("Algol 60"))
-(define scribblings '(("algol60.scrbl" () (other))))
+(define scribblings '(("algol60.scrbl" () (experimental 40))))

collects/scribblings/honu/info.rkt

@@ -1,3 +1,3 @@
 #lang setup/infotab
 
-(define scribblings '(("honu.scrbl" (multi-page) (other))))
+(define scribblings '(("honu.scrbl" (multi-page) (experimental 40))))

collects/scribblings/main/private/manuals.rkt

@@ -113,6 +113,7 @@
          (lambda (sec)
            (let ([docs (filter (lambda (doc) (eq? (car doc) (sec-cat sec)))
                                docs)])
+             (cond [(pair? docs)
                     (list*
                      (plain-line (hspace 1))
                      (plain-line (let loop ([s (sec-label sec)])
@@ -142,6 +143,7 @@
                                                              (caadr x)))))
                                                 renderer part resolve-info))])
                                     (string-ci<? (str ad) (str bd)))
-                         (> (car ad) (car bd)))))))))
+                                  (> (car ad) (car bd)))))))]
+                   [else null])))
          sections))))
     (make-delayed-block contents)))