Author: mhenoch Date: Fri Mar 30 08:14:33 2007 New Revision: 116 Modified: cl-darcs/trunk/send.lisp Log: Don't use PI as variable in lambda function Modified: cl-darcs/trunk/send.lisp ============================================================================== --- cl-darcs/trunk/send.lisp (original) +++ cl-darcs/trunk/send.lisp Fri Mar 30 08:14:33 2007 @@ -77,8 +77,8 @@ ;; XXX: handle tags properly. (let ((latest-tag (member-if - (lambda (pi) - (string= (patchinfo-name pi) "TAG " + (lambda (patchinfo) + (string= (patchinfo-name patchinfo) "TAG " :end1 4)) common))) ;; Here we just cut history after the latest tag. This