- export @bios_vga_modes (needed for bootloader vga=)

- to_string should return '' instead of ()

1 files changed, 3 insertions, 1 deletions

diff --git a/perl-install/Xconfig/resolution_and_depth.pm b/perl-install/Xconfig/resolution_and_depth.pm
index 4dd830a22..3663f804c 100644
--- a/perl-install/Xconfig/resolution_and_depth.pm
+++ b/perl-install/Xconfig/resolution_and_depth.pm
@@ -51,6 +51,8 @@ sub from_bios {
     find { $_->{bios} == $bios } @bios_vga_modes;
 }
 
+sub bios_vga_modes { @bios_vga_modes }
+
 sub size2default_resolution {
     my ($size) = @_; #- size in inch
 
@@ -76,7 +78,7 @@ sub size2default_resolution {
 
 sub to_string {
     my ($resolution) = @_;
-    $resolution or return;
+    $resolution or return '';
 
     $resolution->{X} ? sprintf("%sx%s %dbpp", @$resolution{'X', 'Y', 'Depth'}) : 'frame-buffer';
 }