From 6b67933351430af9e85c3ec6f740eaffe2630768 Mon Sep 17 00:00:00 2001 From: cage Date: Sun, 5 Dec 2021 15:34:08 +0100 Subject: [PATCH] - added license; - fixed copyright year. --- LICENSES.org | 54 ++++++++++++++++++++++++++++++++- src/filesystem-tree-window.lisp | 2 +- src/misc-utils.lisp | 2 +- 3 files changed, 55 insertions(+), 3 deletions(-) diff --git a/LICENSES.org b/LICENSES.org index 9110a1a..9610df5 100644 --- a/LICENSES.org +++ b/LICENSES.org @@ -235,7 +235,7 @@ CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. -- misc.lisp uses code derived from: + uses code derived from: local-time Copyright (c) 2005-2012 by Daniel Lowe Permission is hereby granted, free of charge, to any person @@ -258,6 +258,58 @@ CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. + uses code derived from: + local-time Copyright (c) 2005-2012 by Daniel Lowe + + Permission is hereby granted, free of charge, to any person + obtaining a copy of this software and associated documentation files + (the "Software"), to deal in the Software without restriction, + including without limitation the rights to use, copy, modify, merge, + publish, distribute, sublicense, and/or sell copies of the Software, + and to permit persons to whom the Software is furnished to do so, + subject to the following conditions: + + The above copyright notice and this permission notice shall be + included in all copies or substantial portions of the Software. + + THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, + EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF + MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND + NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS + BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN + ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN + CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE + SOFTWARE. + + uses code derived from: + + quicklisp controller Copyright (c) 2013 Zachary Beane + , All Rights Reserved + + Redistribution and use in source and binary forms, with or without + modification, are permitted provided that the following conditions + are met: + + * Redistributions of source code must retain the above copyright + notice, this list of conditions and the following disclaimer. + + * Redistributions in binary form must reproduce the above + copyright notice, this list of conditions and the following + disclaimer in the documentation and/or other materials + provided with the distribution. + + THIS SOFTWARE IS PROVIDED BY THE AUTHOR 'AS IS' AND ANY EXPRESSED + OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED + WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY + DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE + GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS + INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, + WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING + NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS + SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. + - src/complete.lisp derived from linedit Copyright (c) 2003, 2004 Nikodemus Siivola, Julian Squires diff --git a/src/filesystem-tree-window.lisp b/src/filesystem-tree-window.lisp index dc495e7..7a53283 100644 --- a/src/filesystem-tree-window.lisp +++ b/src/filesystem-tree-window.lisp @@ -1,5 +1,5 @@ ;; tinmop: an humble gemini and pleroma client -;; Copyright (C) 2020 cage +;; Copyright (C) 2021 cage ;; This program is free software: you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by diff --git a/src/misc-utils.lisp b/src/misc-utils.lisp index dd897d4..24f9a2d 100644 --- a/src/misc-utils.lisp +++ b/src/misc-utils.lisp @@ -1016,7 +1016,7 @@ to the array" (format nil "https://github.com/edicl/~a.git" system-name))) ((string= (first fields) "kmr-git") (format t "~a ~a ~a~%" system-name "git" - (format nil "http://git.kpe.io/~A.git" system-name))) + (format nil "http://git.kpe.io/~a.git" system-name))) (t (format t "~a ~a ~a~%" system-name (first fields) (second fields)))) (format t "!error: ~a~%" system-name))))))