[file_previewer.sh]: Add Perl-specific previews
This commit is contained in:
@ -26,6 +26,9 @@ case "$(mimetype --brief -- "$file")" in
|
|||||||
application/x-pcapng)
|
application/x-pcapng)
|
||||||
tshark -r "$file" | bat --theme='base16' --terminal-width "$(($width-4))" --force-colorization;; # the --read-file option does not seem to work
|
tshark -r "$file" | bat --theme='base16' --terminal-width "$(($width-4))" --force-colorization;; # the --read-file option does not seem to work
|
||||||
|
|
||||||
|
application/x-perl)
|
||||||
|
bat --theme='base16' --terminal-width "$(($width-4))" --force-colorization "$file";;
|
||||||
|
|
||||||
application/x-shellscript)
|
application/x-shellscript)
|
||||||
bat --theme='base16' --terminal-width "$(($width-4))" --force-colorization "$file";;
|
bat --theme='base16' --terminal-width "$(($width-4))" --force-colorization "$file";;
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user