From mboxrd@z Thu Jan 1 00:00:00 1970 From: Eric Bavier Subject: [PATCH] gnu: conkeror: install conkeror-spawn-helper. Date: Tue, 07 Oct 2014 17:35:24 -0500 Message-ID: <878ukrwlsj.fsf@member.fsf.org> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:38866) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XbdKC-0005Z7-1A for guix-devel@gnu.org; Tue, 07 Oct 2014 18:33:48 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1XbdK7-0002E5-Or for guix-devel@gnu.org; Tue, 07 Oct 2014 18:33:43 -0400 Received: from mail-ig0-x22a.google.com ([2607:f8b0:4001:c05::22a]:33990) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XbdK7-0002DX-D6 for guix-devel@gnu.org; Tue, 07 Oct 2014 18:33:39 -0400 Received: by mail-ig0-f170.google.com with SMTP id l13so7616071iga.1 for ; Tue, 07 Oct 2014 15:33:38 -0700 (PDT) Received: from cooper.gmail.com (chippewa-nat.cray.com. [136.162.34.1]) by mx.google.com with ESMTPSA id k6sm13092816ige.13.2014.10.07.15.33.37 for (version=TLSv1.2 cipher=RC4-SHA bits=128/128); Tue, 07 Oct 2014 15:33:37 -0700 (PDT) List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org To: guix-devel@gnu.org --=-=-= This patch to the conkeror package builds and installs the conkeror-spawn-helper executable. With it, you should be able to do things like launch evince to view a pdf link. --=-=-= Content-Type: text/x-diff; charset=utf-8 Content-Disposition: inline; filename=0001-gnu-conkeror-install-conkeror-spawn-helper.patch Content-Transfer-Encoding: 8bit >From 16e2259eb3860686a30d40e94c4c5bd39d60dfe0 Mon Sep 17 00:00:00 2001 From: Eric Bavier Date: Tue, 7 Oct 2014 17:33:00 -0500 Subject: [PATCH] gnu: conkeror: install conkeror-spawn-helper. * gnu/packages/conkeror.scm (conkeror)[build-system]: Change to gnu-build-system. Adjust arguments accordingly. [inputs]: Remove now-implicit bash. [native-inputs]: Remove now-implicit tar and gzip. [description]: Fix two-space-after-end-of-sentence. Remove comment about separate conkeror-spawn-process-helper package. --- gnu/packages/conkeror.scm | 79 ++++++++++++++++++++------------------------- 1 file changed, 35 insertions(+), 44 deletions(-) diff --git a/gnu/packages/conkeror.scm b/gnu/packages/conkeror.scm index d39bcf2..51bb1a2 100644 --- a/gnu/packages/conkeror.scm +++ b/gnu/packages/conkeror.scm @@ -1,5 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2014 Cyrill Schenkel +;;; Copyright © 2014 Eric Bavier ;;; ;;; This file is part of GNU Guix. ;;; @@ -20,13 +21,9 @@ #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) #:use-module (guix download) - #:use-module (guix build-system trivial) + #:use-module (guix build-system gnu) #:use-module (gnu packages) - #:use-module (gnu packages gnuzilla) - #:use-module (gnu packages base) - #:use-module (gnu packages bash) - #:use-module (gnu packages compression) - #:use-module (ice-9 format)) + #:use-module (gnu packages gnuzilla)) (define-public conkeror (package @@ -41,52 +38,46 @@ (sha256 (base32 "1cgjzi7g3g22zcx6bpfnid4i12sb45w6icmxdzjn8d3c0m8qsyp1")))) - (build-system trivial-build-system) - (inputs `(("icecat" ,icecat) - ("bash" ,bash))) - (native-inputs `(("tar" ,tar) - ("gzip" ,gzip))) + (build-system gnu-build-system) + (inputs `(("icecat" ,icecat))) (arguments - `(#:modules ((guix build utils)) - #:builder (begin - (use-modules (ice-9 ftw) - (guix build utils)) - (let ((select? - (lambda (name) - (not (equal? (car (string->list name)) #\.)))) - (datadir (string-append %output "/share/conkeror")) - (launcher "bin/conkeror")) - (setenv "PATH" (string-append - (assoc-ref %build-inputs "tar") "/bin:" - (assoc-ref %build-inputs "gzip") "/bin")) - (system* "tar" "xvf" (assoc-ref %build-inputs "source")) - (copy-recursively (string-append - (getcwd) "/" - (car (scandir (getcwd) select?))) - datadir) - (chdir %output) - (mkdir "bin") - (call-with-output-file launcher - (lambda (p) - (format p "#!~a/bin/bash + `(#:tests? #f ;no tests + #:make-flags '("CC=gcc") + #:phases + (alist-delete + 'configure + (alist-replace + 'install + (lambda _ + (begin + (use-modules (guix build utils)) + (let* ((datadir (string-append %output "/share/conkeror")) + (bindir (string-append %output "/bin")) + (launcher (string-append bindir "/conkeror")) + (spawn (string-append bindir "/conkeror-spawn-helper"))) + (copy-recursively "." datadir) + (mkdir-p bindir) + (copy-file "conkeror-spawn-helper" spawn) + (call-with-output-file launcher + (lambda (p) + (format p "#!~a/bin/bash exec ~a/bin/icecat --app ~a \"$@\"~%" - (assoc-ref %build-inputs "bash") - (assoc-ref %build-inputs "icecat") - (string-append datadir - "/application.ini")))) - (chmod launcher #o555))))) + (assoc-ref %build-inputs "bash") ;implicit input + (assoc-ref %build-inputs "icecat") + (string-append datadir + "/application.ini")))) + (chmod launcher #o555)))) + %standard-phases)))) (synopsis "Keyboard focused web browser with Emacs look and feel") (description "Conkeror is a highly-programmable web browser based on -Mozilla XULRunner which is the base of all Mozilla products including -Firefox. Conkeror has a sophisticated keyboard system for running commands and -interacting with web page content, modelled after Emacs and Lynx. It is +Mozilla XULRunner which is the base of all Mozilla products including Firefox. +Conkeror has a sophisticated keyboard system for running commands and +interacting with web page content, modelled after Emacs and Lynx. It is self-documenting and extensible with JavaScript. It comes with builtin support for several Web 2.0 sites like several Google services (Search, Gmail, Maps, Reader, etc.), Del.icio.us, Reddit, Last.fm and -YouTube. For easier editing of form fields, it can spawn external editors. For -this feature the recommended conkeror-spawn-process-helper package needs to be -installed.") +YouTube. For easier editing of form fields, it can spawn external editors.") (home-page "http://conkeror.org") ;; Conkeror is triple licensed. (license (list license:gpl2 -- 1.7.9.5 --=-=-= -- Eric Bavier --=-=-=--