From 4f2d7949f03e1c198bc888f2d05f421d35c57e21 Mon Sep 17 00:00:00 2001 From: V3n3RiX Date: Mon, 9 Oct 2017 18:53:29 +0100 Subject: reinit the tree, so we can have metadata --- .../files/visual-regexp-3.0-help-font-fix.patch | 26 ++++++++++ .../files/visual-regexp-3.0-home-conf-fix.patch | 56 ++++++++++++++++++++++ .../files/visual-regexp-3.0-pattern-load-fix.patch | 31 ++++++++++++ .../files/visual-regexp-3.0-wish-fix.patch | 12 +++++ .../files/visual-regexp-3.1-help-font-fix.patch | 32 +++++++++++++ .../files/visual-regexp-3.1-make-regexp-fix.patch | 12 +++++ .../files/visual-regexp-3.1-wish-fix.patch | 13 +++++ dev-util/visual-regexp/files/visualregexp.desktop | 7 +++ 8 files changed, 189 insertions(+) create mode 100644 dev-util/visual-regexp/files/visual-regexp-3.0-help-font-fix.patch create mode 100644 dev-util/visual-regexp/files/visual-regexp-3.0-home-conf-fix.patch create mode 100644 dev-util/visual-regexp/files/visual-regexp-3.0-pattern-load-fix.patch create mode 100644 dev-util/visual-regexp/files/visual-regexp-3.0-wish-fix.patch create mode 100644 dev-util/visual-regexp/files/visual-regexp-3.1-help-font-fix.patch create mode 100644 dev-util/visual-regexp/files/visual-regexp-3.1-make-regexp-fix.patch create mode 100644 dev-util/visual-regexp/files/visual-regexp-3.1-wish-fix.patch create mode 100644 dev-util/visual-regexp/files/visualregexp.desktop (limited to 'dev-util/visual-regexp/files') diff --git a/dev-util/visual-regexp/files/visual-regexp-3.0-help-font-fix.patch b/dev-util/visual-regexp/files/visual-regexp-3.0-help-font-fix.patch new file mode 100644 index 000000000000..ec3763cc9dd1 --- /dev/null +++ b/dev-util/visual-regexp/files/visual-regexp-3.0-help-font-fix.patch @@ -0,0 +1,26 @@ +diff -ur a/visual_regexp.tcl b/visual_regexp.tcl +--- a/visual_regexp.tcl 2013-11-10 01:35:49.959609478 +0100 ++++ b/visual_regexp.tcl 2013-11-10 01:34:10.491151352 +0100 +@@ -494,15 +494,18 @@ + pack .help.l -side top -padx 10 -pady 10 + # help text + if {$tcl_platform(platform) == "windows"} { +- text .help.t -bd 2 -relief groove -font {Courier 10} ++ set hfont {Courier 10} ++ set hbfont {Courier 10 bold} + } else { +- text .help.t -bd 2 -relief groove ++ set hfont {9x15} ++ set hbfont {9x15bold} + } ++ text .help.t -bd 2 -relief groove -font $hfont + pack .help.t -side top -padx 20 +- .help.t tag configure bold -font "[.help.t cget -font] bold" ++ .help.t tag configure bold -font $hbfont + .help.t insert 1.0 "Version:" bold " $::version + +-" normal "Usage:" bold " tkregexp ++" normal "Usage:" bold " [file tail $::argv0] + + " normal "Key bindings:" bold " Alt-q exit + Alt-a toggle 'all' flag diff --git a/dev-util/visual-regexp/files/visual-regexp-3.0-home-conf-fix.patch b/dev-util/visual-regexp/files/visual-regexp-3.0-home-conf-fix.patch new file mode 100644 index 000000000000..c86202ae05fb --- /dev/null +++ b/dev-util/visual-regexp/files/visual-regexp-3.0-home-conf-fix.patch @@ -0,0 +1,56 @@ +diff -ur a/visual_regexp.tcl b/visual_regexp.tcl +--- a/visual_regexp.tcl 2013-11-12 23:23:59.730171882 +0100 ++++ b/visual_regexp.tcl 2013-11-12 23:24:42.134085257 +0100 +@@ -1062,27 +1060,38 @@ + #============================================================================================== + + # try to get customization from 'visual_regexp.ini' +-puts "[file exists visual_regexp.ini]" +-set filename [file dirname [info nameofexecutable]]/visual_regexp.ini +-if {[file exists $filename]} { +- source $filename +-} elseif {[file exists visual_regexp.ini]} { +- source visual_regexp.ini ++set localfilename visual_regexp.ini ++set homefilename "" ++if {[info exists ::env(HOME)]} { ++ set homefilename [file join $::env(HOME) .visual_regexp visual_regexp.ini] + } +- +-# try to auto user patterns +-set filename [file dirname [info nameofexecutable]]/regexp.txt +-if {[file exists $filename]} { +- regexp::pattern:load $filename +-} elseif {[file exists regexp.txt]} { +- regexp::pattern:load regexp.txt ++set binfilename [file join [file dirname [info nameofexecutable]] visual_regexp.ini] ++foreach filename [list $localfilename $homefilename $binfilename] { ++ if {[file exists $filename]} { ++ source $filename ++ break ++ } + } + +-# buld the GUI ++# build the GUI + regexp::history:init + regexp::gui + regexp::go + ++# try to auto user patterns ++set localfilename regexp.txt ++set homefilename "" ++if {[info exists ::env(HOME)]} { ++ set homefilename [file join $::env(HOME) .visual_regexp regexp.txt] ++} ++set binfilename [file join [file dirname [info nameofexecutable]] regexp.txt] ++foreach filename [list $localfilename $homefilename $binfilename] { ++ if {[file exists $filename]} { ++ regexp::pattern:load $filename ++ break ++ } ++} ++ + if {$argc > 1} { + puts "Usage: $argv0 " + } elseif {$argc == 1} { diff --git a/dev-util/visual-regexp/files/visual-regexp-3.0-pattern-load-fix.patch b/dev-util/visual-regexp/files/visual-regexp-3.0-pattern-load-fix.patch new file mode 100644 index 000000000000..18dbf509f45a --- /dev/null +++ b/dev-util/visual-regexp/files/visual-regexp-3.0-pattern-load-fix.patch @@ -0,0 +1,31 @@ +diff -ur a/visual_regexp.tcl b/visual_regexp.tcl +--- a/visual_regexp.tcl 2013-11-12 23:23:59.730171882 +0100 ++++ b/visual_regexp.tcl 2013-11-12 23:24:42.134085257 +0100 +@@ -380,19 +380,17 @@ + } + # do it + set in [open $file "r"] +- $data(w:menu) delete [expr 4+[llength $::regexp_db]/2] end +- while {![eof $in]} { +- set name [gets $in] +- while {$name == ""} { +- set name [gets $in] +- } +- set pattern [gets $in] +- while {$pattern == ""} { +- set pattern [gets $in] ++ set contents {} ++ foreach line [split [read $in] \n] { ++ if {$line != ""} { ++ lappend contents $line + } +- $data(w:menu) add command -label $name -command "regexp::regexp:insert [list $pattern]" + } + close $in ++ $data(w:menu) delete [expr 4+[llength $::regexp_db]/2] end ++ foreach {name pattern} $contents { ++ $data(w:menu) add command -label $name -command "regexp::regexp:insert [list $pattern]" ++ } + } + + diff --git a/dev-util/visual-regexp/files/visual-regexp-3.0-wish-fix.patch b/dev-util/visual-regexp/files/visual-regexp-3.0-wish-fix.patch new file mode 100644 index 000000000000..bfb7478d1fec --- /dev/null +++ b/dev-util/visual-regexp/files/visual-regexp-3.0-wish-fix.patch @@ -0,0 +1,12 @@ +diff -ur visual_regexp-3.0/visual_regexp.tcl visual_regexp-current/visual_regexp.tcl +--- visual_regexp-3.0/visual_regexp.tcl 2002-09-01 08:24:56.000000000 -0500 ++++ visual_regexp-current/visual_regexp.tcl 2004-03-29 23:20:43.000000000 -0500 +@@ -1,7 +1,7 @@ + #!/bin/sh + #-*-tcl-*- + # the next line restarts using wish \ +-exec wish8.3 "$0" -- ${1+"$@"} ++exec wish "$0" -- ${1+"$@"} + + + set version 3.0 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 ++" normal "Usage:" bold " [file tail $::argv0] + + " normal "Key bindings:" bold " Alt-q exit + Alt-a toggle 'all' flag diff --git a/dev-util/visual-regexp/files/visual-regexp-3.1-make-regexp-fix.patch b/dev-util/visual-regexp/files/visual-regexp-3.1-make-regexp-fix.patch new file mode 100644 index 000000000000..6610b16e76ff --- /dev/null +++ b/dev-util/visual-regexp/files/visual-regexp-3.1-make-regexp-fix.patch @@ -0,0 +1,12 @@ +diff -ur a/visual_regexp.tcl b/visual_regexp.tcl +--- a/visual_regexp.tcl 2013-11-11 12:11:34.256631106 +0100 ++++ b/visual_regexp.tcl 2013-11-11 11:50:46.614881803 +0100 +@@ -1437,7 +1439,7 @@ + set output [text $f.output \ + -wrap char \ + -undo 1 \ +- -background white ++ -background white \ + -font $::font_regexp \ + -selectbackground lightblue \ + -selectborderwidth 0 \ diff --git a/dev-util/visual-regexp/files/visual-regexp-3.1-wish-fix.patch b/dev-util/visual-regexp/files/visual-regexp-3.1-wish-fix.patch new file mode 100644 index 000000000000..3fae9d095025 --- /dev/null +++ b/dev-util/visual-regexp/files/visual-regexp-3.1-wish-fix.patch @@ -0,0 +1,13 @@ +diff -ur a/visual_regexp.tcl b/visual_regexp.tcl +--- a/visual_regexp.tcl 2013-10-29 03:42:43.443932232 +0100 ++++ b/visual_regexp.tcl 2013-10-29 03:35:35.441951822 +0100 +@@ -1,7 +1,6 @@ +-package require starkit +-starkit::startup ++#!/usr/bin/wish + +-set version 3.0 ++set version 3.1 + + ############################################################################################### + # diff --git a/dev-util/visual-regexp/files/visualregexp.desktop b/dev-util/visual-regexp/files/visualregexp.desktop new file mode 100644 index 000000000000..1d66181bc2c1 --- /dev/null +++ b/dev-util/visual-regexp/files/visualregexp.desktop @@ -0,0 +1,7 @@ +[Desktop Entry] +Type=Application +Exec=visualregexp +Icon=visualregexp-icon +Name=Visual Regexp +Comment=An interactive regular expression editor +Categories=Development; -- cgit v1.2.3