Add support for completing using contents of tar archives

darcs-hash:20061102235548-ac50b-ec4a3b206c73f8fc44cc715b2a95fe6fef2d53c0.gz

1 files changed, 35 insertions, 0 deletions

diff --git a/share/functions/__fish_complete_tar.fish b/share/functions/__fish_complete_tar.fish
new file mode 100644
index 00000000..f19d6727
--- /dev/null
+++ b/share/functions/__fish_complete_tar.fish
@@ -0,0 +1,35 @@
+
+function __fish_complete_tar -d "Peek inside of archives and list all files"
+
+	set -l cmd (commandline -poc)
+	set -e cmd[1]
+	for i in $cmd
+		switch $i
+			case '-*'
+				continue
+
+			case '*.tar.bz' '*.tar.bz2' '*.tbz' '*.tbz2'
+				if test -f $i
+					set -l file_list (tar -jt <$i)
+					printf (_ "%s\tArchived file\n") $file_list 
+				end
+				return
+
+			case '*.tar.gz'  '*.tgz'
+				if test -f $i
+					set -l file_list (tar -it <$i)
+					printf (_ "%s\tArchived file\n") $file_list 
+				end
+				return
+
+			case '*.tar'
+				if test -f $i
+					set -l file_list (tar -t <$i)
+					printf (_ "%s\tArchived file\n") $file_list 
+				end
+				return
+		end
+	end
+end
+
+