bknr-cvs

bknr-cvs@common-lisp.net

1964 discussions

[bknr-cvs] dverna changed trunk/projects/lisp-ecoop/website/templates/
by BKNR Commits 23 Feb '09

23 Feb '09

Revision: 4315 Author: dverna URL: http://bknr.net/trac/changeset/4315 Misc fixes in homepage and headers U trunk/projects/lisp-ecoop/website/templates/home.xml U trunk/projects/lisp-ecoop/website/templates/lisp-ecoop.xsl Modified: trunk/projects/lisp-ecoop/website/templates/home.xml =================================================================== --- trunk/projects/lisp-ecoop/website/templates/home.xml 2009-02-23 16:49:20 UTC (rev 4314) +++ trunk/projects/lisp-ecoop/website/templates/home.xml 2009-02-23 16:53:08 UTC (rev 4315) @@ -3,7 +3,7 @@ <lisp-ecoop:page name="home" xmlns:lisp-ecoop="http://elw.bknr.net/"> -<h1>5th European Lisp Workshop</h1> +<h1>6th European Lisp Workshop</h1> <p>July 06 - Genova, Italy - co-located with ECOOP 2009</p> @@ -37,6 +37,9 @@ This year, and for the first time, the workshop proceedings will be published in the ACM Digital Library. </li> + <li> + Also, the workshop will feature interactive tutorial/demo/coding sessions. + </li>  <!-- <li> Modified: trunk/projects/lisp-ecoop/website/templates/lisp-ecoop.xsl =================================================================== --- trunk/projects/lisp-ecoop/website/templates/lisp-ecoop.xsl 2009-02-23 16:49:20 UTC (rev 4314) +++ trunk/projects/lisp-ecoop/website/templates/lisp-ecoop.xsl 2009-02-23 16:53:08 UTC (rev 4315) @@ -14,15 +14,15 @@ <html xmlns="http://www.w3.org/1999/xhtml"> <head> - <title>European Lisp Workshop 2008 - $(title)</title> + <title>European Lisp Workshop 2009 - $(title)</title> <link rel="stylesheet" type="text/css" href="../static/styles.css" /> <script src="../static/javascript.js" language="javascript" type="text/javascript"> </script> </head> <body> <div id="banner"> - <div id="title">5th European Lisp Workshop</div> - <div id="subtitle">Co-located with <a href="http://2008.ecoop.org/" - target="_new">ECOOP 2008</a><br />July 07 - Paphos, Cyprus</div> + <div id="title">6th European Lisp Workshop</div> + <div id="subtitle">Co-located with <a href="http://2009.ecoop.org/" + target="_new">ECOOP 2009</a><br />July 06 - Genova, Italy</div> <div id="logo"> <a href="http://bknr.net/" target="_new"> <img width="57" height="20" alt="BKNR Logo" src="/static/bknr-logo.png" border="0" />

1 0

[bknr-cvs] dverna changed trunk/projects/lisp-ecoop/website/templates/contact.xml
by BKNR Commits 23 Feb '09

23 Feb '09

Revision: 4314 Author: dverna URL: http://bknr.net/trac/changeset/4314 Link to Charlotte's website U trunk/projects/lisp-ecoop/website/templates/contact.xml Modified: trunk/projects/lisp-ecoop/website/templates/contact.xml =================================================================== --- trunk/projects/lisp-ecoop/website/templates/contact.xml 2009-02-23 16:47:25 UTC (rev 4313) +++ trunk/projects/lisp-ecoop/website/templates/contact.xml 2009-02-23 16:49:20 UTC (rev 4314) @@ -13,7 +13,8 @@ EPITA Research and Development Laboratory, Paris, France (contact organizer) </li> <li> - Charlotte Herzeel, Programming Technology Lab, Vrije Universiteit, Brussel, + <a href="http://prog.vub.ac.be/~cherzeel/">Charlotte Herzeel</a>, + Programming Technology Lab, Vrije Universiteit, Brussel, Belgium </li> <li>

1 0

[bknr-cvs] dverna changed trunk/projects/lisp-ecoop/website/templates/c
by BKNR Commits 23 Feb '09

23 Feb '09

