depend: change ls output to match the input. this should help compare the database...

git-svn-id: svn://svn.r-forge.r-project.org/svnroot/cran2deb@136 edb9625f-4e0d-4859-8d74-9fd3b1da38cb

diff --git a/pkg/trunk/exec/depend b/pkg/trunk/exec/depend
index f4a100aefac0b59d21d124c72e29754e7357b46e..2552d8f9ce7e6a00c24a73cc100b0a146290bb41 100755 (executable)
--- a/pkg/trunk/exec/depend
+++ b/pkg/trunk/exec/depend
@@ -53,11 +53,24 @@ exec_cmd <- function(argc, argv) {
         db_add_forced_depends(argv[3],argv[2])
     } else if (cmd == 'ls') {
         if (argc < 2 || argv[2] == 'aliases') {
-            print(db_depends())
+            aliases <- db_depends()
+            for (i in rownames(aliases)) {
+                type = 'alias_run'
+                if (as.logical(aliases[i,'build'])) {
+                    type = 'alias_build'
+                }
+                cat(paste(type,aliases[i,'alias'],aliases[i,'debian_pkg'],'\n'))
+            }
         } else if (argv[2] == 'sysreq') {
-            print(db_sysreq_overrides())
+            sysreqs <- db_sysreq_overrides()
+            for (i in rownames(sysreqs)) {
+                cat(paste('sysreq',sysreqs[i,'depend_alias'],sysreqs[i,'r_pattern'],'\n'))
+            }
         } else if (argv[2] == 'force') {
-            print(db_forced_depends())
+            forced <- db_forced_depends()
+            for (i in rownames(forced)) {
+                cat(paste('force',forced[i,'depend_alias'],forced[i,'r_name'],'\n'))
+            }
         } else {
             usage()
             return()