diff options
| -rwxr-xr-x | mat | 29 |
1 files changed, 29 insertions, 0 deletions
@@ -467,6 +467,10 @@ sub cmd_help() { print "relocate <portion_id> <new_storage>\n"; print "inventory [storage]\n"; print "shoppinglist <days_to_shop_for>\n"; + print "queueshow (Yet to be implemented)\n"; + print "queueadd (Yet to be implemented)\n"; + print "queuerm (Yet to be implemented)\n"; + print "queuemv (Yet to be implemented)\n"; } sub interactive_edit_recipe_ingredients { @@ -631,6 +635,23 @@ sub cmd_searchrecipes { return 1; } +sub cmd_queueadd { + print "Yet to be implemented!\n"; +} + +sub cmd_queueshow { + print "Yet to be implemented!\n"; +} + +sub cmd_queuerm { + print "Yet to be implemented!\n"; +} + +sub cmd_queuemv { + print "Yet to be implemented!\n"; +} + + sub cmd_shoppinglist { # Argument is number of days to shop for @@ -754,6 +775,14 @@ if ($ARGV[0]) { print "Command failed!\n" unless (cmd_storeportion($ARGV[1], $ARGV[2], $ARGV[3]) >= 0); } elsif ( $ARGV[0] eq "relocate") { print "Command failed!\n" unless (cmd_relocate($ARGV[1], $ARGV[2]) >= 0); + } elsif ( $ARGV[0] eq "queueadd") { + print "Command failed!\n" unless (cmd_queueadd($ARGV[1], $ARGV[2]) >= 0); + } elsif ( $ARGV[0] eq "queuerm") { + print "Command failed!\n" unless (cmd_queuerm($ARGV[1], $ARGV[2]) >= 0); + } elsif ( $ARGV[0] eq "queuemv") { + print "Command failed!\n" unless (cmd_queuemv($ARGV[1], $ARGV[2]) >= 0); + } elsif ( $ARGV[0] eq "queueshow") { + print "Command failed!\n" unless (cmd_queueshow()); } elsif ( $ARGV[0] eq "shoppinglist") { print "Command failed!\n" unless (cmd_shoppinglist($ARGV[1]) >= 0); } else { |