Package: listaller / 0.5.5-2

01_fix-libuild.patch Patch series | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
From b025d42bde239064eb1127eabfab13c6f8e9f16a Mon Sep 17 00:00:00 2001
From: Matthias Klumpp <matthias@tenstral.net>
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