* [gentoo-commits] proj/emacs-tools:backups/gentoo-syntax@443 commit in: /
@ 2012-05-06 16:07 Sebastian Pipping
0 siblings, 0 replies; 7+ messages in thread
From: Sebastian Pipping @ 2012-05-06 16:07 UTC (permalink / raw
To: gentoo-commits
commit: 6870aedd108ea25aa1fec8527e083fb3bd46e723
Author: Christian Faulhammer <opfer <AT> gentoo <DOT> org>
AuthorDate: Thu May 24 07:49:50 2007 +0000
Commit: Sebastian Pipping <sping <AT> gentoo <DOT> org>
CommitDate: Thu May 24 07:49:50 2007 +0000
URL: http://git.overlays.gentoo.org/gitweb/?p=proj/emacs-tools.git;a=commit;h=6870aedd
added names and reformatted a bit
svn path=/emacs-extra/ebuild-mode/; revision=317
---
ChangeLog | 12 +++++++-----
1 files changed, 7 insertions(+), 5 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 276f575..39ecd08 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -3,28 +3,30 @@
* ebuild-mode.el (ebuild-mode-tabify): Tabify whitespace only at
beginning of lines.
-2007-05-23 <opfer@gentoo.org>
+2007-05-23 Christian Faulhammer <opfer@gentoo.org>
* group 3 now is named flag-o-matic, group 4 renamed to elisp to
reflect source of them
* changed version to 1.6
-2007-03-19 <ulm@gentoo.org>
+2007-03-19 Ulrich Mueller <ulm@gentoo.org>
* Make TAB key work in Emacs 21.
-2007-03-18 <opfer@gentoo.org>
+2007-03-18 Christian Faulhammer <opfer@gentoo.org>, Ulrich Mueller <ulm@gentoo.org>
* Duplicate keyword "into" removed.
+
* Sort keywords in alphabetical order.
-2007-03-16 <opfer@gentoo.org>
+2007-03-16 Christian Faulhammer <opfer@gentoo.org>
* should really add elisp-* functions
-2007-03-15 <opfer@gentoo.org>
+2007-03-15 Christian Faulhammer <opfer@gentoo.org>, Ulrich Mueller <ulm@gentoo.org>
* functions from elisp-common.eclass, flag-o-matic.eclass,
some from eutils.eclass added to highlighted keywords
+
* keywords grouped by type (not yet finished)
^ permalink raw reply related [flat|nested] 7+ messages in thread
* [gentoo-commits] proj/emacs-tools:backups/gentoo-syntax@443 commit in: /
@ 2012-05-06 16:07 Sebastian Pipping
0 siblings, 0 replies; 7+ messages in thread
From: Sebastian Pipping @ 2012-05-06 16:07 UTC (permalink / raw
To: gentoo-commits
commit: 8aa2ae6909ae81339604fc50d6ecef1171d4badd
Author: Christian Faulhammer <opfer <AT> gentoo <DOT> org>
AuthorDate: Wed May 30 06:51:35 2007 +0000
Commit: Sebastian Pipping <sping <AT> gentoo <DOT> org>
CommitDate: Wed May 30 06:51:35 2007 +0000
URL: http://git.overlays.gentoo.org/gitweb/?p=proj/emacs-tools.git;a=commit;h=8aa2ae69
ebuild-mode provided by marienz
svn path=/emacs-extra/ebuild-mode/; revision=349
---
ebuild-mode-marienz.el | 212 ++++++++++++++++++++++++++++++++++++++++++++++++
1 files changed, 212 insertions(+), 0 deletions(-)
diff --git a/ebuild-mode-marienz.el b/ebuild-mode-marienz.el
new file mode 100644
index 0000000..2ab639c
--- /dev/null
+++ b/ebuild-mode-marienz.el
@@ -0,0 +1,212 @@
+
+
+(require 'sh-script)
+
+(defun ebuild-run-ebuild (command)
+ "Run ebuild \"ebuild command buffername\""
+ (interactive "sCommand:")
+ (compile (format "NOCOLOR=true ebuild %s %s" buffer-file-name command)))
+
+(setq ebuild-core-keywords
+ ; defaults
+ '("use" "has_version" "best_version" "use_with" "use_enable" "check_KV"
+ "keepdir" "econf" "die" "einstall" "einfo" "ewarn" "eerror" "diropts"
+ "dobin" "docinto" "dodoc" "doexe" "dohard" "dohtml" "doinfo" "doins"
+ "dolib" "dolib.a" "dolib.so" "doman" "dosbin" "dosym" "emake"
+ "exeinto" "exeopts" "fowners" "fperms" "insinto" "insopts" "into"
+ "libopts" "newbin" "newexe" "newins" "newman" "newsbin" "prepall"
+ "prepalldocs" "prepallinfo" "prepallman" "prepallstrip" "has" "unpack"
+ "dopython" "dosed" "into" "doinitd" "doconfd" "doenvd" "dojar" "domo"
+ "dodir" "ebegin" "eend" "newconfd" "newdoc" "newenvd" "newinitd"
+ "newlib.a" "newlib.so" "hasq" "hasv" "useq" "usev"
+ ; sandbox
+ "addread" "addwrite" "adddeny" "addpredict")
+ ebuild-functions-keywords
+ '("pkg_nofetch" "pkg_setup" "src_unpack" "src_compile" "src_test"
+ "src_install" "pkg_preinst" "pkg_postinst" "pkg_prerm" "pkg_postrm"
+ "pkg_config")
+ ebuild-inherit-keywords '("inherit")
+ ebuild-eclass-keywords ; alist mapping eclass names to their functions
+ '(("eutils"
+ "gen_usr_ldscript" "draw_line" "epatch" "have_NPTL"
+ "get_number_of_jobs" "egetent" "emktemp" "enewuser" "enewgroup"
+ "edos2unix" "make_desktop_entry" "unpack_pdv" "unpack_makeself"
+ "check_license" "cdrom_get_cds" "cdrom_load_next"
+ "cdrom_locate_file_on_cd" "strip-linguas" "epause" "ebeep"
+ "built_with_use" "make_session_desktop" "domenu" "doicon"
+ "find_unpackable_file" "unpack_pdv" "set_arch_to_kernel"
+ "set_arch_to_portage" "preserve_old_lib" "preserve_old_lib_notify"
+ "built_with_use" "epunt_cxx" "dopamd" "newpamd" "make_wrapper")
+ ("flag-o-matic"
+ "setup-allowed-flags" "filter-flags" "filter-lfs-flags"
+ "append-lfs-flags" "append-flags" "replace-flags" "replace-cpu-flags"
+ "is-flag" "filter-mfpmath" "strip-flags" "test_flag"
+ "test_version_info" "strip-unsupported-flags" "get-flag"
+ "has_hardened" "has_pic" "has_pie" "has_ssp_all" "has_ssp" "has_m64"
+ "has_m32" "replace-sparc64-flags" "append-ldflags" "filter-ldflags"
+ "fstack-flags" "gcc2-flags")
+ ("gcc"
+ "gcc-getCC" "gcc-getCXX" "gcc-fullversion" "gcc-version"
+ "gcc-major-version" "gcc-minor-version" "gcc-micro-version"
+ "gcc-libpath" "gcc-libstdcxx-version" "gcc-libstdcxx-major-version"
+ "gcc2-flags")
+ ("libtool"
+ "elibtoolize" "uclibctoolize" "darwintoolize")
+ ("fixheadtails"
+ "ht_fix_file" "ht_fix_all")
+ ("fdo-mime"
+ "fdo-mime_desktop_database_update" "fdo-mime_mime_database_update")
+ ("webapp"
+ "webapp_checkfileexists" "webapp_import_config" "webapp_strip_appdir"
+ "webapp_strip_d" "webapp_strip_cwd" "webapp_configfile"
+ "webapp_hook_script" "webapp_postinst_txt" "webapp_postupgrade_txt"
+ "webapp_runbycgibin" "webapp_serverowned" "webapp_server_configfile"
+ "webapp_sqlscript" "webapp_src_install" "webapp_pkg_postinst"
+ "webapp_pkg_setup" "webapp_getinstalltype" "webapp_src_preinst"
+ "webapp_pkg_prerm")
+ ("versionator"
+ "get_all_version_components" "version_is_at_least"
+ "get_version_components" "get_major_version"
+ "get_version_component_range" "get_after_major_version"
+ "replace_version_separator" "replace_all_version_separators"
+ "delete_version_separator" "delete_all_version_separators")
+ ("cvs"
+ "cvs_fetch" "cvs_src_unpack")
+ ("bash-completion"
+ "dobashcompletion" "bash-completion_pkg_postinst")
+ ("vim-plugin"
+ "vim-plugin_src_install" "vim-plugin_pkg_postinst"
+ "vim-plugin_pkg_postrm" "update_vim_afterscripts"
+ "display_vim_plugin_help")
+ ("vim-doc"
+ "update_vim_helptags")
+ ("multilib"
+ "has_multilib_profile" "get_libdir" "get_multilibdir"
+ "get_libdir_override" "get_abi_var" "get_abi_CFLAGS"
+ "get_abi_LDFLAGS" "get_abi_CHOST" "get_abi_FAKE_TARGETS"
+ "get_abi_CDEFINE" "get_abi_LIBDIR" "get_install_abis" "get_all_abis"
+ "get_all_libdirs" "is_final_abi" "number_abis" "get_ml_incdir"
+ "prep_ml_includes" "create_ml_includes" "create_ml_includes-absolute"
+ "create_ml_includes-tidy_path" "create_ml_includes-listdirs"
+ "create_ml_includes-makedestdirs" "create_ml_includes-allfiles"
+ "create_ml_includes-sym_for_dir")
+ ("64-bit"
+ "64-bit")
+ ("toolchain-funcs"
+ "tc-getPROG" "tc-getAR" "tc-getAS" "tc-getCC" "tc-getCXX" "tc-getLD"
+ "tc-getNM" "tc-getRANLIB" "tc-getF77" "tc-getGCJ" "tc-getBUILD_CC"
+ "tc-export" "ninj" "tc-is-cross-compiler" "tc-ninja_magic_to_arch"
+ "tc-arch-kernel" "tc-arch" "tc-endian" "gcc-fullversion"
+ "gcc-version" "gcc-major-version" "gcc-minor-version"
+ "gcc-micro-version")
+ ("cron"
+ "docrondir" "docron" "docrontab" "cron_pkg_postinst")
+ ("games"
+ "egamesconf" "egamesinstall" "gameswrapper" "dogamesbin"
+ "dogamessbin" "dogameslib" "dogameslib.a" "dogameslib.so"
+ "newgamesbin" "newgamessbin" "gamesowners" "gamesperms"
+ "prepgamesdirs" "gamesenv" "games_pkg_setup" "games_src_compile"
+ "games_pkg_postinst" "games_ut_unpack" "games_umod_unpack"
+ "games_make_wrapper")
+ ("subversion"
+ "subversion_svn_fetch" "subversion_bootstrap"
+ "subversion_src_unpack")
+ ("alternatives"
+ "alternatives_auto_makesym" "alternatives_makesym"
+ "alternatives_pkg_postinst" "alternatives_pkg_postrm")
+ ("rpm"
+ "rpm_unpack rpm_src_unpack")
+ ("python"
+ "python_version" "python_tkinter_exists" "python_mod_exists"
+ "python_mod_compile" "python_mod_optimize" "python_mod_cleanup"
+ "python_makesym" "python_disable_pyc" "python_enable_pyc")
+ ("check-kernel"
+ "check_version_h" "get_KV_info" "is_2_4_kernel" "is_2_5_kernel"
+ "is_2_6_kernel" "kernel_supports_modules")
+ ("perl-module"
+ "perl-module_src_prep" "perl-module_src_compile"
+ "perl-module_src_test" "perl-module_src_install"
+ "perl-module_pkg_setup" "perl-module_pkg_preinst"
+ "perl-module_pkg_postinst" "perl-module_pkg_prerm"
+ "perl-module_pkg_postrm" "perlinfo" "fixlocalpod" "updatepod")
+ ("distutils"
+ "distutils_src_compile" "distutils_src_install"
+ "distutils_pkg_postrm" "distutils_pkg_postinst"
+ "distutils_python_version" "disutils_python_tkinter")
+ ("depend.apache"
+ "need_apache" "need_apache1" "need_apache2")
+ ("apache-module"
+ "apache-module_pkg_setup" "apache-module_src_compile"
+ "apache-module_src_install" "apache-module_pkg_postinst"
+ "acache_cd_dir" "apache_mod_file" "apache_doc_magic"
+ "apache1_src_compile" "apache1_src_install"
+ "apache1_pkg_postinst" "apache2_pkg_setup"
+ "apache2_src_compile" "apache1_src_install"
+ "apache2_pkg_postinst")
+ ("pam"
+ "dopamd" "newpamd" "dopamsecurity" "newpamsecurity" "getpam_mod_dir"
+ "dopammod" "newpammod" "pamd_mimic_system")
+ ("virtualx"
+ "virtualmake" "Xmake" "Xemake" "Xeconf")
+ ("gnome2"
+ "gnome2_src_configure" "gnome2_src_compile"
+ "gnome2_src_install" "gnome2_gconf_install"
+ "gnome2_gconf_uninstal" "gnome2_omf_fix"
+ "gnome2_scrollkeeper_update" "gnome2_pkg_postinst"
+ "gnome2_pkg_postrm")))
+
+;; TODO EXPORT_FUNCTIONS
+
+(add-to-list 'sh-ancestor-alist '(ebuild . bash))
+(add-to-list 'sh-builtins
+ `(ebuild sh-append bash ,@ebuild-core-keywords))
+
+(define-derived-mode ebuild-mode sh-mode "ebuild"
+ "Major mode for ebuilds and eclasses.
+
+This is like shell-script-mode but enforces indentation rules and
+adds some keybindings."
+ ;; ebuild mode
+ (sh-set-shell "ebuild")
+ ;; enforce 4-space tabs
+ (setq tab-width 4)
+ (setq indent-tabs-mode t))
+
+;; keybindings for ebuild-mode
+
+; macro abuse!
+
+; Writing this with a mapc and a bunch of lambdas did not work: the
+; lambda we end up binding to the key does not bind to the "command"
+; string (gotta love dynamic scoping). So we unroll the entire thing:
+; this macro expands to a progn of all the define-key calls we need
+; with a separate lambda per define-key, and evaluating *that* works.
+(defmacro ebuild-setkeys-macro (keys)
+ (cons 'progn
+ (mapcar
+ (lambda (pair)
+ ; construct a define-key call with the key and
+ ; commandstring evaluated
+ `(define-key ebuild-mode-map ,(concat "\C-c\C-e" (car pair))
+ (defun ,(intern (concat "ebuild-run-ebuild-" (cdr pair))) ()
+ ,(format "Run \"ebuild /path/to/ebuild %s\"" (cdr pair))
+ (interactive)
+ (ebuild-run-ebuild ,(cdr pair)))))
+ keys)))
+
+(ebuild-setkeys-macro (("l" . "clean")
+ ("c" . "compile")
+ ("d" . "digest")
+ ("f" . "fetch")
+ ("i" . "install")
+ ("m" . "merge")
+ ("o" . "postinst")
+ ("p" . "preinst")
+ ("q" . "qmerge")
+ ("t" . "test")
+ ("u" . "unpack")))
+
+(add-to-list 'auto-mode-alist '("\\.ebuild\\'" . ebuild-mode))
+(add-to-list 'auto-mode-alist '("\\.eclass\\'" . ebuild-mode))
+
+(provide 'ebuild-mode)
^ permalink raw reply related [flat|nested] 7+ messages in thread
* [gentoo-commits] proj/emacs-tools:backups/gentoo-syntax@443 commit in: /
@ 2012-05-06 16:07 Sebastian Pipping
0 siblings, 0 replies; 7+ messages in thread
From: Sebastian Pipping @ 2012-05-06 16:07 UTC (permalink / raw
To: gentoo-commits
commit: bf6dcbc4731cdfe2650a5eeeb192b12d134daa24
Author: Ulrich Müller <ulm <AT> gentoo <DOT> org>
AuthorDate: Wed Jun 6 22:29:36 2007 +0000
Commit: Sebastian Pipping <sping <AT> gentoo <DOT> org>
CommitDate: Wed Jun 6 22:29:36 2007 +0000
URL: http://git.overlays.gentoo.org/gitweb/?p=proj/emacs-tools.git;a=commit;h=bf6dcbc4
Commit right version of ebuild-mode.el this time.
svn path=/emacs-extra/ebuild-mode/; revision=372
---
ebuild-mode.el | 19 +++++++++----------
1 files changed, 9 insertions(+), 10 deletions(-)
diff --git a/ebuild-mode.el b/ebuild-mode.el
index f9944c8..05b8874 100644
--- a/ebuild-mode.el
+++ b/ebuild-mode.el
@@ -133,16 +133,15 @@
"test" "preinst" "postinst" "install" "qmerge" "merge"
"prerm" "postrm" "unmerge" "config" "package" "rpm" "clean")))
-(defun ebuild-mode-run-command ()
- "Run \"ebuild command buffername\""
- (interactive)
- (let* ((process-connection-type t)
- (command
- (completing-read
- "Run ebuild command: " ebuild-mode-commands-alist nil t))
- (buffer (format "*ebuild %s*" command)))
- (and (string-equal command "")
- (error "Empty ebuild command"))
+(defun ebuild-mode-run-command (command)
+ "Run ebuild command."
+ (interactive
+ (list (completing-read
+ "Run ebuild command: " ebuild-mode-commands-alist nil t)))
+ (and (string-equal command "")
+ (error "Empty ebuild command"))
+ (let ((process-connection-type t)
+ (buffer (format "*ebuild %s*" command)))
(start-process "ebuild-digest" buffer "env" "NOCOLOR=yes" "ebuild"
(buffer-file-name) command)
(pop-to-buffer buffer)))
^ permalink raw reply related [flat|nested] 7+ messages in thread
* [gentoo-commits] proj/emacs-tools:backups/gentoo-syntax@443 commit in: /
@ 2012-05-06 16:07 Sebastian Pipping
0 siblings, 0 replies; 7+ messages in thread
From: Sebastian Pipping @ 2012-05-06 16:07 UTC (permalink / raw
To: gentoo-commits
commit: 070e6ef4bf56486d56af6d6c2665c96d075c7cf2
Author: Ulrich Müller <ulm <AT> gentoo <DOT> org>
AuthorDate: Thu Jun 7 12:13:26 2007 +0000
Commit: Sebastian Pipping <sping <AT> gentoo <DOT> org>
CommitDate: Thu Jun 7 12:13:26 2007 +0000
URL: http://git.overlays.gentoo.org/gitweb/?p=proj/emacs-tools.git;a=commit;h=070e6ef4
Use compile instead of start-process in ebuild-run-command.
Fix key definition.
svn path=/emacs-extra/ebuild-mode/; revision=374
---
ChangeLog | 7 +++++++
ebuild-mode.el | 35 ++++++++++++++++++-----------------
2 files changed, 25 insertions(+), 17 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 6b42cfa..d8b3aa7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2007-06-07 Ulrich Mueller <ulm@gentoo.org>
+
+ * ebuild-mode.el (ebuild-mode-map): Fix key definition.
+ (ebuild-run-command): Use compile instead of start-process;
+ inspired by ebuild-mode-marienz.el.
+ (auto-mode-alist): Add elements for ebuild-mode and eselect-mode.
+
2007-06-06 Ulrich Mueller <ulm@gentoo.org>
* ebuild-mode.el (ebuild-mode-commands-alist): New variable.
diff --git a/ebuild-mode.el b/ebuild-mode.el
index e507179..66fbcda 100644
--- a/ebuild-mode.el
+++ b/ebuild-mode.el
@@ -127,31 +127,28 @@
(setq tab-width 4
indent-tabs-mode t))
-(defvar ebuild-mode-commands-alist
+(defvar ebuild-commands-alist
(mapcar 'list
'("help" "setup" "fetch" "digest" "manifest" "unpack" "compile"
"test" "preinst" "postinst" "install" "qmerge" "merge"
"prerm" "postrm" "unmerge" "config" "package" "rpm" "clean")))
-(defun ebuild-mode-run-command (command)
- "Run ebuild command."
+(defun ebuild-run-command (command)
+ "Run ebuild COMMAND, with output to a compilation buffer."
(interactive
(list (completing-read
- "Run ebuild command: " ebuild-mode-commands-alist nil t)))
- (or (assoc command ebuild-mode-commands-alist)
+ "Run ebuild command: " ebuild-commands-alist nil t)))
+ (or (assoc command ebuild-commands-alist)
(error "Ebuild command \"%s\" not known" command))
- (let ((process-connection-type t)
- (buffer (format "*ebuild %s*" command)))
- (start-process "ebuild-digest" buffer "env" "NOCOLOR=yes" "ebuild"
- (buffer-file-name) command)
- (pop-to-buffer buffer)))
-
-(defvar ebuild-mode-map
- (let ((map (make-sparse-keymap)))
- ;;(set-keymap-parent map sh-mode-map)
- (define-key map "\C-ce" 'ebuild-mode-run-command)
- map)
- "Keymap used in Ebuild mode.")
+ (let ((process-environment
+ (cons "NOCOLOR=true" process-environment))
+ ;;(compilation-mode-hook
+ ;; (function (lambda () (setq truncate-lines t))))
+ (compilation-buffer-name-function
+ (list 'lambda '(mode) (concat "*ebuild " command "*"))))
+ (compile (format "ebuild %s %s" buffer-file-name command))))
+
+(define-key ebuild-mode-map "\C-ce" 'ebuild-run-command)
(and (< emacs-major-version 22)
;; make TAB key work
@@ -160,6 +157,10 @@
(or (memq major-mode '(ebuild-mode eselect-mode))
ad-do-it)))
+(add-to-list 'auto-mode-alist '("\\.ebuild\\'" . ebuild-mode))
+(add-to-list 'auto-mode-alist '("\\.eclass\\'" . ebuild-mode))
+(add-to-list 'auto-mode-alist '("\\.eselect\\'" . eselect-mode))
+
(provide 'ebuild-mode)
;;; ebuild-mode.el ends here
^ permalink raw reply related [flat|nested] 7+ messages in thread
* [gentoo-commits] proj/emacs-tools:backups/gentoo-syntax@443 commit in: /
@ 2012-05-06 16:07 Sebastian Pipping
0 siblings, 0 replies; 7+ messages in thread
From: Sebastian Pipping @ 2012-05-06 16:07 UTC (permalink / raw
To: gentoo-commits
commit: 6587affe69bb0eb9673329e5cbb87265ec7e3bca
Author: Ulrich Müller <ulm <AT> gentoo <DOT> org>
AuthorDate: Fri Jun 8 21:02:37 2007 +0000
Commit: Sebastian Pipping <sping <AT> gentoo <DOT> org>
CommitDate: Fri Jun 8 21:02:37 2007 +0000
URL: http://git.overlays.gentoo.org/gitweb/?p=proj/emacs-tools.git;a=commit;h=6587affe
Use write-contents-hooks instead of write-file-functions for Emacs 21 and XEmacs compatibility.
svn path=/emacs-extra/ebuild-mode/; revision=377
---
ChangeLog | 7 +++++++
ebuild-mode.el | 48 ++++++++++++++++++++++++++----------------------
2 files changed, 33 insertions(+), 22 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index d8b3aa7..78dea46 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2007-06-08 Ulrich Mueller <ulm@gentoo.org>
+
+ * ebuild-mode.el (ebuild-mode): Use write-contents-hooks instead
+ of write-file-functions for Emacs 21 and XEmacs compatibility.
+ Move call of font-lock-add-keywords out of function definition.
+ (eselect-mode): Ditto.
+
2007-06-07 Ulrich Mueller <ulm@gentoo.org>
* ebuild-mode.el (ebuild-mode-map): Fix key definition.
diff --git a/ebuild-mode.el b/ebuild-mode.el
index 66fbcda..82bd85b 100644
--- a/ebuild-mode.el
+++ b/ebuild-mode.el
@@ -65,7 +65,7 @@
"elisp-site-regen" "elisp-emacs-version" "elisp-make-autoload-file"))
(defun ebuild-mode-make-keywords-list (keywords-list face &optional prefix suffix)
- ;; based on `make-generic-keywords-list' from generic.el
+ ;; based on `generic-make-keywords-list' from generic.el
(unless (listp keywords-list)
(error "Keywords argument must be a list of strings"))
(cons (concat prefix "\\<"
@@ -73,6 +73,14 @@
"\\>" suffix)
face))
+(font-lock-add-keywords
+ 'ebuild-mode
+ (list (ebuild-mode-make-keywords-list ebuild-mode-commands-0 'font-lock-type-face)
+ (ebuild-mode-make-keywords-list ebuild-mode-commands-sandbox 'font-lock-warning-face)
+ (ebuild-mode-make-keywords-list ebuild-mode-commands-eclass 'font-lock-type-face)
+ (ebuild-mode-make-keywords-list ebuild-mode-commands-flag-o-matic 'font-lock-type-face)
+ (ebuild-mode-make-keywords-list ebuild-mode-commands-elisp 'font-lock-type-face)))
+
(defun ebuild-mode-tabify ()
;; tabify whitespace only at beginning of lines
(let ((tabify-regexp "^\t* [ \t]+"))
@@ -80,16 +88,10 @@
(define-derived-mode ebuild-mode shell-script-mode "Ebuild"
"Major mode for Portage .ebuild and .eclass files."
- (font-lock-add-keywords 'ebuild-mode
- (list (ebuild-mode-make-keywords-list ebuild-mode-commands-0 'font-lock-type-face)
- (ebuild-mode-make-keywords-list ebuild-mode-commands-sandbox 'font-lock-warning-face)
- (ebuild-mode-make-keywords-list ebuild-mode-commands-eclass 'font-lock-type-face)
- (ebuild-mode-make-keywords-list ebuild-mode-commands-flag-o-matic 'font-lock-type-face)
- (ebuild-mode-make-keywords-list ebuild-mode-commands-elisp 'font-lock-type-face)))
- (add-hook 'write-file-functions 'delete-trailing-whitespace t t)
- (add-hook 'write-file-functions 'ebuild-mode-tabify t t)
- (setq tab-width 4
- indent-tabs-mode t)
+ (add-hook 'write-contents-hooks 'delete-trailing-whitespace t t)
+ (add-hook 'write-contents-hooks 'ebuild-mode-tabify t t)
+ (setq tab-width 4)
+ (setq indent-tabs-mode t)
;; run user-defined hooks
(run-hooks 'ebuild-mode-hook))
@@ -113,19 +115,21 @@
(defvar eselect-mode-commands-5
'("is_number canonicalise"))
+(font-lock-add-keywords
+ 'eselect-mode
+ (list (ebuild-mode-make-keywords-list eselect-mode-commands-0 'font-lock-type-face)
+ (ebuild-mode-make-keywords-list eselect-mode-commands-1 'font-lock-type-face)
+ (ebuild-mode-make-keywords-list eselect-mode-commands-2 'font-lock-type-face)
+ (ebuild-mode-make-keywords-list eselect-mode-commands-3 'font-lock-warning-face)
+ (ebuild-mode-make-keywords-list eselect-mode-commands-4 'font-lock-type-face)
+ (ebuild-mode-make-keywords-list eselect-mode-commands-5 'font-lock-type-face)))
+
(define-derived-mode eselect-mode shell-script-mode "Eselect"
"Major mode for Portage .eselect files."
- (font-lock-add-keywords 'eselect-mode
- (list (ebuild-mode-make-keywords-list eselect-mode-commands-0 'font-lock-type-face)
- (ebuild-mode-make-keywords-list eselect-mode-commands-1 'font-lock-type-face)
- (ebuild-mode-make-keywords-list eselect-mode-commands-2 'font-lock-type-face)
- (ebuild-mode-make-keywords-list eselect-mode-commands-3 'font-lock-warning-face)
- (ebuild-mode-make-keywords-list eselect-mode-commands-4 'font-lock-type-face)
- (ebuild-mode-make-keywords-list eselect-mode-commands-5 'font-lock-type-face)))
- (add-hook 'write-file-functions 'delete-trailing-whitespace t t)
- (add-hook 'write-file-functions 'ebuild-mode-tabify t t)
- (setq tab-width 4
- indent-tabs-mode t))
+ (add-hook 'write-contents-hooks 'delete-trailing-whitespace t t)
+ (add-hook 'write-contents-hooks 'ebuild-mode-tabify t t)
+ (setq tab-width 4)
+ (setq indent-tabs-mode t))
(defvar ebuild-commands-alist
(mapcar 'list
^ permalink raw reply related [flat|nested] 7+ messages in thread
* [gentoo-commits] proj/emacs-tools:backups/gentoo-syntax@443 commit in: /
@ 2012-05-06 16:07 Sebastian Pipping
0 siblings, 0 replies; 7+ messages in thread
From: Sebastian Pipping @ 2012-05-06 16:07 UTC (permalink / raw
To: gentoo-commits
commit: 49996f428f62f4a3f151e691ccb8a031b92d5ad8
Author: Christian Faulhammer <opfer <AT> gentoo <DOT> org>
AuthorDate: Mon Jun 18 10:17:24 2007 +0000
Commit: Sebastian Pipping <sping <AT> gentoo <DOT> org>
CommitDate: Mon Jun 18 10:17:24 2007 +0000
URL: http://git.overlays.gentoo.org/gitweb/?p=proj/emacs-tools.git;a=commit;h=49996f42
Adding keywords for some Java eclasses, bash-completion, gnome2-utils,
alternatives, fdo-mime
svn path=/emacs-extra/ebuild-mode/; revision=424
---
ebuild-mode.el | 33 ++++++++++++++++++++++++++++++++-
1 files changed, 32 insertions(+), 1 deletions(-)
diff --git a/ebuild-mode.el b/ebuild-mode.el
index e450073..1561bdd 100644
--- a/ebuild-mode.el
+++ b/ebuild-mode.el
@@ -55,6 +55,33 @@
"number_abis" "get_ml_incdir" "prep_ml_includes" "create_ml_includes"
"get_libname" "multilib_env" "multilib_toolchain_setup"))
+;; functions from different Java eclasses
+(defvar ebuild-mode-commands-java
+ '("java-ant_bsfix_files" "java-ant_bsfix_one" "java-ant_rewrite-classpath"
+ "java-ant_ignore-system-classes" "java-ant_xml-rewrite" "java-pkg_doexamples"
+ "java-pkg_dojar" "java-pkg_regjar" "java-pkg_newjar" "java-pkg_addcp"
+ "java-pkg_doso" "java-pkg_regso" "java-pkg_jarinto" "java-pkg_sointo"
+ "java-pkg_dohtml" "java-pkg_dojavadoc" "java-pkg_dosrc" "java-pkg_dolauncher"
+ "java-pkg_dowar" "java-pkg_jar-from" "java-pkg_jarfrom" "java-pkg_getjars"
+ "java-pkg_getjar" "java-pkg_register-dependency" "java-pkg_register-optional-dependency"
+ "java-pkg_register-environment-variable" "java-pkg_find-normal-jars"
+ "java-pkg_ensure-no-bundled-jars" "java-pkg_get-source" "java-pkg_set-current-vm"
+ "java-pkg_get-current-vm" "java-pkg_current-vm-matches" "java-pkg_get-target"
+ "java-pkg_get-javac" "java-pkg_javac-args" "java-pkg_get-jni-cflags"
+ "java-pkg_ensure-gcj" "java-pkg_ensure-test" "java-pkg_register-ant-task"
+ "ejunit" "eant" "ejavac" "java-pkg_filter-compiler" "java-pkg_force-compiler"
+ "use_doc"))
+
+;; contains functions from bash-completion, fdo-mime, gnome2-utils
+(defvar ebuild-mode-commands-misc
+ '("dobashcompletion" "fdo-mime_desktop_database_update" "fdo-mime_mime_database_update"
+ "gnome2_gconf_install" "gconf_uninstall" "icon_cache_update" "gnome2_omf_fix"
+ "gnome2_scrollkeeper_update"))
+
+(defvar ebuild-mode-commands-alternatives
+ '("alternatives_pkg_postinst" "alternatives_pkg_postrm" "alternatives_makesym"
+ "alternatives_auto_makesym"))
+
(defvar ebuild-mode-commands-eutils
'("epause" "ebeep" "epatch" "emktemp" "enewuser" "enewgroup" "edos2unix"
"make_desktop_entry" "validate_desktop_entries" "make_session_desktop"
@@ -69,7 +96,8 @@
;; commands for all Source Code Managment or other package system eclasses
(defvar ebuild-mode-commands-scm
- '("cvs_src_unpack" "subversion_src_unpack" "git_src_unpack" "rpm_src_unpack"))
+ '("cvs_src_unpack" "subversion_src_unpack" "git_src_unpack" "rpm_src_unpack"
+ "mercurial_src_unpack"))
(defvar ebuild-mode-commands-sandbox
'("adddeny" "addpredict" "addread" "addwrite"))
@@ -105,6 +133,9 @@
'(lambda (x) (apply 'ebuild-mode-make-keywords-list x))
(list (list ebuild-mode-commands-0 font-lock-type-face)
(list ebuild-mode-commands-eutils font-lock-type-face)
+ (list ebuild-mode-commands-misc font-lock-type-face)
+ (list ebuild-mode-commands-java font-lock-type-face)
+ (list ebuild-mode-commands-alternatives font-lock-type-face)
(list ebuild-mode-commands-pam font-lock-type-face)
(list ebuild-mode-commands-autotools font-lock-type-face)
(list ebuild-mode-commands-scm font-lock-type-face)
^ permalink raw reply related [flat|nested] 7+ messages in thread
* [gentoo-commits] proj/emacs-tools:backups/gentoo-syntax@443 commit in: /
@ 2012-05-06 16:07 Sebastian Pipping
0 siblings, 0 replies; 7+ messages in thread
From: Sebastian Pipping @ 2012-05-06 16:07 UTC (permalink / raw
To: gentoo-commits
commit: cc2265a03ca911ef011d2e4be84bf1390431b54e
Author: Christian Faulhammer <opfer <AT> gentoo <DOT> org>
AuthorDate: Tue Jun 19 05:25:55 2007 +0000
Commit: Sebastian Pipping <sping <AT> gentoo <DOT> org>
CommitDate: Tue Jun 19 05:25:55 2007 +0000
URL: http://git.overlays.gentoo.org/gitweb/?p=proj/emacs-tools.git;a=commit;h=cc2265a0
* put keywords from -java and -misc in separate classes so they
are properly ordered
* added keywords for versionator eclass
svn path=/emacs-extra/ebuild-mode/; revision=427
---
ebuild-mode.el | 57 ++++++++++++++++++++++++++++++++++++-------------------
1 files changed, 37 insertions(+), 20 deletions(-)
diff --git a/ebuild-mode.el b/ebuild-mode.el
index 1561bdd..5ff499d 100644
--- a/ebuild-mode.el
+++ b/ebuild-mode.el
@@ -55,27 +55,33 @@
"number_abis" "get_ml_incdir" "prep_ml_includes" "create_ml_includes"
"get_libname" "multilib_env" "multilib_toolchain_setup"))
-;; functions from different Java eclasses
-(defvar ebuild-mode-commands-java
+(defvar ebuild-mode-commands-java-ant-2
'("java-ant_bsfix_files" "java-ant_bsfix_one" "java-ant_rewrite-classpath"
- "java-ant_ignore-system-classes" "java-ant_xml-rewrite" "java-pkg_doexamples"
- "java-pkg_dojar" "java-pkg_regjar" "java-pkg_newjar" "java-pkg_addcp"
- "java-pkg_doso" "java-pkg_regso" "java-pkg_jarinto" "java-pkg_sointo"
- "java-pkg_dohtml" "java-pkg_dojavadoc" "java-pkg_dosrc" "java-pkg_dolauncher"
- "java-pkg_dowar" "java-pkg_jar-from" "java-pkg_jarfrom" "java-pkg_getjars"
- "java-pkg_getjar" "java-pkg_register-dependency" "java-pkg_register-optional-dependency"
- "java-pkg_register-environment-variable" "java-pkg_find-normal-jars"
- "java-pkg_ensure-no-bundled-jars" "java-pkg_get-source" "java-pkg_set-current-vm"
- "java-pkg_get-current-vm" "java-pkg_current-vm-matches" "java-pkg_get-target"
- "java-pkg_get-javac" "java-pkg_javac-args" "java-pkg_get-jni-cflags"
- "java-pkg_ensure-gcj" "java-pkg_ensure-test" "java-pkg_register-ant-task"
- "ejunit" "eant" "ejavac" "java-pkg_filter-compiler" "java-pkg_force-compiler"
- "use_doc"))
+ "java-ant_ignore-system-classes" "java-ant_xml-rewrite"))
+
+(defvar ebuild-mode-commands-java-utils-2
+ '("java-pkg_doexamples" "java-pkg_dojar" "java-pkg_regjar" "java-pkg_newjar"
+ "java-pkg_addcp" "java-pkg_doso" "java-pkg_regso" "java-pkg_jarinto"
+ "java-pkg_sointo" "java-pkg_dohtml" "java-pkg_dojavadoc" "java-pkg_dosrc"
+ "java-pkg_dolauncher" "java-pkg_dowar" "java-pkg_jar-from" "java-pkg_jarfrom"
+ "java-pkg_getjars" "java-pkg_getjar" "java-pkg_register-dependency"
+ "java-pkg_register-optional-dependency" "java-pkg_register-environment-variable"
+ "java-pkg_find-normal-jars" "java-pkg_ensure-no-bundled-jars"
+ "java-pkg_get-source" "java-pkg_set-current-vm" "java-pkg_get-current-vm"
+ "java-pkg_current-vm-matches" "java-pkg_get-target" "java-pkg_get-javac"
+ "java-pkg_javac-args" "java-pkg_get-jni-cflags" "java-pkg_ensure-gcj"
+ "java-pkg_ensure-test" "java-pkg_register-ant-task" "ejunit" "eant"
+ "ejavac" "java-pkg_filter-compiler" "java-pkg_force-compiler" "use_doc"))
;; contains functions from bash-completion, fdo-mime, gnome2-utils
-(defvar ebuild-mode-commands-misc
- '("dobashcompletion" "fdo-mime_desktop_database_update" "fdo-mime_mime_database_update"
- "gnome2_gconf_install" "gconf_uninstall" "icon_cache_update" "gnome2_omf_fix"
+(defvar ebuild-mode-commands-bash-completion
+ '("dobashcompletion"))
+
+(defvar ebuild-mode-commands-fdo-mime
+ '("fdo-mime_desktop_database_update" "fdo-mime_mime_database_update"))
+
+(defvar ebuild-mode-commands-gnome2-utils
+ '("gnome2_gconf_install" "gconf_uninstall" "icon_cache_update" "gnome2_omf_fix"
"gnome2_scrollkeeper_update"))
(defvar ebuild-mode-commands-alternatives
@@ -116,6 +122,13 @@
'("elisp-comp" "elisp-compile" "elisp-install" "elisp-site-file-install"
"elisp-site-regen" "elisp-emacs-version" "elisp-make-autoload-file"))
+(defvar ebuild-mode-commands-versionator
+ '("get_all_version_components" "get_version_components" "get_major_version"
+ "get_version_component_range" "get_after_major_version" "replace_version_separator"
+ "replace_all_version_separators" "delete_version_separator" "delete_all_version_separators"
+ "get_version_component_count" "get_last_version_component_index" "version_is_at_least"
+ "version_compare" "version_sort"))
+
(defun ebuild-mode-make-keywords-list (keywords-list face
&optional prefix suffix)
;; based on `generic-make-keywords-list' from generic.el
@@ -133,8 +146,11 @@
'(lambda (x) (apply 'ebuild-mode-make-keywords-list x))
(list (list ebuild-mode-commands-0 font-lock-type-face)
(list ebuild-mode-commands-eutils font-lock-type-face)
- (list ebuild-mode-commands-misc font-lock-type-face)
- (list ebuild-mode-commands-java font-lock-type-face)
+ (list ebuild-mode-commands-bash-completion font-lock-type-face)
+ (list ebuild-mode-commands-gnome2-utils font-lock-type-face)
+ (list ebuild-mode-commands-fdo-mime font-lock-type-face)
+ (list ebuild-mode-commands-java-ant-2 font-lock-type-face)
+ (list ebuild-mode-commands-java-utils-2 font-lock-type-face)
(list ebuild-mode-commands-alternatives font-lock-type-face)
(list ebuild-mode-commands-pam font-lock-type-face)
(list ebuild-mode-commands-autotools font-lock-type-face)
@@ -142,6 +158,7 @@
(list ebuild-mode-commands-multilib font-lock-type-face)
(list ebuild-mode-commands-sandbox font-lock-warning-face)
(list ebuild-mode-commands-eclass font-lock-type-face)
+ (list ebuild-mode-commands-versionator font-lock-type-face)
(list ebuild-mode-commands-flag-o-matic font-lock-type-face)
(list ebuild-mode-commands-elisp font-lock-type-face))))
^ permalink raw reply related [flat|nested] 7+ messages in thread
end of thread, other threads:[~2012-05-06 16:26 UTC | newest]
Thread overview: 7+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2012-05-06 16:07 [gentoo-commits] proj/emacs-tools:backups/gentoo-syntax@443 commit in: / Sebastian Pipping
-- strict thread matches above, loose matches on Subject: below --
2012-05-06 16:07 Sebastian Pipping
2012-05-06 16:07 Sebastian Pipping
2012-05-06 16:07 Sebastian Pipping
2012-05-06 16:07 Sebastian Pipping
2012-05-06 16:07 Sebastian Pipping
2012-05-06 16:07 Sebastian Pipping
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox