Some changes in the VTWM-profile version 1.0 affect the user
customizable file "vtwmrc.gwm". To make it easier to update
"vtwmrc.gwm" for users who have modified it, this file contains a
patch with the changes since the VTWM profile version 0.2.

If your "vtwmrc.gwm" is from version 0.3 you should use the file
"README-vtwmrc-0.3-1.0" instead. 

If you have some other version, you should copy the new "vtwmrc.gwm",
and transfer your changes by hand.

To apply this patch, just do:

  patch vtwmrc.gwm README-vtwmrc-0.2-1.0

If some chunks fail, it may be because the changes collide, and you
may have to do them by hand. 


*** vtwmrc.gwm.distr.0.2	Mon Dec 12 10:30:15 1994
--- vtwmrc.gwm.distr.1.0	Mon Jun 19 12:19:52 1995
***************
*** 1,9 ****
  ;; vtwmrc.gwm --- VTWM profile customizations
  ;;
  ;; Author: Anders Holst  (aho@sans.kth.se)  
! ;; Copyright (C) 1994  Anders Holst
! ;; Version: vtwm-0.2
! ;; Last change: 29/10
  ;;
  ;; This file is copyrighted under the same terms as the rest of GWM
  ;; (see the X Inc license for details). There is no warranty that it
--- 1,9 ----
  ;; vtwmrc.gwm --- VTWM profile customizations
  ;;
  ;; Author: Anders Holst  (aho@sans.kth.se)  
! ;; Copyright (C) 1995  Anders Holst
! ;; Version: vtwm-1.0
! ;; Last change: 17/6 1995
  ;;
  ;; This file is copyrighted under the same terms as the rest of GWM
  ;; (see the X Inc license for details). There is no warranty that it
***************
*** 74,83 ****
  ;;          ; List of '(window-type foreground background)' specifications.
  ;;       vtwm-notitle-list '(Gwm (window-is-transient-for))
  ;;          ; List of window types to make untitled
- ;;       iconify-pixmap-name "iconify2" ; Pixmap filename for iconify button
- ;;       resize-pixmap-name "resize2"   ; Pixmap filename for resize button
- ;;       hilite-pixmap-name "hilite2"   ; Filename for active titlebar pattern
  ;;       default-icon-pixmap-name ()    ; Pixmap filename for default icon
  
  (setq vtwm-notitle-list '(XLoad XClock XBiff Gwm (window-is-transient-for)))
  (setq vtwm-bordercolor black)
--- 74,87 ----
  ;;          ; List of '(window-type foreground background)' specifications.
  ;;       vtwm-notitle-list '(Gwm (window-is-transient-for))
  ;;          ; List of window types to make untitled
  ;;       default-icon-pixmap-name ()    ; Pixmap filename for default icon
+ ;;       hilite-pixmap-name "gray"      ; Filename for active titlebar pattern
+ ;;       vtwm-left-plugs '(("iconify2" (iconify-window)))
+ ;;       vtwm-right-plugs '(("resize2" (twm-resize-window) t))
+ ;;           ; Left and right plugs in the titlebar, a list of pairs
+ ;;           ; or tripplets:  ( <pixmap-file> <action> [<on-press>] )
+ ;;           ; The optional third element <on-press> signals that the action
+ ;;           ; should be run on button-press, rather than button-release.
  
  (setq vtwm-notitle-list '(XLoad XClock XBiff Gwm (window-is-transient-for)))
  (setq vtwm-bordercolor black)
***************
*** 96,103 ****
--- 100,132 ----
      ;                         (list 'XTerm () (color-make "seagreen")))
      ))
  
+ ;; Example of how to get a menu-plug to the left and a zoom-plug to the right
+ ; (setq vtwm-left-plugs '(("iconify2" (iconify-window))
+ ;                         ("menu" (vtwm-pop-menu window-pop) t)))
+ ; (setq vtwm-right-plugs '(("zoom" (zoom-window))
+ ;                          ("resize2" (twm-resize-window) t)))
  
