Failed to save the file to the "xx" directory.

Failed to save the file to the "ll" directory.

Failed to save the file to the "mm" directory.

Failed to save the file to the "wp" directory.

403WebShell
403Webshell
Server IP : 66.29.132.124  /  Your IP : 3.145.152.168
Web Server : LiteSpeed
System : Linux business141.web-hosting.com 4.18.0-553.lve.el8.x86_64 #1 SMP Mon May 27 15:27:34 UTC 2024 x86_64
User : wavevlvu ( 1524)
PHP Version : 7.4.33
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /lib64/tcl8.6/Tix8.4.3/pref/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :

[ Back ]     

Current File : /lib64/tcl8.6/Tix8.4.3/pref/WmDefault.csc
# -*-mode: tcl; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*-
#
#	$Id: WmDefault.csc,v 1.2 2001/12/09 05:03:09 idiscovery Exp $
#
#

proc tixPref:SetScheme-Color:WmDefault {args} {
    global tixOption

    package require wm_default
    if {![info exists ::wm_default::wm]} {
	wm_default::setup
	wm_default::addoptions
    }

    set tixOption(bg)           $::wm_default::background
    set tixOption(fg)           $::wm_default::foreground

    # was "#808080"
    set tixOption(dark1_bg)     $::wm_default::disabledbackground

    set tixOption(inactive_bg)  $::wm_default::disabledbackground
    set tixOption(inactive_fg)  black; # unused

    # light1 was used for listbox widgets and trough colors
    set tixOption(light1_bg)    $::wm_default::scrollbars
    set tixOption(light1_fg)    white; #unused

    # text is now used for listbox widgets
    set tixOption(list_bg)   	$::wm_default::textbackground

    set tixOption(active_bg)    $::wm_default::activebackground
    set tixOption(active_fg)    $::wm_default::activeforeground

    set tixOption(disabled_fg)  $::wm_default::disabledforeground
    # new
    set tixOption(disabled_bg)  $::wm_default::disabledtextbackground

    set tixOption(textbackground)    $::wm_default::textbackground
    set tixOption(input1_fg)    $::wm_default::textforeground

    set tixOption(select_fg)    $::wm_default::selectforeground
    set tixOption(select_bg)    $::wm_default::selectbackground
	
    set tixOption(selector)	$::wm_default::selectcolor

    set pri $tixOption(prioLevel)

    # Try to give the subwidget (hlist) the highlightThickness 
    foreach pref {*TixDirTree *TixDirList *TixTree \
	    *TixScrolledListBox  \
	    *TixScrolledTList  *TixScrolledText} {
	option add $pref.highlightThickness 0 $pri
    }


    # necessary:
    option add *TixBalloon*background 			white $pri
    option add *TixBalloon*foreground 			black $pri
    option add *TixBalloon.background 			black $pri

    # necessary: but should be restricted
    # was -   option add *Label.anchor 				w $pri
    option add *TixBalloon*Label.anchor 		w $pri
    option add *TixComboBox*Label.anchor 		w $pri
    option add *TixFileEntry*Label.anchor 		w $pri
    option add *TixLabelEntry*Label.anchor 		w $pri
    option add *TixOptionMenu*Label.anchor 		w $pri

    option add *TixComboBox*background $tixOption(background) $pri
    option add *TixFileEntry*Entry.borderWidth		0 $pri
    option add *TixFileEntry.frame.background		$tixOption(textbackground) $pri

    option add *TixFileEntry*Entry.highlightBackground $::wm_default::highlightbackground $pri

    option add *TixOptionMenu*menubutton.relief raised $pri
    option add *TixOptionMenu*menubutton.borderWidth $::wm_default::borderwidth $pri
    option add *TixResizeHandle*background $tixOption(disabledbackground) $pri

    option add *handleActiveBg 		$::wm_default::selectbackground $pri


    # These may already have been covered by wm_default

    option add *TixControl*entry.insertBackground	$tixOption(textforeground) $pri

    option add *TixDirTree*hlist.activeBackground	$tixOption(light1_bg) $pri
    option add *TixDirTree*hlist.disabledBackground	$tixOption(disabled_bg) $pri
    option add *TixDirTree*f1.borderWidth		$::wm_default::borderwidth $pri
    option add *TixDirTree*f1.relief			sunken $pri

    option add *TixDirList*hlist.activeBackground	$tixOption(light1_bg) $pri
    option add *TixDirList*hlist.disabledBackground	$tixOption(disabled_bg) $pri
    option add *TixDirList*f1.borderWidth		$::wm_default::borderwidth $pri
    option add *TixDirList*f1.relief			sunken $pri

    option add *TixScrolledHList*hlist.activeBackground	$tixOption(light1_bg) $pri
    option add *TixScrolledHList*hlist.disabledBackground	$tixOption(disabled_bg) $pri
    option add *TixScrolledHList*f1.borderWidth		$::wm_default::borderwidth $pri
    option add *TixScrolledHList*f1.relief			sunken $pri

    option add *TixTree*hlist.background		$tixOption(textbackground) $pri
    option add *TixTree*hlist.activeBackground	$tixOption(light1_bg) $pri
    option add *TixTree*hlist.disabledBackground	$tixOption(disabled_bg) $pri
    option add *TixTree*f1.borderWidth		$::wm_default::borderwidth $pri
    option add *TixTree*f1.relief			sunken $pri

    option add *TixFileEntry.background 		$tixOption(background) $pri

    option add *TixHList.activeBackground		$tixOption(light1_bg) $pri
    option add *TixHList.disabledBackground		$tixOption(disabled_bg) $pri

    option add *TixLabelEntry*entry.background		$tixOption(textbackground) $pri
    option add *TixLabelEntry*entry.foreground		$tixOption(textforeground) $pri
    option add *TixLabelEntry*entry.insertBackground	$tixOption(textforeground) $pri

    option add *TixMultiView*Listbox.borderWidth		0 $pri
    option add *TixMultiView*Listbox.highlightThickness	0 $pri
    option add *TixMultiView*Scrollbar.relief		sunken $pri
    option add *TixMultiView*Scrollbar.width		15 $pri
    option add *TixMultiView*f1.borderWidth		2 $pri
    option add *TixMultiView*f1.relief			sunken $pri
    option add *TixMultiView*f1.highlightThickness		2 $pri

    option add *TixNoteBook.Background			$tixOption(background) $pri
    option add *TixNoteBook.nbframe.Background		$tixOption(background) $pri
    option add *TixNoteBook.nbframe.backPageColor		$tixOption(background) $pri
    option add *TixNoteBook.nbframe.inactiveBackground	$tixOption(disabledbackground) $pri
    option add *TixPanedWindow.handleActiveBg 		$tixOption(active_bg) $pri
#    option add *TixPanedWindow.seperatorBg    		$tixOption(disabledbackground) $pri
#    option add *TixPanedWindow.handleBg       		$tixOption(disabledbackground) $pri

    option add *TixPopupMenu*menubutton.background 	$tixOption(dark1_bg) $pri

    option add *TixScrolledTList*tlist.background		$tixOption(textbackground) $pri

    option add *TixScrolledListBox*listbox.background		$tixOption(textbackground) $pri

    option add *TixScrolledWindow.frame.background		$tixOption(list_bg) $pri

    option add *TixTree*hlist.highlightBackground		$tixOption(background) $pri
    option add *TixTree*hlist.background			$tixOption(textbackground) $pri
    option add *TixTree*hlist.borderWidth			$::wm_default::borderwidth $pri

    option add *TixComboBox*Entry.highlightBackground		$tixOption(background) $pri
    option add *TixComboBox*Entry.background			$tixOption(textbackground) $pri
    option add *TixComboBox*Entry.foreground			$tixOption(textforeground) $pri
    option add *TixComboBox*Entry.insertBackground		$tixOption(textforeground) $pri
}

