* gnu/packages/gnome.scm (gvfs): New variable.
---
gnu/packages/gnome.scm | 55 ++
1 file changed, 55 insertions(+)
diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 0feb5b4..d44cb80 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -83,6 +83,9 @@
#:use-module (gnu packages backup)
#:use-module (gnu packages nettle)
#:use-module (gnu packages ncurses)
+ #:use-module (gnu packages video)
+ #:use-module (gnu packages cdrom)
+ #:use-module (gnu packages samba)
#:use-module (srfi srfi-1))
(define-public brasero
@@ -3107,3 +3110,55 @@ supports image conversion, rotation, and slideshows.")
"This library provides GObject bindings for libudev. It was originally
part of udev-extras, then udev, then systemd. It's now a project on its own.")
(license license:lgpl2.1+)))
+
+(define-public gvfs
+ (package
+(name "gvfs")
+(version "1.24.1")
+(source (origin
+ (method url-fetch)
+ (uri (string-append "mirror://gnome/sources/" name "/"
+ (version-major+minor version) "/"
+ name "-" version ".tar.xz"))
+ (sha256
+ (base32
+"1ygiknnd24qgzds8wif3jns981mqr65lgjlxs5pw65cl3376g0yk"
+(build-system gnu-build-system)
+(arguments
+ '(#:tests? #f)) ; XXX: requiring `pidof'
+(native-inputs
+ `(("glib:bin" ,glib "bin") ; for glib-genmarshal, etc.
+ ("intltool" ,intltool)
+ ("pkg-config" ,pkg-config)
+ ("xsltproc" ,libxslt)))
+(inputs
+ `(("avahi" ,avahi)
+ ("docbook-xml" ,docbook-xml-4.2)
+ ("docbook-xsl" ,docbook-xsl)
+ ("dbus" ,dbus)
+ ("fuse" ,fuse)
+ ("glib" ,glib)
+ ("libarchive" ,libarchive)
+ ("libbluray" ,libbluray)
+ ("libcdio-paranoia" ,libcdio-paranoia)
+ ("libgcrypt" ,libgcrypt)
+ ("libgphoto2" ,libgphoto2)
+ ("libgudev" ,libgudev)
+ ("libmtp" ,libmtp)
+ ("libsecret" ,libsecret)
+ ("libsoup" ,libsoup)
+ ("libxml2" ,libxml2)
+ ("nettle" ,nettle) ; XXX: required by libarchive.pc
+ ("libsmbclient" ,samba)
+ ("udisks" ,udisks)))
+(home-page "https://wiki.gnome.org/gvfs/";)
+(synopsis "Userspace virtual filesystem for GIO")
+(description
+ "GVFS is a userspace virtual filesystem designed to work with the I/O
+abstraction of GIO. It contains a GIO module that seamlessly adds GVFS support
+to all applications using the GIO API. It also supports exposing the GVFS
+mounts to non-GIO applications using FUSE.
+
+GVFS comes with a set of backends, including trash support, SFTP, SMB, HTTP,
+DAV, and others.")
+(license license:lgpl2.0+)))
--
2.4.3
