cgit.sxemacs.org Git - packages/blob - xemacs-packages/liece/etc/styles/middle

   1 ;; -*- emacs-lisp -*-
   2 ;;; middle --- Window configuration style spec for `middle'.
   3 ;; Copyright (C) 1998 Daiki Ueno <daiki@kake.info.waseda.ac.jp>
   4 ;; See file liece-copyright.el for original change log and copyright info.
   5
   6 ;; Author: Daiki Ueno <daiki@kake.info.waseda.ac.jp>
   7 ;; Created: 1999-01-08
   8 ;; Revised: 1999-01-08
   9 ;; Keywords: IRC, liece
  10
  11 ;; This file is part of Liece.
  12
  13 ;; This program is free software; you can redistribute it and/or modify
  14 ;; it under the terms of the GNU General Public License as published by
  15 ;; the Free Software Foundation; either version 2, or (at your option)
  16 ;; any later version.
  17
  18 ;; This program is distributed in the hope that it will be useful,
  19 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  20 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21 ;; GNU General Public License for more details.
  22
  23 ;; You should have received a copy of the GNU General Public License
  24 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
  25 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  26 ;; Boston, MA 02111-1307, USA.
  27
  28 ;;; Code:
  29
  30 (liece-window-add-style
  31  (command-buffer-mode . any)
  32  (channel-buffer-mode . t)
  33  (nick-buffer-mode . t)
  34  (channel-list-buffer-mode . t)
  35  (configuration
  36   (horizontal
  37    1.0
  38    (vertical
  39     1.0
  40     (channel liece-channel-window-height-percent)
  41     (command 3 point)
  42     (others 1.0))
  43    (vertical
  44     liece-nick-window-width-percent
  45     (nick 0.5)
  46     (channel-list 1.0)))))
  47
  48 (liece-window-add-style
  49  (command-buffer-mode . any)
  50  (channel-buffer-mode . t)
  51  (nick-buffer-mode . nil)
  52  (channel-list-buffer-mode . t)
  53  (configuration
  54   (vertical
  55    1.0
  56    (horizontal
  57     1.0
  58     (others 1.0)
  59     (channel-list
  60      liece-channel-list-window-width-percent))
  61    (horizontal
  62     liece-channel-window-height-percent
  63     (channel 1.0))
  64    (command 3 point))))
  65
  66 (liece-window-add-style
  67  (command-buffer-mode . any)
  68  (channel-buffer-mode . t)
  69  (nick-buffer-mode . nil)
  70  (channel-list-buffer-mode . nil)
  71  (configuration
  72   (vertical
  73    1.0
  74    (others 1.0)
  75    (channel liece-channel-window-height-percent)
  76    (command 3 point))))
  77
  78 (liece-window-add-style
  79  (command-buffer-mode . any)
  80  (channel-buffer-mode . nil)
  81  (nick-buffer-mode . any)
  82  (channel-list-buffer-mode . any)
  83  (configuration
  84   (vertical
  85    1.0
  86    (dialogue 1.0)
  87    (command 3 point))))