VNC + Emacs *Without* a Window Manager

Ehud Karni ehud "at" unix.mvs.co.il
Mon Apr 19 15:09:00 2004


-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

On Sat, 17 Apr 2004 17:17:47 -0400 (EDT), William Hooper <whooper "at" freeshell.org> wrote:
>
> Another option would be to look at light-weight WMs.  Twm comes to mind.

I use a full screen Emacs without borders/title on VNC using twm for the
window manager.  To resize the emacs window I wrote an Emacs function.
Below are the relevant part of my .twmrc and the emacs defuns.

Ehud.


.twmrc:

NoTitle { "TWM Icon Manager" "XClock" "Emacs" "emacs" }


.emacs:

(defun set-frame-value-all (key val)   ;; change frame attribute
   (aput 'initial-frame-alist key val) ;; for ALL frames
   (aput 'default-frame-alist key val)
   (modify-frame-parameters (selected-frame) (list (cons key val))))

(defun configuration-internal (width height)   ;; do for real X only
   (let* ((cng-lst                     ;; List of changes
           (list '(modeline . t)
                 '(mouse-color . "Black")
                 '(minibuffer . t)
                 '(top   .   0)        ;; top most
                 '(left  .   0)        ;; left most
                 (cons 'width  width)  ;; chars
                 (cons 'height height) ;; chars
                 '(icon-type . t)))
         key val)
       (while cng-lst
           (setq key (car cng-lst))
           (setq cng-lst (cdr cng-lst))
           (setq val (cdr key))
           (setq key (car key))
           (set-frame-value-all key val))))

(defun configuration-laptop ()         ;; set for 800x600 (laptop screen)
   (interactive)
       (configuration-internal 100 46))

(defun configuration-full ()           ;; do for full vnc screen
   (interactive)
       (configuration-internal 143 69))




- --
 Ehud Karni           Tel: +972-3-7966-561  /"\
 Mivtach - Simon      Fax: +972-3-7966-667  \ /  ASCII Ribbon Campaign
 Insurance agencies   (USA) voice mail and   X   Against   HTML   Mail
 http://www.mvs.co.il  FAX:  1-815-5509341  / \
 GnuPG: 98EA398D <http://www.keyserver.net/>    Better Safe Than Sorry
-----BEGIN PGP SIGNATURE-----
Comment: use http://www.keyserver.net/ to get my key (and others)

iD8DBQFAg90nLFvTvpjqOY0RAp5XAJ4jP0NzqJkDyJrNz6W3c3lWjEyjkQCfTcsv
+CcmrVh+zICDB7hVXu9FvyI=
=8wAz
-----END PGP SIGNATURE-----