diff --git a/glicid/packages/cluster.scm b/glicid/packages/cluster.scm index 095b623..5805a8d 100644 --- a/glicid/packages/cluster.scm +++ b/glicid/packages/cluster.scm @@ -87,7 +87,6 @@ #:use-module (gnu packages sphinx) #:use-module (gnu packages tls) #:use-module (gnu packages web) -;; #:use-module (gnu packages glicid) #:use-module (gnu packages pretty-print) #:use-module (gnu packages virtualization) @@ -99,8 +98,7 @@ (define-public keepalived (package (inherit gnu:keepalived) -; (version "2.2.4") - (version "2.0.18") + (version "2.2.4") (source (origin (method url-fetch) (uri (string-append @@ -109,8 +107,7 @@ (sha256 (base32 -; "1py1xdrxzdxn09yi8dx842rmhnc8lv7z09wmb2mfljylhy8dcf01" - "1l2g0bzzbah9svfpwa0b9dgvwfv85r2y3qdr54822hg5p2qs48ql" + "1py1xdrxzdxn09yi8dx842rmhnc8lv7z09wmb2mfljylhy8dcf01" )))) @@ -119,50 +116,24 @@ ) -;(define choose-latest (package1 package2) -; (let ) -;) - -; (define glicid-version -; (version-major+minor (package-version keepalived))) - -; (define gnu-version -; (version-major+minor (package-version gnu:keepalived))) - - ;(define (latest-keepalived (if (>= glicid-version gnu-version) keepalived gnu:keepalived))) - - - (define-public glicid-keepalived (package -; (inherit (latest-keepalived)) - - ; (inherit (if (>= (version-major+minor (package-version keepalived)) (version-major+minor (package-version keepalived))) keepalived gnu:keepalived)) - (inherit (if (string> (package-version keepalived) (package-version gnu:keepalived)) keepalived gnu:keepalived)) - - - ; ) + (inherit (if (string> (package-version keepalived) (package-version gnu:keepalived)) keepalived gnu:keepalived)) (name "glicid-keepalived") - (arguments - `(#:configure-flags - (list (string-append "--enable-snmp") - (string-append "--enable-snmp-checker") - (string-append "--enable-snmp-rfc") - ) + (arguments + `(#:configure-flags + (list (string-append "--enable-snmp") + (string-append "--enable-snmp-checker") + (string-append "--enable-snmp-rfc") + ) + ) ) - - ) - - - (inputs `(("net-snmp", net-snmp) - ,@(package-inputs keepalived))) - + (inputs `(("net-snmp", net-snmp) + ,@(package-inputs keepalived))) ) ) -; (define-public glicid-keepalived glicid-keepalived-2.2.4) - ;;; glicid/cluster.scm ends here