From b025d42bde239064eb1127eabfab13c6f8e9f16a Mon Sep 17 00:00:00 2001 From: Matthias Klumpp Date: Wed, 30 May 2012 13:36:11 +0200 Subject: [PATCH] Fix typos in libuild Perl modules (bug #1006199) In some Perl modules, libuild was still called lixbuild... --- contrib/libuild/LiBuild/GCC.pm | 16 ++++++++-------- contrib/libuild/LiBuild/Utils.pm | 6 +++--- 2 files changed, 11 insertions(+), 11 deletions(-) diff --git a/contrib/libuild/LiBuild/GCC.pm b/contrib/libuild/LiBuild/GCC.pm index ca1f372..8d1d9d6 100644 --- a/contrib/libuild/LiBuild/GCC.pm +++ b/contrib/libuild/LiBuild/GCC.pm @@ -1,8 +1,8 @@ # Various gcc-related functions -package LixBuild::GCC; +package LiBuild::GCC; use strict; -use LixBuild::Utils; +use LiBuild::Utils; use IPC::Open3; @@ -25,10 +25,10 @@ our $srcTypes = "$cTypes|$cxxTypes"; ######## Methods ######## ## -# LixBuild::GCC->new(gcc_command) +# LiBuild::GCC->new(gcc_command) # gcc_command: The command for invoking GCC. # -# Create a new LixBuild:GCC object. +# Create a new LiBuild:GCC object. sub new { my ($class, $gcc) = @_; my %self; @@ -72,8 +72,8 @@ sub capabilities { my @stat = stat $gcc_file; my $gcc_mtime = $stat[9]; my $home = homeDir(); - if (-f "$home/.lixbuild") { - parseDataFile("$home/.lixbuild", \%cache); + if (-f "$home/.libuild") { + parseDataFile("$home/.libuild", \%cache); if ($cache{version} != 2) { # Cache file version incompatible; delete cache %cache = (); @@ -225,7 +225,7 @@ sub capabilities { } $cache{version} = 2; - writeDataFile("$home/.lixbuild", \%cache); + writeDataFile("$home/.libuild", \%cache); return %capabilities; } @@ -233,7 +233,7 @@ sub capabilities { ## # $gcc->command() # -# Returns the GCC command associated with this LixBuild::GCC object. +# Returns the GCC command associated with this LiBuild::GCC object. sub command { my ($self) = @_; return $self->{gcc}; diff --git a/contrib/libuild/LiBuild/Utils.pm b/contrib/libuild/LiBuild/Utils.pm index a26e7c1..e5a3f48 100644 --- a/contrib/libuild/LiBuild/Utils.pm +++ b/contrib/libuild/LiBuild/Utils.pm @@ -1,4 +1,4 @@ -package LixBuild::Utils; +package LiBuild::Utils; use strict; use warnings; @@ -17,10 +17,10 @@ our $debugOpened = 0; ## # debug(message) # -# If the environment variable $LIXBUILD_DEBUG is set to 1, +# If the environment variable $LIBUILD_DEBUG is set to 1, # then print a debugging message to /dev/tty (not stdout or stderr). sub debug { - return if (empty($ENV{LIXBUILD_DEBUG}) || !$ENV{LIXBUILD_DEBUG}); + return if (empty($ENV{LIBUILD_DEBUG}) || !$ENV{LIBUILD_DEBUG}); if (!$debugOpened) { if (open DEBUG, '>/dev/tty') { -- 1.7.10