From 44b2652f72402b5155f99b9550296c4337689491 Mon Sep 17 00:00:00 2001
From: Trygve Laugstøl <trygvis@inamo.no>
Date: Sun, 14 Oct 2012 10:32:24 +0200
Subject: o Tests for 'list' and 'list-versions'. o Adding support for -i for
 'list'.

---
 .app/lib/app-app | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

(limited to '.app/lib/app-app')

diff --git a/.app/lib/app-app b/.app/lib/app-app
index c9da2d7..cb87847 100644
--- a/.app/lib/app-app
+++ b/.app/lib/app-app
@@ -318,12 +318,12 @@ method_list_usage() {
 
 method_list() {
   local filter_name="$1"; shift
-  local instance="$1"; shift
+  local filter_instance="$1"; shift
   local mode="pretty"
   local vars
   local filter_name
 
-  while getopts "P:n:" opt
+  while getopts "P:n:i:" opt
   do
     case $opt in
       P)
@@ -333,6 +333,9 @@ method_list() {
       n)
         filter_name=$OPTARG
         ;;
+      i)
+        filter_instance=$OPTARG
+        ;;
       \?)
         method_list_usage "Invalid option: -$OPTARG" 
         ;;
@@ -347,12 +350,12 @@ method_list() {
   if [ $mode = "pretty" ]
   then
     printf "%-20s %-20s %-20s\n" "Name" "Instance" "Version"
-    list_apps "$filter_name" name instance version | (IFS=:; while read name instance version
+    list_apps "$filter_name" "$filter_instance" name instance version | (IFS=:; while read name instance version
     do
       printf "%-20s %-20s %-20s\n" "$name" "$instance" "$version"
     done)
   else
-    list_apps "$filter_name" $vars
+    list_apps "$filter_name" "$filter_instance" $vars
   fi
 }
 
-- 
cgit v1.2.3