From 45c642fd72fbd07c08654afdfdeb1ecc2a1b10fb Mon Sep 17 00:00:00 2001
From: blundellc <blundellc@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>
Date: Sat, 13 Sep 2008 13:28:12 +0000
Subject: [PATCH] depend: change ls output to match the input. this should help
 compare the database to what's in git.

git-svn-id: svn://svn.r-forge.r-project.org/svnroot/cran2deb@136 edb9625f-4e0d-4859-8d74-9fd3b1da38cb
---
 pkg/trunk/exec/depend | 19 ++++++++++++++++---
 1 file changed, 16 insertions(+), 3 deletions(-)

diff --git a/pkg/trunk/exec/depend b/pkg/trunk/exec/depend
index f4a100a..2552d8f 100755
--- 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()
-- 
2.39.5