Browse Source
* gnu-system.am (GNU_SYSTEM_MODULES): Add new package. * gnu/packages/conkeror.scm: New file. Signed-off-by: Ludovic Courtès <ludo@gnu.org>version-0.8.3

committed by
Ludovic Courtès

2 changed files with 96 additions and 0 deletions
@ -0,0 +1,95 @@ |
|||
;;; GNU Guix --- Functional package management for GNU |
|||
;;; Copyright © 2014 Cyrill Schenkel <cyrill.schenkel@gmail.com> |
|||
;;; |
|||
;;; This file is part of GNU Guix. |
|||
;;; |
|||
;;; GNU Guix 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. |
|||
;;; |
|||
;;; GNU Guix 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 Guix. If not, see <http://www.gnu.org/licenses/>. |
|||
|
|||
(define-module (gnu packages conkeror) |
|||
#:use-module ((guix licenses) #:prefix license:) |
|||
#:use-module (guix packages) |
|||
#:use-module (guix download) |
|||
#:use-module (guix build-system trivial) |
|||
#: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)) |
|||
|
|||
(define-public conkeror |
|||
(package |
|||
(name "conkeror") |
|||
(version "1.0pre1") |
|||
(source (origin |
|||
(method url-fetch) |
|||
(uri |
|||
(string-append "http://repo.or.cz/w/conkeror.git/snapshot/" |
|||
"8a26fff5896a3360549e2adfbf06b1d57e909266" |
|||
".tar.gz")) ; tag: debian-1.0--pre-1+git140616-1 |
|||
(sha256 |
|||
(base32 |
|||
"1cgjzi7g3g22zcx6bpfnid4i12sb45w6icmxdzjn8d3c0m8qsyp1")))) |
|||
(build-system trivial-build-system) |
|||
(inputs `(("icecat" ,icecat) |
|||
("bash" ,bash))) |
|||
(native-inputs `(("tar" ,tar) |
|||
("gzip" ,gzip))) |
|||
(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 |
|||
exec ~a/bin/icecat --app ~a \"$@\"~%" |
|||
(assoc-ref %build-inputs "bash") |
|||
(assoc-ref %build-inputs "icecat") |
|||
(string-append datadir |
|||
"/application.ini")))) |
|||
(chmod launcher #o555))))) |
|||
(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 |
|||
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.") |
|||
(home-page "http://conkeror.org") |
|||
;; Conkeror is triple licensed. |
|||
(license (list license:gpl2 |
|||
license:lgpl2.1 |
|||
;; MPL 1.1 -- this license is not GPL compatible |
|||
)))) |
Loading…
Reference in new issue