Ticket #14674: port.diff

File port.diff, 1.6 KB (added by ebgssth@…, 17 years ago)
  • src/port/port.tcl

     
    21172117                    array unset env *; array set env [array get boot_env]
    21182118                   
    21192119                    # Find an editor to edit the portfile
    2120                     set editor ""
     2120                    set editor "pico"
    21212121                    foreach ed { VISUAL EDITOR } {
    21222122                        if {[info exists env($ed)]} {
    21232123                            set editor $env($ed)
     
    21252125                        }
    21262126                    }
    21272127                   
    2128                     # Invoke the editor
    2129                     if { $editor == "" } {
    2130                         break_softcontinue "No EDITOR is specified in your environment" 1 status
    2131                     } else {
    2132                         if {[catch {eval exec >/dev/stdout </dev/stdin $editor $portfile} result]} {
    2133                             global errorInfo
    2134                             ui_debug "$errorInfo"
    2135                             break_softcontinue "unable to invoke editor $editor: $result" 1 status
    2136                         }
     2128                    if {[catch {eval exec >/dev/stdout </dev/stdin $editor $portfile} result]} {
     2129                        global errorInfo
     2130                        ui_debug "$errorInfo"
     2131                        break_softcontinue "unable to invoke editor $editor: $result" 1 status
    21372132                    }
    21382133                   
    21392134                    # Restore internal MacPorts environment