aboutsummaryrefslogtreecommitdiff
path: root/emms.el
diff options
context:
space:
mode:
Diffstat (limited to 'emms.el')
-rw-r--r--emms.el10
1 files changed, 10 insertions, 0 deletions
diff --git a/emms.el b/emms.el
index 80dc3a1..10c4909 100644
--- a/emms.el
+++ b/emms.el
@@ -472,6 +472,16 @@ whenever possible."
(setq next (cdr ptr))))
seq)
+(defun emms-move-beginning-of-line (arg)
+ "Move point to beginning of current line as displayed.
+If there's an image in the line, this disregards newlines
+which are part of the text that the image rests on."
+ (if (fboundp 'move-beginning-of-line)
+ (move-beginning-of-line arg)
+ (if (numberp arg)
+ (forward-line (1- arg))
+ (forward-line 0))))
+
;;; Convenient macros