Revision: 4313 Author: dverna URL: http://bknr.net/trac/changeset/4313 Add Robert Strandh to the team U trunk/projects/lisp-ecoop/website/templates/cfp.xml U trunk/projects/lisp-ecoop/website/templates/contact.xml Modified: trunk/projects/lisp-ecoop/website/templates/cfp.xml =================================================================== --- trunk/projects/lisp-ecoop/website/templates/cfp.xml 2009-02-23 14:37:04 UTC (rev 4312) +++ trunk/projects/lisp-ecoop/website/templates/cfp.xml 2009-02-23 16:47:25 UTC (rev 4313) @@ -116,6 +116,7 @@ Didier Verna, EPITA Research and Development Laboratory, Paris Charlotte Herzeel, Programming Technology Lab, Vrije Universiteit, Brussel +Robert Strandh, LaBRI, University of Bordeaux I, France Christophe Rhodes, Goldsmiths College, University of London Hans Hübner, Software Developer, Berlin </pre> Modified: trunk/projects/lisp-ecoop/website/templates/contact.xml =================================================================== --- trunk/projects/lisp-ecoop/website/templates/contact.xml 2009-02-23 14:37:04 UTC (rev 4312) +++ trunk/projects/lisp-ecoop/website/templates/contact.xml 2009-02-23 16:47:25 UTC (rev 4313) @@ -8,25 +8,22 @@ <p>The organizing comitee consists of the following people:</p> <ul> - <li> -Didier Verna, -<a href="http://www.lrde.epita.fr/~didier"> -http://www.lrde.epita.fr/~didier -</a>, -EPITA Research and Development Laboratory, Paris, France (contact organizer) + <a href="http://www.lrde.epita.fr/~didier">Didier Verna</a>, + EPITA Research and Development Laboratory, Paris, France (contact organizer) </li> <li> -Charlotte Herzeel, Programming Technology Lab, Vrije Universiteit, Brussel, -Belgium + Charlotte Herzeel, Programming Technology Lab, Vrije Universiteit, Brussel, + Belgium </li> <li> -Christophe Rhodes, -<a href="http://www.doc.gold.ac.uk/~mas01cr/"> -http://www.doc.gold.ac.uk/~mas01cr/ -</a>, -Goldsmiths College, University of London, United Kingdom + <a href="http://dept-info.labri.u-bordeaux.fr/~strandh/">Robert Strandh</a>, + LaBRI, University of Bordeaux I, France </li> +<li> + <a href="http://www.doc.gold.ac.uk/~mas01cr/">Christophe Rhodes</a>, + Goldsmiths College, University of London, United Kingdom +</li> <li>Hans Hübner, Software Developer, Berlin, Germany</li> </ul>

1 0

[bknr-cvs] dverna changed trunk/projects/lisp-ecoop/website/templates/cfp.xml
by BKNR Commits 23 Feb '09

23 Feb '09

Revision: 4312 Author: dverna URL: http://bknr.net/trac/changeset/4312 cfp update U trunk/projects/lisp-ecoop/website/templates/cfp.xml Modified: trunk/projects/lisp-ecoop/website/templates/cfp.xml =================================================================== --- trunk/projects/lisp-ecoop/website/templates/cfp.xml 2009-02-23 13:56:35 UTC (rev 4311) +++ trunk/projects/lisp-ecoop/website/templates/cfp.xml 2009-02-23 14:37:04 UTC (rev 4312) @@ -24,7 +24,8 @@ 2009 Special News ================= This year, and for the first time, the workshop proceedings will be -published in the ACM Digital Library. +published in the ACM Digital Library. Also, the workshop will feature +interactive tutorial/demo/coding sessions (see below). Overview

1 0

[bknr-cvs] hans changed trunk/thirdparty/cl-gd
by BKNR Commits 23 Feb '09

23 Feb '09

Revision: 4311 Author: hans URL: http://bknr.net/trac/changeset/4311 rename cl-gd-0.5.6 to not have version number in its path. A trunk/thirdparty/cl-gd/ D trunk/thirdparty/cl-gd-0.5.6/ Copied: trunk/thirdparty/cl-gd (from rev 4310, trunk/thirdparty/cl-gd-0.5.6)

1 0

[bknr-cvs] hans changed trunk/bknr/datastore/src/data/package.lisp
by BKNR Commits 23 Feb '09

