[24832] trunk/base/src/port/port.tcl

[source_changes at macosforge.org]

Revision: 24832
          http://trac.macosforge.org/projects/macports/changeset/24832
Author:   jberry at macports.org
Date:     2007-05-05 17:41:51 -0700 (Sat, 05 May 2007)

Log Message:
-----------
Store readline history in ~/.macports/.history instead of ~/.port_history

Modified Paths:
--------------
    trunk/base/src/port/port.tcl

Modified: trunk/base/src/port/port.tcl
===================================================================
--- trunk/base/src/port/port.tcl	2007-05-06 00:35:02 UTC (rev 24831)
+++ trunk/base/src/port/port.tcl	2007-05-06 00:41:51 UTC (rev 24832)
@@ -2434,13 +2434,14 @@
 
 proc process_command_file { in } {
 	global current_portdir
+	global darwinports::autoconf::macports_user_dir
 
 	# Initialize readline
 	set isstdin [string match $in "stdin"]
 	set name "port"
 	set use_readline [expr $isstdin && [readline init $name]]
-	set history_file [file normalize "~/.${name}_history"]
-	
+	set history_file [file normalize "${macports_user_dir}/.history"]
+
 	# Read readline history
 	if {$use_readline} {
 		rl_history read $history_file

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20070505/6fcb87ba/attachment.html