gnu: emacs-org-inline-pdf: Improve package style.
* gnu/packages/emacs-xyz.scm (emacs-org-inline-pdf)[arguments]: Use G-expressions. Use SEARCH-INPUT-FILE.
This commit is contained in:
		
							parent
							
								
									03de9b587a
								
							
						
					
					
						commit
						ea34c09bc2
					
				
					 1 changed files with 8 additions and 7 deletions
				
			
		| 
						 | 
				
			
			@ -6884,13 +6884,14 @@ allrecipes.com.")
 | 
			
		|||
    (inputs
 | 
			
		||||
     (list pdf2svg))
 | 
			
		||||
    (arguments
 | 
			
		||||
     `(#:phases
 | 
			
		||||
       (modify-phases %standard-phases
 | 
			
		||||
         (add-after 'unpack 'patch-exec-paths
 | 
			
		||||
           (lambda* (#:key inputs #:allow-other-keys)
 | 
			
		||||
             (let ((pdf2svg (assoc-ref inputs "pdf2svg")))
 | 
			
		||||
               (substitute* "org-inline-pdf.el"
 | 
			
		||||
                 (("\"pdf2svg\"") (string-append "\"" pdf2svg "/bin/pdf2svg\"")))))))))
 | 
			
		||||
     (list
 | 
			
		||||
      #:phases
 | 
			
		||||
      #~(modify-phases %standard-phases
 | 
			
		||||
          (add-after 'unpack 'patch-exec-paths
 | 
			
		||||
            (lambda* (#:key inputs #:allow-other-keys)
 | 
			
		||||
              (let ((pdf2svg (search-input-file inputs "/bin/pdf2svg")))
 | 
			
		||||
                (substitute* "org-inline-pdf.el"
 | 
			
		||||
                  (("\"pdf2svg\"") (string-append "\"" pdf2svg "\"")))))))))
 | 
			
		||||
    (home-page "https://github.com/shg/org-inline-pdf.el")
 | 
			
		||||
    (synopsis "Inline PDF previewing for Org")
 | 
			
		||||
    (description "This package provides a minor mode that enables
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Reference in a new issue