23 Feb '09

Revision: 4310 Author: hans URL: http://bknr.net/trac/changeset/4310 Remove unused exported symbols. U trunk/bknr/datastore/src/data/package.lisp Modified: trunk/bknr/datastore/src/data/package.lisp =================================================================== --- trunk/bknr/datastore/src/data/package.lisp 2009-02-23 13:05:18 UTC (rev 4309) +++ trunk/bknr/datastore/src/data/package.lisp 2009-02-23 13:27:54 UTC (rev 4310) @@ -22,10 +22,6 @@ #:sleep |# - ;; session - #:session - #:session-status - ;; store #:store #:mp-store

1 0

[bknr-cvs] dverna changed trunk/projects/lisp-ecoop/website/templates/
by BKNR Commits 23 Feb '09

23 Feb '09

Revision: 4309 Author: dverna URL: http://bknr.net/trac/changeset/4309 First shot at 2009 U trunk/projects/lisp-ecoop/website/templates/cfp.xml U trunk/projects/lisp-ecoop/website/templates/contact.xml U trunk/projects/lisp-ecoop/website/templates/home.xml U trunk/projects/lisp-ecoop/website/templates/news.xml U trunk/projects/lisp-ecoop/website/templates/programme.xml U trunk/projects/lisp-ecoop/website/templates/submissions.xml Modified: trunk/projects/lisp-ecoop/website/templates/cfp.xml =================================================================== --- trunk/projects/lisp-ecoop/website/templates/cfp.xml 2009-02-23 11:26:45 UTC (rev 4308) +++ trunk/projects/lisp-ecoop/website/templates/cfp.xml 2009-02-23 13:05:18 UTC (rev 4309) @@ -4,34 +4,31 @@ <pre style="font-family: Fixed, Lucidatypewriter, monospace"> +------------------------------------------------------------+ | CALL FOR PAPERS | - | 5th European Lisp Workshop | - | July 7, Paphos, Cyprus - co-located with ECOOP 2008 | + | 6th European Lisp Workshop | + | July 6, Genova, Italy - co-located with ECOOP 2009 | +------------------------------------------------------------+ -Important Dates: -**************** -Submission deadline (papers and breakout groups): May 18, 2008 -Notification of acceptance: May 26, 2008 -ECOOP early registration deadline: June 01, 2008 -5th European Lisp Workshop: July 07, 2008 +Important Dates +=============== +Submission deadline: April 08, 2009 +Notification of acceptance: May 08, 2009 +ECOOP early registration deadline: May 20, 2009 +5th European Lisp Workshop: July 06, 2009 -For more information visit http://elw.bknr.net/2008/ +Please note that registration must be done with ECOOP itself. +For more information visit http://elw.bknr.net/2009/ Contact: Didier Verna, didier(a)lrde.epita.fr -Organizers -********** +2009 Special News +================= +This year, and for the first time, the workshop proceedings will be +published in the ACM Digital Library. -Didier Verna, EPITA Research and Development Laboratory, Paris -Christophe Rhodes, Goldsmiths College, University of London -Charlotte Herzeel, Programming Technology Lab, Vrije Universiteit, Brussel -Hans H¸bner, Software Developer, Berlin - Overview -******** - +======== "...Please don't assume Lisp is only useful for Animation and Graphics, AI, Bioinformatics, B2B and E-Commerce, Data Mining, EDA/Semiconductor applications, Expert Systems, Finance, Intelligent @@ -41,90 +38,63 @@ happened to list." -- Kent Pitman -Lisp is one of the oldest computer languages still in use today. In -the decades of its existence, Lisp has been a fruitful basis for -language design experiments as well as the preferred implementation -language for applications in diverse fields. +Lisp, one of the eldest computer languages still in use today, is +gaining momentum again. The structure of Lisp makes it easy to extend +the language or even to implement entirely new dialects without +starting from scratch, making it the ideal candidate for writing +Domain Specific Languages. Common Lisp, with the Common Lisp Object +System (CLOS), was the first object-oriented programming language to +receive an ANSI standard and retains the most complete and advanced +object system of any programming language, while influencing many +other object-oriented programming languages that followed. -The structure of Lisp makes it easy to extend the language or even to -implement entirely new dialects without starting from scratch. Common -Lisp, with the Common Lisp Object System (CLOS), was the first -object-oriented programming language to receive an ANSI standard and -retains the most complete and advanced object system of any -programming language, while influencing many other object-oriented -programming languages that followed. - -It is clear that Lisp is gaining momentum: there is a steadily growing -interest in Lisp itself, with numerous user groups in existence -worldwide, and in Lisp's metaprogramming notions which are being -transferred to other languages, as for example in Aspect-Oriented -Programming, support for Domain-Specific Languages, and so on. - This workshop will address the near-future role of Lisp-based -languages in research, industry and education. We solicit papers and -suggestions for breakout groups that discuss the opportunities Lisp -provides to capture and enhance the possibilities in software -engineering. We want to promote lively discussion between researchers -proposing new approaches and practitioners reporting on their -experience with the strengths and limitations of current Lisp -technologies. +languages in research, industry and education. We solicit +contributions that discuss the opportunities Lisp provides to capture +and enhance the possibilities in software engineering. We want to +promote lively discussion between researchers proposing new approaches +and practitioners reporting on their experience with the strengths and +limitations of current Lisp technologies. -The workshop will have two components: there will be -formally-presented talks, and breakout groups discussing or working on -particular topics. Additionally, there will be opportunities for -short, informal talks and demonstrations on experience reports, -underappreciated results, software under development, or other topics -of interest. +The workshop will have two components: there will be formal talks, and +interactive turorial/demo/coding sessions. Papers -****** - +====== Formal presentations in the workshop should take between 20 minutes and half an hour; additional time will be given for questions and -answers. We encourage that papers be published on the website, to -provide all participants with background information in advance. +answers. Suggested topics include (but are not limited to): -Suggested Topics: -- New language features or abstractions -- Experience reports or case studies -- Protocol Metaprogramming and Libraries +- Experience reports / Case studies - Educational approaches - Software Evolution - Development Aids - Persistent Systems - Dynamic Optimization - Implementation techniques -- Innovative Applications -- Hardware Support for Lisp systems +- Hardware Support +- Efficiency / Distribution / Parallel programming - Macro-, reflective-, meta- and/or rule-based development approaches -- Aspect-Oriented, Domain-Oriented and Generative Programming +- Protocol Metaprogramming and Libraries +- Context-Oriented, Domain-Oriented and Generative Programming -Breakout Groups -*************** +Interactive Tutorial/Demo/Coding Sessions +========================================= +Additionally, we invite less formal talks in the form of interactive +tutorial/demo/coding sessions. The purpose of these sessions is to +both demonstrate and recieve feedback on any interesting Lisp system, +either stable or under development. Being less formal than technical +paper presentations, it is expected that these sessions be highly +interactive. -The workshop will provide for the opportunity to meet face to face and -work on focused topics. We will organize these breakout groups and -provide for rooms and infrastructure. -Suggested Topics for Breakout Groups: -- Lisp Infrastructure Development and Distribution -- Language Features (e.g. Predicate Dispatching) -- Environments for creating web applications -- Brainstorming sessions for new or existing open source projects -- Persistence Systems -- Compiler technology -- Lisp on bare metal / Lisp hardware / Lisp operating systems -- Compare and enhance curricula for computer science education - - Submission Guidelines -********************* +===================== +Potential contributors are encouraged to submit: -Potential attendees are encouraged to submit: - -- a long paper (10 pages) presenting scientific and/or +- a long paper (around 10 pages) presenting scientific and/or empirical results about Lisp-based uses or new approaches for software engineering purposes, @@ -132,10 +102,20 @@ research, practice or education based on Lisp should be heading in the near future, -- a proposal for a breakout group (1-2 pages) describing the theme, an - agenda and/or expected results. +- a proposal for an interactive tutorial/demo/coding session (1-2 + pages) describing the involved library or application, and the + subject of the session. Submissions should be mailed as PDF to Didier Verna (didier(a)lrde.epita.fr) before the submission deadline. + + +Organizers +========== + +Didier Verna, EPITA Research and Development Laboratory, Paris +Charlotte Herzeel, Programming Technology Lab, Vrije Universiteit, Brussel +Christophe Rhodes, Goldsmiths College, University of London +Hans Hübner, Software Developer, Berlin </pre> </lisp-ecoop:page> Modified: trunk/projects/lisp-ecoop/website/templates/contact.xml =================================================================== --- trunk/projects/lisp-ecoop/website/templates/contact.xml 2009-02-23 11:26:45 UTC (rev 4308) +++ trunk/projects/lisp-ecoop/website/templates/contact.xml 2009-02-23 13:05:18 UTC (rev 4309) @@ -27,13 +27,10 @@ </a>, Goldsmiths College, University of London, United Kingdom </li> - <li>Hans Hübner, Software Developer, Berlin, Germany</li> - - </ul> - <h1>Contact</h1> +<h1>Contact</h1> <p> Workshop related: <a href="mailto:didier@lrde.epita.fr">Didier Verna</a> Modified: trunk/projects/lisp-ecoop/website/templates/home.xml =================================================================== --- trunk/projects/lisp-ecoop/website/templates/home.xml 2009-02-23 11:26:45 UTC (rev 4308) +++ trunk/projects/lisp-ecoop/website/templates/home.xml 2009-02-23 13:05:18 UTC (rev 4309) @@ -5,8 +5,9 @@ <h1>5th European Lisp Workshop</h1> -<p>July 07 - Paphos, Cyprus - co-located with ECOOP 2008</p> +<p>July 06 - Genova, Italy - co-located with ECOOP 2009</p> + <h2>Important News</h2> <ul> + <li> + This year, and for the first time, the workshop proceedings will be + published in the ACM Digital Library. + </li>  +  </ul> <h2>Important Dates</h2> <ul> -<li>Submission deadline: - <b><span style="color: red;">EXTENDED</span> May 18, 2008</b> -</li> -<li>Notification of acceptance: <b>May 26, 2008</b></li> -<li>ECOOP early registration deadline: <b>June 01, 2008</b></li> +<li>Submission deadline: <b>April 08, 2009</b></li> +<li>Notification of acceptance: <b>May 08, 2009</b></li> +<li>ECOOP early registration deadline: <b>May 20, 2009</b></li> </ul> <h2>Overview</h2> @@ -83,45 +89,30 @@ </blockquote> <p> -Lisp is one of the oldest computer languages still in use today. In the -decades of its existence, Lisp has been a fruitful basis for language design -experiments as well as the preferred implementation language for applications -in diverse fields. -</p> - -<p> -The structure of Lisp makes it easy to extend the language or even to -implement entirely new dialects without starting from scratch. Common Lisp, -with the Common Lisp Object System (CLOS), was the first object-oriented -programming language to receive an ANSI standard and retains the most complete -and advanced object system of any programming language, while influencing many +Lisp, one of the eldest computer languages still in use today, is +gaining momentum again. The structure of Lisp makes it easy to extend +the language or even to implement entirely new dialects without +starting from scratch, making it the ideal candidate for writing +Domain Specific Languages. Common Lisp, with the Common Lisp Object +System (CLOS), was the first object-oriented programming language to +receive an ANSI standard and retains the most complete and advanced +object system of any programming language, while influencing many other object-oriented programming languages that followed. </p> <p> -It is clear that Lisp is gaining momentum: there is a steadily growing -interest in Lisp itself, with numerous user groups in existence worldwide, and -in Lisp's metaprogramming notions which are being transferred to other -languages, as for example in Aspect-Oriented Programming, support for -Domain-Specific Languages, and so on. +This workshop will address the near-future role of Lisp-based +languages in research, industry and education. We solicit +contributions that discuss the opportunities Lisp provides to capture +and enhance the possibilities in software engineering. We want to +promote lively discussion between researchers proposing new approaches +and practitioners reporting on their experience with the strengths and +limitations of current Lisp technologies. </p> <p> -This workshop will address the near-future role of Lisp-based languages in -research, industry and education. We solicit papers and suggestions for -breakout groups that discuss the opportunities Lisp provides to capture and -enhance the possibilities in software engineering. We want to promote lively -discussion between researchers proposing new approaches and practitioners -reporting on their experience with the strengths and limitations of current -Lisp technologies. +The workshop will have two components: there will be formal talks, and +interactive turorial/demo/coding sessions. </p> -<p> -The workshop will have two components; there will be formally-presented talks, -and breakout groups discussing or working on particular topics. Additionally, -there will be opportunities for short, informal talks and demonstrations on -experience reports, underappreciated results, software under development, or -other topics of interest. -</p> - </lisp-ecoop:page> Modified: trunk/projects/lisp-ecoop/website/templates/news.xml =================================================================== --- trunk/projects/lisp-ecoop/website/templates/news.xml 2009-02-23 11:26:45 UTC (rev 4308) +++ trunk/projects/lisp-ecoop/website/templates/news.xml 2009-02-23 13:05:18 UTC (rev 4309) @@ -5,12 +5,13 @@ <h1>News</h1> + + -<h3>May 05, 2008</h3> +<h3>February 23, 2009</h3> <ul> -<li>Deadline extension: May 18 (notification: May 26).</li> + <li> + This year, and for the first time, the workshop proceedings will be + published in the ACM Digital Library. + </li> + <li>Launched the workshop website.</li> </ul> -<h3>February 06, 2008</h3> -<ul> -<li>Launched the workshop website.</li> -</ul> - </lisp-ecoop:page> Modified: trunk/projects/lisp-ecoop/website/templates/programme.xml =================================================================== --- trunk/projects/lisp-ecoop/website/templates/programme.xml 2009-02-23 11:26:45 UTC (rev 4308) +++ trunk/projects/lisp-ecoop/website/templates/programme.xml 2009-02-23 13:05:18 UTC (rev 4309) @@ -5,33 +5,6 @@ <h1>Workshop Programme</h1> -<h3>9:15 - 11:30</h3> -<ul> - <li>Opening</li> - <li>Keynote 1 -- Mark Tarver, "Lisp for the 21st Century"</li> - <li>Paper 1 -- Michael Wessel, "Software Abstractions for Description Logic Systems"</li> -</ul> +The programme will be avaible by the end of May 2009. -<h3>11:30 - 12:00</h3> -<ul> -<li>Coffee break</li> -</ul> - -<h3>12:00 - 13:30</h3> -<ul> - <li>Paper 2 -- Leonardo Uribe, "Using Data Parallelism in Lisp for Implementing a Quantum Simulator"</li> - <li>Paper 3 -- Geoff Wozniak, "Adaptive Libraries and Interactive Code Generation for Common Lisp"</li> -</ul> - -<h3>13:30 - 15:00</h3> -<ul> - <li>Lunch break</li> -</ul> - -<h3>15:00 - 17:00</h3> -<ul> - <li>Keynote 2 -- Rich Hickey, "A detailed Look at the Lisp Nature of Clojure"</li> - <li>Paper 4 -- Pascal Costanza, "make-method-lambda Considered Harmful"</li> -</ul> - </lisp-ecoop:page> Modified: trunk/projects/lisp-ecoop/website/templates/submissions.xml =================================================================== --- trunk/projects/lisp-ecoop/website/templates/submissions.xml 2009-02-23 11:26:45 UTC (rev 4308) +++ trunk/projects/lisp-ecoop/website/templates/submissions.xml 2009-02-23 13:05:18 UTC (rev 4309) @@ -5,15 +5,16 @@ <h1>Submissions</h1> + <h2>Papers</h2> -<p>We have accepted the following submissions.</p> - -<lisp-ecoop:submission-list type="paper"/> + +The list of accepted submissions will be available in June. + - +<h2>Interactive Turorial/Demo/Coding Sessions</h2> + </lisp-ecoop:page>

