diff options
author | Ludovic Courtès <ludo@gnu.org> | 2014-07-07 23:54:28 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2014-07-08 00:12:30 +0200 |
commit | b3342b545a0147e2b501a94179cea6257fbe5213 (patch) | |
tree | 18ba3256994c86802ee671d818642c05f332d13b /gnu/packages/patches | |
parent | ac47a7c240955bd7cc23179e2cb95fed207d98ba (diff) | |
download | guix-b3342b545a0147e2b501a94179cea6257fbe5213.tar guix-b3342b545a0147e2b501a94179cea6257fbe5213.tar.gz |
gnu: dmd: Update to 0.2.
* gnu/packages/admin.scm (dmd): Update to 0.2; remove 'patches'.
* gnu/packages/patches/dmd-getpw.patch,
gnu/packages/patches/dmd-tests-longer-sleeps.patch: Remove.
* gnu-system.am (dist_patch_DATA): Adjust accordingly.
Diffstat (limited to 'gnu/packages/patches')
-rw-r--r-- | gnu/packages/patches/dmd-getpw.patch | 19 | ||||
-rw-r--r-- | gnu/packages/patches/dmd-tests-longer-sleeps.patch | 52 |
2 files changed, 0 insertions, 71 deletions
diff --git a/gnu/packages/patches/dmd-getpw.patch b/gnu/packages/patches/dmd-getpw.patch deleted file mode 100644 index c4f9c35951..0000000000 --- a/gnu/packages/patches/dmd-getpw.patch +++ /dev/null @@ -1,19 +0,0 @@ -When bootstrapping and running as PID 1, /etc/{passwd,shadow} may be unavailable. -Gracefully handle that. - -diff --git a/modules/dmd/support.scm b/modules/dmd/support.scm -index 9b592c5..602e409 100644 ---- a/modules/dmd/support.scm -+++ b/modules/dmd/support.scm -@@ -151,7 +151,10 @@ There is NO WARRANTY, to the extent permitted by law."))) - - - ;; Home directory of the user. --(define user-homedir (passwd:dir (getpwuid (getuid)))) -+(define user-homedir -+ (or (false-if-exception (passwd:dir (getpwuid (getuid)))) -+ (getenv "HOME") -+ "/")) - - ;; Logfile. - (define default-logfile diff --git a/gnu/packages/patches/dmd-tests-longer-sleeps.patch b/gnu/packages/patches/dmd-tests-longer-sleeps.patch deleted file mode 100644 index 708000f351..0000000000 --- a/gnu/packages/patches/dmd-tests-longer-sleeps.patch +++ /dev/null @@ -1,52 +0,0 @@ -Increase sleep times in tests, for slower machines. - -Patch by Mark H Weaver <mhw@netris.org>. - ---- dmd/tests/basic.sh 2013-11-30 17:22:00.000000000 -0500 -+++ dmd/tests/basic.sh 2014-02-16 02:18:34.036376953 -0500 -@@ -46,7 +46,7 @@ - dmd -I -s "$socket" -c "$conf" -l "$log" & - dmd_pid=$! - --sleep 1 # XXX: wait till it's up -+sleep 3 # XXX: wait till it's up - kill -0 $dmd_pid - test -S "$socket" - $deco status dmd | grep -E '(Start.*dmd|Stop.*test)' ---- dmd/tests/respawn.sh 2013-12-01 16:50:37.000000000 -0500 -+++ dmd/tests/respawn.sh 2014-02-16 02:19:16.958251953 -0500 -@@ -39,7 +39,7 @@ - i=0 - while ! test -f "$1" && test $i -lt 20 - do -- sleep 0.3 -+ sleep 1 - i=`expr $i + 1` - done - test -f "$1" -@@ -65,14 +65,14 @@ - #:provides '(test1) - #:start (make-forkexec-constructor - "$SHELL" "-c" -- "echo \$\$ > $service1_pid ; while true ; do sleep 1 ; done") -+ "echo \$\$ > $service1_pid ; while true ; do sleep 3 ; done") - #:stop (make-kill-destructor) - #:respawn? #t) - (make <service> - #:provides '(test2) - #:start (make-forkexec-constructor - "$SHELL" "-c" -- "echo \$\$ > $service2_pid ; while true ; do sleep 1 ; done") -+ "echo \$\$ > $service2_pid ; while true ; do sleep 3 ; done") - #:stop (make-kill-destructor) - #:respawn? #t)) - (start 'test1) -@@ -82,7 +82,7 @@ - dmd -I -s "$socket" -c "$conf" -l "$log" & - dmd_pid=$! - --sleep 1 # XXX: wait till it's up -+sleep 3 # XXX: wait till it's up - kill -0 $dmd_pid - test -S "$socket" - $deco status test1 | grep started |