116 |
:group 'data |
:group 'data |
117 |
:version "20.3") |
:version "20.3") |
118 |
|
|
|
(defgroup generic-x-modes nil |
|
|
"Individual modes in the collection of generic modes." |
|
|
:group 'generic-x |
|
|
:version "22.1") |
|
|
|
|
119 |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
120 |
;; Default-Generic mode |
;; Default-Generic mode |
121 |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
153 |
:type '(choice (const :tag "Don't check file names" nil) regexp)) |
:type '(choice (const :tag "Don't check file names" nil) regexp)) |
154 |
|
|
155 |
;; This generic mode is always defined |
;; This generic mode is always defined |
156 |
(define-generic-mode default-generic-mode (list ?#) nil nil nil nil :group 'generic-x-modes) |
(define-generic-mode default-generic-mode (list ?#) nil nil nil nil) |
157 |
|
|
158 |
;; A more general solution would allow us to enter generic-mode for |
;; A more general solution would allow us to enter generic-mode for |
159 |
;; *any* comment character, but would require us to synthesize a new |
;; *any* comment character, but would require us to synthesize a new |
303 |
'((nil "^\\([-A-Za-z0-9_]+\\)" 1) |
'((nil "^\\([-A-Za-z0-9_]+\\)" 1) |
304 |
("*Directories*" "^\\s-*<Directory\\s-*\\([^>]+\\)>" 1) |
("*Directories*" "^\\s-*<Directory\\s-*\\([^>]+\\)>" 1) |
305 |
("*Locations*" "^\\s-*<Location\\s-*\\([^>]+\\)>" 1)))))) |
("*Locations*" "^\\s-*<Location\\s-*\\([^>]+\\)>" 1)))))) |
306 |
"Generic mode for Apache or HTTPD configuration files." |
"Generic mode for Apache or HTTPD configuration files.")) |
|
:group 'generic-x-modes)) |
|
307 |
|
|
308 |
(when (memq 'apache-log-generic-mode generic-extras-enable-list) |
(when (memq 'apache-log-generic-mode generic-extras-enable-list) |
309 |
|
|
316 |
(2 font-lock-variable-name-face))) |
(2 font-lock-variable-name-face))) |
317 |
'("access_log\\'") |
'("access_log\\'") |
318 |
nil |
nil |
319 |
"Mode for Apache log files" |
"Mode for Apache log files")) |
|
:group 'generic-x-modes)) |
|
320 |
|
|
321 |
;;; Samba |
;;; Samba |
322 |
(when (memq 'samba-generic-mode generic-extras-enable-list) |
(when (memq 'samba-generic-mode generic-extras-enable-list) |
330 |
(2 font-lock-type-face))) |
(2 font-lock-type-face))) |
331 |
'("smb\\.conf\\'") |
'("smb\\.conf\\'") |
332 |
'(generic-bracket-support) |
'(generic-bracket-support) |
333 |
"Generic mode for Samba configuration files." |
"Generic mode for Samba configuration files.")) |
|
:group 'generic-x-modes)) |
|
334 |
|
|
335 |
;;; Fvwm |
;;; Fvwm |
336 |
;; This is pretty basic. Also, modes for other window managers could |
;; This is pretty basic. Also, modes for other window managers could |
355 |
nil |
nil |
356 |
'("\\.fvwmrc\\'" "\\.fvwm2rc\\'") |
'("\\.fvwmrc\\'" "\\.fvwm2rc\\'") |
357 |
nil |
nil |
358 |
"Generic mode for FVWM configuration files." |
"Generic mode for FVWM configuration files.")) |
|
:group 'generic-x-modes)) |
|
359 |
|
|
360 |
;;; X Resource |
;;; X Resource |
361 |
;; I'm pretty sure I've seen an actual mode to do this, but I don't |
;; I'm pretty sure I've seen an actual mode to do this, but I don't |
368 |
'(("^\\([^:\n]+:\\)" 1 font-lock-variable-name-face)) |
'(("^\\([^:\n]+:\\)" 1 font-lock-variable-name-face)) |
369 |
'("\\.Xdefaults\\'" "\\.Xresources\\'" "\\.Xenvironment\\'" "\\.ad\\'") |
'("\\.Xdefaults\\'" "\\.Xresources\\'" "\\.Xenvironment\\'" "\\.ad\\'") |
370 |
nil |
nil |
371 |
"Generic mode for X Resource configuration files." |
"Generic mode for X Resource configuration files.")) |
|
:group 'generic-x-modes)) |
|
372 |
|
|
373 |
;;; Hosts |
;;; Hosts |
374 |
(when (memq 'hosts-generic-mode generic-extras-enable-list) |
(when (memq 'hosts-generic-mode generic-extras-enable-list) |
379 |
'(("\\([0-9]+\.[0-9]+\.[0-9]+\.[0-9]+\\)" 1 font-lock-constant-face)) |
'(("\\([0-9]+\.[0-9]+\.[0-9]+\.[0-9]+\\)" 1 font-lock-constant-face)) |
380 |
'("[hH][oO][sS][tT][sS]\\'") |
'("[hH][oO][sS][tT][sS]\\'") |
381 |
nil |
nil |
382 |
"Generic mode for HOSTS files." |
"Generic mode for HOSTS files.")) |
|
:group 'generic-x-modes)) |
|
383 |
|
|
384 |
;;; Windows INF files |
;;; Windows INF files |
385 |
(when (memq 'inf-generic-mode generic-extras-enable-list) |
(when (memq 'inf-generic-mode generic-extras-enable-list) |
390 |
'(("^\\(\\[.*\\]\\)" 1 font-lock-constant-face)) |
'(("^\\(\\[.*\\]\\)" 1 font-lock-constant-face)) |
391 |
'("\\.[iI][nN][fF]\\'") |
'("\\.[iI][nN][fF]\\'") |
392 |
'(generic-bracket-support) |
'(generic-bracket-support) |
393 |
"Generic mode for MS-Windows INF files." |
"Generic mode for MS-Windows INF files.")) |
|
:group 'generic-x-modes)) |
|
394 |
|
|
395 |
;;; Windows INI files |
;;; Windows INI files |
396 |
;; Should define escape character as well! |
;; Should define escape character as well! |
412 |
("*Variables*" "^\\s-*\\([^=]+\\)\\s-*=" 1)))))) |
("*Variables*" "^\\s-*\\([^=]+\\)\\s-*=" 1)))))) |
413 |
"Generic mode for MS-Windows INI files. |
"Generic mode for MS-Windows INI files. |
414 |
You can use `ini-generic-mode-find-file-hook' to enter this mode |
You can use `ini-generic-mode-find-file-hook' to enter this mode |
415 |
automatically for INI files whose names do not end in \".ini\"." |
automatically for INI files whose names do not end in \".ini\".") |
|
:group 'generic-x-modes) |
|
416 |
|
|
417 |
(defun ini-generic-mode-find-file-hook () |
(defun ini-generic-mode-find-file-hook () |
418 |
"Hook function to enter Ini-Generic mode automatically for INI files. |
"Hook function to enter Ini-Generic mode automatically for INI files. |
440 |
(lambda () |
(lambda () |
441 |
(setq imenu-generic-expression |
(setq imenu-generic-expression |
442 |
'((nil "^\\s-*\\(.*\\)\\s-*=" 1)))))) |
'((nil "^\\s-*\\(.*\\)\\s-*=" 1)))))) |
443 |
"Generic mode for MS-Windows Registry files." |
"Generic mode for MS-Windows Registry files.")) |
|
:group 'generic-x-modes)) |
|
444 |
|
|
445 |
;;; DOS/Windows BAT files |
;;; DOS/Windows BAT files |
446 |
(when (memq 'bat-generic-mode generic-extras-enable-list) |
(when (memq 'bat-generic-mode generic-extras-enable-list) |
514 |
"\\`[cC][oO][nN][fF][iI][gG]\\." |
"\\`[cC][oO][nN][fF][iI][gG]\\." |
515 |
"\\`[aA][uU][tT][oO][eE][xX][eE][cC]\\.") |
"\\`[aA][uU][tT][oO][eE][xX][eE][cC]\\.") |
516 |
'(generic-bat-mode-setup-function) |
'(generic-bat-mode-setup-function) |
517 |
"Generic mode for MS-Windows BAT files." |
"Generic mode for MS-Windows BAT files.") |
|
:group 'generic-x-modes) |
|
518 |
|
|
519 |
(defvar bat-generic-mode-syntax-table nil |
(defvar bat-generic-mode-syntax-table nil |
520 |
"Syntax table in use in `bat-generic-mode' buffers.") |
"Syntax table in use in `bat-generic-mode' buffers.") |
593 |
(lambda () |
(lambda () |
594 |
(setq imenu-generic-expression |
(setq imenu-generic-expression |
595 |
'((nil "\\s-/\\([^/]+\\)/[i, \t\n]" 1)))))) |
'((nil "\\s-/\\([^/]+\\)/[i, \t\n]" 1)))))) |
596 |
"Mode for Mailagent rules files." |
"Mode for Mailagent rules files.")) |
|
:group 'generic-x-modes)) |
|
597 |
|
|
598 |
;; Solaris/Sys V prototype files |
;; Solaris/Sys V prototype files |
599 |
(when (memq 'prototype-generic-mode generic-extras-enable-list) |
(when (memq 'prototype-generic-mode generic-extras-enable-list) |
616 |
(2 font-lock-variable-name-face))) |
(2 font-lock-variable-name-face))) |
617 |
'("prototype\\'") |
'("prototype\\'") |
618 |
nil |
nil |
619 |
"Mode for Sys V prototype files." |
"Mode for Sys V prototype files.")) |
|
:group 'generic-x-modes)) |
|
620 |
|
|
621 |
;; Solaris/Sys V pkginfo files |
;; Solaris/Sys V pkginfo files |
622 |
(when (memq 'pkginfo-generic-mode generic-extras-enable-list) |
(when (memq 'pkginfo-generic-mode generic-extras-enable-list) |
629 |
(2 font-lock-variable-name-face))) |
(2 font-lock-variable-name-face))) |
630 |
'("pkginfo\\'") |
'("pkginfo\\'") |
631 |
nil |
nil |
632 |
"Mode for Sys V pkginfo files." |
"Mode for Sys V pkginfo files.")) |
|
:group 'generic-x-modes)) |
|
633 |
|
|
634 |
;; Javascript mode |
;; Javascript mode |
635 |
;; Includes extra keywords from Armando Singer [asinger@MAIL.COLGATE.EDU] |
;; Includes extra keywords from Armando Singer [asinger@MAIL.COLGATE.EDU] |
708 |
(setq imenu-generic-expression |
(setq imenu-generic-expression |
709 |
'((nil "^function\\s-+\\([A-Za-z0-9_]+\\)" 1) |
'((nil "^function\\s-+\\([A-Za-z0-9_]+\\)" 1) |
710 |
("*Variables*" "^var\\s-+\\([A-Za-z0-9_]+\\)" 1)))))) |
("*Variables*" "^var\\s-+\\([A-Za-z0-9_]+\\)" 1)))))) |
711 |
"Mode for JavaScript files." |
"Mode for JavaScript files.")) |
|
:group 'generic-x-modes)) |
|
712 |
|
|
713 |
;; VRML files |
;; VRML files |
714 |
(when (memq 'vrml-generic-mode generic-extras-enable-list) |
(when (memq 'vrml-generic-mode generic-extras-enable-list) |
761 |
("*Definitions*" |
("*Definitions*" |
762 |
"DEF\\s-+\\([-A-Za-z0-9_]+\\)\\s-+\\([A-Za-z0-9]+\\)\\s-*{" |
"DEF\\s-+\\([-A-Za-z0-9_]+\\)\\s-+\\([A-Za-z0-9]+\\)\\s-*{" |
763 |
1)))))) |
1)))))) |
764 |
"Generic Mode for VRML files." |
"Generic Mode for VRML files.")) |
|
:group 'generic-x-modes)) |
|
765 |
|
|
766 |
;; Java Manifests |
;; Java Manifests |
767 |
(when (memq 'java-manifest-generic-mode generic-extras-enable-list) |
(when (memq 'java-manifest-generic-mode generic-extras-enable-list) |
782 |
(2 font-lock-constant-face))) |
(2 font-lock-constant-face))) |
783 |
'("[mM][aA][nN][iI][fF][eE][sS][tT]\\.[mM][fF]\\'") |
'("[mM][aA][nN][iI][fF][eE][sS][tT]\\.[mM][fF]\\'") |
784 |
nil |
nil |
785 |
"Mode for Java Manifest files" |
"Mode for Java Manifest files")) |
|
:group 'generic-x-modes)) |
|
786 |
|
|
787 |
;; Java properties files |
;; Java properties files |
788 |
(when (memq 'java-properties-generic-mode generic-extras-enable-list) |
(when (memq 'java-properties-generic-mode generic-extras-enable-list) |
814 |
(lambda () |
(lambda () |
815 |
(setq imenu-generic-expression |
(setq imenu-generic-expression |
816 |
'((nil "^\\([^#! \t\n\r=:]+\\)" 1)))))) |
'((nil "^\\([^#! \t\n\r=:]+\\)" 1)))))) |
817 |
"Mode for Java properties files." |
"Mode for Java properties files.")) |
|
:group 'generic-x-modes)) |
|
818 |
|
|
819 |
;; C shell alias definitions |
;; C shell alias definitions |
820 |
(when (memq 'alias-generic-mode generic-extras-enable-list) |
(when (memq 'alias-generic-mode generic-extras-enable-list) |
832 |
(lambda () |
(lambda () |
833 |
(setq imenu-generic-expression |
(setq imenu-generic-expression |
834 |
'((nil "^\\(alias\\|unalias\\)\\s-+\\([-a-zA-Z0-9_]+\\)" 2)))))) |
'((nil "^\\(alias\\|unalias\\)\\s-+\\([-a-zA-Z0-9_]+\\)" 2)))))) |
835 |
"Mode for C Shell alias files." |
"Mode for C Shell alias files.")) |
|
:group 'generic-x-modes)) |
|
836 |
|
|
837 |
;;; Windows RC files |
;;; Windows RC files |
838 |
;; Contributed by ACorreir@pervasive-sw.com (Alfred Correira) |
;; Contributed by ACorreir@pervasive-sw.com (Alfred Correira) |
924 |
(2 font-lock-variable-name-face nil t)))) |
(2 font-lock-variable-name-face nil t)))) |
925 |
'("\\.[rR][cC]\\'") |
'("\\.[rR][cC]\\'") |
926 |
nil |
nil |
927 |
"Generic mode for MS-Windows Resource files." |
"Generic mode for MS-Windows Resource files.")) |
|
:group 'generic-x-modes)) |
|
928 |
|
|
929 |
;; InstallShield RUL files |
;; InstallShield RUL files |
930 |
;; Contributed by Alfred.Correira@Pervasive.Com |
;; Contributed by Alfred.Correira@Pervasive.Com |
1544 |
font-lock-variable-name-face "[^_]" "[^_]"))) ; is this face the best choice? |
font-lock-variable-name-face "[^_]" "[^_]"))) ; is this face the best choice? |
1545 |
'("\\.[rR][uU][lL]\\'") |
'("\\.[rR][uU][lL]\\'") |
1546 |
'(generic-rul-mode-setup-function) |
'(generic-rul-mode-setup-function) |
1547 |
"Generic mode for InstallShield RUL files." |
"Generic mode for InstallShield RUL files.") |
|
:group 'generic-x-modes) |
|
1548 |
|
|
1549 |
(define-skeleton rul-if |
(define-skeleton rul-if |
1550 |
"Insert an if statement." |
"Insert an if statement." |
1594 |
(2 font-lock-variable-name-face))) |
(2 font-lock-variable-name-face))) |
1595 |
'("\\.mailrc\\'") |
'("\\.mailrc\\'") |
1596 |
nil |
nil |
1597 |
"Mode for mailrc files." |
"Mode for mailrc files.")) |
|
:group 'generic-x-modes)) |
|
1598 |
|
|
1599 |
;; Inetd.conf |
;; Inetd.conf |
1600 |
(when (memq 'inetd-conf-generic-mode generic-extras-enable-list) |
(when (memq 'inetd-conf-generic-mode generic-extras-enable-list) |
1614 |
(function |
(function |
1615 |
(lambda () |
(lambda () |
1616 |
(setq imenu-generic-expression |
(setq imenu-generic-expression |
1617 |
'((nil "^\\([-A-Za-z0-9_]+\\)" 1)))))) |
'((nil "^\\([-A-Za-z0-9_]+\\)" 1)))))))) |
|
:group 'generic-x-modes)) |
|
1618 |
|
|
1619 |
;; Services |
;; Services |
1620 |
(when (memq 'etc-services-generic-mode generic-extras-enable-list) |
(when (memq 'etc-services-generic-mode generic-extras-enable-list) |
1632 |
(function |
(function |
1633 |
(lambda () |
(lambda () |
1634 |
(setq imenu-generic-expression |
(setq imenu-generic-expression |
1635 |
'((nil "^\\([-A-Za-z0-9_]+\\)" 1)))))) |
'((nil "^\\([-A-Za-z0-9_]+\\)" 1)))))))) |
|
:group 'generic-x-modes)) |
|
1636 |
|
|
1637 |
;; Password and Group files |
;; Password and Group files |
1638 |
(when (memq 'etc-passwd-generic-mode generic-extras-enable-list) |
(when (memq 'etc-passwd-generic-mode generic-extras-enable-list) |
1674 |
(function |
(function |
1675 |
(lambda () |
(lambda () |
1676 |
(setq imenu-generic-expression |
(setq imenu-generic-expression |
1677 |
'((nil "^\\([-A-Za-z0-9_]+\\):" 1)))))) |
'((nil "^\\([-A-Za-z0-9_]+\\):" 1)))))))) |
|
:group 'generic-x-modes)) |
|
1678 |
|
|
1679 |
;; Fstab |
;; Fstab |
1680 |
(when (memq 'etc-fstab-generic-mode generic-extras-enable-list) |
(when (memq 'etc-fstab-generic-mode generic-extras-enable-list) |
1724 |
(function |
(function |
1725 |
(lambda () |
(lambda () |
1726 |
(setq imenu-generic-expression |
(setq imenu-generic-expression |
1727 |
'((nil "^\\([/-A-Za-z0-9_]+\\)\\s-+" 1)))))) |
'((nil "^\\([/-A-Za-z0-9_]+\\)\\s-+" 1)))))))) |
|
:group 'generic-x-modes)) |
|
1728 |
|
|
1729 |
;; From Jacques Duthen <jacques.duthen@sncf.fr> |
;; From Jacques Duthen <jacques.duthen@sncf.fr> |
1730 |
(when (memq 'show-tabs-generic-mode generic-extras-enable-list) |
(when (memq 'show-tabs-generic-mode generic-extras-enable-list) |
1750 |
(((class color)) (:background "red")) |
(((class color)) (:background "red")) |
1751 |
(t (:weight bold))) |
(t (:weight bold))) |
1752 |
"Font Lock mode face used to highlight TABs." |
"Font Lock mode face used to highlight TABs." |
1753 |
:group 'generic-x-modes) |
:group 'generic-x) |
1754 |
|
|
1755 |
(defface show-tabs-space-face |
(defface show-tabs-space-face |
1756 |
'((((class grayscale) (background light)) (:background "DimGray" :weight bold)) |
'((((class grayscale) (background light)) (:background "DimGray" :weight bold)) |
1759 |
(((class color)) (:background "yellow")) |
(((class color)) (:background "yellow")) |
1760 |
(t (:weight bold))) |
(t (:weight bold))) |
1761 |
"Font Lock mode face used to highlight spaces." |
"Font Lock mode face used to highlight spaces." |
1762 |
:group 'generic-x-modes) |
:group 'generic-x) |
1763 |
|
|
1764 |
(define-generic-mode show-tabs-generic-mode |
(define-generic-mode show-tabs-generic-mode |
1765 |
nil ;; no comment char |
nil ;; no comment char |
1768 |
nil ;; no auto-mode-alist |
nil ;; no auto-mode-alist |
1769 |
;; '(show-tabs-generic-mode-hook-fun) |
;; '(show-tabs-generic-mode-hook-fun) |
1770 |
nil |
nil |
1771 |
"Generic mode to show tabs and trailing spaces" |
"Generic mode to show tabs and trailing spaces")) |
|
:group 'generic-x-modes)) |
|
1772 |
|
|
1773 |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1774 |
;; DNS modes |
;; DNS modes |
1791 |
;; List of additional automode-alist expressions |
;; List of additional automode-alist expressions |
1792 |
'("/etc/named.boot\\'") |
'("/etc/named.boot\\'") |
1793 |
;; List of set up functions to call |
;; List of set up functions to call |
1794 |
nil |
nil)) |
|
:group 'generic-x-modes)) |
|
1795 |
|
|
1796 |
(when (memq 'named-database-generic-mode generic-extras-enable-list) |
(when (memq 'named-database-generic-mode generic-extras-enable-list) |
1797 |
|
|
1806 |
;; List of additional auto-mode-alist expressions |
;; List of additional auto-mode-alist expressions |
1807 |
nil |
nil |
1808 |
;; List of set up functions to call |
;; List of set up functions to call |
1809 |
nil |
nil) |
|
:group 'generic-x-modes) |
|
1810 |
|
|
1811 |
(defvar named-database-time-string "%Y%m%d%H" |
(defvar named-database-time-string "%Y%m%d%H" |
1812 |
"Timestring for named serial numbers.") |
"Timestring for named serial numbers.") |
1828 |
;; List of additional auto-mode-alist expressions |
;; List of additional auto-mode-alist expressions |
1829 |
'("/etc/resolv[e]?.conf\\'") |
'("/etc/resolv[e]?.conf\\'") |
1830 |
;; List of set up functions to call |
;; List of set up functions to call |
1831 |
nil |
nil)) |
|
:group 'generic-x-modes)) |
|
1832 |
|
|
1833 |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1834 |
;; Modes for spice and common electrical engineering circuit netlist formats |
;; Modes for spice and common electrical engineering circuit netlist formats |
1872 |
(function |
(function |
1873 |
(lambda() |
(lambda() |
1874 |
(setq font-lock-defaults '(generic-font-lock-keywords nil t))))) |
(setq font-lock-defaults '(generic-font-lock-keywords nil t))))) |
1875 |
"Generic mode for SPICE circuit netlist files." |
"Generic mode for SPICE circuit netlist files.")) |
|
:group 'generic-x-modes)) |
|
1876 |
|
|
1877 |
(when (memq 'ibis-generic-mode generic-extras-enable-list) |
(when (memq 'ibis-generic-mode generic-extras-enable-list) |
1878 |
|
|
1883 |
("\\(\\(_\\|\\w\\)+\\)\\s-*=" 1 font-lock-variable-name-face)) |
("\\(\\(_\\|\\w\\)+\\)\\s-*=" 1 font-lock-variable-name-face)) |
1884 |
'("\\.[iI][bB][sS]\\'") |
'("\\.[iI][bB][sS]\\'") |
1885 |
'(generic-bracket-support) |
'(generic-bracket-support) |
1886 |
"Generic mode for IBIS circuit netlist files." |
"Generic mode for IBIS circuit netlist files.")) |
|
:group 'generic-x-modes)) |
|
1887 |
|
|
1888 |
(when (memq 'astap-generic-mode generic-extras-enable-list) |
(when (memq 'astap-generic-mode generic-extras-enable-list) |
1889 |
|
|
1920 |
(function |
(function |
1921 |
(lambda() |
(lambda() |
1922 |
(setq font-lock-defaults '(generic-font-lock-keywords nil t))))) |
(setq font-lock-defaults '(generic-font-lock-keywords nil t))))) |
1923 |
"Generic mode for ASTAP circuit netlist files." |
"Generic mode for ASTAP circuit netlist files.")) |
|
:group 'generic-x-modes)) |
|
1924 |
|
|
1925 |
(when (memq 'etc-modules-conf-generic-mode generic-extras-enable-list) |
(when (memq 'etc-modules-conf-generic-mode generic-extras-enable-list) |
1926 |
|
|
1964 |
;; List of additional automode-alist expressions |
;; List of additional automode-alist expressions |
1965 |
'("/etc/modules.conf" "/etc/conf.modules") |
'("/etc/modules.conf" "/etc/conf.modules") |
1966 |
;; List of set up functions to call |
;; List of set up functions to call |
1967 |
nil |
nil)) |
|
:group 'generic-x-modes)) |
|
1968 |
|
|
1969 |
(provide 'generic-x) |
(provide 'generic-x) |
1970 |
|
|