소스 검색

emacs.el: Print message when EMACS_EL_DRY_RUN is set

pull/2/head
10sr 9 년 전
부모
커밋
f6e0d1e95e
1개의 변경된 파일7개의 추가작업 그리고 5개의 파일을 삭제
  1. +7
    -5
      emacs.el

+ 7
- 5
emacs.el 파일 보기

@@ -86,11 +86,13 @@ FORCE-DOWNLOAD-P) will be ignored."
(locate-library lib)))
;; If EMACS_EL_DRY_RUN is set and it is not an empty string, fetch-library
;; does not actually fetch library.
(setq fetch-library-enabled-p
(let ((dryrun (getenv "EMACS_EL_DRY_RUN")))
(not (and dryrun
(eq 0
(length dryrun))))))
(let ((dryrun (getenv "EMACS_EL_DRY_RUN")))
(when (and dryrun
(< 0
(length dryrun)))
(setq fetch-library-enabled-p
t)
(message "EMACS_EL_DRY_RUN is set. Skip fetching libraries.")))

(defun download-file (url path &optional ok-if-already-exists)
"Download file from URL and output to PATH.


불러오는 중...
취소
저장