guix-more/more/packages/collection.scm

collection.scm

1
;;; GNU Guix --- Functional package management for GNU
2
;;; Copyright © 2017 Julien Lepiller <julien@lepiller.eu>
3
;;;
4
;;; This file is part of GNU Guix.
5
;;;
6
;;; GNU Guix is free software; you can redistribute it and/or modify it
7
;;; under the terms of the GNU General Public License as published by
8
;;; the Free Software Foundation; either version 3 of the License, or (at
9
;;; your option) any later version.
10
;;;
11
;;; GNU Guix is distributed in the hope that it will be useful, but
12
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
13
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14
;;; GNU General Public License for more details.
15
;;;
16
;;; You should have received a copy of the GNU General Public License
17
;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
18
19
(define-module (more packages collection)
20
  #:use-module ((guix licenses) #:prefix license:)
21
  #:use-module (gnu packages)
22
  #:use-module (guix packages)
23
  #:use-module (guix download)
24
  #:use-module (guix git-download)
25
  #:use-module (guix utils)
26
  #:use-module (guix build-system gnu)
27
  #:use-module (gnu packages compression)
28
  #:use-module (gnu packages gd)
29
  #:use-module (gnu packages glib)
30
  #:use-module (gnu packages gtk)
31
  #:use-module (gnu packages perl)
32
  #:use-module (gnu packages perl-compression)
33
  #:use-module (gnu packages web)
34
  #:use-module (gnu packages xml))
35
36
(define-public unrar
37
  (package
38
    (name "unrar")
39
    (version "0.0.1")
40
    (source (origin
41
              (method url-fetch)
42
              (uri "http://deb.debian.org/debian/pool/main/u/unrar-free/unrar-free_0.0.1+cvs20140707.orig.tar.gz")
43
              (sha256
44
               (base32
45
                "18yvsa6k3pc0axl7j089jf5d8hya1zb68s2igm5z3xxbcagrzfih"))))
46
    (build-system gnu-build-system)
47
    (home-page "")
48
    (synopsis "")
49
    (description "")
50
    (license license:gpl2+)))
51
52
(define-public gcstar
53
  (package
54
    (name "gcstar")
55
    (version "1.7.1")
56
    (source (origin
57
              (method url-fetch)
58
              (uri (string-append "http://download.gna.org/gcstar/gcstar-"
59
                                  version ".tar.gz"))
60
              (sha256
61
               (base32
62
                "0gcz88slgm14rlsw84gpka7hpdmrdvpdvxp9qvs45gv1383r0b6s"))))
63
    (build-system gnu-build-system)
64
    (arguments
65
     `(#:phases
66
       (modify-phases %standard-phases
67
         (delete 'configure)
68
         (delete 'build)
69
         (delete 'check)
70
         (replace 'install
71
           (lambda* (#:key outputs #:allow-other-keys)
72
             (mkdir-p %output)
73
             (format #t "calling install script\n")
74
             (zero? (system* "perl" "install" "--verbose"
75
                            (string-append "--prefix=" (assoc-ref outputs "out")))))))))
76
    (native-inputs
77
     `(("perl" ,perl)))
78
    (propagated-inputs
79
     `(("perl-gtk2" ,perl-gtk2)
80
       ("perl-pango" ,perl-pango)
81
       ("perl-archive-zip" ,perl-archive-zip)
82
       ("perl-date-calc" ,perl-date-calc)
83
       ("perl-datetime-format-strptime" ,perl-datetime-format-strptime)
84
       ("perl-libwww" ,perl-libwww)
85
       ("perl-switch" ,perl-switch)
86
       ("perl-gd" ,perl-gd)
87
       ("perl-http-cookies" ,perl-http-cookies)
88
       ("perl-http-date" ,perl-http-date)
89
       ("perl-http-message" ,perl-http-message)
90
       ("perl-xml-libxml" ,perl-xml-libxml)
91
       ("perl-xml-simple" ,perl-xml-simple)
92
       ("perl-xml-parser" ,perl-xml-parser)
93
       ("perl-glib" ,perl-glib)))
94
    (home-page "http://www.gcstar.org")
95
    (synopsis "Collection management")
96
    (description
97
      "GCstar is a free open source application for managing your collections.
98
Detailed information on each item can be automatically retrieved from the
99
internet and you can store additional data, such as the location or who you've
100
lent it to.  You may also search and filter your collection by many criteria.")
101
    (license license:gpl2+)))
102