From 52eaf29993a2f56586bc903226e174a35f6ae60a Mon Sep 17 00:00:00 2001
From: Danny Yoo <dyoo@cs.wpi.edu>
Date: Sat, 23 Jul 2011 00:57:58 -0400
Subject: [PATCH] just in case, adding scaling factor to make it easy to shrink

---
 racketcon/bootstrap.gif | Bin 0 -> 7406 bytes
 racketcon/fact.rkt      |   3 ---
 racketcon/hello.xhtml   |   4 ++--
 racketcon/pacman.xhtml  |   4 ++--
 racketcon/rain.xhtml    |   4 ++--
 racketcon/talk.rkt      |  15 ++++++++++-----
 6 files changed, 16 insertions(+), 14 deletions(-)
 create mode 100644 racketcon/bootstrap.gif

diff --git a/racketcon/bootstrap.gif b/racketcon/bootstrap.gif
new file mode 100644
index 0000000000000000000000000000000000000000..fc5fc93b31ced2c54c8aa9e6f4cc64bd333399a7
GIT binary patch
literal 7406
zcmXY#^;?sT!^Q8|?gceq!06Epqd{tPNQ{_-0%J4+PH9CLjf9L81aSx|VN6uS9z$&X
zPDRDQXDBF`vq62_`~2|!1Ls`VIp>FSef$IcoSc)ofG*&5IWU;05tVa1$CQ|7uB1dV
zb@t5z06<9!JvlL9qKq3$)&wEc-@ku3ExYsml<k$J?%usa-!dMnFK=OP))k{pkBT(4
zrR$mc2E=vvYsyNY;SH>lQqn{vqM~<H!=WS%R&LJ9%1TV$WM!~Qw4<U15$m8Y<7FbF
zu5EAYo*tqtheG4NfBz1EP(!5J7Bix>lvFWA8HGZkw@#oTkYT8xBZra0p;L_&GpNJ^
zi5egTA5YcFG9iXCxfm1_kuegMI<!8qFWOcbg3)sFS`Y*c#cO67DY~uS2|!>})=?M)
zU;xn3){f92fFKl^IToHiyv1Az1;gnk#Qu2A%_c-c%MdE93WJe?P*7C%aeqs~r%#{u
zZ&Dvf)U<L=z+g~O*+-*tj&VX%!_yC8v2wLF)fMh4Wu>Jr=I80z#}6i|55#LkZaxyV
z`B<WhVu+ROzBrA+c#VMs4R<veZ3B0zhkH~mkDkjL92hv3sxz3Rxwf_@kw|pbP#^%5
z1Lpt5{$C?q0DzIO%PXs@YijH2cQrINHSccWw6?W(baw6O?%CVhx37Occi_O_(7{88
zhet-ojvPI9K>CDqS(*97nTb<n<Hs-VJ5i=XkjV<AAlGl)yy>Ay&e%anIC1G=%LxJb
z+ARyI7e1neg%=jL5WnIbo6kS`P<?W9#xsQWQY5wX`ZZ1Jht!QIF}eHoU6m?(@+tB=
z<=ksF#_0_NGW);*Um~i36*G18pNlCgF%;wB2C&ghQ+fA#!z#E!%A~EBprDWM#oBJW
zJ4XO_6SYa>L>}w#^`4YJ?z&?@l73)>v==+ZSWm-7SL5T5SOg!&$~)`%2-^>5v&T!m
z`OHyXZN6(jlC;H;xk9Sc*6UZujGwcSv-s<ymELL9>>Be3U3N2pd*anKj-Jb-lc2eZ
z4*DaDhP$iN=~nhD_ty@kO_y|)U43Hv{KwxtZZoO+-g@@fwetP@8jdachh*x~q>oTr
zeQq-6uD5&NjVwWGDZZQ%^Tz`#xq;GzKeETrQneFJosHV%6BZl@RkmmP)zU9LWwzV8
zO$%;DYrlUgO?yhzRiXKhngRgzujkflMYf{DqMh68d5QT&@}K3j%u&XoD0y9Ps<QLx
z2~piE6U2w)Uy=eSK8iK2R|zGNyTSA!ehpTuGGnl~Gl^9fe@Imbupb`{k8?I=kSnzu
z4Fg|DLebf2bo4;{o_(N;^dVpTcKzYSu9x=4D7>pe5*4G=aFq%p-@b;)YiZnA>V0{K
z>rZ0J`uSpaT8p0f7ol{ZKDO!M80AofaM^yeHM<sci=)Q2W$v=y&|D!fgphmR>xb<d
zY~s@Ky47{ssW}w~uPIPb;FXYrl{1P5I}wUEf$<~H`0$Q~vtD4XO^m9Bmwu}NO-hZb
z_94a-YJ<Ie?ma?y&^b^=g_b!C_MW@H!bnf?OfJ)9ebxZ|O<=T)-5;vA;;p{V5qK}2
z(uZExq}JD`pBxkLwfY5fuXlE$!vQ=~O<W~|n`^DWhXv54rxk`d6`DAG7FA-Sv57O&
z^flL{>*9o(Fv0BUlXI147ENAPp?g(X)3E8RSOC~P_#?PuE62)H&5yB$a0b~)Dq!Gy
z;#kbXy@q~0qlCGz&cHv;FQmh(PpB$73=6C7K=~iOKZeNGzN*?CM*+E=O=N%Eb;g2G
zTSdd^R}4iUwn4@9BY+;(Twj>E9nmL)j~ObK{6~4l0RLrUIm>}0tIwdy2d2cXAmKxf
zBy8cd4LB%?A-^fsC9-BgQ(^Y%+h{Dc;$_o2?)1xbrTl43t2(<9GYGG%BJ?z@?KhDQ
zwkP4U3QWB4!G9Rn9*z08_^9$=k(1n9IlovPU&@&V&4zfO<T<NBRH0n-Z~GSG(8gFF
zLY(OtPyF>1!nD-A<GX#-o?0E_tH_cnHMWV*Ib^qBHaJx%2*eiD&W{Ne%hWgPrYd)Q
zV4x)mEo<G}3Tcs5dF``A3BYB`^DI=2NK;sl3!{zMD4Y5??iVt&L&i@=aTWywdO9$L
z<*IH>mG2f;lh~AM>tSz6&@gCF?<wu2K8360!&fbi$+*_T(#0ynGJsB`B&Nz3o9}AL
zv2wQM0XA9`wqE7Y0^)L_x;qCj$o9lps#ih^tSYCtty^755XdHvI`)Ji^sEZSZN)g`
z54kmcRkox%60pbsFxvUabN6W%6_9HZERHix07Q^AiHxED(F2NEkW@A|LYMZ6A>;=H
z^^GKQ)#x%Zj5>#`FL<l&X>5tu&Dn_$8m?AIy<|%}58ZEAM^2MhP&{MxV{=L$10;^7
z0Fe0rXJ|b{lqIu+D_PskqWIQ&>DBzt+}#NGfN8XIwM&y+S0Dv)G^5=LAj;*_I0Kbw
z9JC%qry%#er*zZ^prS#=6=s8=J=qQu)v{F^@Wz#q#$;}X1iw4!gZ-Ea?C9Sb7|5+u
zP!Qe9Yik}bqyR)YA(Cb~fXa>0Auq9^jG3Sfq!`fgvoOs6JtthHWAQ(W``VnZ_0in|
zmDeKxevaGoNn*!F{8-`CbpYO%az6~_-O_5XRxDP(jehAU)E|0>&?)KI#2`ApPlS;r
zRUle?I{gbDWKvZy9dRT7>>JQRL`H_+t{591Ve{}$0pt`Fp1k?J8NR;as{U9g-^9+2
zk2hdsazPm(7wgV2>&wXS{+=X|3tsjQq&MzYEoPwYinIQ5xPm)z_p%3On6fF<r}wkC
zxa%$^7Y%QPXe4;K_{>$vPht-&ofzA*);LPpc`IJ|simxo@v*Hf>d4benMmMo|Bmc6
zXKQ)3IXO$FyNoh9|K<4kOF2o}=XmVTzoL;@nU0)PmI_R!4(Z=9s7Ibd>Zdvi%C3Bp
zxRy{WP{N<!OHHe7XN70f5BlaI<WY-zDaNv^qRxl(LFu>Z7tOA4<rMnGSOx>uxI#sH
zh___+QbJg2;{ewdc<={T1tm{iSg#;Ri+LNd?`1Sbpj1_LSX^nULB6JT2|!ANt+ZKO
z{tj+6=fHVDwjw}oJJ62AJb#J3Hd*LO_LR!tUwtIQ7hKH|;01hT1Nv2q)}E>7UYlmU
z-ZzF@EPt-c2=FjqIG&H3``CNF2vXIj!coIh{~`>GX@&?BLZ<e1s6Y8fiHzPDdn;M1
z_^6KhY1q$i968D5plGVqczZ@uU<O+8NC{wH%$CvOW@>0S`rWPUz*b9G6<xSDvY)rz
zMlLkPU;_kl0W!n0e@itUb5m*f6P}w|j0N%0^lf1ouWnc7z%H&Lj0(YPn4@TNymaZs
zz=2@Gt%sFmo0of=!=<{fTsa%Sxd#}g-9}s)pm{ZD?YE<enJ`jkJVccW319;s{d3<2
zPSy~OK>@*(Z6-}dRJ%3mQZ(7GQ4DEMf|qgxp?2>^K7=Mfs<#<d=V?<2_9PD^20x;Z
z)sPx3)UJY`H}BsdtNKuzFQ~RFK4mP(8rREWk`6&QEI)0Jn@0TEX9DN?QXs6D|L>z5
z*pM+L9nl!9#jjE|XAHrbgc4kkxJnUcq*v(NjYm;xB<;@zdc~cc7(%RUw!_O|CX<^-
z+}2XsHw95C+W5YU1U(_y3E>JrEe?o_@=Q;(J*(coiQcMm2@^X#MYN&9vP7Agio#G5
zmIujH-v=$Ze3iFk7ZuV!pplTejE-KF+Yk%4Jd8jMaZKQt-)d3I2=PKqg7CBm<2dR0
zPeFRcx#vKVTtGR*&aHwqM9BV2Q((5ZI@omfMmeekilbG5-4`BwjE-;@QaJ-85(|{#
zY(?ceSVlR>E_+#Cf%B-4BgMAH7KolPYi?Dpn!p4`d)974z7%f!E{5gEpc4(PK+b=|
zfK|ym>?3WhsHxF3G@S-35G2+%uk4qu#^V9xHwOK~+g1U{S~v+#{v^pLpp;oiFblHe
zv(0@9$9zBxJ5Z&#*#9+2myypL4``vJ&7VT0o`$`PZSB6Im|T>cu#{YF>zo|AyjXSd
z5%lCurFA<P!Utb?Wo>JNG{o>WLe0R#cvU*2DrUsn0;UvamPkjJ9J<QRZvo;Blq?zd
z8E0PGXZXXi%7wZ4=x8=7fB;7>ZPaF<OAkY)RO=6qi%{e(ZPvypF&s|?U1{}U%IU#~
z155_(xM&ia*;eDu98YNC88exnE(KvQYa5EwFAUYwd>h;-Xlo9VDMqgr`ML_x2m`K(
zme{uCVQ#!8B@0Qfl0gd^WXWkf??;zqz<cPajtoGJ1jrLmp}IDHGv2GlP|quym}Pq_
zA&e11yH?i^)i-C-kVv}2^BFgNaUM<#@%4eW|8y{_TZG%FJUt^C22XMMJRGFWs6nsU
zN3!S#Ug^jK%=8(ov{0A%(!z^H{DyU~V#AJHl>TF80IONf8S_Z5b+ywMp>1DWEO+3U
z+456QLWcS*7sHaa@{R@rGPtLv;+!JD(#vRK?mT|g*pH#FC6>FG!LjFpE`*LPvmCh_
z%>k;(<)_hE(Xb;2jAp>4b7mZC*qx(AAK4r;5|qOYXPvE=qez_72wJubZ-kK6vPZ#!
zT-l06Tk!o{pTLensHJOr0B@@v$7w#JUX}%z+uJ(O;;NL2I2Fz-_t374?z&xVIPc~@
zLydbI@{^wcyG58~Tjw$_4+~ybe3b|8Mo*&c-b^Z(m%n%ZA&toe3x(yzhrx7?XX}8n
z3ll0R>7~r{B~I68GSgDfDNLxZS%mSU$yS|mMYt&0tL;`S`u8XHgWZTgf8Q$IK{*)?
z?F5`Afwg7FZ;{Xj(f+y-z>wPCw~Cq?V6?9G?xuN)&#L)7X2hE~FIIcFk%5$HZeSpk
zU$~FXz+kvw5zu{NB^40?uB^_N&i%8i5=eoHM)*z5;RDP{L?uflnY2EW8GC82+mRg@
zKmm?N4xaiN9mJ}&BEU`zI0@Z5cF50=kC|8*+OWtSxY2d92#nB!VkuqJr&!Xc3rkp&
zc>r{Y=`ZA>qC^FU0uD$5!8eC(?eoxP^{f|=nLGpWB_rVhg9#1cXJeg6CDz6i<&=U$
z9%@5A0_4kCpg^rTj2lr%fOB6Dxe_AxZa|xovlre}s&YXSp^MvI6vBf3*D<`o&cE?#
zkIJi%rldm|K_l5&8x<4|Hq5o(+ynTt4+pLQy{g$ihe6AF*eDwQWVCKU9$Zfaf`!rJ
z_(-WIJwKfS&YF%O9Lb?3-XWC8-19Wt8`uo7tTE)w(9upy7&hQVY>f&1P-LwPU~mV<
z47rWFo+3Lrz{=I({wE>T#F6t)`-6e~RIy7Ofc`ep+ol(O!nEI&j6rCSJ{4p?EblW0
zKYRnixFCwcK3^U5q@iuY_0Fa^^!#?7yV|iS6J&{oN~6Hl+hsArb(gxq53|QZpL*%>
z&^Q2@dw|A>8Kh!(6E0hgZ<xjhccvVP>1i_{98P@DZq+;Xc16#xK-z-Av;{E#>mJ(n
z9m*L&ITC6<nL6vyeDjHWFE3~KeJh|d;B+=*LG3lUMbl$UG{wP(qK=&n@^}~9<wAzB
z2PA&~&WyXR(GXgv{b=ZM{F%|~X`~F4xr;5G1K5dl=boNviu7_6!tt^2&N?WYt)FSv
z)e+e4fJ0x%8}Z|HCqC|W;c}yXZ&Z8e-|!VIV4c>kE=2f#wqKz_UbMn?K+5#o3GZMG
z1zr2Kaoyfc<85}xkCx<EJCp$|CCWIrhVmoC+cXRp_P_`M^S?zdjsWN6r+YAxqdDNw
zSRVxjU`RW0;CJ)dN~0-Fwg?zer?3!8dlSReooJfyXv_7UzGx0-$Jpf~=`}bZMlZ@M
zA}yINa&;2}jvRnOscw$#eBC=ffFJ1V2A6mnGUd?^RU+#7R!px$+xZgo$_W6&IH$4-
z{Cntp%nG;mDZLyG`-y=<7R7)8>4_jmvMns^R$jV5I@s`R`_K}9P@U6`u5D^$u}~D{
z+#pns+9Xqaaq0Z#dmV5P_fnL7g#j6+@J`IN?_JGH4<ekq`-~Q%QE0{C&}abe{zVt|
zNZ_6g*diuedo1bZE(hTjs!L|@^W*Ui;dqhlr&Ta>)Bdp1Yk%J!%q)fPt515cdc0_p
z$tIpH>>LZu<b|rVm4RIk-kr3doGuKUVz6&KUvm0aF=Q)0rMKzYPW2E&;pL?f!Mq(3
zFb=i_u7Au?V79GKa=q%BneD<w89$4^w@AY=&<3h4_huz%2Zqn(=QloOp)s_XrL*NO
zzl^qv5pv;9zk^K(Z-a$O)GAvL|DbIO97{=e(PIII05bpnPVDRzyFsYWd`ADum6*+(
zcTXWdvUltebk!z)D`S^00bN1>vuS4M9-j20gzgV=nea~1CtRD46i8w*hE%ki5T;Yn
z!$bEI)Y6qQoCJ8idsnk8$VlKB-TGS3-$5Qy3>18;eZ!Cbw%$%lDrCgD@@e%Lo&%Tu
z1l0IvBHnXX{}hCY5?K6mZMa$vA7JuB&JscAksg@~^*Dlt0nH`W8H%Sun|$wD*ZLL!
zc2OK)q35W{jZ<%bU6Jr=9z^e)wtckYz9b}tsw~gblM=&P?;3l9U>EYB@h-Op?*~S>
z^hnJsch%GHH9q(mE320A-<Ocv{S%wA7&G17|DAKJ>1kUq!3j^fG5+ep=|R8%7~8wE
zJ8suq?e!-GlgG!00zBNXA5AuToNDnE$}o9tef7d9+7sJRp<)-z6b>0`U>w~p%8BLN
zPT#Y1?aE@T2X>96(4TL#ct)c^%GvYvYha-H)XQBr40zXXth7tG6=^q7RY`p0jfo#4
z?e12@g$J`ndwrd5W=sDgjPlyZy4oKctj3*=t(SB79W<YA+!25)BO~>`hnjV|YR4ZI
zJ=#Ly&dc6)Lf@H4Sm$rRdq^*o0RQ`A6kAGsSMvN5&xoLdswj2$m6>!M*|U37ui4*&
z&LZf%OW1`?3rW{9&3M44<eOEkPunOFRiC}{_SkV%=dd4SWXcx*R^196y*9Bi)Lpft
z+-A7vKBSw5lV)Rz<R?6-1tdNw#e<#yEV@dgYvbmbmSejkt>11xU*f)$k~+zR{?|qI
zvwtyI`)tW+zO67EI{x5UMeZJbF8HdjqVo5$JR^i(akKFuxT|`3JAiTAbgncz^*Zkk
zyl>^qTJ)CK<)R70S^fQ0TN!(S_^cO$vHaqV{}wp0tShGPbX&f&F+`@_0acn3IMOm(
zl)tVYYac5|<AWCihnS_3+1T^BDtUc*!1B%9J$hth%=uyt?!^totAYo(-R}R3Pz1No
zCR+E|%6Z$;pN4)6_-E;3^jyw`139o1Am5h%s^|nf<gQlCj`HDnp8RqXBP{=WrZPl`
z@^<=f<e`q_!IZzB9`EcMPIt0qVCE_L5hoWK|KegkCL{wriIvi~v*4e_B^%o7ZQDnS
z?xF9YzU<itUpu=?WfkSY|9G^u$D97aZlvk5`%8JUPxvJ$;-^w954w1zaESwK`Tcq6
zg%_TTap8P?U<Rsj-b~ML^920n6!2vL9Hs{^<GOUoXp#sdk<s$e>v{uI*R@};@r5ip
z-bZMJ6a=(zS0#=6&o;e3@}+&`+it?A2OZTz+roBxdixoPFK4{RiFdbOc=`82-@dX6
z1<q>n_0#$Wj|RkHSu>-&R)ZgvYgXc1n@-r0xIB@J*5?5Z!ty$gakN8>Efu*OX}noZ
zDU{=GY^9~G=#&^8dbya+1Zpg2*GzUe5UG&ei}f{k9}b!uYKW~8hMbu%D-H?2?5?q?
zJb=lv`+RBE&om3=$be)Sr%t=o^ap#LHGZse^7k`2tQD;4A?1UZ1?qzG@+yc=osx9<
z{{!1SSj47IgVYHA2W$_?+nQK-sKPK*=_KcfSQzMA?sRp<1M2|6^pzRGR1O}0iRdiB
z)p-=cR?x#ok9cw}wMbk8SfZQ6@v)$k^{u>pE1k87_`2H;e>=2YH&6p{P~eTjPBwEw
zV5Axsf9WY{<J{|M8!c^Pr{y+kaHF#0``P+}qp#Se4soonhPq*ZJX-oa8JeNi7f_ND
zn6!llI#Al{hhs*9Yc<Nhqp;g`up&hlhwL2d1&BYLaIyc_ea|Uh*#-(*jl%S<VP|T(
zJ#rH2wt=#-0Sjj7h0V9mSgQsX*XiD@-S^!g`??pOe@WVnAzx#Ew0565Q@XI#yV7U3
zQ*+(**1Q9#CW|teKTaI}?rIapbev*`r}q<YU%yVl;U!Hdh?RW!>w^kQ31MGxSj~?1
z1NHyF{l~G#3<KB=D2&~oIVftEydG`%&*WBq?LH&ZsM*!GVc$--;F?Hr3^u#PcVYaL
z!!uyw{m;EIe6D(R)W=A9AJoc+JvS;aVJKuncw|&~70NV)>?tGtl0EHFUGsY0zS1@6
zKg1S8m~s87e?s8$VakYEdb-D#P53dNeiPC4X}zNPYqh`|G8NHg?W%kOW_K(8SfwlB
zXh|sfMWxmasFdLdwlw*i<IDC=9!)n(YiO8hGMX*&29>!igx32+%r1;x%}Dc~8DX)(
zC=D-^^7qbhPn7a=L4P~V%j94P(ihIg%5Mq`E3>_@P=!HPOSVpFqWI!zSYzLlL9!e6
zn@0Om>cHbH>hpoN*bGsRQAe56lo3%G#qQ-EULI(`^6mmCJVG@cDe_e<<jbalGoJYH
z4kF);^v%8>+)=;IbfkFhR268<9mb5E^`-bFPP|yBW=>Dxurqbn3J~QtXf<{My3g~j
z&T)%(#|)&|j7Veju-Avs?LPPR$h7V)NtSu>f?FN1IHg!iuzijW4eM`vpn$r0Ny-4;
zk&VXFintjcFaB6wSdk0EPQ1D<uV%nO{5Eww!J~#~`vs%9oa!yLlqXZ`72f>8zywl~
zV##HJj^LEW@vi%_YQh*;mhLq9tzvH9`@A%SDwzWDCJa8pHEUo`X<GQ|;?}L(bI0ps
zj#fm1!f5xEt*CI}_It7q=2=w;Q)B@jSIIQ+mM<FO)VS*2rrPQKisk0su{gc)$1CD*
z^i7>$uE_J5#uoAnT03Ii@u8U_p%z2s8AG>Y8p!DK)EoRol#_?03!GrL8D+dEztvxP
zZJ;bwk2J*3kk{z*yrSw$U_*G7>Tm$rLM)p!DY?znE?;EqJ@WqfwA7SbcI6jyB8tfH
zTTmYx#x&aUlWOI>7-SzpIKNf<h<b2hkXAL5;n~#6k3wG{ocOqMTTX`4xB4dnB~?t#
zSW8xt=yLZ|+k46V8q^x7qyfZyi6z^;m#>D;;9onz*WBOTx9IbxLT2CH9N)n@ts^QG
zWc>xmdR?=0=_9bdQ(V{0)x-}_&Q_kd4FwVeV?vDg_Z<HAnno`%W47&m(kQ$eKA^lX
zQ|UH~C>+xhoctpIA%+fGi%>}nRvA;Byw}WYP*N{tSLjzS$ogj7vB)y4GTp$h+bEqv
zcnm<Mt2Njp^X^10+m-knlu8Ql1lu^(=CpCZgvUqIsDSM9J*&f>i?fD2j53GDiA!N?
zlWCx}`TYXlS^RRE^DUad#+H&n#fI(*in3vYo9Dbw4kKtEK}7a-pV!t(D=OA(07NaO
zS{;tvl~@aa>t%-dr5QIuMpXx3@*Io`HVMhvYpZzq8!Y9;L$GAvzeyi<{V5K`9+{F_
lG=Jm#^Tz+metq2!$P804LBdM4Z(MB1u$RisT~q*Y`9Hj9(lY=6

literal 0
HcmV?d00001

diff --git a/racketcon/fact.rkt b/racketcon/fact.rkt
index daa6c20..fe8ef50 100644
--- a/racketcon/fact.rkt
+++ b/racketcon/fact.rkt
@@ -6,6 +6,3 @@
     1]
    [else
     (* x (fact (sub1 x)))]))
-
-
-;;(printf "test: ~s\n" (fact 4))
\ No newline at end of file
diff --git a/racketcon/hello.xhtml b/racketcon/hello.xhtml
index a1146bc..2f8027b 100644
--- a/racketcon/hello.xhtml
+++ b/racketcon/hello.xhtml
@@ -2,7 +2,7 @@
 <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en">
   <head>
     <meta charset="utf-8"/>
-    <title>Example</title>
+    <title>Hello</title>
   </head>
   <script>
 <![CDATA[(function(window, undefined) {
@@ -41924,4 +41924,4 @@ var invokeMainModule = function() {
 ]]>
   </script>
   <body></body>
-</html>
\ No newline at end of file
+</html>
diff --git a/racketcon/pacman.xhtml b/racketcon/pacman.xhtml
index 041870c..4310bb9 100644
--- a/racketcon/pacman.xhtml
+++ b/racketcon/pacman.xhtml
@@ -2,7 +2,7 @@
 <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en">
   <head>
     <meta charset="utf-8"/>
-    <title>Example</title>
+    <title>Pacman</title>
   </head>
   <script>
 <![CDATA[(function(window, undefined) {
@@ -56733,4 +56733,4 @@ var invokeMainModule = function() {
 ]]>
   </script>
   <body></body>
-</html>
\ No newline at end of file
+</html>
diff --git a/racketcon/rain.xhtml b/racketcon/rain.xhtml
index 3bff218..bb0a36d 100644
--- a/racketcon/rain.xhtml
+++ b/racketcon/rain.xhtml
@@ -2,7 +2,7 @@
 <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en">
   <head>
     <meta charset="utf-8"/>
-    <title>Example</title>
+    <title>Rain</title>
   </head>
   <script>
 <![CDATA[(function(window, undefined) {
@@ -43030,4 +43030,4 @@ var invokeMainModule = function() {
 ]]>
   </script>
   <body></body>
-</html>
\ No newline at end of file
+</html>
diff --git a/racketcon/talk.rkt b/racketcon/talk.rkt
index d685e7a..020470a 100644
--- a/racketcon/talk.rkt
+++ b/racketcon/talk.rkt
@@ -3,6 +3,8 @@
 (require (planet dyoo/whalesong/js))
 (require (planet dyoo/whalesong/world))
 
+(define scaling-factor .75)
+
 ;; A slide is either a simple string or an image.
 
 (define font-size 50)
@@ -19,14 +21,16 @@
          (scale 2 (image-url "file:///home/dyoo/work/whalesong/racketcon/plt-logo.png"))
          (square 20 "solid" "white")
          (text "Danny Yoo (dyoo@hashcollision.org)" 50 "darkblue"))
-        "Why Whalesong?"
+        (above (text "Why Whalesong?" font-size "black")
+               (square 20 "solid" "white")
+               (scale 2 (image-url "file:///home/dyoo/work/whalesong/racketcon/bootstrap.gif")))
         "World programs on the web"
         (above (text "Reusing Racket's compiler..." font-size "black")
                (square 20 "solid" "white")
                (text "Hello world?" (floor (* font-size 2/3)) "black"))
-        "Web programs can use Racket"
-        "What's missing?"
-        "http://hashcollision.org/whalesong"))
+        "Web programs can use Racket too!"
+        "What's next?"
+        (text "http://hashcollision.org/whalesong" 80 "black")))
 
 
 
@@ -51,6 +55,7 @@
 
 
 (define (draw w)
+  (scale scaling-factor
   (let ([a-slide (list-ref slides w)]
         [bg (BACKGROUND)])
     (cond
@@ -64,7 +69,7 @@
       (place-image a-slide
                    (quotient (image-width bg) 2)
                    (quotient (image-height bg) 2)
-                   bg)])))
+                   bg)]))))
 
 (define (tick w)
   w)