[1462] in SIPB bug reports

home help back first fref pref prev next nref lref last post

emacs discuss

daemon@ATHENA.MIT.EDU (kkkken@ATHENA.MIT.EDU)
Mon Nov 26 09:37:12 1990

From: kkkken@ATHENA.MIT.EDU
Date: Mon, 26 Nov 90 09:36:44 -0500
To: lnp@ATHENA.MIT.EDU
Cc: bug-sipb@ATHENA.MIT.EDU
In-Reply-To: lnp@ATHENA.MIT.EDU's message of Sun, 25 Nov 90 22:45:05 -0500 <9011260345.AA09841@TABETHA.MIT.EDU>


In response to the request that discuss not munge emacs window
arrangement...

    I want my emacs restored to normal when I'm done.  I don't want to
    have to redo the buffer divisions and change buffers.

It's common for emacs subsystems to munge with the window arrangement.
Fortunately, it's also easy to get around.  Do something like this:

(load "/afs/athena/contrib/sipb/lib/elisp/discuss.elc")
(defvar my-configuration nil "Window configuration before discuss")
(defun my-enter-discuss ()
  (interactive)
  (setq my-configuration (current-window-configuration))
  (if (get-buffer "*meetings*")
      (switch-to-buffer "*meetings*")
    (discuss nil)))
(define-key discuss-mtgs-mode-map "q" 
  (function (lambda nil (interactive) (discuss-quit)
	      (set-window-configuration my-configuration))))

(You can throw this code in your .emacs or whatever.) 

I know it's not a fix, but then the problem isn't a bug... I hope this
helps...

	Kenneth J. Duda
	MIT Network Services
	Member, Student Information Processing Board
	<kkkken@mit.edu>

home help back first fref pref prev next nref lref last post