From 3bf3b80e38813a45ee25bdbc8b54288805572351 Mon Sep 17 00:00:00 2001 From: svkalinin Date: Fri, 16 Dec 2022 10:11:07 +0300 Subject: [PATCH] =?UTF-8?q?=D0=94=D0=BE=D0=B1=D0=B0=D0=B2=D0=B8=D0=BB=20?= =?UTF-8?q?=D1=80=D0=B0=D1=81=D0=BA=D1=80=D0=B0=D1=81=D0=BA=D0=B8=20=D0=B2?= =?UTF-8?q?=20ruby?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- lib/highlight.tcl | 6 +++++- projman.tcl | 2 +- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/lib/highlight.tcl b/lib/highlight.tcl index ef7fe20..f89d97f 100644 --- a/lib/highlight.tcl +++ b/lib/highlight.tcl @@ -17,6 +17,7 @@ namespace eval Highlight {} { ctext::addHighlightClassForSpecialChars $txt qoute #b84a0c {"'`} ctext::addHighlightClassForRegexp $txt colors #68ceff {(#)(\w)+?(\s|$)} ctext::addHighlightClassForRegexp $txt comments #666666 {(^|;)\s*(#)[^\n\r]*} + ctext::addHighlightClass $txt bool #3e803b {nil false true} } proc Default {txt} { @@ -54,6 +55,7 @@ namespace eval Highlight {} { ctext::addHighlightClassForSpecialChars $txt brackets green {[]{}()} ctext::addHighlightClassForRegexp $txt paths lightblue {\.[a-zA-Z0-9\_\-]+} ctext::addHighlightClassForRegexp $txt comments #666666 {(#|//)[^\n\r]*} + ctext::addHighlightClass $txt bool #3e803b {nil false true} ctext::addHighlightClassForSpecialChars $txt qoute #b84a0c {"'`} } @@ -111,13 +113,15 @@ namespace eval Highlight {} { proc RB {txt} { ctext::addHighlightClassForRegexp $txt qoute #b84a0c {("|'|`).*?("|'|`)} ctext::addHighlightClassForRegexp $txt flags orange {\s-[a-zA-Z]+} - ctext::addHighlightClass $txt stackControl #19a2a6 {def end class if else for while case when require module begin rescue self return include} + ctext::addHighlightClass $txt stackControl #19a2a6 {def end class if else for while case when require module begin rescue self return include unless raise private new do synchronize} ctext::addHighlightClassForRegexp $txt vars #4471ca {(\$|\*|\&)[\.a-zA-Z0-9\_\-\[\]]+} ctext::addHighlightClassForSpecialChars $txt brackets green {[]{}()} ctext::addHighlightClassForRegexp $txt paths lightblue {\.[a-zA-Z0-9\_\-]+} ctext::addHighlightClassForRegexp $txt comments #666666 {(#|//)[^\n\r]*} ctext::addHighlightClassForRegexp $txt namespaces #4f64ff {::} ctext::addHighlightClassForRegexp $txt dog #0082ff {(@)[\.a-zA-Z0-9\_\-]+} + ctext::addHighlightClass $txt bool #7e5fb3 {nil false true} + } proc MD {txt} { diff --git a/projman.tcl b/projman.tcl index 02b2d5a..19dec00 100755 --- a/projman.tcl +++ b/projman.tcl @@ -10,7 +10,7 @@ exec wish "$0" -- "$@" ###################################################### # Version: 2.0.0 # Release: alpha -# Build: 16122022093108 +# Build: 16122022101023 ###################################################### # определим текущую версию, релиз и т.д.