]> code.delx.au - gnu-emacs/blobdiff - lisp/emacs-lisp/byte-opt.el
More-conservative ‘format’ quote restyling
[gnu-emacs] / lisp / emacs-lisp / byte-opt.el
index 490d9a8b52c339db0a7bdaa8819982af70fd7486..716e1c69c7bc504d5513874ab3c02ce8a68e5878 100644 (file)
   ;; (if (aref byte-code-vector 0)
   ;;     (error "The old version of the disassembler is loaded.  Reload new-bytecomp as well"))
   (byte-compile-log-1
-   (apply 'format format
+   (apply #'format-message format
      (let (c a)
        (mapcar (lambda (arg)
                  (if (not (consp arg))