1 0

[bknr-cvs] hans changed trunk/bknr/web/src/
by BKNR Commits 23 Feb '09

23 Feb '09

Revision: 4308 Author: hans URL: http://bknr.net/trac/changeset/4308 Hunchentoot 1.0.0 changes (not complete) U trunk/bknr/web/src/packages.lisp U trunk/bknr/web/src/web/handlers.lisp U trunk/bknr/web/src/web/web-macros.lisp Modified: trunk/bknr/web/src/packages.lisp =================================================================== --- trunk/bknr/web/src/packages.lisp 2009-02-23 11:25:25 UTC (rev 4307) +++ trunk/bknr/web/src/packages.lisp 2009-02-23 11:26:45 UTC (rev 4308) @@ -256,6 +256,7 @@ #:*template-dtd-catalog* ;; handlers + #:bknr-dispatch #:parse-handler-url #:*website* #:website Modified: trunk/bknr/web/src/web/handlers.lisp =================================================================== --- trunk/bknr/web/src/web/handlers.lisp 2009-02-23 11:25:25 UTC (rev 4307) +++ trunk/bknr/web/src/web/handlers.lisp 2009-02-23 11:26:45 UTC (rev 4308) @@ -358,13 +358,13 @@ (handler (cond ((authorized-p handler) - (curry #'invoke-handler handler)) + (invoke-handler handler)) (t (setf (session-value :login-redirect-uri) (redirect-uri (parse-uri (script-name*)))) (redirect "/login")))) (t - 'error-404)))) + (error-404))))) (defmethod publish-handler ((website website) (handler page-handler)) (setf *handlers* (append *handlers* (list handler)))) @@ -487,7 +487,7 @@ (filenames (if (directory-handler-filename-separator handler) (mapcar #'pathname (split (directory-handler-filename-separator handler) pathnames-argument)) - pathnames-argument)) + (list pathnames-argument))) (types (mapcar #'pathname-type filenames))) (unless (every #'equal types (cdr types)) (error 'non-matching-filetypes-in-combination :pathnames-argument pathnames-argument)) @@ -694,7 +694,7 @@ (defmethod handle-object ((handler blob-handler) (blob blob)) (with-http-response (:content-type (blob-mime-type blob)) - (setf (content-length) (blob-size blob)) + (setf (content-length*) (blob-size blob)) (let ((stream (send-headers))) (blob-to-stream blob stream)))) @@ -746,7 +746,7 @@ (:princ-safe error))))))) (defun show-page-with-error-handlers (fn &key (response +http-ok+) title) - (setf (return-code) response) + (setf (return-code*) response) (with-http-response (:content-type "text/html; charset=UTF-8" :response response) (with-http-body () (website-show-page *website* fn title)))) Modified: trunk/bknr/web/src/web/web-macros.lisp =================================================================== --- trunk/bknr/web/src/web/web-macros.lisp 2009-02-23 11:25:25 UTC (rev 4307) +++ trunk/bknr/web/src/web/web-macros.lisp 2009-02-23 11:26:45 UTC (rev 4308) @@ -56,8 +56,8 @@ (defmacro with-http-response ((&key (content-type "text/html") (response +http-ok+)) &body body) `(progn - (setf (content-type) ,content-type) - (setf (return-code) ,response) + (setf (content-type*) ,content-type) + (setf (return-code*) ,response) ,@body)) (defmacro with-http-body ((&key external-format) &body body)

