diff src/pkg.pl @ 14:ac1ca422bd54

saving progress.
author Robert McIntyre <rlm@mit.edu>
date Wed, 09 Jan 2013 10:59:43 +0000
parents e056798af879
children cd47c42f1d0a
line wrap: on
line diff
     1.1 --- a/src/pkg.pl	Wed Jan 09 07:31:19 2013 +0000
     1.2 +++ b/src/pkg.pl	Wed Jan 09 10:59:43 2013 +0000
     1.3 @@ -82,20 +82,8 @@
     1.4    (install, "-g", "hg-wheel", "-o", "hg-committer",
     1.5     "-m", "6111", "/pkg/defaults/.hg-wrapper", $pkg_home);
     1.6  
     1.7 -$pkg_hgrc = "[ui]\n\
     1.8 -username = $pkg_name\n\
     1.9 -[extensions]\n\
    1.10 -hgext.purge =\n";
    1.11 -
    1.12 -$pkg_hgrc_filename = "$pkg_home/.hgrc";
    1.13 -
    1.14 -@pkg_set_hgrc_user_cmd = 
    1.15 -  ("chown", "$pkg_name:$pkg_name", $pkg_hgrc_filename);
    1.16 -
    1.17 -
    1.18  sub execute{print "\t@_\n"; system(@_) and die $!;}
    1.19  
    1.20 -
    1.21  #determine if the user already exists:
    1.22  `id $pkg_name 2>/dev/null`;
    1.23  if (!$?){
    1.24 @@ -118,15 +106,5 @@
    1.25  execute(@pkg_link_bashrc_cmd);
    1.26  execute(@pkg_copy_hg_wrapper_cmd);
    1.27  
    1.28 -# print "Create ~/.hgrc\n";
    1.29 -# open(HGRC, ">$pkg_hgrc_filename") or die $!;
    1.30 -# select HGRC;
    1.31 -# print $pkg_hgrc;
    1.32 -# close(HGRC);
    1.33 -
    1.34 -# select(STDOUT);
    1.35 -# print "Set permissions on ~/.hgrc.\n";
    1.36 -# execute(@pkg_set_hgrc_user_cmd);
    1.37 -
    1.38  print "Change user.\n";
    1.39  execute(@pkg_switch_cmd);