gnu: pass-age: Unpropagate inputs.
* gnu/packages/password-utils.scm (pass-age)[arguments]: Add a new 'wrap-script phase. [propagated-inputs]: Move them all from here… [inputs]: …to here. Add missing procps for /bin/pkill.
This commit is contained in:
		
							parent
							
								
									88746cd80b
								
							
						
					
					
						commit
						07232e6b17
					
				
					 1 changed files with 31 additions and 7 deletions
				
			
		| 
						 | 
					@ -636,19 +636,43 @@ through the pass command.")
 | 
				
			||||||
        (base32 "17899whffnpqqx9x1nx2b8bfxbxlh1pwlglqa0kznl0cn6sb37ql"))))
 | 
					        (base32 "17899whffnpqqx9x1nx2b8bfxbxlh1pwlglqa0kznl0cn6sb37ql"))))
 | 
				
			||||||
    (build-system copy-build-system)
 | 
					    (build-system copy-build-system)
 | 
				
			||||||
    (arguments
 | 
					    (arguments
 | 
				
			||||||
     '(#:phases (modify-phases %standard-phases
 | 
					     '(#:modules
 | 
				
			||||||
                  (add-after 'unpack 'rename-script
 | 
					       ((guix build copy-build-system)
 | 
				
			||||||
                    (lambda _
 | 
					        (guix build utils)
 | 
				
			||||||
                      (rename-file "src/password-store.sh"
 | 
					        (srfi srfi-26))
 | 
				
			||||||
                                   "src/passage"))))
 | 
					       #:phases
 | 
				
			||||||
 | 
					       (modify-phases %standard-phases
 | 
				
			||||||
 | 
					         (add-after 'unpack 'rename-script
 | 
				
			||||||
 | 
					           (lambda _
 | 
				
			||||||
 | 
					             (rename-file "src/password-store.sh"
 | 
				
			||||||
 | 
					                          "src/passage")))
 | 
				
			||||||
 | 
					         (add-after 'install 'wrap-script
 | 
				
			||||||
 | 
					           (lambda* (#:key inputs outputs #:allow-other-keys)
 | 
				
			||||||
 | 
					             (let* ((out (assoc-ref outputs "out"))
 | 
				
			||||||
 | 
					                    (script (string-append out "/bin/passage")))
 | 
				
			||||||
 | 
					               (substitute* script
 | 
				
			||||||
 | 
					                 ;; Avoid ugly ‘.passage-real’ in --help output and elsewhere.
 | 
				
			||||||
 | 
					                 (("^(PROGRAM=).*" _ program=)
 | 
				
			||||||
 | 
					                  (string-append program= (basename script) "\n")))
 | 
				
			||||||
 | 
					               (wrap-program script
 | 
				
			||||||
 | 
					                 `("PATH" ":" prefix
 | 
				
			||||||
 | 
					                   ,(map dirname
 | 
				
			||||||
 | 
					                         (map (cut search-input-file inputs <>)
 | 
				
			||||||
 | 
					                              (list "bin/age"
 | 
				
			||||||
 | 
					                                    "bin/getopt"
 | 
				
			||||||
 | 
					                                    "bin/git"
 | 
				
			||||||
 | 
					                                    "bin/pkill"
 | 
				
			||||||
 | 
					                                    "bin/qrencode"
 | 
				
			||||||
 | 
					                                    "bin/sed"
 | 
				
			||||||
 | 
					                                    "bin/tree")))))))))
 | 
				
			||||||
       #:install-plan
 | 
					       #:install-plan
 | 
				
			||||||
       '(("src/passage" "/bin/")
 | 
					       '(("src/passage" "/bin/")
 | 
				
			||||||
         ("src/completion/pass.bash-completion"
 | 
					         ("src/completion/pass.bash-completion"
 | 
				
			||||||
          "/share/bash-completion/completions/")
 | 
					          "/share/bash-completion/completions/")
 | 
				
			||||||
         ("src/completion/pass.zsh-completion"
 | 
					         ("src/completion/pass.zsh-completion"
 | 
				
			||||||
          "/share/zsh/site-functions/"))))
 | 
					          "/share/zsh/site-functions/"))))
 | 
				
			||||||
    (propagated-inputs
 | 
					    (inputs
 | 
				
			||||||
     (list util-linux git qrencode sed tree age))
 | 
					     (list age git procps qrencode sed tree util-linux))
 | 
				
			||||||
    (home-page "https://github.com/FiloSottile/passage")
 | 
					    (home-page "https://github.com/FiloSottile/passage")
 | 
				
			||||||
    (synopsis "Encrypted password manager")
 | 
					    (synopsis "Encrypted password manager")
 | 
				
			||||||
    (description "This package provides an encrypted password manager, forked
 | 
					    (description "This package provides an encrypted password manager, forked
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Reference in a new issue