gmane.lisp.web.uncommonweb.devel

Automated-response: Rejected e-mail

Mail Delivery Subsystem — 2013-04-11T12:35:29

Warning: Malicious content within your e-mail was detected by our system. The message did not reach the intended recipient. Please check the content of your message and try again. If you believe this was in error, please forward this e-mail to support< at >acceleration.net.

Original message's header:
Received: from mail.common-lisp.net ( [50.7.166.114])
        by mailproc2.acceleration.net (VMS) with ESMTP id WQU45428
        for <russ< at >acceleration.net>; Thu, 11 Apr 2013 08:35:28 -0400
Received: from alpha-cl-net.common-lisp.net (localhost [127.0.0.1])
by mail.common-lisp.net (Postfix) with SMTP id 5060D356786
for <russ< at >acceleration.net>; Thu, 11 Apr 2013 05:28:50 -0700 (PDT)
X-Original-To: bese-devel< at >common-lisp.net
Received: from 193.25.121.86 (unknown [193.25.121.86])
by mail.common-lisp.net (Postfix) with SMTP id 103DA356746
for <bese-devel< at >common-lisp.net>; Thu, 11 Apr 2013 05:28:43 -0700 (PDT)
Received: from unknown (HELO n4grf4) ([53.186.29.188])
by 193.25.121.86 with ESMTP; Thu, 11 Apr 2013 15:25:3

Automated-response: Rejected e-mail

Mail Delivery Subsystem — 2013-04-11T12:28:56

Warning: Malicious content within your e-mail was detected by our system. The message did not reach the intended recipient. Please check the content of your message and try again. If you believe this was in error, please forward this e-mail to support< at >acceleration.net.

Original message's header:
Received: from mail.common-lisp.net ( [50.7.166.114])
        by mailproc2.acceleration.net (VMS) with ESMTP id WQN45755
        for <ryan< at >acceleration.net>; Thu, 11 Apr 2013 08:28:55 -0400
Received: from alpha-cl-net.common-lisp.net (localhost [127.0.0.1])
by mail.common-lisp.net (Postfix) with SMTP id 5CDD13567B3
for <ryan< at >acceleration.net>; Thu, 11 Apr 2013 05:28:50 -0700 (PDT)
X-Original-To: bese-devel< at >common-lisp.net
Received: from 193.25.121.86 (unknown [193.25.121.86])
by mail.common-lisp.net (Postfix) with SMTP id 103DA356746
for <bese-devel< at >common-lisp.net>; Thu, 11 Apr 2013 05:28:43 -0700 (PDT)
Received: from unknown (HELO n4grf4) ([53.186.29.188])
by 193.25.121.86 with ESMTP; Thu, 11 Apr 2013 15:25:3

Fwd: error in (ql:quickload :arnesi.test): Unknownsuite IT.BESE

Anton Vodonosov — 2013-03-02T10:12:22


-------- forwarded message  --------
27.01.2013, 16:35, "Anton Vodonosov" <avodonosov< at >yandex.ru>:

(ql:quickload :arnesi)
(ql:quickload :arnesi.test)

Unknown suite IT.BESE.
   [Condition of type SIMPLE-ERROR]

