adding check for MP_EDITOR, mp specific editor env variable with precedence over VISUAL
--- trunk/base/src/port/port.tcl 2011-02-22 21:17:23 UTC (rev 76417)
+++ trunk/base/src/port/port.tcl 2011-02-22 21:32:45 UTC (rev 76418)
@@ -3497,7 +3497,7 @@
if {[info exists local_options($editor_var)]} {
set editor [join $local_options($editor_var)]
} else {
- foreach ed { VISUAL EDITOR } {
+ foreach ed { MP_EDITOR VISUAL EDITOR } {
if {[info exists env($ed)]} {
set editor $env($ed)
break