Attachment #496950 for bug #769350

View | Details | Raw Unified | Return to bug 769350
Collapse All | Expand All

Lines 314-324 Returns undef on fail Link Here

(-)perl-Bootloader-0.6.4/src/Core/GRUB2.pm (-4 / +8 lines)
314	# list<string> ListFiles ()	314	# list<string> ListFiles ()
315	sub ListFiles {	315	sub ListFiles {
316	my $self = shift;	316	my $self = shift;
		317	my @ret = ( Bootloader::Path::Grub2_devicemap(),
		318	Bootloader::Path::Grub2_installdevice(),
		319	Bootloader::Path::Grub2_defaultconf() );
317		320
318	return [ Bootloader::Path::Grub2_devicemap(),	321	if (-e Bootloader::Path::Grub2_conf()) {
319	Bootloader::Path::Grub2_installdevice(),	322	push @ret, Bootloader::Path::Grub2_conf();
320	Bootloader::Path::Grub2_defaultconf(),	323	}
321	Bootloader::Path::Grub2_conf() ];	324
		325	return \@ret;
322	}	326	}
323		327
324	=item	328	=item

Lines 86-94 Returns undef on fail Link Here

(-)perl-Bootloader-0.6.4/src/Core/GRUB2EFI.pm (-2 / +6 lines)
86	# list<string> ListFiles ()	86	# list<string> ListFiles ()
87	sub ListFiles {	87	sub ListFiles {
88	my $self = shift;	88	my $self = shift;
		89	my @ret = (Bootloader::Path::Grub2_defaultconf());
89		90
90	return [ Bootloader::Path::Grub2_defaultconf(),	91	if (-e Bootloader::Path::Grub2_eficonf()) {
91	Bootloader::Path::Grub2_eficonf() ];	92	push @ret, Bootloader::Path::Grub2_eficonf();
		93	}
		94
		95	return \@ret;
92	}	96	}
93		97
94		98

Return to bug 769350