+ ;; Note that you can also get "squeezed title" windows ala TWM, if you
+ ;; use either "vtwm-squeezed-window.gwm" or "vtwm-squeezed-window2.gwm".
+ ;; Use 'set-window' to specify which windows you want squeezed titles on:
+ ; (set-window Emacs vtwm-squeezed-window2)
+ 
+ 
  ;;=============================================================================
+ ;;        VTWM Zoom functions
+ ;;=============================================================================
+ ;;
+ ;;       zoom-offset 3                  ; Minimum distance to screen edge
+ ;;       zoom-window-method-list ()     ; List of (wind-type zoom-func) specs.
+ ;;          ; This is to make zoom-window use different zoom methods for
+ ;;          ; different types of windows.
+ 
+ (setq zoom-window-method-list '((XTerm zoom-window-vert) 
+                                 (XVroot zoom-window-prop)
+                                 (t zoom-window-full)))
+ 
+ 
+ ;;=============================================================================
  ;;        VTWM Menu appearance
  ;;=============================================================================
  ;;
***************
*** 144,156 ****
  ;;       icon-mgr-omit-list ()    ; Window types not handled in default manager
  ;;       icon-mgr-sort ()               ; Sort the entries in an icon manager
  ;;       icon-mgr-font (font-make "8x13")   ; Font in icon managers
  ;;       icon-mgr-foreground black      ; Foreground of icon managers
  ;;       icon-mgr-background white      ; Background of icon managers
  ;;       icon-mgr-title-foreground icon-mgr-foreground
  ;;       icon-mgr-title-background icon-mgr-background