1 0

[bknr-cvs] hans changed trunk/projects/lisp-ecoop/src/
by BKNR Commits 23 Feb '09

23 Feb '09

Revision: 4307 Author: hans URL: http://bknr.net/trac/changeset/4307 ELW 2009 changes, port over to Hunchentoot 1.0.0 U trunk/projects/lisp-ecoop/src/handlers.lisp U trunk/projects/lisp-ecoop/src/init.lisp U trunk/projects/lisp-ecoop/src/participant.lisp U trunk/projects/lisp-ecoop/src/webserver.lisp Modified: trunk/projects/lisp-ecoop/src/handlers.lisp =================================================================== --- trunk/projects/lisp-ecoop/src/handlers.lisp 2009-02-20 13:28:45 UTC (rev 4306) +++ trunk/projects/lisp-ecoop/src/handlers.lisp 2009-02-23 11:25:25 UTC (rev 4307) @@ -39,7 +39,7 @@ (defmethod handle-object ((handler pdf-handler) (document document)) (let ((pdf (file-contents (blob-pathname document)))) (with-http-response (:content-type "application/pdf") - (setf (content-length) (length pdf)) + (setf (content-length*) (length pdf)) (let ((stream (hunchentoot:send-headers))) (write-sequence pdf stream) (finish-output stream))))) Modified: trunk/projects/lisp-ecoop/src/init.lisp =================================================================== --- trunk/projects/lisp-ecoop/src/init.lisp 2009-02-20 13:28:45 UTC (rev 4306) +++ trunk/projects/lisp-ecoop/src/init.lisp 2009-02-23 11:25:25 UTC (rev 4307) @@ -17,4 +17,4 @@ (publish-lisp-ecoop) - (start-webserver)) + (start-webserver :start-frontend nil)) Modified: trunk/projects/lisp-ecoop/src/participant.lisp =================================================================== --- trunk/projects/lisp-ecoop/src/participant.lisp 2009-02-20 13:28:45 UTC (rev 4306) +++ trunk/projects/lisp-ecoop/src/participant.lisp 2009-02-23 11:25:25 UTC (rev 4307) @@ -128,7 +128,7 @@ :text (format nil "Your participant account on the LISP ECOOP Workshop website has been created. Please visit your personal profile page on -http://elw2008.bknr.net/edit-profile/ to change your password +http://elw2009.bknr.net/edit-profile/ to change your password and update your profile information. Your login name is: ~A @@ -148,7 +148,7 @@ :text (format nil "Your password on the LISP ECOOP Workshop website has been reset. Please visit your personal profile page on -http://elw2008.bknr.net/edit-profile/~A to change your password +http://elw2009.bknr.net/edit-profile/~A to change your password and update your profile information. Your login name is: ~A Modified: trunk/projects/lisp-ecoop/src/webserver.lisp =================================================================== --- trunk/projects/lisp-ecoop/src/webserver.lisp 2009-02-20 13:28:45 UTC (rev 4306) +++ trunk/projects/lisp-ecoop/src/webserver.lisp 2009-02-23 11:25:25 UTC (rev 4307) @@ -5,10 +5,6 @@ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -#+(or) -(defun make-daily-statistics () - (bknr.stats::make-yesterdays-stats :delete-events t :remove-referer-hosts '("lisp-ecoop.bknr.net"))) - (defun publish-lisp-ecoop (&key (base-href *base-path*)) (unless (bknr.cron:cron-job-with-name "daily webserver statistics") @@ -24,7 +20,6 @@ ("http://bknr.net/menu" . :bknr.site-menu)) :handler-definitions `(user images - stats ("/handler-statistics" bknr.web::handler-statistics-handler) mailinglist mailinglist-registration @@ -38,11 +33,20 @@ :style-sheet-urls (list (format nil "~Astatic/styles.css" base-href)) :javascript-urls (list (format nil "~Astatic/javascript.js" base-href)))) -(defun start-webserver (&key (host "elw2008.bknr.net") (port 80) (backend-port 9001)) +(defvar *server*) + +(defun start-webserver (&key (host "elw2009.bknr.net") + (port 80) + (backend-port 9001) + (start-frontend t)) (when (and (boundp '*server*) *server*) - (stop-server *server*)) + (stop *server*)) (publish-lisp-ecoop) (setf *hunchentoot-default-external-format* (flex:make-external-format :utf-8 :eol-style :lf) hunchentoot:*rewrite-for-session-urls* nil) - (setq *server* (start-server :port backend-port)) - (start-frontend :host host :backend-port backend-port :port port)) + (setq *server* (make-instance 'hunchentoot:acceptor + :port backend-port + :request-dispatcher 'bknr.web:bknr-dispatch)) + (start *server*) + (when start-frontend + (start-frontend :host host :backend-port backend-port :port port)))

1 0

[bknr-cvs] hans changed trunk/thirdparty/hunchentoot/CHANGELOG
by BKNR Commits 20 Feb '09

20 Feb '09

Revision: 4306 Author: hans URL: http://bknr.net/trac/changeset/4306 Add changelog entry. U trunk/thirdparty/hunchentoot/CHANGELOG Modified: trunk/thirdparty/hunchentoot/CHANGELOG =================================================================== --- trunk/thirdparty/hunchentoot/CHANGELOG 2009-02-20 13:27:40 UTC (rev 4305) +++ trunk/thirdparty/hunchentoot/CHANGELOG 2009-02-20 13:28:45 UTC (rev 4306) @@ -1,3 +1,4 @@ +Fix STOP by supplying the :READY-ONLY keyword to USOCKET:WAIT-FOR-INPUT Enable SSL key passwords for Lisps other than LW (Vsevolod) Version 1.0.0

1 0

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

bknr-cvs