function __fish_complete_atool_archive_contents --description 'List archive contents'
	set -l cmd (commandline -cop)
	set -e cmd[1]
	set -l file
	for arg in $cmd
		switch $arg
		case '-*'
		case '*'
			if test -f $arg
				set file $arg
				break
			end
		end
	end
	if not set -q file[1]
		return
	end
	als $file -qq | sed -r 's/^\s*[0-9]+\s+[0-9-]+\s+[0-9:]+\s+(.*)$/\1/'

end