mirrors/git
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Git.pm: config_boolean() -> config_bool()

Browse Source 
This patch renames config_boolean() to config_bool() for consistency with
the commandline interface and because it is shorter but still obvious. ;-)
It also changes the return value from some obscure string to real Perl
boolean, allowing for clean user code.

Signed-off-by: Petr Baudis <pasky@suse.cz>
This commit is contained in:
Petr Baudis
2007-05-09 12:49:41 +02:00
committed by Junio C Hamano
parent efa615ba08
commit 35c49eeae7
3 changed files with 12 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
perl/Git.pm
View File

@ -516,9 +516,11 @@ sub config {
}
=item config_boolean ( VARIABLE )
=item config_bool ( VARIABLE )
Retrieve the boolean configuration C<VARIABLE>.
Retrieve the bool configuration C<VARIABLE>. The return value
is usable as a boolean in perl (and C<undef> if it's not defined,
of course).
Must be called on a repository instance.
@ -526,14 +528,16 @@ This currently wraps command('config') so it is not so fast.
=cut
sub config_boolean {
sub config_bool {
my ($self, $var) = @_;
$self->repo_path()
or throw Error::Simple("not a repository");
try {
return $self->command_oneline('config', '--bool', '--get',
my $val = $self->command_oneline('config', '--bool', '--get',
$var);
return undef unless defined $val;
return $val eq 'true';
} catch Git::Error::Command with {
my $E = shift;
if ($E->value() == 1) {