From 83ac9d7a3e30a895e3481b476be83e35777c3e28 Mon Sep 17 00:00:00 2001
From: Brett Gordon <beretta42@gmail.com>
Date: Tue, 6 Jun 2017 18:40:13 -0400
Subject: [PATCH] tar: bug fix, use TAPE env variable

---
 Applications/util/tar.c | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/Applications/util/tar.c b/Applications/util/tar.c
index 1d9bcf54..5af88976 100644
--- a/Applications/util/tar.c
+++ b/Applications/util/tar.c
@@ -34,6 +34,7 @@
 #include <dirent.h>
 /* #include <time.h> */
 #include <errno.h>
+#include <stdlib.h>
 
 /* tar header format, with ustar extension */
 struct header {
@@ -642,6 +643,8 @@ int main(int argc, char *argv[])
 {
 	int o;
 
+	ofile = getenv("TAPE");
+	
 	while ((o = getopt(argc, argv, "xtcvnkf:")) > 0) {
 		switch (o) {
 		case 'x':
@@ -669,10 +672,13 @@ int main(int argc, char *argv[])
 	switch (key) {
 	case 'x':
 		extract(argv);
+		break;
 	case 't':
 		list();
+		break;
 	case 'c':
 		create(argv);
+		break;
 	default:
 		fprintf(stderr, "tar: option x,c, or t must be used\n");
 		exit(1);
-- 
2.34.1