summaryrefslogtreecommitdiffstats
path: root/perl-install/Xconfig
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/Xconfig')
-rw-r--r--perl-install/Xconfig/resolution_and_depth.pm5
1 files changed, 5 insertions, 0 deletions
diff --git a/perl-install/Xconfig/resolution_and_depth.pm b/perl-install/Xconfig/resolution_and_depth.pm
index 5efac6ae5..8c095a64b 100644
--- a/perl-install/Xconfig/resolution_and_depth.pm
+++ b/perl-install/Xconfig/resolution_and_depth.pm
@@ -44,6 +44,11 @@ my @bios_vga_modes = (
{ bios => 794, X => 1280, Y => 1024, Depth => 16 },
);
+sub from_bios {
+ my ($bios) = @_;
+ find { $_->{bios} == $bios } @bios_vga_modes;
+}
+
sub size2default_resolution {
my ($size) = @_; #- size in inch