workgroups2 Changeset - 9e55ef143caa

Changeset - 9e55ef143caa

Parent rev.

Child rev.

[Not reviewed]

0 1 0

Sergey Pashinin - 11 years ago 2014-08-29 12:12:15
sergey@pashinin.com

Removed unused functions

1 file changed with 1 insertions and 10 deletions:

src/workgroups2.el

0 comments (0 inline, 0 general)

src/workgroups2.el

➞

Show inline comments

   "Find the bufobj in BUFOBJ-LIST with uid UID."
   (cl-find uid bufobj-list :test 'string= :key 'wg-bufobj-uid))
 (defun wg-find-buf-in-buf-list (buf buf-list)
   "Find BUF in BUF-LIST.
 This is only here for completeness."
   (cl-find buf buf-list))
 (defun wg-find-buffer-in-buffer-list (buffer-or-name buffer-list)
   "Find BUFFER-OR-NAME in BUFFER-LIST."
   (cl-find (wg-get-buffer buffer-or-name) buffer-list :key 'wg-get-buffer))
 (defun wg-find-buffer-in-buf-list (buffer-or-name buf-list)
   "Find BUFFER-OR-NAME in BUF-LIST."
   (aif (wg-buffer-uid buffer-or-name)
@@ @@ -3167,7 +3158,7 @@ This is only here for completeness." @@
     (wg-find-bufobj-by-uid uid (wg-buf-list))))
 (defun wg-set-buffer-uid-or-error (uid &optional buffer)
-  "Set BUFFER's buffer local value of `wg-buffer-uid' to UID.
+  "Change UID value of a BUFFER's local var `wg-buffer-uid'.
 If BUFFER already has a buffer local value of `wg-buffer-uid',
 and it's not equal to UID, error."
   (if wg-buffer-uid

0 comments (0 inline, 0 general)