From cff16feb264524026413ff67e4a741b97892cbdf Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Wed, 8 Nov 2000 13:39:47 +0000
Subject: add minimal management of /etc/cups/cupsd.conf

---
 perl-install/printer.pm | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)

(limited to 'perl-install')

diff --git a/perl-install/printer.pm b/perl-install/printer.pm
index d8fd4f19d..a16ecbe14 100644
--- a/perl-install/printer.pm
+++ b/perl-install/printer.pm
@@ -308,6 +308,25 @@ sub read_printer_db(;$) {
 }
 
 #------------------------------------------------------------------------------
+sub read_cupsd_conf {
+    my @cupsd_conf;
+    local *F;
+
+    open F, "$prefix/etc/cups/cupsd.conf";
+    @cupsd_conf = <F>;
+    close F;
+
+    @cupsd_conf;
+}
+sub write_cupsd_conf {
+    my (@cupsd_conf) = @_;
+    local *F;
+
+    open F, ">$prefix/etc/cups/cupsd.conf";
+    print F @cupsd_conf;
+    close F;
+}
+
 sub read_printers_conf {
     my ($printer) = @_;
     my $current = undef;
-- 
cgit v1.2.1