Changeset 37756


Ignore:
Timestamp:
Jun 22, 2008, 1:25:48 AM (12 years ago)
Author:
raimue@…
Message:

port/port.tcl:
Add new option --editor to port edit

Bug with "port ed --editor" fixed in r37786.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/port/port.tcl

    r37728 r37756  
    22422242    global env boot_env
    22432243    global current_portdir
     2244
     2245    array set local_options $opts
    22442246   
    22452247    set status 0
     
    22932295                    # Find an editor to edit the portfile
    22942296                    set editor ""
    2295                     foreach ed { VISUAL EDITOR } {
    2296                         if {[info exists env($ed)]} {
    2297                             set editor $env($ed)
    2298                             break
     2297                    if {[info exists local_options(ports_edit_editor)]} {
     2298                        set editor $local_options(ports_edit_editor)
     2299                    } elseif {[info exists local_options(ports_ed_editor)]} {
     2300                        set editor $local_options(ports_edit_editor)
     2301                    } else {
     2302                        foreach ed { VISUAL EDITOR } {
     2303                            if {[info exists env($ed)]} {
     2304                                set editor $env($ed)
     2305                                break
     2306                            }
    22992307                        }
    23002308                    }
     
    26242632global cmd_args_array
    26252633array set cmd_args_array {
     2634    edit        {{editor 1}}
     2635    ed          {{editor 1}}
    26262636    info        {{category 0} {categories 0} {depends_build 0} {depends_lib 0}
    26272637                {depends_run 0} {depends 0} {description 0} {epoch 0}
Note: See TracChangeset for help on using the changeset viewer.