How to disable pop-ups

--Z4hRKl7Ou3
Content-Type: text/plain; charset=us-ascii
Content-Description: message body text
Content-Transfer-Encoding: 7bit

=?iso-8859-1?Q?Bj=F6rn?= Lindberg writes:
 > Ilisp has this annoying habit of sometimes poping up its own windows
 > with information. The contents seem to be what is normally printed in
 > the status bar in emacs. For example it happens when I press space
 > after having written either LOAD or DISASSEMBLE, the calling
 > information for respective function is displayed. Does anyone know why
 > it does this, and how I could change this behaviour, eg getting it to
 > show the message in the status bar or in another emacs window instead?

What you want to do is set the variable ilisp-display-output-function.
To see what options you have, do an apropos on ilisp-display-output.

Some time ago, I posted the code for the output function that I use,
but I'm pretty sure it didn't get merged.  It displays one-line
messages in the minibuffer, and multi-line messages in a fixed,
dedicated emacs frame that doesn't go away.  This is also really nice
when you're using ILISP over X11 over a modem.

Here's the code I use:


--Z4hRKl7Ou3
Content-Type: text/plain
Content-Disposition: inline;
	filename="ilisp-oneframe.el"
Content-Transfer-Encoding: 7bit

(defvar ilisp-*oneframe-output-sink*
  (make-ilisp-output-sink
   :buffer " *ILISP Output*"
   :major-mode-def 'lisp-mode		; The major mode for the
					; typeout window.
   :frame nil
   ;; Cached frame for ILISP output. If no window system is
   ;; 'running' then the value of this is nil.
   :frame-name "ILISP Output"
   :modeline nil
   :set-modeline-p nil
   :mode 'ilisp-output-mode
   :window-min-height 2			; The minimum height of the
					; typeout window
   :window-max-height 4 		; The maximum height of the
					; typeout window
   :frame-min-height 5			; Rows
   :frame-min-width 100			; Columns
   ))

(defun ilisp-display-output-oneframe (output ignored)
  "Display one-liners in the echo area, others in one single typeout window"
  (cond ((or (string-match "\n" output)
	     (> (length output) (window-width (minibuffer-window))))
	 (ilisp-display-output-in-typeout-window output ilisp-*oneframe-output-sink*))
	;; ilisp-display-output-in-echo-area kills the frame instead
	;; of just erasing the buffer, so I can't use it here
	(t (let ((buf (ilisp-output-sink-buffer ilisp-*oneframe-output-sink*)))
	     (when (get-buffer buf)
	       (with-current-buffer buf (erase-buffer))))
	   (message "%s" output))))

(setq ilisp-display-output-function 'ilisp-display-output-oneframe)

--Z4hRKl7Ou3
Content-Type: text/plain; charset=us-ascii
Content-Description: .signature
Content-Transfer-Encoding: 7bit


-- 
           /|_     .-----------------------.                        
         ,'  .\  / | No to Imperialist war |                        
     ,--'    _,'   | Wage class war!       |                        
    /       /      `-----------------------'                        
   (   -.  |                               
   |     ) |                               
  (`-.  '--.)                              
   `. )----'                               

--Z4hRKl7Ou3--


-------------------------------------------------------
This SF.net email is sponsored by:  Etnus, makers of TotalView, The best
thread debugger on the planet. Designed with thread debugging features
you've never dreamed of, try TotalView 6 free at www.etnus.com.