From 6f9911fa984f00a08017b8bc903f6148126153c5 Mon Sep 17 00:00:00 2001
From: Magnar Sveen <magnars@gmail.com>
Date: Wed, 18 Jul 2012 09:15:50 +0200
Subject: [PATCH] Add more explanatory prose.

---
 multiple-cursors-core.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/multiple-cursors-core.el b/multiple-cursors-core.el
index b22b586..b293947 100644
--- a/multiple-cursors-core.el
+++ b/multiple-cursors-core.el
@@ -202,6 +202,8 @@ from being executed if in multiple-cursors-mode."
     (when interprogram-paste
       ;; Add interprogram-paste to normal kill ring, just
       ;; like current-kill usually does for itself.
+      ;; We have to do the work for it tho, since the funcall only returns
+      ;; something once. It is not a pure function.
       (let ((interprogram-cut-function nil))
         (if (listp interprogram-paste)
             (mapc 'kill-new (nreverse interprogram-paste))