lkml.org 
[lkml]   [1999]   [Dec]   [30]   [last100]   RSS Feed
Views: [wrap][no wrap]   [headers]  [forward] 
 
Messages in this thread
    /
    Date
    From
    Subject(2.3.35) Re: More complete information regarding the Serial PCMCIA kconfig.tk problem.
    This is with 2.3.35 sources.

    Miles Lane wrote:
    >
    > I noticed that the snippet I sent in my previous e-mail will
    > be inadequate for debugging purposes. Here is the complete
    > section from my kconfig.tk file that relates to the "menu36"
    > (the PCMCIA serial device support dialog).
    >
    > Many thanks!
    >
    > BTW: Please CC: me, since I am only subscribed to the
    > linux-kernel digests.
    >
    > proc menu36 {w title} {
    > set oldFocus [focus]
    > catch {focus .menu29}
    > catch {destroy $w; unregister_active 36}
    > toplevel $w -class Dialog
    > wm withdraw $w
    > global active_menus
    > set active_menus [lsort -integer [linsert $active_menus end 36]]
    > message $w.m -width 400 -aspect 300 -text \
    > "PCMCIA character device support" -relief raised
    > pack $w.m -pady 10 -side top -padx 10
    > wm title $w "PCMCIA character device support"
    >
    > frame $w.f
    > button $w.f.back -text "OK" \
    > -width 15 -command "catch {focus $oldFocus}; destroy $w;
    > unregister_active 36"
    > button $w.f.next -text "Next" \
    > -width 15 -command "catch {focus $oldFocus}; destroy $w;
    > unregister_active 36; catch {destroy .menu29}; unregister_active 29;
    > menu37 .menu37 \"$title\""
    > button $w.f.prev -text "Prev" \
    > -width 15 -command "catch {focus $oldFocus}; destroy $w;
    > unregister_active 36; menu35 .menu35 \"$title\""
    > pack $w.f.back $w.f.next $w.f.prev -side left -expand on
    > pack $w.f -pady 10 -side bottom -anchor w -fill x
    > frame $w.topline -relief ridge -borderwidth 2 -height 2
    > pack $w.topline -side top -fill x
    >
    > frame $w.botline -relief ridge -borderwidth 2 -height 2
    > pack $w.botline -side bottom -fill x
    >
    > frame $w.config
    > pack $w.config -fill y -expand on
    >
    > scrollbar $w.config.vscroll -command "$w.config.canvas yview"
    > pack $w.config.vscroll -side right -fill y
    >
    > canvas $w.config.canvas -height 1\
    > -relief flat -borderwidth 0 -yscrollcommand "$w.config.vscroll set" \
    > -width [expr [winfo screenwidth .] * 1 / 2]
    > frame $w.config.f
    > pack $w.config.canvas -side right -fill y
    >
    > dep_tristate $w.config.f 36 0 "PCMCIA serial device support"
    > CONFIG_PCMCIA_SERIAL_CS
    > dep_tristate $w.config.f 36 1 "CardBus serial device support"
    > CONFIG_PCMCIA_SERIAL_CB
    > dep_tristate $w.config.f 36 2 "PCMCIA serial device support"
    > CONFIG_PCMCIA_SERIAL_CS
    > dep_tristate $w.config.f 36 3 "CardBus serial device support"
    > CONFIG_PCMCIA_SERIAL_CB
    >
    > focus $w
    > update_active
    > global winx; global winy
    > if {[winfo exists .menu29] == 0} then {menu29 .menu29 "Character
    > devices"}
    > set winx [expr [winfo x .menu29]+30]; set winy [expr [winfo y
    > .menu29]+30]
    > wm geometry $w +$winx+$winy
    > update idletasks
    > $w.config.canvas create window 0 0 -anchor nw -window $w.config.f
    >
    > $w.config.canvas configure \
    > -width [expr [winfo reqwidth $w.config.f] + 1]\
    > -scrollregion "-1 -1 [expr [winfo reqwidth $w.config.f] + 1] \
    > [expr [winfo reqheight $w.config.f] + 1]"
    >
    > set winy [expr [winfo reqh $w] - [winfo reqh $w.config.canvas]]
    > set scry [expr [winfo screenh $w] / 2]
    > set maxy [expr [winfo screenh $w] * 3 / 4]
    > set canvtotal [expr [winfo reqh $w.config.f] + 2]
    > if [expr $winy + $canvtotal < $maxy] {
    > $w.config.canvas configure -height $canvtotal
    > } else {
    > $w.config.canvas configure -height [expr $scry - $winy]
    > }
    > update idletasks
    > wm maxsize $w [winfo width $w] [winfo screenheight $w]
    > wm minsize $w [winfo width $w] 100
    >
    > wm deiconify $w
    > }
    >
    > proc update_menu36 {} {
    > global CONFIG_MODULES
    > global CONFIG_PCMCIA
    > global CONFIG_SERIAL
    > global CONFIG_PCMCIA_SERIAL_CS
    > if {($CONFIG_PCMCIA != 0) && ($CONFIG_SERIAL == 1) && ($CONFIG_PCMCIA
    > == 1 || $CONFIG_PCMCIA == 2 || $CONFIG_PCMCIA == 4)} then {
    > set tmpvar_dep [effective_dep [list $CONFIG_PCMCIA]];set
    > CONFIG_PCMCIA_SERIAL_CS [sync_tristate $CONFIG_PCMCIA_SERIAL_CS
    > $tmpvar_dep]; if {$tmpvar_dep != 1} then {configure_entry
    > .menu36.config.f.x0 disabled {y}} else {configure_entry
    > .menu36.config.f.x0 normal {y}}; if {$tmpvar_dep == 0} then
    > {configure_entry .menu36.config.f.x0 disabled {m}} else {configure_entry
    > .menu36.config.f.x0 normal {m}}; if {($CONFIG_MODULES == 1)} then
    > {configure_entry .menu36.config.f.x0 normal {m}} else {configure_entry
    > .menu36.config.f.x0 disabled {m}}; configure_entry .menu36.config.f.x0
    > normal {n l}} else {configure_entry .menu36.config.f.x0 disabled {y n m
    > l}}
    > global CONFIG_CARDBUS
    > global CONFIG_PCMCIA_SERIAL_CB
    > if {($CONFIG_PCMCIA != 0) && ($CONFIG_SERIAL == 1) && ($CONFIG_CARDBUS
    > == 1) && ($CONFIG_PCMCIA == 1 || $CONFIG_PCMCIA == 2 || $CONFIG_PCMCIA
    > == 4)} then {
    > set tmpvar_dep [effective_dep [list $CONFIG_PCMCIA]];set
    > CONFIG_PCMCIA_SERIAL_CB [sync_tristate $CONFIG_PCMCIA_SERIAL_CB
    > $tmpvar_dep]; if {$tmpvar_dep != 1} then {configure_entry
    > .menu36.config.f.x1 disabled {y}} else {configure_entry
    > .menu36.config.f.x1 normal {y}}; if {$tmpvar_dep == 0} then
    > {configure_entry .menu36.config.f.x1 disabled {m}} else {configure_entry
    > .menu36.config.f.x1 normal {m}}; if {($CONFIG_MODULES == 1)} then
    > {configure_entry .menu36.config.f.x1 normal {m}} else {configure_entry
    > .menu36.config.f.x1 disabled {m}}; configure_entry .menu36.config.f.x1
    > normal {n l}} else {configure_entry .menu36.config.f.x1 disabled {y n m
    > l}}
    > if {($CONFIG_PCMCIA != 0) && ($CONFIG_SERIAL == 2)} then {
    > global CONSTANT_M
    > set tmpvar_dep [effective_dep [list $CONSTANT_M]];set
    > CONFIG_PCMCIA_SERIAL_CS [sync_tristate $CONFIG_PCMCIA_SERIAL_CS
    > $tmpvar_dep]; if {$tmpvar_dep != 1} then {configure_entry
    > .menu36.config.f.x2 disabled {y}} else {configure_entry
    > .menu36.config.f.x2 normal {y}}; if {$tmpvar_dep == 0} then
    > {configure_entry .menu36.config.f.x2 disabled {m}} else {configure_entry
    > .menu36.config.f.x2 normal {m}}; if {($CONFIG_MODULES == 1)} then
    > {configure_entry .menu36.config.f.x2 normal {m}} else {configure_entry
    > .menu36.config.f.x2 disabled {m}}; configure_entry .menu36.config.f.x2
    > normal {n l}} else {configure_entry .menu36.config.f.x2 disabled {y n m
    > l}}
    > if {($CONFIG_PCMCIA != 0) && ($CONFIG_SERIAL == 2) && ($CONFIG_CARDBUS
    > == 1)} then {
    > global CONSTANT_M
    > set tmpvar_dep [effective_dep [list $CONSTANT_M]];set
    > CONFIG_PCMCIA_SERIAL_CB [sync_tristate $CONFIG_PCMCIA_SERIAL_CB
    > $tmpvar_dep]; if {$tmpvar_dep != 1} then {configure_entry
    > .menu36.config.f.x3 disabled {y}} else {configure_entry
    > .menu36.config.f.x3 normal {y}}; if {$tmpvar_dep == 0} then
    > {configure_entry .menu36.config.f.x3 disabled {m}} else {configure_entry
    > .menu36.config.f.x3 normal {m}}; if {($CONFIG_MODULES == 1)} then
    > {configure_entry .menu36.config.f.x3 normal {m}} else {configure_entry
    > .menu36.config.f.x3 disabled {m}}; configure_entry .menu36.config.f.x3
    > normal {n l}} else {configure_entry .menu36.config.f.x3 disabled {y n m
    > l}}
    > }
    >
    > proc update_define_menu36 {} {
    > update_define_mainmenu
    > global CONFIG_MODULES
    > global CONFIG_PCMCIA_CHRDEV
    > global CONFIG_PCMCIA
    > global CONFIG_SERIAL
    > global CONFIG_PCMCIA_SERIAL_CS
    > if {($CONFIG_PCMCIA != 0) && ($CONFIG_SERIAL == 1) && ($CONFIG_PCMCIA
    > == 1 || $CONFIG_PCMCIA == 2 || $CONFIG_PCMCIA == 4)} then {
    > set tmpvar_dep [effective_dep [list $CONFIG_PCMCIA]]; set
    > CONFIG_PCMCIA_SERIAL_CS [sync_tristate $CONFIG_PCMCIA_SERIAL_CS
    > $tmpvar_dep]; set CONFIG_PCMCIA_SERIAL_CS [expr
    > $CONFIG_PCMCIA_SERIAL_CS&15]} else {set CONFIG_PCMCIA_SERIAL_CS [expr
    > $CONFIG_PCMCIA_SERIAL_CS|16]}
    > global CONFIG_CARDBUS
    > global CONFIG_PCMCIA_SERIAL_CB
    > if {($CONFIG_PCMCIA != 0) && ($CONFIG_SERIAL == 1) && ($CONFIG_CARDBUS
    > == 1) && ($CONFIG_PCMCIA == 1 || $CONFIG_PCMCIA == 2 || $CONFIG_PCMCIA
    > == 4)} then {
    > set tmpvar_dep [effective_dep [list $CONFIG_PCMCIA]]; set
    > CONFIG_PCMCIA_SERIAL_CB [sync_tristate $CONFIG_PCMCIA_SERIAL_CB
    > $tmpvar_dep]; set CONFIG_PCMCIA_SERIAL_CB [expr
    > $CONFIG_PCMCIA_SERIAL_CB&15]} else {set CONFIG_PCMCIA_SERIAL_CB [expr
    > $CONFIG_PCMCIA_SERIAL_CB|16]}
    > if {($CONFIG_PCMCIA != 0) && ($CONFIG_SERIAL == 2)} then {
    > global CONSTANT_M
    > set tmpvar_dep [effective_dep [list $CONSTANT_M]]; set
    > CONFIG_PCMCIA_SERIAL_CS [sync_tristate $CONFIG_PCMCIA_SERIAL_CS
    > $tmpvar_dep]; set CONFIG_PCMCIA_SERIAL_CS [expr
    > $CONFIG_PCMCIA_SERIAL_CS&15]} else {set CONFIG_PCMCIA_SERIAL_CS [expr
    > $CONFIG_PCMCIA_SERIAL_CS|16]}
    > if {($CONFIG_PCMCIA != 0) && ($CONFIG_SERIAL == 2) && ($CONFIG_CARDBUS
    > == 1)} then {
    > global CONSTANT_M
    > set tmpvar_dep [effective_dep [list $CONSTANT_M]]; set
    > CONFIG_PCMCIA_SERIAL_CB [sync_tristate $CONFIG_PCMCIA_SERIAL_CB
    > $tmpvar_dep]; set CONFIG_PCMCIA_SERIAL_CB [expr
    > $CONFIG_PCMCIA_SERIAL_CB&15]} else {set CONFIG_PCMCIA_SERIAL_CB [expr
    > $CONFIG_PCMCIA_SERIAL_CB|16]}
    > if {($CONFIG_PCMCIA != 0) && ($CONFIG_PCMCIA_SERIAL_CS == 1 ||
    > $CONFIG_PCMCIA_SERIAL_CB == 1)} then { global CONSTANT_Y
    > set CONFIG_PCMCIA_CHRDEV $CONSTANT_Y }
    > }

    -
    To unsubscribe from this list: send the line "unsubscribe linux-kernel" in
    the body of a message to majordomo@vger.rutgers.edu
    Please read the FAQ at http://www.tux.org/lkml/

    \
     
     \ /
      Last update: 2005-03-22 13:55    [W:0.037 / U:0.044 seconds]
    ©2003-2016 Jasper Spaans. hosted at Digital OceanAdvertise on this site