From f3cf25c3c2aef91a47b790fe69b5008cdb6a6316 Mon Sep 17 00:00:00 2001 From: Eric Bavier Date: Fri, 7 Apr 2017 08:49:43 -0500 Subject: gnu: torsocks: Patch references to 'getcap' and 'which'. * gnu/packages/tor.scm (torsocks)[inputs,arguments]: New fields. --- gnu/packages/tor.scm | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) (limited to 'gnu') diff --git a/gnu/packages/tor.scm b/gnu/packages/tor.scm index e48017e640..06b6c4febc 100644 --- a/gnu/packages/tor.scm +++ b/gnu/packages/tor.scm @@ -4,6 +4,7 @@ ;;; Copyright © 2016 Efraim Flashner ;;; Copyright © 2016, 2017 ng0 ;;; Copyright © 2017 Tobias Geerinckx-Rice +;;; Copyright © 2017 Eric Bavier ;;; ;;; This file is part of GNU Guix. ;;; @@ -28,7 +29,9 @@ (define-module (gnu packages tor) #:use-module (guix build-system gnu) #:use-module (guix build-system python) #:use-module (gnu packages) + #:use-module (gnu packages base) #:use-module (gnu packages libevent) + #:use-module (gnu packages linux) #:use-module (gnu packages compression) #:use-module (gnu packages pcre) #:use-module (gnu packages python) @@ -88,6 +91,19 @@ (define-public torsocks (base32 "0byr9ga9w79qz4vp0m11sbmspad7fsal9wm67r4znzb7zb7cis19")))) (build-system gnu-build-system) + (inputs + `(("which" ,which) + ("libcap" ,libcap))) + (arguments + `(#:phases (modify-phases %standard-phases + (add-after 'build 'absolutize + (lambda* (#:key inputs #:allow-other-keys) + (substitute* "src/bin/torsocks" + (("getcap=`.*`") + (string-append "getcap=" (which "getcap"))) + (("`which") + (string-append "`" (which "which")))) + #t))))) (home-page "https://www.torproject.org/") (synopsis "Use socks-friendly applications with Tor") (description -- cgit v1.2.3