summaryrefslogtreecommitdiff
path: root/dev-util/visual-regexp/files/visual-regexp-3.1-help-font-fix.patch
diff options
context:
space:
mode:
Diffstat (limited to 'dev-util/visual-regexp/files/visual-regexp-3.1-help-font-fix.patch')
-rw-r--r--dev-util/visual-regexp/files/visual-regexp-3.1-help-font-fix.patch32
1 files changed, 32 insertions, 0 deletions
diff --git a/dev-util/visual-regexp/files/visual-regexp-3.1-help-font-fix.patch b/dev-util/visual-regexp/files/visual-regexp-3.1-help-font-fix.patch
new file mode 100644
index 000000000000..1dd7e7021b4f
--- /dev/null
+++ b/dev-util/visual-regexp/files/visual-regexp-3.1-help-font-fix.patch
@@ -0,0 +1,32 @@
+diff -ur a/visual_regexp.tcl b/visual_regexp.tcl
+--- a/visual_regexp.tcl 2013-11-10 01:49:14.987065220 +0100
++++ b/visual_regexp.tcl 2013-11-10 01:49:04.177341077 +0100
+@@ -740,10 +740,13 @@
+ frame .help.text;
+
+ if {$tcl_platform(platform) == "windows"} {
+- text .help.text.t -borderwidth 2 -relief groove -font {Courier 10} -yscrollcommand [list .help.text.sy set];
++ set hfont {Courier 10}
++ set hbfont {Courier 10 bold}
+ } else {
+- text .help.text.t -borderwidth 2 -relief groove -yscrollcommand [list .help.text.sy set];
++ set hfont {9x15}
++ set hbfont {9x15bold}
+ }
++ text .help.text.t -borderwidth 2 -relief groove -font $hfont -yscrollcommand [list .help.text.sy set];
+
+ scrollbar .help.text.sy \
+ -command ".help.text.t yview" \
+@@ -755,10 +758,10 @@
+
+ pack .help.text -side top -fill both -expand 1 -padx 20
+
+- .help.text.t tag configure bold -font "[.help.text.t cget -font] bold"
++ .help.text.t tag configure bold -font $hbfont
+ .help.text.t insert 1.0 "Version:" bold " $::version
+
+-" normal "Usage:" bold " tkregexp <sampleFile>
++" normal "Usage:" bold " [file tail $::argv0] <sampleFile>
+
+ " normal "Key bindings:" bold " Alt-q exit
+ Alt-a toggle 'all' flag