/[svn]/web/site.cd
ViewVC logotype

Diff of /web/site.cd

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 614 by abate, Tue Jul 10 17:48:08 2007 UTC revision 616 by abate, Tue Jul 10 17:48:15 2007 UTC
# Line 132  Line 132 
132    <li>[ <a href=(h . url)>(h . title); ch ]    <li>[ <a href=(h . url)>(h . title); ch ]
133    
134  let link_to (Page -> Xa)  let link_to (Page -> Xa)
135   <page name=n new=_>[<title>t ; _ ] -> <a href=(url_of_name n)>[!t <img src="img/new.gif" alt="(new)" style="border:0">[]]   <page name=n new=_>[<title>t ; _ ] ->
136                   <a href=(url_of_name n)>[!t
137                          <img src="img/new.gif" alt="(new)" style="border:0">[]]
138  | <page name=n>[<title>t ; _ ] -> <a href=(url_of_name n)>t  | <page name=n>[<title>t ; _ ] -> <a href=(url_of_name n)>t
139    
140  let box (x : Flow) : Block =  let box (x : Flow) : Block =

Legend:
Removed from v.614  
changed lines
  Added in v.616

CVS Admin">CVS Admin
ViewVC Help
Powered by ViewVC 1.1.5