Artifact
fb61146f5234b94340827bdf0b8fa22fbb31ea4b:
0000: 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 32 30 30 ;; Copyright 200
0010: 37 2d 32 30 30 38 2c 20 4d 61 74 74 68 65 77 20 7-2008, Matthew
0020: 57 65 6c 6c 61 6e 64 2e 20 6d 61 74 74 40 69 61 Welland. matt@ia
0030: 74 6f 61 2e 63 6f 6d 20 41 6c 6c 20 72 69 67 68 toa.com All righ
0040: 74 73 20 72 65 73 65 72 76 65 64 2e 0a 3b 3b 20 ts reserved..;;
0050: 0a 3b 3b 20 70 72 65 66 65 72 65 6e 63 65 73 2f .;; preferences/
0060: 76 69 65 77 2e 73 63 6d 0a 3b 3b 0a 28 73 3a 64 view.scm.;;.(s:d
0070: 69 76 0a 20 27 63 6c 61 73 73 20 22 6e 6f 64 65 iv. 'class "node
0080: 22 0a 20 28 73 3a 68 31 20 22 52 65 67 69 73 74 ". (s:h1 "Regist
0090: 65 72 20 79 6f 75 72 20 65 6d 61 69 6c 20 61 64 er your email ad
00a0: 64 72 65 73 73 22 29 0a 20 28 73 3a 70 20 22 41 dress"). (s:p "A
00b0: 64 64 73 20 39 20 70 74 73 20 74 6f 20 79 6f 75 dds 9 pts to you
00c0: 72 20 73 63 6f 72 65 20 74 68 65 20 66 69 72 73 r score the firs
00d0: 74 20 74 69 6d 65 20 79 6f 75 20 64 6f 20 69 74 t time you do it
00e0: 20 61 6e 64 20 65 6e 61 62 6c 65 73 20 76 65 72 and enables ver
00f0: 79 20 6f 63 63 61 73 69 6f 6e 61 6c 20 65 6d 61 y occasional ema
0100: 69 6c 20 75 70 64 61 74 65 73 2e 20 49 66 20 79 il updates. If y
0110: 6f 75 20 63 68 61 6e 67 65 20 79 6f 75 72 20 65 ou change your e
0120: 6d 61 69 6c 20 61 64 64 72 65 73 73 0a 20 20 20 mail address.
0130: 20 20 20 20 79 6f 75 20 6e 65 65 64 20 74 6f 20 you need to
0140: 72 65 2d 72 65 67 69 73 74 65 72 20 74 6f 20 6b re-register to k
0150: 65 65 70 20 79 6f 75 72 20 39 20 70 74 73 2e 22 eep your 9 pts."
0160: 29 0a 20 28 73 3a 66 6f 72 6d 20 27 61 63 74 69 ). (s:form 'acti
0170: 6f 6e 20 22 70 72 65 66 65 72 65 6e 63 65 73 2e on "preferences.
0180: 72 65 67 69 73 74 65 72 5f 65 6d 61 69 6c 22 0a register_email".
0190: 09 20 27 6d 65 74 68 6f 64 20 22 70 6f 73 74 22 . 'method "post"
01a0: 0a 09 20 20 28 73 3a 69 6e 70 75 74 20 27 74 79 .. (s:input 'ty
01b0: 70 65 20 22 73 75 62 6d 69 74 22 20 27 6e 61 6d pe "submit" 'nam
01c0: 65 20 22 72 65 67 69 73 74 65 72 5f 65 6d 61 69 e "register_emai
01d0: 6c 22 20 27 76 61 6c 75 65 20 22 52 65 67 69 73 l" 'value "Regis
01e0: 74 65 72 20 45 6d 61 69 6c 22 29 29 29 20 ter Email")))