X-Git-Url: http://christophe.rhodes.io/gitweb/?p=squeeze-el.git;a=blobdiff_plain;f=squeeze.el;fp=squeeze.el;h=415d569bcf4959edc22217ee72cc4bf71ef1355e;hp=6e4f4da4c35371d6b677382a768b0fb3f3b83a42;hb=424fa31e8640b5aad988cbc0dc6baba85072a83c;hpb=4b96c04eadcdd37603d78a13eaa40b5b90dee07e

diff --git a/squeeze.el b/squeeze.el
index 6e4f4da..415d569 100644
--- a/squeeze.el
+++ b/squeeze.el
@@ -146,7 +146,7 @@
             (make-string nfull ?█)
             (if (= width (+ nfull nblank))
                 ""
-              (aref " ▏▎▍▌▋▊▉█" (floor (+ frac 0.0625) 0.125)))
+              (string (aref " ▏▎▍▌▋▊▉█" (floor (+ frac 0.0625) 0.125))))
             (make-string nblank ? ))))
 
 (defun squeeze-mixer-make-bar (vol width)