Changeset 14564 for trunk/base
- Timestamp:
- Oct 11, 2005, 8:17:42 PM (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/base/src/port/port.tcl
r14563 r14564 3 3 exec @TCLSH@ "$0" "$@" 4 4 # port.tcl 5 # $Id: port.tcl,v 1.12 1 2005/10/11 20:09:47jberry Exp $5 # $Id: port.tcl,v 1.122 2005/10/11 20:17:42 jberry Exp $ 6 6 # 7 7 # Copyright (c) 2004 Robert Shaw <rshaw@opendarwin.org> … … 1741 1741 1742 1742 ed - edit { 1743 # Restore our entire environment from start time 1744 # We need it to evaluate the editor, and the editor 1745 # may want stuff from it as well, like TERM. 1746 array set env [array get boot_env] 1747 1743 1748 # Find an editor to edit the portfile 1744 1749 set editor "" 1745 1750 foreach ed { VISUAL EDITOR } { 1746 if {[info exists boot_env($ed)]} {1747 set editor $ boot_env($ed)1751 if {[info exists env($ed)]} { 1752 set editor $env($ed) 1748 1753 } 1749 1754 }
Note: See TracChangeset
for help on using the changeset viewer.