[elpa] externals/vlf fb9aa67 020/310: Remove clutter form file name indicators.

[Stefan Monnier]

branch: externals/vlf
commit fb9aa670ccb691e5fb46334db61ece93531cdb1f
Author: Andrey Kotlarski <m00naticus@gmail.com>
Commit: Andrey Kotlarski <m00naticus@gmail.com>

    Remove clutter form file name indicators.
---
 vlfi.el | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

diff --git a/vlfi.el b/vlfi.el
index ffeef2e..431b5c0 100644
--- a/vlfi.el
+++ b/vlfi.el
@@ -95,13 +95,11 @@ with the prefix argument DECREASE it is halved."
 
 (defun vlfi-format-buffer-name ()
   "Return format for vlfi buffer name."
-  (let ((vlfi-file-size-float (float vlfi-file-size)))
-    (format "%s(%s)[%.2f-%.2f%%%%](%d)"
-            (file-name-nondirectory buffer-file-name)
-            (file-size-human-readable vlfi-file-size)
-            (* 100 (/ vlfi-start-pos vlfi-file-size-float))
-            (* 100 (/ vlfi-end-pos vlfi-file-size-float))
-            vlfi-batch-size)))
+  (format "%s(%s)[%.2f%%%%](%d)"
+          (file-name-nondirectory buffer-file-name)
+          (file-size-human-readable vlfi-file-size)
+          (/ (* 100 vlfi-end-pos) (float vlfi-file-size))
+          vlfi-batch-size))
 
 (defun vlfi-update-buffer-name ()
   "Update the current buffer name."