summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2007-10-23 17:37:35 +0000
committerOlivier Blin <oblin@mandriva.com>2007-10-23 17:37:35 +0000
commit6c714597ea6ba89cd9b78162aa1554705d335e64 (patch)
tree162f73c5f7c5094d923bc19c0195012505064415 /perl-install/any.pm
parentce983934eee38ee727ae3ad403dbefd86572a681 (diff)
downloaddrakx-backup-do-not-use-6c714597ea6ba89cd9b78162aa1554705d335e64.tar
drakx-backup-do-not-use-6c714597ea6ba89cd9b78162aa1554705d335e64.tar.gz
drakx-backup-do-not-use-6c714597ea6ba89cd9b78162aa1554705d335e64.tar.bz2
drakx-backup-do-not-use-6c714597ea6ba89cd9b78162aa1554705d335e64.tar.xz
drakx-backup-do-not-use-6c714597ea6ba89cd9b78162aa1554705d335e64.zip
drakclock/finish-install: disable DPMS and screensaver when setting time not to blank monitor (#17031, backport from trunk)
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm11
1 files changed, 11 insertions, 0 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 241cb0a0e..efdc1b615 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -1363,4 +1363,15 @@ sub configure_timezone {
1;
}
+sub disable_x_screensaver() {
+ run_program::run("xset", "s", "off");
+ run_program::run("xset", "-dpms");
+}
+
+sub enable_x_screensaver() {
+ run_program::run("xset", "+dpms");
+ run_program::run("xset", "s", "on");
+ run_program::run("xset", "s", "reset");
+}
+
1;