Backtrace:
  0: (IT.BESE.FIVEAM:MAKE-SUITE :IT.BESE.ARNESI :DESCRIPTION NIL :IN :IT.BESE)
  1: (CCL::%COMPILE-TIME-EVAL (IT.BESE.FIVEAM:MAKE-SUITE ':IT.BESE.ARNESI :IN ':IT.BESE) #<CCL::LEXICAL-ENVIRONMENT #x210A01A95D>)
  2: (CCL::FCOMP-FORM-1 (IT.BESE.FIVEAM:MAKE-SUITE ':IT.BESE.ARNESI :IN ':IT.BESE) #<CCL::LEXICAL-ENVIRONMENT #x210A01A95D> :COMPILE-TIME-TOO)
  3: (CCL::FCOMP-FORM (IT.BESE.FIVEAM:MAKE-SUITE ':IT.BESE.ARNESI :IN ':IT.BESE) #<CCL::LEXICAL-ENVIRONMENT #x210A01A95D> :COMPILE-TIME-TOO)
  4: (CCL::FCOMP-FORM-LIST ((IT.BESE.FIVEAM:MAKE-SUITE ':IT.BESE.ARNESI :IN ':IT.BESE) ':IT.BESE.ARNESI) #<CCL::LEXICAL-ENVIRONMENT #x210A01A95D> :COMPILE-TIME-TOO)
  5: (CCL::FCOMP-EVAL-WHEN (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (IT.BESE.FIVEAM:MAKE-SUITE ':IT.BESE.ARNESI

Fwd: Patch to qbook for ASDF 2.27

Faré — 2013-02-18T14:21:39

PING?

Is there anyone in charge here? Anyone listening? Anyone with commit rights?
Can you apply this patch to make qbook compile again?

—♯ƒ • François-René ÐVB Rideau •Reflection&Cybernethics• http://fare.tunes.org
War does not determine who is right — only who is left. —  Bertrand Russell

---------- Forwarded message ----------
From: Faré <fahree< at >gmail.com>
Date: Mon, Jan 7, 2013 at 7:21 AM
Subject: Patch to qbook for ASDF 2.27
To: bese-devel< at >common-lisp.net


Here is a patch to qbook that will make it play nicer with ASDF, both
future 2.27 and legacy versions.

NB: You might also want to rename bulid-indexes to build-indexes in qbook.lisp.

—♯ƒ • François-René ÐVB Rideau •Reflection&Cybernethics• http://fare.tunes.org
From a programmer's point of view, the user is a peripheral that types
when you issue a read request. — P. Williams
_______________________________________________
bese-devel mailing list
bese-devel< at >common-lisp.net
http://lists.common-lisp.net/cgi-bin/ma

Patch to qbook for ASDF 2.27

Faré — 2013-01-07T06:21:24

Here is a patch to qbook that will make it play nicer with ASDF, both
future 2.27 and legacy versions.

NB: You might also want to rename bulid-indexes to build-indexes in qbook.lisp.

—♯ƒ • François-René ÐVB Rideau •Reflection&Cybernethics• http://fare.tunes.org
From a programmer's point of view, the user is a peripheral that types
when you issue a read request. — P. Williams
_______________________________________________
bese-devel mailing list
bese-devel< at >common-lisp.net
http://lists.common-lisp.net/cgi-bin/mailman/listinfo/bese-devel

Re: further development of FiveAM

Stelian Ionescu — 2012-04-21T20:28:06


I've created a new project(http://common-lisp.net/project/fiveam/)
with its own mailing list and converted the sources to git:
https://github.com/sionescu/fiveam
I'll slowly start integrating the various forks and patches I found around, so
if you have some request don't hesitate to ask(on fiveam-devel)

fiveam patch

Kiyoshi Mizumaru — 2012-04-21T13:35:12

Hi,

Would you please have a look at the following diffs?
In Allegro CL's modern case mode, fiveam cannot be load due to some
symbol case mismatches.

Thanks in advance,
Kiyoshi


https://github.com/kmizumar/fiveam/commit/83ea8b5c4ac22cec6befd2b95dafe5cf6ee0a49d

diff -rN old-fiveam/t/suite.lisp new-fiveam/t/suite.lisp
3c3
< (in-package :it.bese.fiveam)
---
9c9
< (def-suite :it.bese.fiveam :in :it.bese)
---

Re: arnesi_dev patches

Kiyoshi Mizumaru — 2012-04-21T13:24:00

Sorry, the first link in the previous mail was wrong, but diffs are okay.

https://github.com/kmizumar/arnesi_dev/commit/787edf707169e2402a3317a84c26b4da24c3983e


On Sat, Apr 21, 2012 at 10:18 PM, Kiyoshi Mizumaru
<kiyoshi.mizumaru< at >gmail.com> wrote:

arnesi_dev patches

Kiyoshi Mizumaru — 2012-04-21T13:18:54

Hi,

Would you please have a look at the following diffs?
One is for Allegro CL's modern case mode, and the other is for
Lispworks conditional compile.

I'm not familiar with darcs, so please forgive me for not sending this
in darcs send.

Thanks in advance,
Kiyoshi


https://github.com/kmizumar/arnesi_dev/commit/aeb41d4b5284559ac07c458cdc315e4aebd42cb9

diff -rN old-arnesi_dev/src/hash.lisp new-arnesi_dev/src/hash.lisp
16,18c16,18
<                (reader (make-lookup-name name "GET-" name))
<                (writer (make-lookup-name name "GET-" name))
<                (rem-er (make-lookup-name name "REM-" name))
---


https://github.com/kmizumar/arnesi_dev/commit/c8aad5de20bb0b14f0b7db8cd47f2c1884dd4dd6

diff -rN old-arnesi_dev/src/lexenv.lisp new-arnesi_dev/src/lexenv.lisp
260c260
< #+(and lispworks macosx)
---
264c264
< #+(and lispworks macosx)
---
274c274
< #+(and lispworks macosx)
---
282c282
< #+(and lispworks macosx)
---
286c286
< #+(and lispworks macosx)
---
296c296
< #+(and lispworks macosx)
---
30

further development of FiveAM

Marco Baringer — 2012-04-18T18:37:47

hi,

   I've haven't worked on FiveAM in a long time (it's been at least 3
   years...), and apparently that's caused stagnation and
   fragmentation of the code base. my bad.

   Stelian Ionescu has graciously offered to take up further
   development of FiveAM. So i'm going to let him do that.

good luck,
--
-marco

form validation

Răzvan Rotaru — 2012-02-06T15:50:26

Hi,



I’m currently trying to learn and evaluate ucw for future projects and I
was wondering if there is any support for form validation. I would be very
thankful for suggestions on how to do this efficiently in ucw.


Thanks,
Razvan
_______________________________________________
bese-devel mailing list
bese-devel< at >common-lisp.net
http://lists.common-lisp.net/cgi-bin/mailman/listinfo/bese-devel

[Bug-Report]ARNESI:VARSYMP couses error with zerolengh name symbol

CHIBA Masaomi — 2011-12-21T23:38:54

Hi.
I found trivial bug.
ARNESI:VARSYMP couses error with "zero lengh name" symbol.

(IT.BESE.ARNESI::VARSYMP :||)
;>>> error: Index 0 out of bounds for (SIMPLE-ARRAY CHARACTER (0))

(IT.BESE.ARNESI::VARSYMP '||)
;>>> error: Index 0 out of bounds for (SIMPLE-ARRAY CHARACTER (0))

fix:
(defun varsymp (x)
  (and (symbolp x)
       (string/= "" x)                  ;not zero length name
       (eq (aref (symbol-name x) 0) #\?)))

Regards.
--
CHIBA Masaomi

[yaclml] [patch] fixed inconsistency between NODE-CHILDREN and MAKE-NODE, (SETF NODE-CHILDREN) in XMLS

Boris Smilga — 2011-03-11T21:29:00

Hi.

This is a minor issue, actually.  In yaclml/src/tal/xmls.lisp, we read:

  (defun make-node (&key name ns attrs child children)
    (cons #<Datum for name, ns and attrs> #<Datum for child or children>))

and, correspondingly,

  (defun (setf node-children) (children elem)
    (setf (CDR elem) children)
    (node-children elem))

but, at the same time,

  (defun node-children (elem)
    (CDDR elem))

which results in the first child being lost.

Attached is a patch to fix this issue.

Sincerely,
 - B. Smilga.
_______________________________________________
bese-devel mailing list
bese-devel< at >common-lisp.net
http://common-lisp.net/cgi-bin/mailman/listinfo/bese-devel

Date in form and clsql time elements mapping

Aashish L — 2010-07-02T13:08:10

Hi 
I am using stock UCW and I have difficulty in handling dates from CLSQL.
Take a look at following code, its messy, use of variables- dd,mm,yy and action- datehelper is what I want to avoid! I also refered back Boxset's form.lisp, but could not figure out how to put raw d,m,y intgers back in time element.
Help welcome!
Thanks.
~Arl

code starts:-------------
(clsql:def-view-class datetrial ()
  ((id
    :db-kind :key :type (integer 4) :initarg :id :initform 0)  
   (trydate
    :accessor trydate :type clsql:wall-time
    :initarg :trydate :initform (clsql:make-time :year 2000 :month 1 :day 1)))
  (:base-table |datetrial|))

;(clsql:create-view-from-class 'datetrial)

(defcomponent date-man ()
  ((ddate :accessor ddate :initarg :ddate :backtrack t
  :initform (make-instance 'datetrial))))

(defcomponent get-date (date-man) 
  ())

(defmethod render ((self get-date))
  (let* ((temp (ddate self))
 (bdate (trydate temp))
 (dd (clsql:time-element bdate :day-of-month))
 (mm (clsql:time-element bdate :month)

Re: [PATCH] Use the provided form for session inWITH-LOCK-HELD-ON-SESSION

Clinton Ebadi — 2010-06-17T17:20:49

_______________________________________________
bese-devel mailing list
bese-devel< at >common-lisp.net
http://common-lisp.net/cgi-bin/mailman/listinfo/bese-devel

Re: [PATCH] Use the provided form for session inWITH-LOCK-HELD-ON-SESSION

Drew Crampsie — 2010-06-15T14:54:03

Hey,

I'm on vacation for a week or so. Clinton, can you have a look at
these and apply them? Do you have access to the cl-net repo? If not,
throw it on corsucant and i'll pull them from there when i can.


Cheers,

drewc

On 14 June 2010 12:25, Daniel White <daniel< at >whitehouse.id.au> wrote:

Re: [PATCH] Use the provided form for session inWITH-LOCK-HELD-ON-SESSION

Daniel White — 2010-05-28T04:05:35

Drew actually pointed out that it doesn't appear in the archives.  I
actually resent it a few hours ago, but it hasn't appeared in the
archives, either.

I've also sent another separate patch today that doesn't seem to have
arrived, either.  Mildly frustrating that I've sent patches, but
haven't ever received a bounce or failure message.

Re: [PATCH] Use the provided form for session inWITH-LOCK-HELD-ON-SESSION

Clinton Ebadi — 2010-05-28T03:48:19

_______________________________________________
bese-devel mailing list
bese-devel< at >common-lisp.net
http://common-lisp.net/cgi-bin/mailman/listinfo/bese-devel

Re: [PATCH] Use the provided form for session inWITH-LOCK-HELD-ON-SESSION

Daniel White — 2010-05-27T23:31:49

I've noticed this hasn't been pushed into the ucw-core repository.
Any problems with the patch and is the repository being updated and/or
maintained?

Cheers,

Re: serve-file and content-disposition

2010-05-27T21:07:01


OOPS, I was meaning an :after initialize-instance. This works:

(in-package :ucw-standard)

(defmethod initialize-instance :after ((app static-roots-application-mixin)
                                       &rest initargs &key &allow-other-keys)
  (when-bind static-roots (application.static-roots app)
    (mapc (lambda (root)
            (defentry-point (car root) (:application app
                                        :class starts-with-dispatcher
                                        :with-call/cc nil
                                        :action-options (:class 'action))
                ()
              (serve-file (merge-pathnames *dispatcher-url-suffix*
                                           (cdr root)))))
          static-roots)))

It's not so different from what defcomponent macro is doing.


defentry-point doesn't need the :application argument to be registered
to a server to work, if its body doesn't refer to that server.


I register applications with a server that is already running
(s

Re: serve-file and content-disposition

Attila Lendvai — 2010-05-27T16:36:47

content-disposition: attachment is important e.g. if you want to
prevent the annoying pdf plugin to embed a pdf in the browser, or you
want to make sure a txt file is saved instead of displayed.

we have it _slightly_ better in wui:

http://dwim.hu/darcsweb/darcsweb.cgi?r=HEAD%20hu.dwim.wui;a=headblob;f=/source/server/server.lisp

but without further requirements we didn't make it as shiny as possible.