bufflist.kak

declare-option str-list quickbufs

define-command -override quickbuf %{
	eval %sh{
    	rm /tmp/buflist
    	rm /tmp/buflist_tmp
    	for bufname in $kak_opt_quickbufs $kak_buflist
    	  do printf "%s\n" "$bufname" >> /tmp/buflist_tmp
    	done
    	cat /tmp/buflist_tmp | awk '!seen[$0]++' | grep -v "/tmp/buflist" > /tmp/buflist
    	printf "edit /tmp/buflist"
    	rm /tmp/buflist_tmp
    }
}

remove-hooks global quickbuf 
hook -group quickbuf global BufWritePost /tmp/buflist %{
    eval %sh{
        printf "set global quickbufs\n"
        loop=0
        cat /tmp/buflist | while read line; do
        	printf "set -add global quickbufs %s\n" $line
			loop=$(( $loop + 1 ))
			if test $loop -lt 10; then
				printf "map global normal <a-%s> :edit<space>%s<ret>\n" $loop $line
			fi
        done
        printf "delete-buffer"
    }
}

hook -group quickbuf global BufCreate /tmp/buflist %{
	map buffer user q :delete-buffer<ret>
}