diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2015-09-26 15:14:53 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2015-09-26 15:14:53 +0200 |
| commit | e1556533d3e57950417b2e35a68e95c65fee5042 (patch) | |
| tree | 41d67b065c7828e164af83254fb447849d9e880d /gnu/packages/emacs.scm | |
| parent | 5d8d8f3b0a07edb3bd435830b076749f906537d8 (diff) | |
| parent | 92f1cefb74f6092c0c70f93140824ab806086272 (diff) | |
| download | patches-e1556533d3e57950417b2e35a68e95c65fee5042.tar patches-e1556533d3e57950417b2e35a68e95c65fee5042.tar.gz | |
Merge branch 'core-updates'
Diffstat (limited to 'gnu/packages/emacs.scm')
| -rw-r--r-- | gnu/packages/emacs.scm | 26 |
1 files changed, 10 insertions, 16 deletions
diff --git a/gnu/packages/emacs.scm b/gnu/packages/emacs.scm index a342f4861b..dcbe5e5bd5 100644 --- a/gnu/packages/emacs.scm +++ b/gnu/packages/emacs.scm @@ -406,9 +406,9 @@ operations.") (lisp-dir (string-append %output "/share/emacs/site-lisp"))) (setenv "PATH" PATH) (system* tar "xvf" source) - (mkdir-p lisp-dir) - (copy-file (string-append ,name "-" ,version "/magit-svn.el") - (string-append lisp-dir "/magit-svn.el")) + + (install-file (string-append ,name "-" ,version "/magit-svn.el") + lisp-dir) (with-directory-excursion lisp-dir (parameterize ((%emacs emacs)) @@ -462,18 +462,14 @@ support for Git-SVN.") out "/share/doc/haskell-mode-" ,version)) (info (string-append out "/share/info"))) (define (copy-to-dir dir files) - (mkdir-p dir) - (for-each - (lambda (f) - (copy-file f (string-append dir "/" (basename f)))) - files)) + (for-each (lambda (f) + (install-file f dir)) + files)) (with-directory-excursion "doc" (unless (zero? (system* "makeinfo" "haskell-mode.texi")) (error "makeinfo failed")) - (mkdir-p info) - (copy-file "haskell-mode.info" - (string-append info "/haskell-mode.info"))) + (install-file "haskell-mode.info" info)) (copy-to-dir doc '("CONTRIBUTING.md" "NEWS" "README.md")) (copy-to-dir el-dir (find-files "." "\\.elc?")) ;; these are now distributed with emacs @@ -952,11 +948,9 @@ single buffer.") (lambda* (#:key outputs #:allow-other-keys) (let ((target (string-append (assoc-ref outputs "out") "/share/emacs/site-lisp/"))) - (mkdir-p target) - (for-each - (lambda (file) - (copy-file file (string-append target (basename file)))) - (find-files "../lisp" "^(pdf|tab).*\\.elc?")) + (for-each (lambda (file) + (install-file file target)) + (find-files "../lisp" "^(pdf|tab).*\\.elc?")) (emacs-byte-compile-directory target) (emacs-generate-autoloads "pdf-tools" target))))))) (native-inputs `(("autoconf" ,autoconf) |