[Emacs-diffs] trunk r113104: lisp/profiler.el (profiler-format-number): Use log, not log10.

[Juanma Barranquero]

------------------------------------------------------------
revno: 113104
revision-id: address@hidden
parent: address@hidden
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Fri 2013-06-21 02:53:33 +0200
message:
  lisp/profiler.el (profiler-format-number): Use log, not log10.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/profiler.el               profiler.el-20120822062536-8tk8gghazaoi1nyq-1

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-06-20 21:58:29 +0000
+++ b/lisp/ChangeLog    2013-06-21 00:53:33 +0000
@@ -1,3 +1,7 @@
+2013-06-21  Juanma Barranquero  <address@hidden>
+
+       * profiler.el (profiler-format-number): Use log, not log10.
+
 2013-06-20  Juanma Barranquero  <address@hidden>
 
        * term/x-win.el (emacs-session-filename): Use `locate-user-emacs-file'.

=== modified file 'lisp/profiler.el'
--- a/lisp/profiler.el  2013-03-30 16:55:47 +0000
+++ b/lisp/profiler.el  2013-06-21 00:53:33 +0000
@@ -60,7 +60,7 @@
 (defun profiler-format-number (number)
   "Format NUMBER in human readable string."
   (if (and (integerp number) (> number 0))
-      (cl-loop with i = (% (1+ (floor (log10 number))) 3)
+      (cl-loop with i = (% (1+ (floor (log number 10))) 3)
               for c in (append (number-to-string number) nil)
               if (= i 0)
               collect ?, into s