[PATCH] scripts/kernel-doc: don't use uninitialized SRCTREE
Current kernel-doc (perl) script generates this warning: Use of uninitialized value in concatenation (.) or string at scripts/kernel-doc line 1668. So explicitly check for SRCTREE in the ENV before using it, and then if it is set, append a '/' to the end of it, otherwise the SRCTREE + filename can (will) be missing the intermediate '/'. Signed-off-by: Randy Dunlap <rdunlap@xenotime.net> Signed-off-by: Sam Ravnborg <sam@ravnborg.org>
This commit is contained in:
parent
66da665ca3
commit
2283a117f6
1 changed files with 7 additions and 1 deletions
|
@ -1665,11 +1665,17 @@ sub xml_escape($) {
|
||||||
}
|
}
|
||||||
|
|
||||||
sub process_file($) {
|
sub process_file($) {
|
||||||
my ($file) = "$ENV{'SRCTREE'}@_";
|
my $file;
|
||||||
my $identifier;
|
my $identifier;
|
||||||
my $func;
|
my $func;
|
||||||
my $initial_section_counter = $section_counter;
|
my $initial_section_counter = $section_counter;
|
||||||
|
|
||||||
|
if (defined($ENV{'SRCTREE'})) {
|
||||||
|
$file = "$ENV{'SRCTREE'}" . "/" . "@_";
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
$file = "@_";
|
||||||
|
}
|
||||||
if (defined($source_map{$file})) {
|
if (defined($source_map{$file})) {
|
||||||
$file = $source_map{$file};
|
$file = $source_map{$file};
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in a new issue