From cf00a8fe5a66136136f8ff78766cb64c4621f88d Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Tue, 19 Nov 2002 07:02:26 +0000
Subject: make perldoc working

---
 perl-install/diskdrake/hd_gtk.pm      | 3 +++
 perl-install/diskdrake/interactive.pm | 2 ++
 2 files changed, 5 insertions(+)

(limited to 'perl-install/diskdrake')

diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm
index bbbcc6bdc..36336b8c1 100644
--- a/perl-install/diskdrake/hd_gtk.pm
+++ b/perl-install/diskdrake/hd_gtk.pm
@@ -25,6 +25,9 @@ my ($w, @notebook, $done_button);
 
 =begin
 
+
+=head1 SYNOPSYS
+
 struct {
   string name      # which is displayed in tab of the notebook
   bool no_auto     # wether the kind can disappear after creation
diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm
index 122463ec9..21acdc568 100644
--- a/perl-install/diskdrake/interactive.pm
+++ b/perl-install/diskdrake/interactive.pm
@@ -19,6 +19,8 @@ use fs;
 
 =begin
 
+=head1 SYNOPSYS
+
 struct part {
   int active            # one of { 0 | 0x80 }  x86 only, primary only
   int start             # in sectors
-- 
cgit v1.2.1