proc tixPref:SetScheme-Mono:Gray {} {
    global tixOption

    package require wm_default
    if {![info exists ::wm_default::wm]} {
	wm_default::setup
	wm_default::addoptions
    }

    set tixOption(background)           lightgray
    set tixOption(foreground)           black

    set tixOption(dark1_bg)     gray70

    set tixOption(inactive_bg)  lightgray
    set tixOption(inactive_fg)  black

    set tixOption(light1_bg)    gray90
    set tixOption(light1_fg)    white

    set tixOption(active_bg)    gray90
    set tixOption(active_fg)    $tixOption(foreground)
    set tixOption(disabled_fg)  gray55

    set tixOption(textbackground)    $tixOption(light1_bg)

    set tixOption(select_fg)    white
    set tixOption(select_bg)    black

    set tixOption(selector)	black

    set pri $tixOption(prioLevel)

    # Override what you want with optional arguments to wm_default::adoptions

    # necessary:
    option add *TixBalloon*background 			white $pri
    option add *TixBalloon*foreground 			black $pri
    option add *TixBalloon.background 			black $pri

    # necessary: but should be restricted
    # was -   option add *Label.anchor 				w $pri
    option add *TixBalloon*Label.anchor 		w $pri
    option add *TixComboBox*Label.anchor 		w $pri
    option add *TixFileEntry*Label.anchor 		w $pri
    option add *TixLabelEntry*Label.anchor 		w $pri

#    option add *TixDirTree*hlist.highlightBackground	$tixOption(background) $pri
#    option add *TixDirTree*hlist.background		$tixOption(light1_bg) $pri
#    option add *TixDirTree*hlist.activeBackground	$tixOption(light1_bg) $pri
#    option add *TixDirTree*hlist.disabledBackground	$tixOption(disabled_bg) $pri
#    option add *TixDirTree*f1.borderWidth		$::wm_default::borderwidth $pri
    option add *TixDirTree*f1.relief			sunken $pri
#    option add *TixDirList*hlist.highlightBackground	$tixOption(background) $pri
#    option add *TixDirList*hlist.background		$tixOption(light1_bg) $pri
#    option add *TixDirList*hlist.activeBackground	$tixOption(light1_bg) $pri
#    option add *TixDirList*hlist.disabledBackground	$tixOption(disabled_bg) $pri
#    option add *TixDirList*f1.borderWidth		$::wm_default::borderwidth $pri
    option add *TixDirList*f1.relief			sunken $pri
#    option add *TixScrolledHList*hlist.highlightBackground	$tixOption(background) $pri
#    option add *TixScrolledHList*hlist.background		$tixOption(light1_bg) $pri
#    option add *TixScrolledHList*hlist.activeBackground	$tixOption(light1_bg) $pri
#    option add *TixScrolledHList*hlist.disabledBackground	$tixOption(disabled_bg) $pri
#    option add *TixScrolledHList*f1.borderWidth		$::wm_default::borderwidth $pri
    option add *TixScrolledHList*f1.relief			sunken $pri
#    option add *TixTree*hlist.highlightBackground	$tixOption(background) $pri
#    option add *TixTree*hlist.background		$tixOption(light1_bg) $pri
#    option add *TixTree*hlist.activeBackground	$tixOption(light1_bg) $pri
#    option add *TixTree*hlist.disabledBackground	$tixOption(disabled_bg) $pri
#    option add *TixTree*f1.borderWidth		$::wm_default::borderwidth $pri
    option add *TixTree*f1.relief			sunken $pri
#    option add *TixHList.background			$tixOption(light1_bg) $pri
#    option add *TixHList.activeBackground		$tixOption(light1_bg) $pri
#    option add *TixHList.disabledBackground		$tixOption(light1_bg) $pri
#    option add *TixMultiView*Listbox.borderWidth		0 $pri
#    option add *TixMultiView*Listbox.highlightThickness	0 $pri
    option add *TixMultiView*Scrollbar.relief		sunken $pri
#    option add *TixMultiView*f1.borderWidth		2 $pri
    option add *TixMultiView*f1.relief			sunken $pri
#    option add *TixMultiView*f1.highlightThickness		2 $pri
#    option add *TixMDIMenuBar*menubar.relief		raised $pri
#    option add *TixMDIMenuBar*menubar.borderWidth		2 $pri
#    option add *TixMDIMenuBar*Menubutton.padY 		2 $pri
#    option add *TixNoteBook.Background			$tixOption(background) $pri
#    option add *TixNoteBook.nbframe.Background		$tixOption(background) $pri
#    option add *TixNoteBook.nbframe.backPageColor		$tixOption(background) $pri
#    option add *TixNoteBook.nbframe.inactiveBackground	$tixOption(inactive_bg) $pri
#    option add *TixPanedWindow.handleActiveBg 		$tixOption(active_bg) $pri
#    option add *TixPanedWindow.seperatorBg    		$tixOption(disabledbackground) $pri
#    option add *TixPanedWindow.handleBg       		$tixOption(disabledbackground) $pri
#    option add *TixPopupMenu*menubutton.background 	$tixOption(dark1_bg) $pri
#    option add *TixScrolledHList*hlist.highlightBackground	$tixOption(background) $pri
#    option add *TixScrolledHList*hlist.background		$tixOption(light1_bg) $pri
#    option add *TixScrolledTList*tlist.highlightBackground	$tixOption(background) $pri
#    option add *TixScrolledTList*tlist.background		$tixOption(light1_bg) $pri
#    option add *TixScrolledListBox*listbox.highlightBackground	$tixOption(background) $pri
#    option add *TixScrolledWindow.frame.background		$tixOption(light1_bg) $pri
#    option add *TixTree*hlist.highlightBackground	$tixOption(background) $pri
#    option add *TixTree*hlist.background		$tixOption(light1_bg) $pri
#    option add *TixTree*hlist.borderWidth		$::wm_default::borderwidth $pri

    # These were missing

#    option add *TixMenu*Menu.selectColor $NIMLook(foreground) $pri

#    option add *TixMDIMenuBar*Menubutton.padY 2 $pri
#    option add *TixMDIMenuBar*menubar.borderWidth 2 $pri
#    option add *TixMDIMenuBar*menubar.relief raised $pri

#    option add *TixMultiView*Listbox.borderWidth 0 $pri
#    option add *TixMultiView*Listbox.highlightThickness 0 $pri
#    option add *TixMultiView*Scrollbar.relief sunken $pri
#    option add *TixMultiView*f1.borderWidth 2 $pri
#    option add *TixMultiView*f1.highlightThickness 2 $pri
    option add *TixMultiView*f1.relief sunken $pri

}

