/[emacs]/emacs/lisp/generic-x.el
ViewVC logotype

Diff of /emacs/lisp/generic-x.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.34 by lute, Thu Apr 28 09:17:06 2005 UTC revision 1.35 by lute, Thu May 12 13:19:29 2005 UTC
# Line 116  Line 116 
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  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
# Line 158  the regexp in `generic-find-file-regexp' Line 153  the regexp in `generic-find-file-regexp'
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
# Line 308  your changes into effect." Line 303  your changes into effect."
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    
# Line 322  your changes into effect." Line 316  your changes into effect."
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)
# Line 337  your changes into effect." Line 330  your changes into effect."
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
# Line 363  your changes into effect." Line 355  your changes into effect."
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
# Line 377  your changes into effect." Line 368  your changes into effect."
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)
# Line 389  your changes into effect." Line 379  your changes into effect."
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)
# Line 401  your changes into effect." Line 390  your changes into effect."
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!
# Line 424  your changes into effect." Line 412  your changes into effect."
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.
# Line 453  like an INI file.  You can add this hook Line 440  like an INI file.  You can add this hook
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)
# Line 528  like an INI file.  You can add this hook Line 514  like an INI file.  You can add this hook
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.")
# Line 608  like an INI file.  You can add this hook Line 593  like an INI file.  You can add this hook
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)
# Line 632  like an INI file.  You can add this hook Line 616  like an INI file.  You can add this hook
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)
# Line 646  like an INI file.  You can add this hook Line 629  like an INI file.  You can add this hook
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]
# Line 726  like an INI file.  You can add this hook Line 708  like an INI file.  You can add this hook
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)
# Line 780  like an INI file.  You can add this hook Line 761  like an INI file.  You can add this hook
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)
# Line 802  like an INI file.  You can add this hook Line 782  like an INI file.  You can add this hook
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)
# Line 835  like an INI file.  You can add this hook Line 814  like an INI file.  You can add this hook
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)
# Line 854  like an INI file.  You can add this hook Line 832  like an INI file.  You can add this hook
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)
# Line 947  like an INI file.  You can add this hook Line 924  like an INI file.  You can add this hook
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
# Line 1568  like an INI file.  You can add this hook Line 1544  like an INI file.  You can add this hook
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."
# Line 1619  like an INI file.  You can add this hook Line 1594  like an INI file.  You can add this hook
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)
# Line 1640  like an INI file.  You can add this hook Line 1614  like an INI file.  You can add this hook
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)
# Line 1659  like an INI file.  You can add this hook Line 1632  like an INI file.  You can add this hook
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)
# Line 1702  like an INI file.  You can add this hook Line 1674  like an INI file.  You can add this hook
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)
# Line 1753  like an INI file.  You can add this hook Line 1724  like an INI file.  You can add this hook
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)
# Line 1780  like an INI file.  You can add this hook Line 1750  like an INI file.  You can add this hook
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))
# Line 1789  like an INI file.  You can add this hook Line 1759  like an INI file.  You can add this hook
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
# Line 1798  like an INI file.  You can add this hook Line 1768  like an INI file.  You can add this hook
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
# Line 1822  like an INI file.  You can add this hook Line 1791  like an INI file.  You can add this hook
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    
# Line 1838  like an INI file.  You can add this hook Line 1806  like an INI file.  You can add this hook
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.")
# Line 1861  like an INI file.  You can add this hook Line 1828  like an INI file.  You can add this hook
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
# Line 1906  like an INI file.  You can add this hook Line 1872  like an INI file.  You can add this hook
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    
# Line 1918  like an INI file.  You can add this hook Line 1883  like an INI file.  You can add this hook
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    
# Line 1956  like an INI file.  You can add this hook Line 1920  like an INI file.  You can add this hook
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    
# Line 2001  like an INI file.  You can add this hook Line 1964  like an INI file.  You can add this hook
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    

Legend:
Removed from v.1.34  
changed lines
  Added in v.1.35

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26