Paste number 166181: WIP gparted

Paste number 166181: WIP gparted
Pasted by: lfam
When:5 years, 11 months ago
Share:Tweet this! | http://paste.lisp.org/+3K85
Channel:None
Paste contents:
Raw Source | XML | Display As
From a586f94cf744b48fbf48c6f344716b6a1883306f Mon Sep 17 00:00:00 2001
Message-Id: <a586f94cf744b48fbf48c6f344716b6a1883306f.1449695506.git.leo@famulari.name>
From: x
Date: Wed, 9 Dec 2015 16:11:32 -0500
Subject: [PATCH 1/1] WIP gparted

---
 gnu/packages/disk.scm | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)

diff --git a/gnu/packages/disk.scm b/gnu/packages/disk.scm
index 9d3e2f9..49a53c7 100644
--- a/gnu/packages/disk.scm
+++ b/gnu/packages/disk.scm
@@ -24,8 +24,11 @@
   #:use-module (guix download)
   #:use-module (guix build-system gnu)
   #:use-module (gnu packages gettext)
+  #:use-module (gnu packages glib)
+  #:use-module (gnu packages gtk)
   #:use-module (gnu packages linux)
   #:use-module (gnu packages perl)
+  #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages python)
   #:use-module (gnu packages readline)
   #:use-module (gnu packages guile)
@@ -145,3 +148,33 @@ to recover data more efficiently by only reading the necessary blocks.")
      "The dosfstools package includes the mkfs.fat and fsck.fat utilities,
 which respectively make and check MS-DOS FAT filesystems.")
     (license gpl3+)))
+
+(define-public gparted
+  (package
+    (name "gparted")
+    (version "0.24.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "http://skylink.dl.sourceforge.net/"
+                           "project/gparted/gparted/gparted-"
+                           version "/"
+                           "gparted-" version ".tar.bz2"))
+       (sha256
+        (base32
+         "0q6d1s9f4qgdivj4vm9w87qmdfyq8s65jzkhv05rp9cl72rqlf82"))))
+    (build-system gnu-build-system)
+    (inputs
+     `(("gtk+" ,gtk+)
+       ("gtkmm" ,gtkmm)
+       ("intltool" ,intltool)
+       ("libuuid" ,util-linux)
+       ("parted" ,parted)
+       ("pkg-config" ,pkg-config)))
+    ;(native-inputs
+    ; `(("pkg-config" ,pkg-config)))
+    (home-page "https://gparted.org")
+    (synopsis "GTK frontend for parted")
+    (description "GParted helps you create, change
+and modify partitions")
+    (license gpl3+)))
-- 
2.6.2

This paste has no annotations.

Colorize as:
Show Line Numbers

Lisppaste pastes can be made by anyone at any time. Imagine a fearsomely comprehensive disclaimer of liability. Now fear, comprehensively.