[elpa] externals/mpdired 063fc07288 051/133: fix bad bol

[ELPA Syncer]

branch: externals/mpdired
commit 063fc07288a4f3e8b7f56470468c4645dd108196
Author: Manuel Giraud <man...@ledu-giraud.fr>
Commit: Manuel Giraud <man...@ledu-giraud.fr>

    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)