1 files changed, 18 insertions, 18 deletions

diff --git a/cgi/user.cgi b/cgi/user.cgi
index e1c4d70..6092552 100755
--- a/cgi/user.cgi
+++ b/cgi/user.cgi
@@ -2,26 +2,21 @@
 
 require 'cgi'
 
-def llink(href, text)
-  if $cgi.path_info == href
-    $cgi.a(href) { "[ #{text} ⇓ ]" }
+def link(href, text, remote = false)
+  if remote
+    $cgi.a(href: href, target: "_blank") { "[ #{text} ⇗ ] " }
   else
-    $cgi.a(href) { "[ #{text} ]" }
+    $cgi.a(href: href) { "[ #{text} ] " }
   end
 end
 
-def rlink(href, text)
-  $cgi.a(href: href, target: "_blank") { "[ #{text} ⇗ ] " }
-end
-
 def toplinks
-  $cgi.table(id: "toplinks") {
-    $cgi.tr {
-      $cgi.td { llink("/"                      , "Home"        ) } +
-      $cgi.td { llink("/eamit.html"            , "Eamit"       ) } +
-      $cgi.td { rlink("https://git.4574.co.uk/", "Git"         ) } +
-      $cgi.td { llink("/stuff-i-want"          , "Stuff I Want") }
-    }
+  $cgi.ul(class: "toplinks") {
+    $cgi.li { link("/"                      , "Home"              ) } +
+    $cgi.li { link("/bins"                  , "Bins"              ) } +
+    $cgi.li { link("/eamit.html"            , "eamit"       , true) } +
+    $cgi.li { link("https://git.4574.co.uk/", "Git"         , true) } +
+    $cgi.li { link("/stuff-i-want"          , "Stuff I Want"      ) }
   }
 end
 
@@ -31,12 +26,13 @@ def rquote
     "User_4574 uses Linux, and loves life.",
     "User_4574 shall arrange the blocks and toil, for ever and a day.",
     "User_4574 likes the number 7.",
-    "ex scientia veritas",
+    "ex scientia, tyrannis",
     "User_4574 will blow things up for money.",
     "User_4574 dreams it possible.",
     "(define (! ?) (? ?)) (! !)",
     "User_4574 lets her pain fade down.",
     "User_4574 maintains vigilance during disablement conditions.",
+    "THIS TERMINAL IS LOGGED ON TO THE NETWORK SOLICITOR.",
     "User_4574 is established on the localiser.",
     "Memetic Hazard.",
     "Every six months User_4574 checks the oil level of the drive housing, and if necessary tops up with IBM 15 to the level of the inspection hole.",
@@ -76,8 +72,10 @@ def page(title, jumbotitle = title)
         $cgi.link(rel: "stylesheet", href: "styles.css")
       } +
       $cgi.body {
-        $cgi.h1("class" => "jumbo") { jumbotitle } +
-        $cgi.div { toplinks } +
+        $cgi.div(class: "pagetop") {
+          $cgi.h1(class: "jumbo") { jumbotitle } +
+          toplinks
+        } +
         $page +
         $cgi.div(id: "quote") { rquote }
       }
@@ -90,6 +88,8 @@ $cgi = CGI.new("html5")
 case $cgi.path_info
 when "/"
   page("Home", "User_4574's Lair")
+when "/bins"
+  page("Bins")
 when /^\/stuff-i-want/
   page("Stuff I Want")
 when /^\/bv/