[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: gnu: sudo: Set rundir, vardir and iologdir.
From: |
??? |
Subject: |
01/01: gnu: sudo: Set rundir, vardir and iologdir. |
Date: |
Fri, 23 Jan 2015 04:25:23 +0000 |
iyzsong pushed a commit to branch master
in repository guix.
commit e1626e3b3ae6d8eb3e118af4ffe9d905b1642ede
Author: 宋文武 <address@hidden>
Date: Thu Jan 22 21:14:33 2015 +0800
gnu: sudo: Set rundir, vardir and iologdir.
* gnu/packages/admin.scm (sudo)[arguments]<#:configure-flags>: Add
--with-rundir=/run/sudo --with-vardir=/var/db/sudo
--with-iologdir=/var/log/sudo-io.
---
gnu/packages/admin.scm | 13 +++++++++++--
1 files changed, 11 insertions(+), 2 deletions(-)
diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index d7cd0b8..534fd07 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -631,7 +631,10 @@ system administrator.")
"002l6h27pnhb77b65frhazbhknsxvrsnkpi43j7i0qw1lrgi7nkf"))))
(build-system gnu-build-system)
(arguments
- `(#:configure-flags '("--with-logpath=/var/log/sudo.log")
+ `(#:configure-flags '("--with-logpath=/var/log/sudo.log"
+ "--with-rundir=/run/sudo"
+ "--with-vardir=/var/db/sudo"
+ "--with-iologdir=/var/log/sudo-io")
#:phases (alist-cons-before
'configure 'pre-configure
(lambda _
@@ -645,7 +648,13 @@ system administrator.")
"")
(("^install: (.*)install-sudoers(.*)" _ before after)
;; Don't try to create /etc/sudoers.
- (string-append "install: " before after "\n"))))
+ (string-append "install: " before after "\n"))
+ (("\\$\\(DESTDIR\\)\\$\\(rundir\\)")
+ ;; Don't try to create /run/sudo.
+ "$(TMPDIR)/dummy")
+ (("\\$\\(DESTDIR\\)\\$\\(vardir\\)")
+ ;; Don't try to create /var/db/sudo.
+ "$(TMPDIR)/dummy")))
%standard-phases)
;; XXX: The 'testsudoers' test series expects user 'root' to exist, but