Ver a proveniência

Merge branch 'master' of github.com:10sr/dotfiles

pull/1/head
10sr há 12 anos
ascendente
cometimento
e38d064ba0
1 ficheiros alterados com 3 adições e 2 eliminações
  1. +3
    -2
      emacs.el

+ 3
- 2
emacs.el Ver ficheiro

@@ -49,11 +49,12 @@ otherwise the path where the library installed."
(locate-p (locate-library lib)))
(if (or force-download-p (not locate-p))
(progn (condition-case nil
(progn (message "downloading %s..." url)
(progn (message "Downloading %s..." url)
(require 'url)
(url-copy-file url
lpath
t)
(message "Downloading %s...done")
(when (and byte-compile-p
(require 'bytecomp nil t))
(and (file-exists-p (byte-compile-dest-file lpath))
@@ -62,7 +63,7 @@ otherwise the path where the library installed."
)
(error (and (file-writable-p lpath)
(delete-file lpath))
(message "downloading %s...something wrong happened!"
(message "Downloading %s...failed"
url)
nil))
(locate-library lib))


Carregando…
Cancelar
Guardar