From 2a76be1026213ae3ec6c679c2963e730e2db2751 Mon Sep 17 00:00:00 2001 From: Andreas Gerler Date: Fri, 31 Jan 2020 17:57:13 +0100 Subject: [PATCH] update treepy --- elpa/treepy-20180724.656/treepy-pkg.el | 2 -- .../treepy-autoloads.el | 0 elpa/treepy-20191108.2217/treepy-pkg.el | 2 ++ .../treepy.el | 9 +++++---- elpa/treepy-readme.txt | 19 +++++++++++++++++++ 5 files changed, 26 insertions(+), 6 deletions(-) delete mode 100644 elpa/treepy-20180724.656/treepy-pkg.el rename elpa/{treepy-20180724.656 => treepy-20191108.2217}/treepy-autoloads.el (100%) create mode 100644 elpa/treepy-20191108.2217/treepy-pkg.el rename elpa/{treepy-20180724.656 => treepy-20191108.2217}/treepy.el (98%) create mode 100644 elpa/treepy-readme.txt diff --git a/elpa/treepy-20180724.656/treepy-pkg.el b/elpa/treepy-20180724.656/treepy-pkg.el deleted file mode 100644 index 6734e3c0..00000000 --- a/elpa/treepy-20180724.656/treepy-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; -*- no-byte-compile: t -*- -(define-package "treepy" "20180724.656" "Generic tree traversal tools" '((emacs "25.1")) :commit "b40e6b09eb9be45da67b8c9e4990a5a0d7a2a09d" :keywords '("lisp" "maint" "tools") :authors '(("Daniel Barreto" . "daniel.barreto.n@gmail.com")) :maintainer '("Daniel Barreto" . "daniel.barreto.n@gmail.com") :url "https://github.com/volrath/treepy.el") diff --git a/elpa/treepy-20180724.656/treepy-autoloads.el b/elpa/treepy-20191108.2217/treepy-autoloads.el similarity index 100% rename from elpa/treepy-20180724.656/treepy-autoloads.el rename to elpa/treepy-20191108.2217/treepy-autoloads.el diff --git a/elpa/treepy-20191108.2217/treepy-pkg.el b/elpa/treepy-20191108.2217/treepy-pkg.el new file mode 100644 index 00000000..196fcdc4 --- /dev/null +++ b/elpa/treepy-20191108.2217/treepy-pkg.el @@ -0,0 +1,2 @@ +;;; -*- no-byte-compile: t -*- +(define-package "treepy" "20191108.2217" "Generic tree traversal tools" '((emacs "25.1")) :commit "306f7031d26e4ebfc9ff36614acdc6993f3e23c3" :keywords '("lisp" "maint" "tools") :authors '(("Daniel Barreto" . "daniel.barreto.n@gmail.com")) :maintainer '("Daniel Barreto" . "daniel.barreto.n@gmail.com") :url "https://github.com/volrath/treepy.el") diff --git a/elpa/treepy-20180724.656/treepy.el b/elpa/treepy-20191108.2217/treepy.el similarity index 98% rename from elpa/treepy-20180724.656/treepy.el rename to elpa/treepy-20191108.2217/treepy.el index d7df4c43..b98ba140 100644 --- a/elpa/treepy-20180724.656/treepy.el +++ b/elpa/treepy-20191108.2217/treepy.el @@ -7,7 +7,7 @@ ;; Description: Generic Tree Traversing Tools ;; Author: Daniel Barreto ;; Keywords: lisp, maint, tools -;; Package-Version: 20180724.656 +;; Package-Version: 20191108.2217 ;; Created: Mon Jul 10 15:17:36 2017 (+0200) ;; Version: 0.1.1 ;; Package-Requires: ((emacs "25.1")) @@ -42,6 +42,7 @@ ;;; Code: (require 'map) +(require 'cl-lib) ;;; Walk (recursive tree traversal) @@ -288,7 +289,7 @@ nil if there's no more right sibilings." (defun treepy-rightmost (loc) "Return the loc of the rightmost sibling of the node at this LOC. -If LOC is already the rightmost sibiling, return self." +If LOC is already the rightmost sibling, return self." (treepy--with-loc loc (node context l r) (if (and context r) (treepy--with-meta @@ -314,7 +315,7 @@ nil if no more left sibilings." (defun treepy-leftmost (loc) "Return the loc of the leftmost sibling of the node at this LOC. -If LOC is already the leftmost sibiling, return self." +If LOC is already the leftmost sibling, return self." (treepy--with-loc loc (node context l r) (if (and context l) (treepy--with-meta @@ -335,7 +336,7 @@ If LOC is already the leftmost sibiling, return self." ;;;; Modification (defun treepy-insert-left (loc item) - "Insert as the left sibiling of this LOC'S node the ITEM. + "Insert as the left sibling of this LOC'S node the ITEM. Return same loc with sibilings updated." (treepy--with-loc loc (node context l) (if (not context) diff --git a/elpa/treepy-readme.txt b/elpa/treepy-readme.txt new file mode 100644 index 00000000..beb415fc --- /dev/null +++ b/elpa/treepy-readme.txt @@ -0,0 +1,19 @@ +Generic tools for recursive and iterative tree traversal based on +clojure.walk and clojure.zip respectively. Depends on `map', a map +manipulation library built in Emacs 25.1. All functions are prefixed +with "treepy-" + + + +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 +the Free Software Foundation, either version 3 of the License, or (at +your option) any later version. + +This program is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +General Public License for more details. + +You should have received a copy of the GNU General Public License +along with GNU Emacs. If not, see . -- 2.47.3