From 1ca0ac1e8080457cea374025a3ab07e477d41dc2 Mon Sep 17 00:00:00 2001 From: Eric Bavier Date: Thu, 4 Jan 2018 14:15:07 -0600 Subject: gnu: Add fasd. * gnu/packages/admin.scm (fasd): New variable. --- gnu/packages/admin.scm | 29 +++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) (limited to 'gnu/packages/admin.scm') diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm index 6a7bed3892..d055b4bb50 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm @@ -1646,6 +1646,35 @@ (define-public autojump frequently used directories by typing only a small pattern.") (license license:gpl3+))) +(define-public fasd + (package + (name "fasd") + (version "1.0.1") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/clvv/fasd.git") + (commit version))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1awi71jdv3mhjrmar2d4z1i90kn7apd7aq1w31sh6w4yibz9kiyj")))) + (build-system gnu-build-system) + (arguments + `(#:phases (modify-phases %standard-phases + (delete 'configure)) ;no configuration + #:tests? #f ;no tests + #:make-flags (list (string-append "PREFIX=" %output)))) + (home-page "https://github.com/clvv/fasd") + (synopsis "Quick access to files and directories for shells") + (description + "Fasd (pronounced similar to \"fast\") is a command-line productivity +booster. Fasd offers quick access to files and directories for POSIX shells. +It is inspired by tools like autojump, z, and v. Fasd keeps track of files +and directories you have accessed so that you can quickly reference them in +the command line.") + (license license:x11))) + (define-public iftop (package (name "iftop") -- cgit v1.2.3 From fe4adc12edd06abd6c01d82998a23363404be03a Mon Sep 17 00:00:00 2001 From: Marius Bakke Date: Sun, 15 Apr 2018 12:31:49 +0200 Subject: gnu: htop: Update to 2.2.0. * gnu/packages/patches/htop-fix-process-tree.patch: Delete file. * gnu/local.mk (dist_patch_DATA): Remove it. * gnu/packages/admin.scm (htop): Update to 2.2.0. [source](patches): Remove. --- gnu/local.mk | 1 - gnu/packages/admin.scm | 5 +- gnu/packages/patches/htop-fix-process-tree.patch | 99 ------------------------ 3 files changed, 2 insertions(+), 103 deletions(-) delete mode 100644 gnu/packages/patches/htop-fix-process-tree.patch (limited to 'gnu/packages/admin.scm') diff --git a/gnu/local.mk b/gnu/local.mk index 295c83ee37..5c88240047 100644 --- a/gnu/local.mk +++ b/gnu/local.mk @@ -782,7 +782,6 @@ dist_patch_DATA = \ %D%/packages/patches/heimdal-CVE-2017-11103.patch \ %D%/packages/patches/hmmer-remove-cpu-specificity.patch \ %D%/packages/patches/higan-remove-march-native-flag.patch \ - %D%/packages/patches/htop-fix-process-tree.patch \ %D%/packages/patches/hubbub-sort-entities.patch \ %D%/packages/patches/hurd-fix-eth-multiplexer-dependency.patch \ %D%/packages/patches/hydra-disable-darcs-test.patch \ diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm index d055b4bb50..d0cf8022d2 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm @@ -261,15 +261,14 @@ (define-public dfc (define-public htop (package (name "htop") - (version "2.1.0") + (version "2.2.0") (source (origin (method url-fetch) (uri (string-append "http://hisham.hm/htop/releases/" version "/htop-" version ".tar.gz")) (sha256 (base32 - "0j07z0xm2gj1vzvbgh4323k4db9mr7drd7gw95mmpqi61ncvwq1j")) - (patches (search-patches "htop-fix-process-tree.patch")))) + "0mrwpb3cpn3ai7ar33m31yklj64c3pp576vh1naqff6f21pq5mnr")))) (build-system gnu-build-system) (inputs `(("ncurses" ,ncurses))) diff --git a/gnu/packages/patches/htop-fix-process-tree.patch b/gnu/packages/patches/htop-fix-process-tree.patch deleted file mode 100644 index d8e5e2ccac..0000000000 --- a/gnu/packages/patches/htop-fix-process-tree.patch +++ /dev/null @@ -1,99 +0,0 @@ -From 2971a187551e062ffefdab965f55377b36cd94eb Mon Sep 17 00:00:00 2001 -From: Tobias Geerinckx-Rice -Date: Wed, 21 Feb 2018 06:00:50 +0100 -Subject: [PATCH] Fix process tree -MIME-Version: 1.0 -Content-Type: text/plain; charset=UTF-8 -Content-Transfer-Encoding: 8bit - -This manually reverts: - - commit 584a9bceab948590dabd189d234a86e6bf4ec3f4 - Author: wangqr - Date: Fri Sep 1 21:27:24 2017 +0800 - - Find roots when constructing process tree, fix #587 - -which breaks the process tree (‘t’) view in at least some cases. -I will investigate further... ---- - ProcessList.c | 63 +++++++++++++++++------------------------------------------ - 1 file changed, 18 insertions(+), 45 deletions(-) - -diff --git a/ProcessList.c b/ProcessList.c -index 48b2d95..225253d 100644 ---- a/ProcessList.c -+++ b/ProcessList.c -@@ -213,51 +213,24 @@ void ProcessList_sort(ProcessList* this) { - // Restore settings - this->settings->sortKey = sortKey; - this->settings->direction = direction; -- int vsize = Vector_size(this->processes); -- // Find all processes whose parent is not visible -- int size; -- while ((size = Vector_size(this->processes))) { -- int i; -- for (i = 0; i < size; i++) { -- Process* process = (Process*)(Vector_get(this->processes, i)); -- // Immediately consume not shown processes -- if (!process->show) { -- process = (Process*)(Vector_take(this->processes, i)); -- process->indent = 0; -- Vector_add(this->processes2, process); -- ProcessList_buildTree(this, process->pid, 0, 0, direction, false); -- break; -- } -- pid_t ppid = process->tgid == process->pid ? process->ppid : process->tgid; -- // Bisect the process vector to find parent -- int l = 0, r = size; -- // If PID corresponds with PPID (e.g. "kernel_task" (PID:0, PPID:0) -- // on Mac OS X 10.11.6) cancel bisecting and regard this process as -- // root. -- if (process->pid == ppid) -- r = 0; -- while (l < r) { -- int c = (l + r) / 2; -- pid_t pid = ((Process*)(Vector_get(this->processes, c)))->pid; -- if (ppid == pid) { -- break; -- } else if (ppid < pid) { -- r = c; -- } else { -- l = c + 1; -- } -- } -- // If parent not found, then construct the tree with this root -- if (l >= r) { -- process = (Process*)(Vector_take(this->processes, i)); -- process->indent = 0; -- Vector_add(this->processes2, process); -- ProcessList_buildTree(this, process->pid, 0, 0, direction, process->showChildren); -- break; -- } -- } -- // There should be no loop in the process tree -- assert(i < size); -+ -+ // Take PID 1 as root and add to the new listing -+ int vsize = Vector_size(this->processes); -+ Process* init = (Process*) (Vector_take(this->processes, 0)); -+ if (!init) return; -+ // This assertion crashes on hardened kernels. -+ // I wonder how well tree view works on those systems. -+ // assert(init->pid == 1); -+ init->indent = 0; -+ Vector_add(this->processes2, init); -+ // Recursively empty list -+ ProcessList_buildTree(this, init->pid, 0, 0, direction, true); -+ // Add leftovers -+ while (Vector_size(this->processes)) { -+ Process* p = (Process*) (Vector_take(this->processes, 0)); -+ p->indent = 0; -+ Vector_add(this->processes2, p); -+ ProcessList_buildTree(this, p->pid, 0, 0, direction, p->showChildren); - } - assert(Vector_size(this->processes2) == vsize); (void)vsize; - assert(Vector_size(this->processes) == 0); --- -2.16.2 - -- cgit v1.2.3 From 1b0be8c506753a83b30c0d8609fd98e9c73463bc Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Sat, 14 Apr 2018 20:16:44 +0200 Subject: gnu: di: Update to 4.46. * gnu/packages/admin.scm (di): Update to 4.46. --- gnu/packages/admin.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gnu/packages/admin.scm') diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm index d0cf8022d2..2cab8e74e4 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm @@ -1929,13 +1929,13 @@ (define-public thefuck (define-public di (package (name "di") - (version "4.44") + (version "4.46") (source (origin (method url-fetch) (uri (string-append "https://gentoo.com/di/di-" version ".tar.gz")) (sha256 - (base32 "0803lp8kd3mp1jcm17i019xiqxdy85hhs6xk67zib8gmvg500gcn")))) + (base32 "0cskiqywiqkw44zdg4q78bjns6jjp1dz5lzdxrhpnpldc6075irw")))) (build-system gnu-build-system) (arguments `(#:tests? #f ; Obscure test failures. -- cgit v1.2.3