Просмотр исходного кода

little improvement of lazy-load-eval

pull/1/head
10sr 11 лет назад
Родитель
Сommit
707d0ab2ae
1 измененных файлов: 4 добавлений и 2 удалений
  1. +4
    -2
      emacs.el

+ 4
- 2
emacs.el Просмотреть файл

@@ -53,7 +53,8 @@ If FORCE-DOWNLOAD-P it t ignore exisiting library and always download."
(locate-library lib)))

(defun download-file (url path &optional ok-if-already-exists)
"Download file from URL and output to PATH."
"Download file from URL and output to PATH.
IF OK-IF-ALREADY-EXISTS is true force download."
(or
(let ((curl (executable-find "curl")))
(when curl
@@ -140,7 +141,8 @@ found, otherwise returns nil."
(eval-after-load ,feature
(quote (progn
,@body)))
,libpath))))
(locate-library ,libname)))))

(put 'lazy-load-eval 'lisp-indent-function 2)

(when (lazy-load-eval 'tetris nil


Загрузка…
Отмена
Сохранить