0x1949 Team - FAZEMRX - MANAGER

Edit File: debconf-loadtemplate

#!/usr/bin/perl -w =head1 NAME debconf-loadtemplate - load template file into debconf database =cut use strict; use Debconf::Db; use Debconf::Template; =head1 SYNOPSIS debconf-loadtemplate owner file [file ..] =head1 DESCRIPTION Loads one or more template files into the debconf database. The first parameter specifies the owner of the templates (typically, the owner is the name of a debian package). The remaining parameters are template files to load. =head1 WARNING This program should never be used from a maintainer script of a package that uses debconf! It may however, be useful in debugging, or to seed the debconf database. =head1 SEE ALSO L<debconf-communicate(1)> =cut sub usage { die "Usage: $0 owner file\n"; } my $owner=shift || usage(); usage() unless @ARGV; Debconf::Db->load; Debconf::Template->load($_, $owner) foreach @ARGV; Debconf::Db->save; =head1 AUTHOR Joey Hess <joeyh@debian.org> =cut