Artifact
7f97c343f3dc596f9022e11c7dccbe8187941487:
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 4b 69 61 74 6f 61 2e Welland. Kiatoa.
0030: 63 6f 6d 20 41 6c 6c 20 72 69 67 68 74 73 20 72 com All rights r
0040: 65 73 65 72 76 65 64 2e 0a 3b 3b 20 0a 3b 3b 20 eserved..;; .;;
0050: 6d 61 69 6e 74 2f 76 69 65 77 2e 73 63 6d 0a 3b maint/view.scm.;
0060: 3b 0a 28 69 66 20 28 6d 61 69 6e 74 3a 61 6d 2d ;.(if (maint:am-
0070: 69 2d 6d 61 69 6e 74 3f 29 0a 20 20 20 20 28 6c i-maint?). (l
0080: 69 73 74 0a 20 20 20 20 20 28 73 3a 68 31 20 22 ist. (s:h1 "
0090: 48 65 6c 6c 6f 20 4d 61 69 6e 74 21 22 29 0a 20 Hello Maint!").
00a0: 20 20 20 20 28 73 3a 70 20 28 73 3a 61 20 22 55 (s:p (s:a "U
00b0: 70 64 61 74 65 20 54 61 62 6c 65 73 22 20 27 68 pdate Tables" 'h
00c0: 72 65 66 20 28 73 3a 6c 69 6e 6b 2d 74 6f 20 28 ref (s:link-to (
00d0: 73 3a 63 75 72 72 65 6e 74 2d 70 61 67 65 29 20 s:current-page)
00e0: 0a 09 09 09 09 09 27 61 63 74 69 6f 6e 20 22 6d ......'action "m
00f0: 61 69 6e 74 2e 75 70 64 61 74 65 5f 74 61 62 6c aint.update_tabl
0100: 65 73 22 29 29 29 29 0a 20 20 20 20 27 28 29 29 es")))). '())
0110: 0a 0a 09 ...