Skip site navigation (1)Skip section navigation (2)
Date:      Mon, 29 Apr 2013 16:01:47 +0000 (UTC)
From:      Pietro Cerutti <gahr@FreeBSD.org>
To:        ports-committers@freebsd.org, svn-ports-all@freebsd.org, svn-ports-head@freebsd.org
Subject:   svn commit: r316829 - in head/lang: tcl85/files tcl86/files
Message-ID:  <201304291601.r3TG1ldJ075438@svn.freebsd.org>

next in thread | raw e-mail | index | archive | help
Author: gahr
Date: Mon Apr 29 16:01:47 2013
New Revision: 316829
URL: http://svnweb.freebsd.org/changeset/ports/316829

Log:
  - Allow safe interps to use tm.tcl to locate packages. This only affects
    SafeBase interps, as "raw" safe interps cannot read the filesystem.

Modified:
  head/lang/tcl85/files/patch-unix-Makefile.in
  head/lang/tcl86/files/patch-unix-Makefile.in

Modified: head/lang/tcl85/files/patch-unix-Makefile.in
==============================================================================
--- head/lang/tcl85/files/patch-unix-Makefile.in	Mon Apr 29 15:50:38 2013	(r316828)
+++ head/lang/tcl85/files/patch-unix-Makefile.in	Mon Apr 29 16:01:47 2013	(r316829)
@@ -135,7 +135,7 @@
 -	        "$(SCRIPT_INSTALL_DIR)"/tm.tcl; \
 -	fi
 +	@echo "Customizing tcl module path";
-+	@echo "if {![interp issafe]} { ::tcl::tm::path add {$(SCRIPT_INSTALL_DIR)} }" >> \
++	@echo "::tcl::tm::path add {$(SCRIPT_INSTALL_DIR)}" >> \
 +	    "$(SCRIPT_INSTALL_DIR)"/tm.tcl;
 +
 +install-tm:

Modified: head/lang/tcl86/files/patch-unix-Makefile.in
==============================================================================
--- head/lang/tcl86/files/patch-unix-Makefile.in	Mon Apr 29 15:50:38 2013	(r316828)
+++ head/lang/tcl86/files/patch-unix-Makefile.in	Mon Apr 29 16:01:47 2013	(r316829)
@@ -154,7 +154,7 @@
 -	@$(INSTALL_DATA) $(TOP_DIR)/library/platform/shell.tcl "$(SCRIPT_INSTALL_DIR)"/../tcl8/8.4/platform/shell-1.1.4.tm;
 +	@$(INSTALL_DATA) $(TOP_DIR)/library/platform/shell.tcl "$(SCRIPT_INSTALL_DIR)"/platform/shell-1.1.4.tm;
 +	@echo "Customizing tcl module path"; \
-+	echo "if {![interp issafe]} { ::tcl::tm::path add {$(SCRIPT_INSTALL_DIR)} }" >> \
++	echo "::tcl::tm::path add {$(SCRIPT_INSTALL_DIR)}" >> \
 +	    "$(SCRIPT_INSTALL_DIR)"/tm.tcl; \
  
 -	@echo "Installing encoding files to $(SCRIPT_INSTALL_DIR)/encoding/";



Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201304291601.r3TG1ldJ075438>