workgroups2 Changeset - 5f5ffd177fa2

Changeset - 5f5ffd177fa2

Parent rev.

Child rev.

[Not reviewed]

0 2 0

Sergey Pashinin - 11 years ago 2014-08-23 09:52:13
sergey@pashinin.com

Removed wg-switch-to-first-workgroup-on-find-session-file

2 files changed with 5 insertions and 12 deletions:

src/workgroups-session.el

src/workgroups-variables.el

0 comments (0 inline, 0 general)

src/workgroups-session.el

➞

Show inline comments

@@ @@ -71,8 +71,11 @@ nil otherwise." @@
              (error "%S is not a Workgroups session file." filename))
            (setf (wg-session-file-name session) filename)
            (wg-reset-internal (wg-unpickel-session-parameters session)))
          (wg-awhen (and wg-switch-to-first-workgroup-on-find-session-file
                         (wg-workgroup-list))
          (if wg-control-frames
              (wg-restore-frames))
          (wg-awhen (wg-workgroup-list)
            (if (and wg-open-this-wg
                     (member wg-open-this-wg (wg-workgroup-names)))
                (wg-switch-to-workgroup wg-open-this-wg)
@@ @@ -83,8 +86,6 @@ nil otherwise." @@
                   (wg-session-parameter (wg-current-session t) 'last-workgroup))
                (wg-switch-to-workgroup (car it)))
              ))
          (if wg-control-frames
              (wg-restore-frames))
          (wg-fontified-message (:cmd "Loaded: ") (:file filename)))
         (t
          (wg-query-and-save-if-modified)

src/workgroups-variables.el

➞

Show inline comments

@@ @@ -76,14 +76,6 @@ If nil - nothing happens." @@
   :type 'string
   :group 'workgroups)
 (defcustom wg-switch-to-first-workgroup-on-find-session-file t
   "Non-nil means switch to the first workgroup in a session file
 when it's found with `wg-find-session-file'."
   :type 'boolean
   :group 'workgroups)
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;

0 comments (0 inline, 0 general)