(byte-compile-file-form-defmumble, display-call-tree): Print ellipsis earlier,

so message logging will fold similar strings.

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 54776e1810ca895807a2765ba30790b68e2fcc48..45d2b9ff7269552c35f88e43586f54d257850581 100644 (file)
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1598,7 +1598,7 @@ With argument, insert value in current buffer after the form."
     (if (memq 'redefine byte-compile-warnings)
        (byte-compile-arglist-warn form macrop))
     (if byte-compile-verbose
-       (message "Compiling %s (%s)..." (or filename "") (nth 1 form)))
+       (message "Compiling %s... (%s)" (or filename "") (nth 1 form)))
     (cond (that-one
           (if (and (memq 'redefine byte-compile-warnings)
                    ;; don't warn when compiling the stubs in byte-run...
@@ -3032,7 +3032,7 @@ invoked interactively."
   (with-output-to-temp-buffer "*Call-Tree*"
     (set-buffer "*Call-Tree*")
     (erase-buffer)
-    (message "Generating call tree (sorting on %s)..."
+    (message "Generating call tree... (sorting on %s)"
             byte-compile-call-tree-sort)
     (insert "Call tree for "
            (cond ((null byte-compile-current-file) (or filename "???"))