branch: externals/mpdired
commit 063fc07288a4f3e8b7f56470468c4645dd108196
Author: Manuel Giraud <[email protected]>
Commit: Manuel Giraud <[email protected]>
fix bad bol
---
mpdired.el | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/mpdired.el b/mpdired.el
index 7daed127ac..231e873891 100644
--- a/mpdired.el
+++ b/mpdired.el
@@ -526,14 +526,13 @@
(defun mpdired-add-at-point ()
(interactive)
- (let* ((bol (line-beginning-position))
+ (let* ((bol (mpdired--bol))
(uri (get-text-property bol 'uri)))
(when uri (mpdired-add-internal uri))))
(defun mpdired-deleteid-at-point ()
- (let ((id (get-text-property (line-beginning-position) 'id)))
- (when id
- (mpdired-deleteid-internal id))))
+ (let ((id (get-text-property (mpdired--bol) 'id)))
+ (when id (mpdired-deleteid-internal id))))
(defun mpdired-delete ()
(interactive)
