Explorar el Código

emacs.el: Print msg when byte-compiling file by fetch-library

pull/1/head
10sr hace 10 años
padre
commit
c9fb27b615
Se han modificado 1 ficheros con 5 adiciones y 1 borrados
  1. +5
    -1
      emacs.el

+ 5
- 1
emacs.el Ver fichero

@@ -67,7 +67,11 @@ If FORCE-DOWNLOAD-P it t ignore exisiting library and always download."
(require 'bytecomp nil t))
(and (file-exists-p (byte-compile-dest-file lpath))
(delete-file (byte-compile-dest-file lpath)))
(byte-compile-file lpath)))
(message "Byte-compiling %s..."
lpath)
(byte-compile-file lpath)
(message "Byte-compiling %s...done"
lpath)))
(progn (and (file-writable-p lpath)
(delete-file lpath))
(message "Downloading %s...failed"


Cargando…
Cancelar
Guardar