[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[groff] 02/02: [glilypond] subs.pl (where_is_prog): Fix typo.
From: |
Werner LEMBERG |
Subject: |
[groff] 02/02: [glilypond] subs.pl (where_is_prog): Fix typo. |
Date: |
Fri, 20 Mar 2015 11:03:22 +0000 |
wl pushed a commit to branch master
in repository groff.
commit 1d26addb692e68d029ae3cce8566bea7be3738e7
Author: Werner Lemberg <address@hidden>
Date: Fri Mar 20 11:58:58 2015 +0100
[glilypond] subs.pl (where_is_prog): Fix typo.
---
contrib/groffer/ChangeLog | 4 ++++
contrib/groffer/subs.pl | 2 +-
2 files changed, 5 insertions(+), 1 deletions(-)
diff --git a/contrib/groffer/ChangeLog b/contrib/groffer/ChangeLog
index a411b77..fbee325 100644
--- a/contrib/groffer/ChangeLog
+++ b/contrib/groffer/ChangeLog
@@ -1,3 +1,7 @@
+2015-03-20 Werner LEMBERG <address@hidden>
+
+ * subs.pl (where_is_prog): Fix typo.
+
2014-11-04 Werner LEMBERG <address@hidden>
* version.sh (_GROFF_VERSION_PRESET): Set to 1.22.3.
diff --git a/contrib/groffer/subs.pl b/contrib/groffer/subs.pl
index 3c17a87..7f5a1dc 100644
--- a/contrib/groffer/subs.pl
+++ b/contrib/groffer/subs.pl
@@ -749,7 +749,7 @@ sub where_is_prog {
my @baseargs = ($n);
while (@base) {
my $base = join(' ', @base);
- foreach my $d (@maon::Path) {
+ foreach my $d (@main::Path) {
my $file = File::Spec->catfile($d, $base);
if (-f $file && -x $file) {
my $baseargs = join(' ', @baseargs);
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [groff] 02/02: [glilypond] subs.pl (where_is_prog): Fix typo.,
Werner LEMBERG <=