diff options
author | William Xu <william.xwl@gmail.com> | 2009-11-23 22:11:19 +0800 |
---|---|---|
committer | William Xu <william.xwl@gmail.com> | 2009-11-23 22:11:19 +0800 |
commit | e54c755ce0c2ef19bfcd4cdca995e4d2bc3b2703 (patch) | |
tree | 2d5262b40213039f05a8af123148ca0a41fbc6c5 /lisp/emms-browser.el | |
parent | 2b629e9c2d97a521a4cddbf03286661eab687c42 (diff) |
Fix compiler warnings.
For emms-browser.el, emms-compat.el, emms-last-play.el, emms-lyrics.el and
emms-streams.el.
Diffstat (limited to 'lisp/emms-browser.el')
-rw-r--r-- | lisp/emms-browser.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emms-browser.el b/lisp/emms-browser.el index 5286d75..6f8d696 100644 --- a/lisp/emms-browser.el +++ b/lisp/emms-browser.el @@ -1276,7 +1276,8 @@ Return the previous point-max before adding." (when emms-browser-seed-pending (random t) (setq emms-browser-seed-pending nil)) - (goto-line (random (count-lines (point-min) (point-max))))) + (goto-char (point-min)) + (forward-line (1- (random (count-lines (point-min) (point-max)))))) (defun emms-browser-view-in-dired (&optional bdata) "View the current directory in dired." |