projects
/
wol.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
628dda3
)
r5481: *** empty log message ***
author
Kevin M. Rosenberg
<kevin@rosenberg.net>
Sat, 9 Aug 2003 22:18:32 +0000
(22:18 +0000)
committer
Kevin M. Rosenberg
<kevin@rosenberg.net>
Sat, 9 Aug 2003 22:18:32 +0000
(22:18 +0000)
project.lisp
patch
|
blob
|
history
diff --git
a/project.lisp
b/project.lisp
index 027f1bdcf7914bd98a1dbc00f775398709e0b9aa..d5213f95c295debfdab0c64d9fc1fae7365cae63 100644
(file)
--- a/
project.lisp
+++ b/
project.lisp
@@
-7,7
+7,7
@@
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: July 2003
;;;;
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: July 2003
;;;;
-;;;; $Id: project.lisp,v 1.
9 2003/08/09 21:42:24
kevin Exp $
+;;;; $Id: project.lisp,v 1.
10 2003/08/09 22:18:32
kevin Exp $
;;;;
;;;; This file and Wol are Copyright (c) 2001-2003 by Kevin M. Rosenberg
;;;; *************************************************************************
;;;;
;;;; This file and Wol are Copyright (c) 2001-2003 by Kevin M. Rosenberg
;;;; *************************************************************************
@@
-151,8
+151,6
@@
(let ((proj (entity-project ent)))
(ecase (project-connector proj)
(:aserve
(let ((proj (entity-project ent)))
(ecase (project-connector proj)
(:aserve
- (cmsg "Set-cookie: ~A" (websession-key
- (websession-from-req req)))
(net.aserve:set-cookie-header (aserve-request req)
:name (project-name
(entity-project ent))
(net.aserve:set-cookie-header (aserve-request req)
:name (project-name
(entity-project ent))