#!/usr/bin/perl -w # This file was preprocessed, do not edit! package Debconf::Element::Web::Text; use strict; use base qw(Debconf::Element); sub show { my $this=shift; $_=$this->question->extended_description; s/\n/\n
\n/g; $_.="\n

\n"; return "".$this->question->description."$_

"; } 1