use Web and Resign module

1 files changed, 9 insertions, 2 deletions

diff --git a/BCD/Bcd.pm b/BCD/Bcd.pm
index 3987c9a..98a68e1 100644
--- a/BCD/Bcd.pm
+++ b/BCD/Bcd.pm
@@ -6,11 +6,13 @@ use Data::Dumper;
 use Pod::Usage;
 use MDK::Common;
 
+use BCD::Resign;
 use BCD::Common qw(:DEFAULT $wd $isoconf $name $arch $version $isodir $builddir $error_color $dir_deps);
 use BCD::Genisoimage;
 use BCD::Isolinux;
 use BCD::Stagex;
 use BCD::Media;
+use BCD::Web;
 
 our @ISA = qw(Exporter);
 our @EXPORT = qw(main_bcd);
@@ -33,6 +35,7 @@ sub do_all {
 	main_stagex;
 	main_media($option);
 	main_iso($option);
+	main_html;
 	show_info();
 }
 
@@ -61,7 +64,11 @@ sub main_bcd() {
 	checkrepo => \&check_repo_hdlist,
         rpmcheck => \&rpmcheck_launch,
 	doble => \&solve_doble_issue,
+	kernel => \&find_all_kernel,
 	resign => \&resign_media,
+	getsrpm => \&get_srpms_list,
+	clean => \&clean_urpmq_log,
+	html => \&main_html,
 	all => \&do_all,
 	);
     
@@ -73,8 +80,8 @@ sub main_bcd() {
 	mkdir_p($dir_deps);
     }
     print_color("-- If you don't want to use previous urpmq query:\n  ++ remove the directory $dir_deps\n  ++ or remove the file wich contains the urpmq result for the package to redo an another one (ie: the file $dir_deps/tocopy_plop_todo_Main-drakconf)", $color);
-    $ARGV[0] or help_bcd;
-    -f $ARGV[0] or die "Cant acces to conf file $ARGV[0]\n";
+#    $ARGV[0] or help_bcd;
+#    -f $ARGV[0] or die "Cant acces to conf file $ARGV[0]\n";
     if (my $f = $opts{$ARGV[1]}) {
 	if ($ARGV[2]) {
 		my $options;