[elpa] externals/lentic dd1d2983fb 042/333: Change names to better represent function.

[ELPA Syncer]

branch: externals/lentic
commit dd1d2983fb3ab2a5669eafedaf0088ee8660e62f
Author: Phillip Lord <phillip.lord@newcastle.ac.uk>
Commit: Phillip Lord <phillip.lord@newcastle.ac.uk>

    Change names to better represent function.
---
 linked-buffer.el | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/linked-buffer.el b/linked-buffer.el
index 4708b805c3..932888e225 100644
--- a/linked-buffer.el
+++ b/linked-buffer.el
@@ -421,10 +421,14 @@ same top-left location. Update details depend on CONF."
 ;;
 ;; Test functions!
 ;;
-(defun linked-buffer-batch-clone (filename)
-  "Open FILE, clone and save."
+(defun linked-buffer-batch-clone-and-save-with-config (filename init)
+  "Open FILENAME, set INIT function, then clone and save.
+
+This function does potentially evil things if the file or the
+linked-buffer is open already."
   (with-current-buffer
       (find-file-noselect filename)
+    (setq linked-buffer-init init)
     (with-current-buffer
         (linked-buffer-init-create)
       (save-buffer)
@@ -433,9 +437,7 @@ same top-left location. Update details depend on CONF."
 
 (defun linked-buffer-batch-clone-with-config
   (filename init)
-  "Open FILENAME, set INIT function, then clone and save.
-This function does potentially evil things if the file or the
-linked-buffer is open already.
+  "Open FILENAME, set INIT function, then clone.
 
 Return the linked-buffer contents without properties."
   (let ((retn nil))