epm repo clean: implement via epm repo remove tasks,cdroms

bin/epm-removerepo

@@ -97,8 +97,12 @@ __epm_removerepo_alt()
             info "remove korinf repo"
             __epm_removerepo_alt_grepremove "Korinf/"
             ;;
+        cdroms)
+            info "remove cdroms entries"
+            __epm_removerepo_alt_grepremove "/^[[:space:]]*rpm[[:space:]]+cdrom:/" "/^cdrom(s)?$/"
+            ;;
         tasks)
-            info "remove task repos"
+            info "remove tasks' repos"
             __epm_removerepo_alt_grepremove " repo/[0-9]+/" "/tasks/[0-9]+ " "/[0-9]+[ /]build/repo"
             ;;
         task)

bin/epm-repo

@@ -75,9 +75,8 @@ epm_repo()
         epm_addkey "$@"
         ;;
     clean)                            # HELPCMD: remove temp. repos (tasks and CD-ROMs)
-        [ "$BASEDISTRNAME" = "alt" ] || fatal "TODO: only ALT now is supported"
-        # TODO: check for ALT
-        sudocmd apt-repo $dryrun clean
+        load_helper epm-repofix
+        epm_repoclean "$@"
         ;;
     save)                             # HELPCMD: save sources lists to a temp place
         load_helper epm-reposave

bin/epm-repofix

@@ -274,3 +274,9 @@ case $PMTYPE in
 esac
 
 }
+
+epm_repoclean()
+{
+    epm repo remove tasks
+    epm repo remove cdroms
+}