1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
| | (define-module (fpm2)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix build-system gnu)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages gtk)
#:use-module (gnu packages gnupg)
#:use-module (gnu packages xml)
#:use-module (gnu packages glib))
(define-public fpm2
(package
(name "fpm2")
(version "0.79")
(source (origin
(method url-fetch)
(uri (string-append "https://als.regnet.cz/fpm2/download/fpm2-"
version ".tar.bz2"))
(sha256
(base32
"19sdy1lygfhkg5nxi2w9a4d9kwvw24nxp0ix0p0lz91qpvk9qpnm"))))
(build-system gnu-build-system)
(inputs `(("gtk2" ,gtk+-2)
("gnupg" ,gnupg)
("libxml2" ,libxml2)))
(native-inputs `(("pkgconfig" ,pkg-config)
("intltool" ,intltool)))
(arguments
`(#:phases
(modify-phases %standard-phases
(add-before
'configure 'pre-configure
(lambda _
(let* ((poinc (open-output-file "po/POTFILES.in")))
(begin
(newline poinc)
(display "data/fpm2.desktop.in" poinc)
(newline poinc)
(display "data/fpm2.desktop.in.in" poinc)
(newline poinc)
(display "fpm2.glade" poinc)
(newline poinc)
(display "src/callbacks.c" poinc)
(newline poinc)
(display "src/fpm.c" poinc)
(newline poinc)
(display "src/fpm_file.c" poinc)
(newline poinc)
(display "src/interface.c" poinc)
(newline poinc)
(display "src/support.c" poinc)
(newline poinc)
(display "fpm2.glade" poinc)
(newline poinc)
(close-port poinc))))))))
(synopsis "Manages, generates and stores passwords encrypted")
(description "FPM2 is GTK2 port from Figaro's Password Manager
originally developed by John Conneely, with some new enhancements.
Upstream development seems to have stopped. It is therefore recommended
to use a different password manager. ")
(home-page "https://als.regnet.cz/fpm2/")
(license license:gpl2)))
|