bash: ++completion

etc/shell/bash/bash_completion_custom

@@ -1,6 +1,6 @@
 #!/bin/bash #########################
 #
-# Изменён: Пт 31 мая 2019 02:19:02
+# Изменён: Сб 01 июн 2019 23:24:01
 # 
 #complete <что дополнять> <программа>
 
@@ -19,6 +19,8 @@ complete -A job -P '%'	fg jobs disown
 complete -A directory	mkdir rmdir
 complete -A directory	-o default cd
 
+complete -f -o default g git fd rg
+
 complete -F _killall	killall pkill pskill
 
 #Сжатые данные
@@ -35,35 +37,35 @@ complete -f -o default -X '!*.+(rar|RAR|zip|ZIP|z|Z|gz\
 
 #Документы
 complete -f -o default -X '!*.+(ps|PS)'		zathura z
-complete -f -o default -X '!*.+(dvi|DVI)'	okular
 complete -f -o default -X '!*.+(pdf|PDF)'	zathura z
-complete -f -o default -X '!*.texi*'		makeinfo texi2dvi texi2pdf
+# complete -f -o default -X '!*.texi*'		makeinfo texi2dvi texi2pdf
-complete -f -o default -X '!*.tex'		kile tex latex slitex
+# complete -f -o default -X '!*.tex'		kile tex latex slitex
-complete -f -o default -X '!*.+(htm*|HTM*)'	konqueror firefox lynx html2ps
+# complete -f -o default -X '!*.+(htm*|HTM*)'	konqueror firefox lynx html2ps
-complete -f -o default -X '!*.+(doc|DOC|xls|\
+# complete -f -o default -X '!*.+(doc|DOC|xls|\
-XLS|ppt|PPT|sx?|SX?|csv|CSV|od?|OD?|ott|OTT)'	soffice
+# XLS|ppt|PPT|sx?|SX?|csv|CSV|od?|OD?|ott|OTT)'	soffice
 
 #Мультимедийные файлы
-complete -f -o default -X '!*.+(gif|GIF|jp*g|\
+# complete -f -o default -X '!*.+(gif|GIF|jp*g|\
-JP*G|bmp|BMP|xpm|XPM|png|PNG)'			xv gimp geeqie
+# JP*G|bmp|BMP|xpm|XPM|png|PNG)'			xv gimp geeqie
 
-complete -f -o default -X '!*.+(mp3|MP3)'	amarok mpg123 mpg321
+# complete -f -o default -X '!*.+(mp3|MP3)'	amarok mpg123 mpg321
-complete -f -o default -X '!*.+(ogg|OGG)'	amarok ogg123
+# complete -f -o default -X '!*.+(ogg|OGG)'	amarok ogg123
-complete -f -o default -X '!*.@(mp[23]|MP[23]|\
+# complete -f -o default -X '!*.@(mp[23]|MP[23]|\
-ogg|OGG|wav|WAV|pls|m3u|xm|mod|s[3t]m|it|mtm|ult|flac)' amarok
+# ogg|OGG|wav|WAV|pls|m3u|xm|mod|s[3t]m|it|mtm|ult|flac)' amarok
 
-complete -f -o default -X '!*.@(mp?(e)g|MP?(E)G|\
+# complete -f -o default -X '!*.@(mp?(e)g|MP?(E)G|\
-wma|avi|AVI|asf|vob|VOB|bin|dat|vcd|ps|pes|fli|viv|\
+# wma|avi|AVI|asf|vob|VOB|bin|dat|vcd|ps|pes|fli|viv|\
-rm|ram|yuv|mov|MOV|qt|QT|wmv|mp3|MP3|ogg|OGG|ogm|OGM|\
+# rm|ram|yuv|mov|MOV|qt|QT|wmv|mp3|MP3|ogg|OGG|ogm|OGM|\
-mp4|MP4|wav|WAV|asx|ASX)'			smplayer mplayer xine vlc
+# mp4|MP4|wav|WAV|asx|ASX)'			smplayer mplayer xine vlc
 
-complete -f -o default -X '!*.+(gpt|gp3|gp4|gp5)'   tuxguitar
+# complete -f -o default -X '!*.+(gpt|gp3|gp4|gp5)'   tuxguitar
 
 #Программирование
 complete -f -o default -X '!*.tcl'	tclsh wish nagelfar
 complete -f -o default -X '!*.pl'	perl perl5
 complete -f -o default -X '!*.sh'	sh bash
 complete -f -o default -X '!*.+(c|cpp)'	gcc g++ mpp
+complete -f -o default -X '!*.hs'	runghc ghc
 
 #Запуск и остановка сервисов
 _rcd () {