소스 검색

update message

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

+ 3
- 2
emacs.el 파일 보기

@@ -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))


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