From 53c9df7bcfe5a22f23531e55672dac868a20225c Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Fri, 6 Jun 2003 22:05:08 +0000 Subject: [PATCH 1/1] r5063: *** empty log message *** --- debian/changelog | 6 ++++ package.lisp | 61 +++++++++++++++++++++++++++++++++++++ src.lisp => pubmed-src.lisp | 48 ++--------------------------- pubmed.asd | 14 ++++++--- 4 files changed, 78 insertions(+), 51 deletions(-) create mode 100644 package.lisp rename src.lisp => pubmed-src.lisp (94%) diff --git a/debian/changelog b/debian/changelog index 48449ff..b1b224f 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,9 @@ +cl-pubmed (2.1.0-1) unstable; urgency=low + + * New upstream + + -- Kevin M. Rosenberg Fri, 6 Jun 2003 16:04:55 -0600 + cl-pubmed (2.0.2-1) unstable; urgency=low * Improve .asd file diff --git a/package.lisp b/package.lisp new file mode 100644 index 0000000..d0c9f2b --- /dev/null +++ b/package.lisp @@ -0,0 +1,61 @@ +;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*- +;;;; ************************************************************************* +;;;; FILE IDENTIFICATION +;;;; +;;;; Name: package.lisp +;;;; Purpose: Package file for cl-pubmed +;;;; Programmer: Kevin M. Rosenberg +;;;; Date Started: Jun 2001 +;;;; +;;;; $Id: package.lisp,v 1.1 2003/06/06 22:04:05 kevin Exp $ +;;;; +;;;; This file, part of cl-pubmed, is Copyright (c) 2002 by Kevin M. Rosenberg +;;;; +;;;; cl-pubmed users are granted the rights to distribute and use this software +;;;; as governed by the terms of the GNU Lesser General Public License +;;;; (http://www.gnu.org/licenses/lgpl.html) +;;;; ************************************************************************* + +(in-package #:cl-user) + +(defpackage #:pubmed + (:use #:common-lisp #:kmrcl) + (:export + + ;; Conditions + #:pubmed-condition + #:pubmed-query-error + #:pubmed-server-error + + ;; Query functions + #:pm-query + #:pm-fetch-ids + + ;; Print functions + #:print-article + #:print-article-set + + ; Classes + #:pm-article + #:pm-article-set + + ;; pm-article-set accessors + #:articles + #:articles-query + #:articles-total + #:articles-count + #:articles-start + + ;; article accessors + #:article-pmid + #:article-title + #:article-authors + #:article-affiliation + #:article-journal + #:article-date + #:article-volume + #:article-issue + #:article-pages + #:article-abstract + #:article-mesh-headings + )) diff --git a/src.lisp b/pubmed-src.lisp similarity index 94% rename from src.lisp rename to pubmed-src.lisp index 82c0abd..a2e832a 100644 --- a/src.lisp +++ b/pubmed-src.lisp @@ -2,12 +2,12 @@ ;;;; ************************************************************************* ;;;; FILE IDENTIFICATION ;;;; -;;;; Name: pubmed.lisp +;;;; Name: pubmed-src.lisp ;;;; Purpose: Library to access PubMed web application ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Jun 2001 ;;;; -;;;; $Id: src.lisp,v 1.2 2003/06/06 21:59:30 kevin Exp $ +;;;; $Id: pubmed-src.lisp,v 1.1 2003/06/06 22:04:05 kevin Exp $ ;;;; ;;;; This file, part of cl-pubmed, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -16,50 +16,6 @@ ;;;; (http://www.gnu.org/licenses/lgpl.html) ;;;; ************************************************************************* -(in-package #:cl-user) - -(defpackage #:pubmed - (:use #:common-lisp #:kmrcl) - (:export - - ;; Conditions - #:pubmed-condition - #:pubmed-query-error - #:pubmed-server-error - - ;; Query functions - #:pm-query - #:pm-fetch-ids - - ;; Print functions - #:print-article - #:print-article-set - - ; Classes - #:pm-article - #:pm-article-set - - ;; pm-article-set accessors - #:articles - #:articles-query - #:articles-total - #:articles-count - #:articles-start - - ;; article accessors - #:article-pmid - #:article-title - #:article-authors - #:article-affiliation - #:article-journal - #:article-date - #:article-volume - #:article-issue - #:article-pages - #:article-abstract - #:article-mesh-headings - )) - (in-package #:pubmed) diff --git a/pubmed.asd b/pubmed.asd index 01cbbd4..06f0c9f 100644 --- a/pubmed.asd +++ b/pubmed.asd @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Sep 2002 ;;;; -;;;; $Id: pubmed.asd,v 1.4 2003/05/06 16:24:49 kevin Exp $ +;;;; $Id: pubmed.asd,v 1.5 2003/06/06 22:04:05 kevin Exp $ ;;;; ;;;; This file, part of cl-pubmed, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -16,23 +16,27 @@ ;;;; (http://www.gnu.org/licenses/lgpl.html) ;;;; ************************************************************************* -(in-package :asdf) +(in-package #:cl-user) +(defpackage #:pubmed-system (:use #:asdf #:cl)) +(in-package #:pubmed-system) + #+(and allegro common-lisp-controller) (c-l-c::clc-require :aserve) #+(and allegro (not common-lisp-controller)) (require :aserve) ;; only define system on implementations that aserve is available #+(or allegro lispworks cmucl mcl openmcl scl clisp) -(defsystem :pubmed +(defsystem pubmed :name "cl-pubmed" :author "Kevin M. Rosenberg " - :version "1.0" + :version "2.1" :maintainer "Kevin M. Rosenberg " :licence "GNU Lesser General Public License" :description "Library for querying the PubMed medical literature database" :long-description "This library has functions for querying the PubMed medical literature database and parsing the XML results into Common Lisp objects." - :components ((:file "src")) + :components ((:file "package") + (:file "pubmed-src" :depends-on ("package"))) :depends-on (:kmrcl #-allegro :aserve)) -- 2.34.1