home *** CD-ROM | disk | FTP | other *** search
- Path: sparky!uunet!mcsun!Germany.EU.net!Informatik.Uni-Dortmund.DE!fbi-news!grossjoh
- From: grossjoh@petty.ls6.informatik.uni-dortmund.de (Kai Grossjohann)
- Newsgroups: alt.lucid-emacs.help
- Subject: The menu bar and the wicos package
- Date: 6 Jan 93 20:01:21
- Organization: Universitaet Dortmund, Lehrstuhl Informatik VI
- Lines: 45
- Distribution: world
- Message-ID: <GROSSJOH.93Jan6200121@petty.ls6.informatik.uni-dortmund.de>
- Reply-To: Kai Grossjohann <grossjoh@ls6.informatik.uni-dortmund.de>
- NNTP-Posting-Host: petty.informatik.uni-dortmund.de
- Comments: Hyperbole mail buttons accepted, v3.06.
-
- Hi netters,
-
- I use wicos and I like it a lot. Also I like the menu bar and its
- entry "Buffers". So I copied the relevant functions from menubar.el
- and adapted them so that they show a Wicos List. I also managed to
- install the new function in the activate-menubar-hook.
-
- The problem is: How do I install the new menu item in the default menu
- bar? What I did so far is to put the following in my wico-menubar.el
- file:
-
- ---
- (if (not (car (find-menu-item default-menubar (list wico-list-name))))
- (setcdr default-menubar
- (cons (list wico-list-name "" nil nil) (cdr default-menubar))))
- (setq current-menubar default-menubar)
- ---
-
- However, I do not think that it is
-
- (a) a good idea to always put the Wicos menu item second in the
- menu bar --- what I really want is to put it next to the
- "Buffers" menu item.
-
- (b) a good idea to muck about with setcdr in this way --- if I
- have to use something it should be safe and work with all
- other packages that put something in the menu bar.
-
-
- Thanks a lot,
- Kai
-
-
-
-
- --
- --
- Kai Grossjohann Phone (voice): 49 231 75 30 15
- Baroper Str. 331 App. 510 E-Mail:
- W-4600 Dortmund 50 grossjoh@ls6.informatik.uni-dortmund.de
- Germany
- --
- There are two ways to solve this problem: the hard way, and the
- easy way. Let's start with the hard way.
- -- W. Schneider, from a Physics lecture
-