remove silly copyright footers from source files, put them in a singl…

…e LICENSE file

LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) Marijn Haverbeke, marijnh@gmail.com
+
+This software is provided 'as-is', without any express or implied
+warranty. In no event will the authors be held liable for any
+damages arising from the use of this software.
+
+Permission is granted to anyone to use this software for any
+purpose, including commercial applications, and to alter it and
+redistribute it freely, subject to the following restrictions:
+
+1. The origin of this software must not be misrepresented; you must
+   not claim that you wrote the original software. If you use this
+   software in a product, an acknowledgment in the product
+   documentation would be appreciated but is not required.
+
+2. Altered source versions must be plainly marked as such, and must
+   not be misrepresented as being the original software.
+
+3. This notice may not be removed or altered from any source
+   distribution.

cl-postgres/communicate.lisp

@@ -131,24 +131,3 @@ when UTF-8 support is enabled."
         (close socket :abort abort)
       (error (error)
         (warn "Ignoring the error which happened while trying to close PostgreSQL socket: ~A" error)))))
-
-;;; Copyright (c) Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

cl-postgres/errors.lisp

@@ -95,24 +95,3 @@ giving them a database-connection-error superclass."))
   (or (gethash code *error-table*)
       (gethash (subseq code 0 2) *error-table*)
       'database-error))
-
-;;; Copyright (c) Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

cl-postgres/interpret.lisp

@@ -181,24 +181,3 @@ used. Correct for sign bit when using integer format."
 
 (defun default-sql-readtable ()
   *default-sql-readtable*)
-
-;;; Copyright (c) Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

cl-postgres/messages.lisp

@@ -204,24 +204,3 @@ for binding data for binary long object columns."
 
 ;; To get out of the copy-in protocol.
 (define-message copy-done-message #\c ())
-
-;;; Copyright (c) Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

cl-postgres/package.lisp

@@ -75,24 +75,3 @@
   (defparameter *optimize*
     '(optimize (speed 3) (safety 0) (space 1) (debug 1)
       (compilation-speed 0))))
-
-;;; Copyright (c) Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

cl-postgres/protocol.lisp

@@ -387,24 +387,3 @@ in a row. See list-row-reader in public.lisp for an example."
   "Create a row reader, as in the row-reader macro, and assign a name
 to it."
   (build-row-reader `(defun ,name) fields body))
-
-;;; Copyright (c) 2006 Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

cl-postgres/public.lisp

@@ -189,24 +189,3 @@ apply a row-reader to the result."
         :do (loop :for field :across fields
                   :do (next-field field)))
   (values))
-
-;;; Copyright (c) 2006 Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

postmodern/connect.lisp

@@ -118,24 +118,3 @@ pool is full."
      *connection-pools*)
     (setf *connection-pools* (make-hash-table :test 'equal))
     (values)))
-
-;;; Copyright (c) Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

postmodern/package.lisp

@@ -37,24 +37,3 @@
    #:database-connection-error))
 
 (in-package :postmodern)
-
-;;; Copyright (c) 2006 Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

postmodern/prepare.lisp

@@ -33,24 +33,3 @@ should contain a placeholder \($1, $2, etc) for every parameter."
   "Like perpare, but gives the function a name instead of returning
 it."
   (generate-prepared `(defun ,name) query format))
-
-;;; Copyright (c) Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

postmodern/query.lisp

@@ -89,24 +89,3 @@ names to the results and executing body for every row."
                                :for name :in names
                                :collect `(,name (next-field (elt ,fields ,i))))
                      ,@body)))))))
-
-;;; Copyright (c) Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

postmodern/table.lisp

@@ -275,24 +275,3 @@ holds, order them by the given criteria."
                                              `(:default ,(column-default slot)))))
                    ,@(when (dao-keys table)
                        `((:primary-key ,@(dao-keys table)))))))
-
-;;; Copyright (c) Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

postmodern/util.lisp

@@ -139,24 +139,3 @@ unwinds, and the SQL name of the savepoint."
 
 (defun coalesce (&rest args)
   (some (lambda (x) (if (eq x :null) nil x)) args))
-
-;;; Copyright (c) Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

s-sql/s-sql.lisp

@@ -661,24 +661,3 @@ to runtime. Used to create stored procedures."
 
 (def-sql-op :drop-view (name)
   `("DROP VIEW " ,@(sql-expand name)))
-
-;;; Copyright (c) Marijn Haverbeke & Streamtech
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.

simple-date/simple-date.lisp

@@ -392,24 +392,3 @@ whether the first is less or equal than the second."
   "Compare two time-related values, returns a boolean indicating
 whether the first is greater or equal than the second."
   (not (time< a b)))
-
-;;; Copyright (c) 2006 Marijn Haverbeke
-;;;
-;;; This software is provided 'as-is', without any express or implied
-;;; warranty. In no event will the authors be held liable for any
-;;; damages arising from the use of this software.
-;;;
-;;; Permission is granted to anyone to use this software for any
-;;; purpose, including commercial applications, and to alter it and
-;;; redistribute it freely, subject to the following restrictions:
-;;;
-;;; 1. The origin of this software must not be misrepresented; you must
-;;;    not claim that you wrote the original software. If you use this
-;;;    software in a product, an acknowledgment in the product
-;;;    documentation would be appreciated but is not required.
-;;;
-;;; 2. Altered source versions must be plainly marked as such, and must
-;;;    not be misrepresented as being the original software.
-;;;
-;;; 3. This notice may not be removed or altered from any source
-;;;    distribution.