/[guile]/guile/guile-core/lang/elisp/example.el
ViewVC logotype

Diff of /guile/guile-core/lang/elisp/example.el

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

revision 1.1 by ossau, Fri Nov 2 11:30:34 2001 UTC revision 1.2 by ossau, Tue Jan 22 23:46:01 2002 UTC
# Line 0  Line 1 
1    
2    (defun html-page (title &rest contents)
3      (concat "<HTML>\n"
4              "<HEAD>\n"
5              "<TITLE>" title "</TITLE>\n"
6              "</HEAD>\n"
7              "<BODY>\n"
8              (apply 'concat contents)
9              "</BODY>\n"
10              "</HTML>\n"))

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26