[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#26717: [PATCH] gnu: gitolite: Avoid references to the store in autho
From: |
Clément Lassieur |
Subject: |
bug#26717: [PATCH] gnu: gitolite: Avoid references to the store in authorized_keys. |
Date: |
Wed, 03 May 2017 21:47:26 +0200 |
User-agent: |
mu4e 0.9.18; emacs 25.2.1 |
ng0 <address@hidden> writes:
> Clément Lassieur transcribed 1.3K bytes:
>> * gnu/packages/version-control.scm (gitolite)[arguments]: Substitute
>> '$glshell' with 'gitolite-shell' in ssh-authkeys.
>> ---
>> gnu/packages/version-control.scm | 8 +++++++-
>> 1 file changed, 7 insertions(+), 1 deletion(-)
>>
>> diff --git a/gnu/packages/version-control.scm
>> b/gnu/packages/version-control.scm
>> index e0770dc58..1cad0f285 100644
>> --- a/gnu/packages/version-control.scm
>> +++ b/gnu/packages/version-control.scm
>> @@ -628,7 +628,13 @@ also walk each side of a merge and test those changes
>> individually.")
>> ;; invokes Perl.
>> (substitute* (find-files "." ".*")
>> ((" perl -")
>> - (string-append " " perl " -"))))))
>> + (string-append " " perl " -")))
>> +
>> + ;; Avoid references to the store in authorized_keys.
>> + ;; This works because gitolite-shell is in the PATH.
>> + (substitute*
>> "src/triggers/post-compile/ssh-authkeys"
>> + (("\\$glshell \\$user")
>> + "gitolite-shell $user")))))
>> (replace 'install
>> (lambda* (#:key outputs #:allow-other-keys)
>> (let* ((output (assoc-ref outputs "out"))
>> --
>> 2.12.2
>>
>>
>>
>>
>
> This looks good. I have yet to test it. Do you think we could fix the hook
> files of gitolite like this too?
Thank you :) I pushed it.
- bug#26717: [PATCH] gnu: gitolite: Avoid references to the store in authorized_keys.,
Clément Lassieur <=