### Copyright (C) 1995, 1996, 1997 Jeppe Buk (buk@imada.ou.dk) ### This program is free software; you can redistribute it and/or modify ### it under the terms of the GNU General Public License as published by ### the Free Software Foundation; either version 2 of the License, or ### (at your option) any later version. ### ### This program is distributed in the hope that it will be useful, ### but WITHOUT ANY WARRANTY; without even the implied warranty of ### MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ### GNU General Public License for more details. ### ### You should have received a copy of the GNU General Public License ### along with this program; if not, write to the Free Software ### Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. ### ### Mar. 9 1998 Japanized by Mahsio Motoyama ### proc FvwmBanner {} { # モジュール / FvwmBanner Desc "FvwmBanner モジュールの設定" ShortDesc "FvwmBanner" Header h -text "FvwmBanner" -frame:relief flat \ -help "このページでは FvwmBanner モジュールの設定を行います。"\ "このモジュールは、起動時に FVWM のロゴ等を数秒間表示するために使われます。" Line l CheckBox spawn -text "起動時から利用" \ -help "これを選択すると、このモジュールは起動時、つまり"\ "'InitFunction' と 'RestartFunction' からその動作を開始します。" Entry pixmap\ -text "ピックスマップを"\ -textafter "に変更"\ -help "FvwmBanner モジュールで表示する FVWM のロゴを別の物に変更するならば、そのピックスマップを入力します。" Int delay\ -text "タイムアウト時間を"\ -textafter "秒に設定"\ -help "標準の表示時間は三秒間ですが、これが気に食わないときには秒単位で表示時間を設定できます。" Save { if {$pixmap != "" && $pixmap != "/"} {print "*FvwmBannerPixmap\t$pixmap"} if {$delay != ""} {print "*FvwmBannerTimeout\t$delay"} if {$spawn == 1} { print "AddToFunc InitFunction \"I\" Module FvwmBanner" print "AddToFunc RestartFunction \"I\" Module FvwmBanner" } } }