! ;;       icon-mgr-width 150             ; Width of icon manager
  ;;       icon-mgr-window-feedback t     ; Rely on focus feedback from windows
  ;;       icon-mgr-pixmap-name "iconify2"; Pixmap file for iconified symbol
  
  (if (not (= screen-type 'color))
      (progn 
--- 173,190 ----
  ;;       icon-mgr-omit-list ()    ; Window types not handled in default manager
  ;;       icon-mgr-sort ()               ; Sort the entries in an icon manager
  ;;       icon-mgr-font (font-make "8x13")   ; Font in icon managers
+ ;;       icon-mgr-width 150             ; Width of icon manager
  ;;       icon-mgr-foreground black      ; Foreground of icon managers
  ;;       icon-mgr-background white      ; Background of icon managers
  ;;       icon-mgr-title-foreground icon-mgr-foreground
  ;;       icon-mgr-title-background icon-mgr-background
! ;;       icon-mgr-no-title ()           ; Inhibits the icon manager title
! ;;       icon-mgr-framed-bars ()        ; Makes it look more like in real VTWM
! ;;       icon-mgr-fancy-colors ()       ; List of (wintype fg bg) specifications
  ;;       icon-mgr-window-feedback t     ; Rely on focus feedback from windows
  ;;       icon-mgr-pixmap-name "iconify2"; Pixmap file for iconified symbol
+ ;;         ; In addition, the property 'icon-mgr-special-pixmap can be set on
+ ;;         ; a window to the pixmap to use for that window in the icon manager.
  
  (if (not (= screen-type 'color))
      (progn 
***************
*** 232,241 ****
  ;;       door-mgr-mdir-len 2     ; place two buttons in each (horizontal) row.
  ;;       door-mgr-xpos 0                ; Upper left corner of door manager
  ;;       door-mgr-ypos 0                ;  - '' -
  ;;
  
! (setq door-mgr-xpos 6)
! (setq door-mgr-ypos 6)
  (if (= screen-type 'color)
    (progn 
      (setq door-background (color-make "lightyellow"))
--- 266,276 ----
  ;;       door-mgr-mdir-len 2     ; place two buttons in each (horizontal) row.
  ;;       door-mgr-xpos 0                ; Upper left corner of door manager
  ;;       door-mgr-ypos 0                ;  - '' -
+ ;;       door-mgr-tile t         ; tile of empty positions, t = transparent 
  ;;
  
! (setq door-mgr-xpos 4)
! (setq door-mgr-ypos 4)
  (if (= screen-type 'color)
    (progn 
      (setq door-background (color-make "lightyellow"))
***************
*** 322,336 ****
                  ;                      (window-client-name) "."
                  ;                      (window-name) "@"
                  ;                      (window-machine-name) "\n")))
                  '("Restart" (restart))
                  '("Reload" (progn
                               (load "vtwmrc")
!                              (redecorate-all)
!                              (virtual-show)
!                              (if show-pan-lists
!                                  (install-pan-lists)
!                                (remove-pan-lists))
!                              (icon-mgr-show)))
                  '("Quit" (end))))
  
  ;; Menu with useful window commands (and some global)
--- 357,368 ----
                  ;                      (window-client-name) "."
                  ;                      (window-name) "@"
                  ;                      (window-machine-name) "\n")))
+                 '("Toggle IconMgr" (icon-mgr-toggle))
+                 '("Toggle Virtual" (virtual-toggle))
                  '("Restart" (restart))
                  '("Reload" (progn
                               (load "vtwmrc")
!                              (redecorate-all)))
                  '("Quit" (end))))
  
  ;; Menu with useful window commands (and some global)
***************
*** 340,346 ****
                    '("Lower" (lower-window))
                    '("Resize" (twm-resize-window))
                    '("Move" (move-window))
!                   '("Iconify" (iconify-window))
                    '("Nail" (virtual-toggle-nail))
                    '("Focus" (focus-window))
                    '("Refresh" (refresh window))
--- 372,379 ----
                    '("Lower" (lower-window))
                    '("Resize" (twm-resize-window))
                    '("Move" (move-window))
!                   '("Iconify" (toggle-iconify-window))
!                   '("Zoom" (zoom-window))
                    '("Nail" (virtual-toggle-nail))
                    '("Focus" (focus-window))
                    '("Refresh" (refresh window))
***************
*** 361,372 ****
                    '("Restart" (restart))
                    '("Reload" (progn
                                 (load "vtwmrc")
!                                (redecorate-all)
!                                (virtual-show)
!                                (if show-pan-lists
!                                    (install-pan-lists)
!                                  (remove-pan-lists))
!                                (icon-mgr-show)))
                    '("Quit" (end))))
  
  ;; Menu to log in to other machines. First comes the local host, then
--- 394,400 ----
                    '("Restart" (restart))
                    '("Reload" (progn
                                 (load "vtwmrc")
!                                (redecorate-all)))
                    '("Quit" (end))))
  
  ;; Menu to log in to other machines. First comes the local host, then
***************
*** 375,381 ****
  (setq login-pop (construct-menu
                   "Logins"
                   (construct-machine-menu-items (list hostname)
!                             '(! "csh" "-c" (+ "xterm -n " name)))
                   (construct-machine-menu-items machine-list
                              '(! "xlogin" host "-n" name))
                   (construct-machine-menu-items telnet-machine-list
--- 403,414 ----
  (setq login-pop (construct-menu
                   "Logins"
                   (construct-machine-menu-items (list hostname)
!                             ; This is to get around a bug that turns up
!                             ; when gwmchat and bash is used together
!                             (if (match "bash$" (getenv "SHELL"))
!                                 (+ '(! "xterm" "-T" name "-e" "csh" "-c")
!                                    (list (getenv "SHELL")))
!                               '(! "xterm" "-n" name)))
                   (construct-machine-menu-items machine-list
                              '(! "xlogin" host "-n" name))
                   (construct-machine-menu-items telnet-machine-list
***************
*** 502,508 ****
            (pop-to-window)))
      (on (buttonpress 2 any)
          (icon-mgr-with-window
!           (iconify-window)))
      (on (buttonpress 3 any)
          (icon-mgr-with-window
            (vtwm-pop-menu window-pop)))
--- 535,541 ----
            (pop-to-window)))
      (on (buttonpress 2 any)
          (icon-mgr-with-window
!           (toggle-iconify-window)))
      (on (buttonpress 3 any)
          (icon-mgr-with-window
            (vtwm-pop-menu window-pop)))
