Преглед на файлове

little improvement of lazy-load-eval

pull/1/head
10sr преди 10 години
родител
ревизия
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


Зареждане…
Отказ
Запис