Artifact f0a6adeb658a1122010911897865a234af72cafe:

Wiki page [Howto] by matt on 2013-09-22 03:18:13.
0000: 44 20 32 30 31 33 2d 30 39 2d 32 32 54 30 33 3a  D 2013-09-22T03:
0010: 31 38 3a 31 33 2e 30 31 37 0a 4c 20 48 6f 77 74  18:13.017.L Howt
0020: 6f 0a 55 20 6d 61 74 74 0a 57 20 33 32 37 34 0a  o.U matt.W 3274.
0030: 47 6f 74 63 68 61 73 21 0d 0a 3d 3d 3d 3d 3d 3d  Gotchas!..======
0040: 3d 0d 0a 0d 0a 31 2e 20 41 6c 6c 20 69 74 65 6d  =....1. All item
0050: 73 20 66 6f 72 20 61 20 70 61 67 65 20 2a 6d 75  s for a page *mu
0060: 73 74 2a 20 62 65 20 70 61 72 74 20 6f 66 20 61  st* be part of a
0070: 20 6c 69 73 74 21 0d 0a 0d 0a 20 20 20 4f 4b 3a   list!....   OK:
0080: 20 20 20 20 20 28 6c 69 73 74 20 28 66 75 6e 63       (list (func
0090: 74 69 6f 6e 31 20 70 61 72 61 6d 31 29 28 66 75  tion1 param1)(fu
00a0: 6e 63 74 69 6f 6e 32 20 70 61 72 61 6d 32 29 29  nction2 param2))
00b0: 0d 0a 20 20 20 4e 4f 54 20 4f 4b 3a 20 28 62 65  ..   NOT OK: (be
00c0: 67 69 6e 20 28 66 75 6e 63 74 69 6f 6e 31 20 70  gin (function1 p
00d0: 61 72 61 6d 31 29 28 66 75 6e 63 74 69 6f 6e 32  aram1)(function2
00e0: 20 70 61 72 61 6d 32 29 29 0d 0a 0d 0a 0d 0a 56   param2))......V
00f0: 61 72 69 6f 75 73 20 63 6f 6d 70 6f 6e 65 6e 74  arious component
0100: 73 0d 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  s..=============
0110: 3d 3d 3d 3d 3d 0d 0a 0d 0a 3d 3d 3d 3d 3d 3d 3d  =====....=======
0120: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0130: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0140: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0150: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0d  ===============.
0160: 0a 31 2e 20 43 72 65 61 74 65 20 61 20 6c 69 6e  .1. Create a lin
0170: 6b 2e 0d 0a 0d 0a 28 73 3a 6e 75 6c 6c 20 22 5b  k.....(s:null "[
0180: 22 20 28 73 3a 61 20 6e 61 6d 65 20 27 68 72 65  " (s:a name 'hre
0190: 66 20 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20  f ..            
01a0: 20 20 20 28 73 3a 6c 69 6e 6b 2d 74 6f 20 28 73     (s:link-to (s
01b0: 74 72 69 6e 67 2d 61 70 70 65 6e 64 20 22 6c 6f  tring-append "lo
01c0: 63 61 74 69 6f 6e 2f 22 20 28 73 74 72 69 6e 67  cation/" (string
01d0: 2d 69 6e 74 65 72 73 70 65 72 73 65 20 70 20 22  -intersperse p "
01e0: 2f 22 29 20 22 22 29 29 29 20 22 5d 20 22 29 29  /") ""))) "] "))
01f0: 29 0d 0a 0d 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  )....===========
0200: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0210: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0220: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0230: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0d 0a 32 2e 20  ===========..2. 
0240: 43 61 6c 6c 20 63 75 72 72 65 6e 74 20 70 61 67  Call current pag
0250: 65 20 77 69 74 68 20 6e 65 77 20 70 61 72 61 6d  e with new param
0260: 0d 0a 0d 0a 49 6e 20 76 69 65 77 2e 73 63 6d 3a  ....In view.scm:
0270: 0d 0a 0d 0a 20 28 73 3a 63 65 6e 74 65 72 20 22  .... (s:center "
0280: 5b 22 20 28 73 3a 61 20 27 68 72 65 66 20 28 73  [" (s:a 'href (s
0290: 3a 6c 69 6e 6b 2d 74 6f 20 22 70 6f 6c 6c 73 22  :link-to "polls"
02a0: 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ..              
02b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 27 69 64               'id
02c0: 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ..              
02d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 62                (b
02e0: 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20  egin..          
02f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0300: 20 20 20 20 28 70 6f 6c 6c 3a 70 6f 6c 6c 20 27      (poll:poll '
0310: 66 69 6c 6c 2d 70 6f 6c 6c 73 29 0d 0a 20 20 20  fill-polls)..   
0320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0330: 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 6c 6c             (poll
0340: 3a 70 6f 6c 6c 20 27 67 65 74 2d 6e 65 78 74 2d  :poll 'get-next-
0350: 70 6f 6c 6c 29 29 29 0d 0a 20 20 20 20 20 20 20  poll)))..       
0360: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0370: 20 20 20 22 47 6f 20 74 6f 20 74 68 65 20 6e 65     "Go to the ne
0380: 78 74 20 70 6f 6c 6c 22 29 20 20 22 5d 22 29 0d  xt poll")  "]").
0390: 0a 0d 0a 49 6e 20 63 6f 6e 74 72 6f 6c 2e 73 63  ...In control.sc
03a0: 6d 3a 0d 0a 0d 0a 28 6c 65 74 20 28 28 70 6f 6c  m:....(let ((pol
03b0: 6c 2d 69 64 20 28 73 3a 67 65 74 2d 70 61 72 61  l-id (s:get-para
03c0: 6d 20 27 69 64 29 29 29 0d 0a 20 3b 3b 20 64 6f  m 'id))).. ;; do
03d0: 20 73 74 75 66 66 20 62 61 73 65 64 20 6f 6e 20   stuff based on 
03e0: 70 6f 6c 6c 2d 69 64 0d 0a 0d 0a 3d 3d 3d 3d 3d  poll-id....=====
03f0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0400: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0410: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0420: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0430: 3d 0d 0a 33 2e 20 43 61 6c 6c 20 61 6e 20 61 63  =..3. Call an ac
0440: 74 69 6f 6e 20 6f 6e 20 61 20 73 70 65 63 69 66  tion on a specif
0450: 69 63 20 70 61 67 65 0d 0a 0d 0a 20 28 73 3a 61  ic page.... (s:a
0460: 20 27 68 72 65 66 20 28 73 3a 6c 69 6e 6b 2d 74   'href (s:link-t
0470: 6f 20 22 70 6f 6c 6c 73 22 20 27 69 64 20 28 70  o "polls" 'id (p
0480: 6f 6c 6c 3a 70 6f 6c 6c 20 27 67 65 74 20 27 69  oll:poll 'get 'i
0490: 64 29 20 0d 0a 09 09 09 20 20 20 20 20 20 20 27  d) .....       '
04a0: 61 63 74 69 6f 6e 20 22 70 6f 6c 6c 2e 65 64 69  action "poll.edi
04b0: 74 22 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20  t")..           
04c0: 20 22 53 75 67 67 65 73 74 20 63 68 61 6e 67 65   "Suggest change
04d0: 73 20 74 6f 20 74 68 69 73 20 70 6f 6c 6c 22 29  s to this poll")
04e0: 0d 0a 0d 0a 20 4e 4f 54 20 54 52 55 45 21 20 54  .... NOT TRUE! T
04f0: 68 69 73 20 63 61 6c 6c 73 20 66 75 63 74 69 6f  his calls fuctio
0500: 6e 20 70 6f 6c 6c 2e 65 64 69 74 20 28 73 68 6f  n poll.edit (sho
0510: 75 6c 64 20 62 65 20 69 6e 20 63 6f 6e 74 72 6f  uld be in contro
0520: 6c 2e 73 63 6d 29 2e 20 50 61 72 61 6d 65 74 65  l.scm). Paramete
0530: 72 20 73 65 74 20 69 73 20 27 69 64 20 74 6f 20  r set is 'id to 
0540: 61 20 70 6f 6c 6c 20 6e 75 6d 2e 0d 0a 0d 0a 3d  a poll num.....=
0550: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0560: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0570: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0580: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0590: 3d 3d 3d 3d 3d 0d 0a 34 2e 20 41 20 63 6f 6d 70  =====..4. A comp
05a0: 6c 65 78 20 6c 69 6e 6b 20 65 78 61 6d 70 6c 65  lex link example
05b0: 0d 0a 0d 0a 28 73 3a 61 20 22 52 65 70 6c 79 22  ....(s:a "Reply"
05c0: 20 27 68 72 65 66 20 28 73 3a 6c 69 6e 6b 2d 74   'href (s:link-t
05d0: 6f 20 28 73 3a 63 75 72 72 65 6e 74 2d 70 61 67  o (s:current-pag
05e0: 65 29 20 0d 0a 09 20 20 20 20 20 20 20 20 20 20  e) ...          
05f0: 20 27 61 63 74 69 6f 6e 20 22 64 69 73 63 75 73   'action "discus
0600: 73 69 6f 6e 2e 72 65 70 6c 79 22 20 3b 3b 20 3c  sion.reply" ;; <
0610: 70 61 67 65 3e 2e 3c 61 63 74 69 6f 6e 3e 0d 0a  page>.<action>..
0620: 09 20 20 20 20 20 20 20 20 20 20 20 27 72 65 70  .           'rep
0630: 6c 79 5f 74 6f 20 28 6e 75 6d 62 65 72 2d 3e 73  ly_to (number->s
0640: 74 72 69 6e 67 20 28 68 61 73 68 2d 74 61 62 6c  tring (hash-tabl
0650: 65 2d 72 65 66 20 72 6f 77 20 27 70 6f 73 74 73  e-ref row 'posts
0660: 2e 69 64 29 29 20 0d 0a 09 20 20 20 20 20 20 20  .id)) ...       
0670: 20 20 20 20 27 69 64 20 28 73 3a 67 65 74 20 22      'id (s:get "
0680: 64 69 73 63 75 73 73 69 6f 6e 2e 70 61 72 65 6e  discussion.paren
0690: 74 5f 6f 62 6a 65 63 74 5f 69 64 22 29 29 20 22  t_object_id")) "
06a0: 72 65 70 6c 79 22 29 0d 0a 0d 0a 3b 3b 20 75 73  reply")....;; us
06b0: 65 20 28 73 3a 67 65 74 2d 70 61 72 61 6d 20 74  e (s:get-param t
06c0: 6f 20 67 65 74 20 74 68 65 20 27 69 64 2c 20 6f  o get the 'id, o
06d0: 72 20 27 72 65 70 6c 79 5f 74 6f 20 76 61 6c 75  r 'reply_to valu
06e0: 65 73 0d 0a 0d 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  es....==========
06f0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0700: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0710: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0720: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0d 0a 35 2e  ============..5.
0730: 20 47 65 74 20 61 6e 64 20 73 65 74 20 61 20 73   Get and set a s
0740: 65 73 73 69 6f 6e 20 76 61 72 0d 0a 0d 0a 28 73  ession var....(s
0750: 3a 73 65 73 73 69 6f 6e 2d 76 61 72 2d 67 65 74  :session-var-get
0760: 20 22 6b 65 79 6e 61 6d 65 22 29 0d 0a 28 73 3a   "keyname")..(s:
0770: 73 65 73 73 69 6f 6e 2d 76 61 72 2d 73 65 74 21  session-var-set!
0780: 20 22 6b 65 79 6e 61 6d 65 22 20 22 76 61 6c 75   "keyname" "valu
0790: 65 22 29 0d 0a 0d 0a 35 2e 31 20 50 61 67 65 20  e")....5.1 Page 
07a0: 6c 6f 63 61 6c 20 76 61 72 73 0d 0a 0d 0a 28 73  local vars....(s
07b0: 3a 73 65 74 21 20 6b 65 79 20 76 61 6c 29 0d 0a  :set! key val)..
07c0: 28 73 3a 67 65 74 20 6b 65 79 29 0d 0a 0d 0a 3d  (s:get key)....=
07d0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
07e0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
07f0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0800: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0810: 3d 3d 3d 3d 3d 0d 0a 36 2e 20 6d 61 6b 65 20 61  =====..6. make a
0820: 20 73 65 6c 65 63 74 69 6f 6e 20 64 72 6f 70 20   selection drop 
0830: 64 6f 77 6e 0d 0a 0d 0a 49 6e 20 76 69 65 77 2e  down....In view.
0840: 73 63 6d 3a 20 0d 0a 0d 0a 28 73 3a 73 65 6c 65  scm: ....(s:sele
0850: 63 74 20 27 28 28 22 57 6f 72 6c 64 22 20 30 29  ct '(("World" 0)
0860: 28 22 43 6f 75 6e 74 72 79 22 20 31 29 28 22 53  ("Country" 1)("S
0870: 74 61 74 65 22 20 32 29 28 22 54 6f 77 6e 2f 43  tate" 2)("Town/C
0880: 69 74 79 22 20 33 29 29 20 27 6e 61 6d 65 20 27  ity" 3)) 'name '
0890: 73 63 6f 70 65 29 0d 0a 0d 0a 49 6e 20 63 6f 6e  scope)....In con
08a0: 74 72 6f 6c 2e 73 63 6d 3a 0d 0a 0d 0a 28 6c 65  trol.scm:....(le
08b0: 74 20 28 28 73 63 6f 70 65 20 28 73 3a 67 65 74  t ((scope (s:get
08c0: 2d 69 6e 70 75 74 20 27 73 63 6f 70 65 29 29 29  -input 'scope)))
08d0: 0d 0a 20 20 2e 2e 2e 2e 0d 0a 0d 0a 3d 3d 3d 3d  ..  ........====
08e0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
08f0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0900: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0910: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0920: 3d 3d 0d 0a 37 2e 20 53 69 6d 70 6c 65 20 65 72  ==..7. Simple er
0930: 72 6f 72 20 72 65 70 6f 72 74 69 6e 67 0d 0a 0d  ror reporting...
0940: 0a 49 6e 20 63 6f 6e 74 72 6f 6c 2e 73 63 6d 3a  .In control.scm:
0950: 0d 0a 28 73 3a 73 65 74 2d 65 72 72 20 22 59 6f  ..(s:set-err "Yo
0960: 75 20 6d 75 73 74 20 70 72 6f 76 69 64 65 20 61  u must provide a
0970: 6e 20 65 6d 61 69 6c 20 61 64 64 72 65 73 73 22  n email address"
0980: 29 0d 0a 0d 0a 49 6e 20 76 69 65 77 2e 73 63 6d  )....In view.scm
0990: 3a 0d 0a 28 73 3a 67 65 74 2d 65 72 72 20 73 3a  :..(s:get-err s:
09a0: 65 72 72 2d 66 6f 6e 74 29 0d 0a 0d 0a 4f 72 3a  err-font)....Or:
09b0: 0d 0a 28 73 3a 67 65 74 2d 65 72 72 20 28 6c 61  ..(s:get-err (la
09c0: 6d 62 64 61 20 28 78 29 28 73 3a 65 72 72 2d 66  mbda (x)(s:err-f
09d0: 6f 6e 74 20 78 20 28 73 3a 62 72 29 29 29 29 0d  ont x (s:br)))).
09e0: 0a 0d 0a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ...=============
09f0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0a00: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0a10: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0a20: 3d 3d 3d 3d 3d 3d 3d 3d 3d 0d 0a 38 2e 20 4d 69  =========..8. Mi
0a30: 73 63 20 75 73 65 66 75 6c 20 73 74 75 66 66 0d  sc useful stuff.
0a40: 0a 0d 0a 20 20 69 2e 20 4c 61 7a 79 2f 73 61 66  ...  i. Lazy/saf
0a50: 65 20 73 74 72 69 6e 67 2d 3e 6e 75 6d 62 65 72  e string->number
0a60: 20 0d 0a 0d 0a 28 73 3a 61 6e 79 2d 3e 6e 75 6d   ....(s:any->num
0a70: 62 65 72 20 76 61 6c 29 0d 0a 0d 0a 20 20 69 69  ber val)....  ii
0a80: 2e 20 52 61 6e 64 6f 6d 20 73 74 72 69 6e 67 0d  . Random string.
0a90: 0a 0d 0a 28 73 65 73 73 69 6f 6e 3a 6d 61 6b 65  ...(session:make
0aa0: 2d 72 61 6e 64 2d 73 74 72 69 6e 67 20 6c 65 6e  -rand-string len
0ab0: 29 0d 0a 0d 0a 20 69 69 69 2e 20 73 74 72 69 6e  ).... iii. strin
0ac0: 67 20 74 6f 20 6e 75 6d 62 65 72 20 66 6f 72 20  g to number for 
0ad0: 70 67 69 6e 74 0d 0a 20 0d 0a 28 73 3a 61 6e 79  pgint.. ..(s:any
0ae0: 2d 3e 70 67 69 6e 74 20 76 61 6c 29 0d 0a 0d 0a  ->pgint val)....
0af0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0b00: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0b10: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0b20: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0b30: 3d 3d 3d 3d 3d 3d 0d 0a 39 2e 20 46 6f 72 6d 73  ======..9. Forms
0b40: 20 61 6e 64 20 69 6e 70 75 74 0d 0a 0d 0a 28 73   and input....(s
0b50: 3a 66 6f 72 6d 20 27 61 63 74 69 6f 6e 20 22 6c  :form 'action "l
0b60: 6f 67 69 6e 2e 6c 6f 67 69 6e 22 20 27 6d 65 74  ogin.login" 'met
0b70: 68 6f 64 20 22 70 6f 73 74 22 0d 0a 20 20 20 28  hod "post"..   (
0b80: 73 3a 69 6e 70 75 74 2d 70 72 65 73 65 72 76 65  s:input-preserve
0b90: 20 27 74 79 70 65 20 22 74 65 78 74 22 20 27 6e   'type "text" 'n
0ba0: 61 6d 65 20 22 65 6d 61 69 6c 2d 61 64 64 72 65  ame "email-addre
0bb0: 73 73 22 20 27 73 69 7a 65 20 22 31 36 22 20 27  ss" 'size "16" '
0bc0: 6d 61 78 6c 65 6e 67 74 68 20 22 33 30 22 29 0d  maxlength "30").
0bd0: 0a 20 20 20 28 73 3a 69 6e 70 75 74 20 27 74 79  .   (s:input 'ty
0be0: 70 65 20 22 73 75 62 6d 69 74 22 20 20 20 27 6e  pe "submit"   'n
0bf0: 61 6d 65 20 22 66 6f 72 6d 2d 6e 61 6d 65 22 20  ame "form-name" 
0c00: 27 76 61 6c 75 65 20 22 6c 6f 67 69 6e 22 29 29  'value "login"))
0c10: 0d 0a 0d 0a 28 73 3a 67 65 74 2d 69 6e 70 75 74  ....(s:get-input
0c20: 20 27 65 6d 61 69 6c 2d 61 64 64 72 65 73 73 29   'email-address)
0c30: 0d 0a 0d 0a 54 6f 20 70 72 65 73 65 72 76 65 20  ....To preserve 
0c40: 74 68 65 20 69 6e 70 75 74 20 73 69 6d 70 6c 79  the input simply
0c50: 20 64 6f 20 61 20 73 65 74 20 6f 66 20 74 68 65   do a set of the
0c60: 20 76 61 6c 75 65 20 6f 6e 20 74 68 65 20 27 6e   value on the 'n
0c70: 61 6d 65 20 66 69 65 6c 64 3a 0d 0a 28 73 3a 73  ame field:..(s:s
0c80: 65 74 21 20 22 65 6d 61 69 6c 2d 61 64 64 72 65  et! "email-addre
0c90: 73 73 22 20 22 6d 61 74 74 40 6b 69 61 74 6f 61  ss" "matt@kiatoa
0ca0: 2e 63 6f 6d 22 29 0d 0a 0d 0a 3d 3d 3d 3d 3d 3d  .com")....======
0cb0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0cc0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0cd0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0ce0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0cf0: 0d 0a 31 30 2e 20 0d 0a 0d 0a 0a 5a 20 61 33 38  ..10. .....Z a38
0d00: 65 30 32 64 36 34 66 37 63 63 66 64 39 64 62 64  e02d64f7ccfd9dbd
0d10: 38 65 61 66 34 39 38 64 66 63 38 65 36 0a        8eaf498dfc8e6.