how to inhibit messages in message area

how to inhibit messages in message area

[Friedrich Laher]

[-- Attachment #1.1: Type: text/plain, Size: 1419 bytes --]

is there no way to inhibit,
espescialle the message

Loading mwheel...done

to popup an allready iconified  frame  ?

the following code works fine, and one sees the initial frame disapearing
but only for a short time and then it reapears.

(defun gi(ev) (interactive "e")
       (mouse-set-point ev)
       (beginning-of-line)
       (search-forward ":")
       (x-set-selection 'PRIMARY
      (buffer-substring-no-properties
            (point)
        (progn (end-of-line) (point) )
       )  )
)
(setq toSelMp (make-sparse-keymap))

(define-key toSelMp [mouse-3] 'gi)

(find-file (nth 3 command-line-args))
(auto-save-mode -1)

(goto-char 1)
(while  (not (looking-at ";;") )
    (put-text-property
        (point)
        (progn (end-of-line) (point))
        'local-map toSelMp
    )
    (forward-line 1)
)
(setq buffer-read-only t) (set-buffer-modified-p nil)

(setq of (next-frame) )

(setq nf (make-frame '( (minibuffer . nil)
                        (height     . 13)
                        (width      . 59)
)        )            )
(select-frame nf)
(set-frame-font
"-Adobe-Courier-Medium-R-Normal--24-240-75-75-M-150-ISO8859-9"
)
(split-window-horizontally)
(follow-mode t)
(scroll-bar-mode -1)(tool-bar-mode -1)(menu-bar-mode -1)
(goto-char 1)
(select-frame of)
(iconify-or-deiconify-frame)
(select-frame nf)

the same happens if "iconify" is replaced by (modify-frame-parameters of 
'((visibility . nil))

[-- Attachment #1.2: Type: text/html, Size: 2707 bytes --]

[-- Attachment #2: Type: text/plain, Size: 152 bytes --]

_______________________________________________
Help-gnu-emacs mailing list
Help-gnu-emacs@gnu.org
http://lists.gnu.org/mailman/listinfo/help-gnu-emacs