summaryrefslogtreecommitdiff
path: root/Master/tlpkg/installer
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2010-05-13 02:09:33 +0000
committerNorbert Preining <preining@logic.at>2010-05-13 02:09:33 +0000
commit57bc1d45c213e7bc568a983bf780917fc11b5104 (patch)
tree9d864695098fd4410c2783070edc9b22a5b2833f /Master/tlpkg/installer
parent05d8944808aeb23ca6c925385cff5e273b522c5c (diff)
activate write18 installer options
git-svn-id: svn://tug.org/texlive/trunk@18223 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/installer')
-rw-r--r--Master/tlpkg/installer/install-menu-perltk.pl8
-rwxr-xr-xMaster/tlpkg/installer/install-menu-text.pl6
2 files changed, 7 insertions, 7 deletions
diff --git a/Master/tlpkg/installer/install-menu-perltk.pl b/Master/tlpkg/installer/install-menu-perltk.pl
index 42af1a7a4b2..be2a85e63f7 100644
--- a/Master/tlpkg/installer/install-menu-perltk.pl
+++ b/Master/tlpkg/installer/install-menu-perltk.pl
@@ -255,10 +255,10 @@ sub run_menu_perltk {
$fr->Button(-text => __("Toggle"), -command => sub { toggle_and_set_opt_variable(\$vars{'option_fmt'}, \$fmtyesno); })->grid(-row => $row, -column => 3, -sticky => "ew", -padx => "2m");
# until more secure ...
-# $row++;
-# $fr->Label(-text => __('Allow execution of restricted list of programs via \write18'), -anchor => 'w')->grid(-row => $row, -column => 1, -sticky => 'w');
-# $fr->Label(-anchor => 'w', -textvariable => \$restrictedyesno)->grid(-row => $row, -column => 2, -padx => "2m");
-# $fr->Button(-text => __("Toggle"), -command => sub { toggle_and_set_opt_variable(\$vars{'option_write18_restricted'}, \$restrictedyesno); })->grid(-row => $row, -column => 3, -sticky => "ew", -padx => "2m");
+ $row++;
+ $fr->Label(-text => __('Allow execution of restricted list of programs via \write18'), -anchor => 'w')->grid(-row => $row, -column => 1, -sticky => 'w');
+ $fr->Label(-anchor => 'w', -textvariable => \$restrictedyesno)->grid(-row => $row, -column => 2, -padx => "2m");
+ $fr->Button(-text => __("Toggle"), -command => sub { toggle_and_set_opt_variable(\$vars{'option_write18_restricted'}, \$restrictedyesno); })->grid(-row => $row, -column => 3, -sticky => "ew", -padx => "2m");
if ($vars{'doc_splitting_supported'}) {
$row++;
diff --git a/Master/tlpkg/installer/install-menu-text.pl b/Master/tlpkg/installer/install-menu-text.pl
index 2f566f53e3d..788bd9ee937 100755
--- a/Master/tlpkg/installer/install-menu-text.pl
+++ b/Master/tlpkg/installer/install-menu-text.pl
@@ -829,9 +829,9 @@ EOF
return $command{'self'};
# until secure ...
-# } elsif ("\u$answer" eq 'E') {
-# toggle 'option_write18_restricted';
-# return $command{'self'};
+ } elsif ("\u$answer" eq 'E') {
+ toggle 'option_write18_restricted';
+ return $command{'self'};
} elsif ("\u$answer" eq 'S' and !$vars{'from_dvd'}) {
toggle 'option_src';