----------
Andrew Jaffe <jaffe_at_cita.utoronto.ca> writes:
>
> Hi, folks,
>
> I would think this is a FAQ, but I couldn't find it anywhere...
>
> I want to change the Icon of a window based on its name and/or icon
> name. Simple, right? Well, it *almost* works for XEmacs.
>
> In XEmacs, I have
> (setq frame-title-format "%S: %b")
> (setq frame-icon-title-format "%b")
> which sets the name and icon name to "emacs: buffername" and
> "buffername" respectively. In my .fvwm2rc, I have
>
> Style "emacs" Icon gnu-animal.xpm
> Style "emacs*INBOX*" Icon xmail.xpm, StickyIcon
> Style "emacs* Summary$" Icon xmail.xpm, StickyIcon
> Style "emacs*mail*" Icon xmail.xpm, StickyIcon
> Style "emacs: *Group*" Icon news212.xpm
> Style "emacs*Summary *" Icon news212.xpm
>
> The idea is for a normal xemacs icon to be gnu-animal, a mail window to
> be xmail, and a news window to be news212. It doesn't quite work: it
> seems that the icon is determined by the name of the frame that
> "created" the frame in question (since, I think, the new frame-name
> isn't assigned until later in the process, after fvwm determines the
> icon).
>
> Does this make sense? Is there a fix? I can fix it now by creating new
> frames (C-x 5 b) and destroying old ones (C-x 5 0), but that's
> considerably less than automatic.
>
Yes, I have been fighting this for a while. I have to run 2
XEmacs's and I want them to get different icons and be able to warp to them
through different keystrokes. The only way I have
been able to deal with it is I start the XEmacs like this:
xemacs -unmapped -f name-me
In my .emacs:
(defun name-me ()
"Come up with different name when invoked on another system"
(interactive)
(setq frame-icon-title-format "altname") ;sets icon-name
(setq frame-title-format "altname") ;sets name
(setq default-frame-alist '((name . "altname")))
(select-frame (make-frame '((name . "altname")))) ;resource name
)
It's a bit of a mess, but it works for me.
> Thanks,
>
> Andrew
>
> ----------------------------------------------------------------------
> Andrew Jaffe jaffe_at_cita.utoronto.ca
> CITA, U. Toronto (416) 978-8497, 6879
> 60 Saint George St. -3921 (Fax)
> Toronto, ON M5S 1A1 CANADA
> --
> Visit the official FVWM web page at <URL:http://www.hpc.uh.edu/fvwm/>.
> To unsubscribe from the list, send "unsubscribe fvwm" in the body of a
> message to majordomo_at_hpc.uh.edu.
> To report problems, send mail to fvwm-owner_at_hpc.uh.edu.
--
Dan Espen Phone: (908) 699-5570
dane_at_bae.bellcore.com
444 Hoes Lane Room RRC 1C-214
Piscataway, NJ 08854
--
Visit the official FVWM web page at <URL:http://www.hpc.uh.edu/fvwm/>.
To unsubscribe from the list, send "unsubscribe fvwm" in the body of a
message to majordomo_at_hpc.uh.edu.
To report problems, send mail to fvwm-owner_at_hpc.uh.edu.
Received on Mon Apr 22 1996 - 11:35:05 BST