summaryrefslogtreecommitdiff
path: root/usr/src/pinyadmin/sbin/pinyconfig
diff options
context:
space:
mode:
authorBryan Bishop <kanzure@gmail.com>2010-10-29 19:46:24 -0500
committerBryan Bishop <kanzure@gmail.com>2010-10-29 19:46:24 -0500
commit7786ce2a332b0eba4b3ca7c57f906a32e8715da3 (patch)
tree5a9fe32b69a93f41ae2ac82a50788fe50c0d86fb /usr/src/pinyadmin/sbin/pinyconfig
parent413373be9ab30eb21b564cdc180cb2dcda77bfeb (diff)
downloadpiny-code-7786ce2a332b0eba4b3ca7c57f906a32e8715da3.tar.gz
piny-code-7786ce2a332b0eba4b3ca7c57f906a32e8715da3.zip
Starting repo cleanup to make this not so awful
Diffstat (limited to 'usr/src/pinyadmin/sbin/pinyconfig')
-rwxr-xr-xusr/src/pinyadmin/sbin/pinyconfig38
1 files changed, 0 insertions, 38 deletions
diff --git a/usr/src/pinyadmin/sbin/pinyconfig b/usr/src/pinyadmin/sbin/pinyconfig
deleted file mode 100755
index f6752db..0000000
--- a/usr/src/pinyadmin/sbin/pinyconfig
+++ /dev/null
@@ -1,38 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-
-use Piny;
-
-my ( $reponame, $attr, $value ) = @ARGV;
-
-if ( not defined $reponame or not defined $attr ) {
- die "Usage: $0 reponame tweakable [value]\n";
-};
-
-$attr = lc $attr;
-$attr =~ s/\./_/g;
-
-my $repo = Piny::Repo->new( $reponame );
-
-if ( defined $value ) {
- undef $@;
- eval {
- $repo->config->$attr( $value );
- };
- if ( $@ ) {
- print STDERR "$attr is not a legal tweakable, or $value is not a legal value for that tweakable.\n$@\n";
- };
- if ( $value ne $repo->config->$attr ) {
- print STDERR "Failed to set $attr (perhaps an override is in place)\n";
- };
-};
-
-undef $@;
-eval {
- print "$attr = " . $repo->config->$attr . "\n";
-};
-if ( $@ ) {
- print STDERR "$attr is not a legal tweakable, or its current value is illegal.\n$@\n";
-};