I'm trying to create .awk extension, cloning from Perl/.pl.

Preamble

Cloning /usr/share/geany/filetype_extensions.conf to ~/.config/geany/filetype_extensions.conf and changing line Perl=*.pl;*.perl;*.pm;*.agi;*.pod; to Perl=*.pl;*.perl;*.pm;*.agi;*.pod;*.awk; allowed awk files to be viewed as perl; that's a start.
Now I want to add extra keywords.

Work Done

So I undo the ~/.config/geany/filetype_extensions.conf Perl changes, add additional line of Awk=*.awk; then clone /usr/shared/geany/filedefs/filetypes.perl to ~/.config/geany/filetypes.awk, making relevant changes, and it doesn't work; awk files show as plain text.
What have I done wrong, or overlooked?
My changes were (sorry; compare went backwards):

--- /home/xxx/.config/geany/filedefs/filetypes.awk
+++ /home/xxx/.config/geany/filedefs/filetypes.perl
@@ -1,4 +1,3 @@
-# 2020-07-11 copied from /usr/shared/geany/filedefs/filetypes.perl
 # For complete documentation of this file, please see Geany's main documentation
 [styling]
 # Edit these in the colorscheme .conf file instead
@@ -53,20 +52,17 @@
 format=string_2
 
 [keywords]
-# add awk keywords before NULL __FILE__
-primary=function switch case break default CONVFMT FIELDWIDTHS FS IGNORECASE OFMT OFS ORS RS SUBSEP ARGC ARGV ARGIND ENVIRON ERRNO FILENAME FNR NF NR RLENGTH RSTART RT PROCINFO NULL __FILE__ __LINE__ __PACKAGE__ __SUB__ __DATA__ __END__ AUTOLOAD BEGIN CORE DESTROY END EQ GE GT INIT LE LT NE CHECK abs accept alarm and atan2 bind binmode bless caller chdir chmod chomp chop chown chr chroot close closedir cmp connect continue cos crypt dbmclose dbmopen default defined delete die do dump each else elsif endgrent endhostent endnetent endprotoent endpwent endservent eof eq eval exec exists exit exp fcntl fileno flock for foreach fork format formline ge getc getgrent getgrgid getgrnam gethostbyaddr gethostbyname gethostent getlogin getnetbyaddr getnetbyname getnetent getpeername getpgrp getppid getpriority getprotobyname getprotobynumber getprotoent getpwent getpwnam getpwuid getservbyname getservbyport getservent getsockname getsockopt given glob gmtime goto grep gt hex if index int ioctl join keys kill last lc lcfirst le length link listen local localtime lock log lstat lt m map mkdir msgctl msgget msgrcv msgsnd my ne next no not oct open opendir or ord our pack package pipe pop pos print printf prototype push q qq qr quotemeta qu qw qx rand read readdir readline readlink readpipe recv redo ref rename require reset return reverse rewinddir rindex rmdir s say scalar seek seekdir select semctl semget semop send setgrent sethostent setnetent setpgrp setpriority setprotoent setpwent setservent setsockopt shift shmctl shmget shmread shmwrite shutdown sin sleep socket socketpair sort splice split sprintf sqrt srand stat state study sub substr symlink syscall sysopen sysread sysseek system syswrite tell telldir tie tied time times tr truncate uc ucfirst umask undef unless unlink unpack unshift untie until use utime values vec wait waitpid wantarray warn when while write x xor y
+primary=NULL __FILE__ __LINE__ __PACKAGE__ __SUB__ __DATA__ __END__ AUTOLOAD BEGIN CORE DESTROY END EQ GE GT INIT LE LT NE CHECK abs accept alarm and atan2 bind binmode bless caller chdir chmod chomp chop chown chr chroot close closedir cmp connect continue cos crypt dbmclose dbmopen default defined delete die do dump each else elsif endgrent endhostent endnetent endprotoent endpwent endservent eof eq eval exec exists exit exp fcntl fileno flock for foreach fork format formline ge getc getgrent getgrgid getgrnam gethostbyaddr gethostbyname gethostent getlogin getnetbyaddr getnetbyname getnetent getpeername getpgrp getppid getpriority getprotobyname getprotobynumber getprotoent getpwent getpwnam getpwuid getservbyname getservbyport getservent getsockname getsockopt given glob gmtime goto grep gt hex if index int ioctl join keys kill last lc lcfirst le length link listen local localtime lock log lstat lt m map mkdir msgctl msgget msgrcv msgsnd my ne next no not oct open opendir or ord our pack package pipe pop pos print printf prototype push q qq qr quotemeta qu qw qx rand read readdir readline readlink readpipe recv redo ref rename require reset return reverse rewinddir rindex rmdir s say scalar seek seekdir select semctl semget semop send setgrent sethostent setnetent setpgrp setpriority setprotoent setpwent setservent setsockopt shift shmctl shmget shmread shmwrite shutdown sin sleep socket socketpair sort splice split sprintf sqrt srand stat state study sub substr symlink syscall sysopen sysread sysseek system syswrite tell telldir tie tied time times tr truncate uc ucfirst umask undef unless unlink unpack unshift untie until use utime values vec wait waitpid wantarray warn when while write x xor y
 
 [lexer_properties]
 styling.within.preprocessor=1
 
 [settings]
 # default extension used when saving files
-extension=awk
-#extension=pl
+extension=pl
 
 # MIME type
-mime_type=application/x-awk
-#mime_type=application/x-perl
+mime_type=application/x-perl
 
 # the following characters are these which a "word" can contains, see documentation
 #wordchars=_abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789
@@ -98,14 +94,12 @@
 # %e will be replaced by the filename without extension
 # (use only one of it at one time)
 
-compiler=awk -f %f
-#compiler=perl -cw "%f"
+compiler=perl -cw "%f"
 
 # alternatively use perlcc
 #compiler=perlcc -o "%e" "%f"
 
-run_cmd=awk -f %f
-#run_cmd=perl "%f"
+run_cmd=perl "%f"
 
 # Parse syntax check error messages and warnings, examples:
 # syntax error at test.pl line 7, near "{

—
Reply to this email directly, view it on GitHub, or unsubscribe.
You are receiving this because you are subscribed to this thread.Message ID: <geany/geany/issues/3232@github.com>