[elpa] externals/consult f757c17: Ensure that interprogram pastes are not ignored (Fix #443)

[ELPA Syncer]

branch: externals/consult
commit f757c17cfc3850fb25d28c90ebf19db0976895fe
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Ensure that interprogram pastes are not ignored (Fix #443)
---
 consult.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/consult.el b/consult.el
index e972e8d..198d7e3 100644
--- a/consult.el
+++ b/consult.el
@@ -3251,6 +3251,8 @@ If no MODES are specified, use currently active major and 
minor modes."
 
 (defun consult--read-from-kill-ring ()
   "Open kill ring menu and return selected string."
+  ;; `current-kill' updates `kill-ring' with a possible interprogram-paste 
(#443)
+  (current-kill 0)
   ;; Do not specify a :lookup function in order to preserve completion-styles
   ;; highlighting of the current candidate. We have to perform a final lookup
   ;; to obtain the original candidate which may be propertized with