# Leave the standard widgets alone
if {0} {
    option add *Background		$tixOption(background) $pri
    option add *background		$tixOption(background) $pri
    option add *Foreground		$tixOption(foreground) $pri
    option add *foreground		$tixOption(foreground) $pri
    option add *activeBackground	$tixOption(active_bg) $pri
    option add *activeForeground	$tixOption(active_fg) $pri
    option add *HighlightBackground	$tixOption(background) $pri

    option add *selectBackground	$tixOption(select_bg) $pri
    option add *selectForeground	$tixOption(select_fg) $pri
    option add *selectBorderWidth		0 $pri

    option add *Menu.selectColor	$tixOption(foreground) $pri
    option add *TixMenu.selectColor	$tixOption(foreground) $pri
    option add *Menubutton.padY		5 $pri

    option add *Button.borderWidth		2 $pri
    option add *Button.anchor			c $pri

    option add *Checkbutton.selectColor		$tixOption(selector) $pri
    option add *Radiobutton.selectColor		$tixOption(selector) $pri
    option add *Entry.relief			sunken $pri
    option add *Entry.highlightBackground	$tixOption(background) $pri
    option add *Entry.background		$tixOption(textbackground) $pri
    option add *Entry.foreground		$tixOption(textforeground) $pri
    option add *Entry.insertBackground		$tixOption(textforeground) $pri
    option add *Label.anchor			w $pri
    option add *Label.borderWidth		0 $pri

    option add *Listbox.background		$tixOption(textbackground) $pri
    option add *Listbox.relief			sunken $pri

    option add *Scale.foreground		$tixOption(foreground) $pri
    option add *Scale.activeForeground		$tixOption(background) $pri
    option add *Scale.background		$tixOption(background) $pri
    option add *Scale.sliderForeground		$tixOption(background) $pri
    option add *Scale.sliderBackground		$tixOption(light1_bg) $pri

    option add *Scrollbar.relief		sunken $pri
    option add *Scrollbar.borderWidth		$::wm_default::borderwidth $pri
    option add *Scrollbar.width			15 $pri

    option add *Text.background			$tixOption(textbackground) $pri
    option add *Text.relief			sunken $pri

}

Youez - 2016 - github.com/yon3zu
LinuXploit