restore web code page

master
Matthew Butterick 7 years ago
parent 4fde9b35ea
commit ce699cf11f

@ -72,6 +72,14 @@ document.write('<link rel="stylesheet" type="text/css" media="all" href="/firefo
var s = document.getElementsByTagName('script')[0]; s.parentNode.insertBefore(ga, s); var s = document.getElementsByTagName('script')[0]; s.parentNode.insertBefore(ga, s);
})(); })();
function jumpToCode() {
code_value = document.forms['codeform'].elements['codefield'].value;
window.location.href = "http://typo.la/" + code_value;
return false;
}
</script> </script>

@ -2,6 +2,7 @@
◊(require sugar/coerce sugar/unstable/string sugar/file) ◊(require sugar/coerce sugar/unstable/string sugar/file)
error.html error.html
web-code.html
fonts/equity-a.css fonts/equity-a.css
fonts/equity-b.css fonts/equity-b.css

@ -0,0 +1,12 @@
#lang pollen
(define-meta title "Enter a web code")
(section-from-metas metas)
(define-meta toolbar-blank "true")
 
Type the code below and press return.
form[#:action "javascript:jumpToCode();" #:name "codeform"]{◊input[#:type "text" #:style "border: 1px solid gray;padding: 0.5em" #:name "codefield" #:size "8" #:autofocus "42"]}