Bwidget Source Code
Changes On Branch bug-a4cbba655d
Not logged in
Core Home Timeline Branches Tags Tickets Wiki Login
Hide Diff Patch Unified Diff

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Changes In Branch bug-a4cbba655d Excluding Merge-Ins

This is equivalent to a diff from fdb38ca6f0 to cec2f0f4f8

2013-09-02
09:39
notebook.tcl: cured error in _resize, that data($p,width) is not (jet) present. Ticket [a4cbba655d] check-in: 3e24e1b646 user: oehhar tags: bwidget
2013-08-14
17:46
notebook.tcl: cured error in _resize, that data($p,width) is not (jet) present. Ticket [a4cbba655d] Leaf check-in: cec2f0f4f8 user: oehhar tags: bug-a4cbba655d
2013-06-28
07:45
Curing shift-lock interferences of Shift-Accelerators of Mainframe widget on the MAC. Ticket [83ce3e84e7], Patch [9f67a66609] check-in: fdb38ca6f0 user: oehhar tags: bwidget
2013-06-26
08:03
mainframe.tcl: Reverted Patch [1977644] (checkin [58357c462f])(-casesensitive for accellerators). It has issues with shift-lock. check-in: 510027c421 user: oehhar tags: bwidget

Changes to ChangeLog. 






1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20






2013-08-28 Harald Oehlmann <[email protected]>

	* mainframe.tcl: Included Patch [9f67a66609]
	curing issues of Shift-Accellerators with Shift-Lock
	on Mac. By Keith Nash, Ticket [83ce3e84e7].

2013-08-26 Harald Oehlmann <[email protected]>

	* mainframe.tcl: Reverted Patch [1977644]
	(-casesensitive for accellerators). It has
	issues with shift-lock.

2013-08-21 Harald Oehlmann <[email protected]>

	* labelentry.tcl: Bug fixed:
	Methods from Tk entry widget restored [Bug 1002844].
	
	* mainframe.tcl: Allow case sensitive accelerators
	by new option -casesensitive.
	Patch by cmard [Patch 1977644]

>
>
>
>
>
|





|





|








1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

2013-08-14 Harald Oehlmann <[email protected]>

	* notebook.tcl: cured error in _resize, that
	data($p,width) is not (jet) present. Ticket [a4cbba655d].

2013-06-28 Harald Oehlmann <[email protected]>

	* mainframe.tcl: Included Patch [9f67a66609]
	curing issues of Shift-Accellerators with Shift-Lock
	on Mac. By Keith Nash, Ticket [83ce3e84e7].

2013-06-26 Harald Oehlmann <[email protected]>

	* mainframe.tcl: Reverted Patch [1977644]
	(-casesensitive for accellerators). It has
	issues with shift-lock.

2013-06-21 Harald Oehlmann <[email protected]>

	* labelentry.tcl: Bug fixed:
	Methods from Tk entry widget restored [Bug 1002844].
	
	* mainframe.tcl: Allow case sensitive accelerators
	by new option -casesensitive.
	Patch by cmard [Patch 1977644]
︙︙

Changes to notebook.tcl.

︙︙
1103
1104
1105
1106
1107
1108
1109






1110

1111
1112



1113

1114
1115
1116
1117
1118
1119
1120
1121
1122

# -----------------------------------------------------------------------------
#  Command NoteBook::_resize
# -----------------------------------------------------------------------------
proc NoteBook::_resize { path } {
    variable $path
    upvar 0  $path data







    if {!$data(realized)} {

	if { [set width  [Widget::cget $path -width]]  == 0 ||
	     [set height [Widget::cget $path -height]] == 0 } {



	    compute_size $path

	}
	set data(realized) 1
    }

    NoteBook::_redraw $path
}


# Tree::_set_help --








>
>
>
>
>
>

>
|
|
>
>
>

>

<








1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125

1126
1127
1128
1129
1130
1131
1132

# -----------------------------------------------------------------------------
#  Command NoteBook::_resize
# -----------------------------------------------------------------------------
proc NoteBook::_resize { path } {
    variable $path
    upvar 0  $path data

    # Check if pages are fully initialized or if we are still initializing
    if { 0 < [llength $data(pages)] &&
	 ![info exists data([lindex $data(pages) end],width)] } {
	return
    }
    
    if {!$data(realized)} {
	set data(realized) 1
	if { [Widget::cget $path -width]  == 0 ||
	     [Widget::cget $path -height] == 0 } {
	    # This does an update allowing other events (resize) to enter
	    # In addition, it does a redraw, so first set the realized and
	    # then exit
	    compute_size $path
	    return
	}

    }

    NoteBook::_redraw $path
}


# Tree::_set_help --
︙︙