diff options
| -rwxr-xr-x | git-gui.sh | 5 | ||||
| -rw-r--r-- | lib/blame.tcl | 5 | ||||
| -rw-r--r-- | lib/option.tcl | 3 |
3 files changed, 12 insertions, 1 deletions
@@ -1024,6 +1024,7 @@ proc incr_font_size {font {amt 1}} { incr sz $amt font configure $font -size $sz font configure ${font}bold -size $sz + font configure ${font}italic -size $sz } ###################################################################### @@ -1216,8 +1217,10 @@ catch { destroy .dummy } +font create font_uiitalic font create font_uibold font create font_diffbold +font create font_diffitalic foreach class {Button Checkbutton Entry Label Labelframe Listbox Menu Message @@ -1249,8 +1252,10 @@ proc apply_config {} { } foreach {cn cv} [font configure $font] { font configure ${font}bold $cn $cv + font configure ${font}italic $cn $cv } font configure ${font}bold -weight bold + font configure ${font}italic -slant italic } } diff --git a/lib/blame.tcl b/lib/blame.tcl index 0531450..0641ea6 100644 --- a/lib/blame.tcl +++ b/lib/blame.tcl @@ -194,6 +194,9 @@ constructor new {i_commit i_path} { -xscrollcommand [list $w.file_pane.cm.sbx set] \ -yscrollcommand [list $w.file_pane.cm.sby set] \ -font font_diff + $w_cviewer tag conf still_loading \ + -font font_uiitalic \ + -justify center $w_cviewer tag conf header_key \ -tabs {3c} \ -background $active_color \ @@ -624,7 +627,7 @@ method _showcommit {lno} { set dat [lindex $amov_data $lno] if {$dat eq {}} { set cmit {} - $w_cviewer insert end "Loading annotation..." + $w_cviewer insert end "Loading annotation..." still_loading } else { set cmit [lindex $dat 0] set file [lindex $dat 1] diff --git a/lib/option.tcl b/lib/option.tcl index 11dd9be..b29e14e 100644 --- a/lib/option.tcl +++ b/lib/option.tcl @@ -15,6 +15,9 @@ proc save_config {} { font configure ${font}bold \ -family $global_config_new(gui.$font^^family) \ -size $global_config_new(gui.$font^^size) + font configure ${font}italic \ + -family $global_config_new(gui.$font^^family) \ + -size $global_config_new(gui.$font^^size) set global_config_new(gui.$name) [font configure $font] unset global_config_new(gui.$font^^family) unset global_config_new(gui.$font^^size) |