From d24c552d9988ccab56297ba23926010d82b28ba5 Mon Sep 17 00:00:00 2001 From: Nick White Date: Mon, 17 Mar 2014 02:03:04 -0400 Subject: Reduce default font size --- tkread | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/tkread b/tkread index 30639ce..34472b1 100755 --- a/tkread +++ b/tkread @@ -24,7 +24,7 @@ set usage {tkread [-w] [-m] # - add more markdown processing set fontfamily {Linux Libertine O} -set fontsize 16 +set fontsize 11 set textcolour #443322 set bgcolour #eeeee2 set outercolour #222222 @@ -133,6 +133,7 @@ proc markup {widget} { } # remove links + # TODO: search for ]( and then work back to find the [, as otherwise false positives occur when something like 'strike[s] him' is encountered # TODO: save the link contents and allow the links to be shown / hidden with a keystroke set cur [$widget search {[} 0.0 end] while {$cur != ""} { -- cgit v1.2.3