[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
21/24: emacs: Add "guix-popup.el".
From: |
Alex Kost |
Subject: |
21/24: emacs: Add "guix-popup.el". |
Date: |
Fri, 28 Aug 2015 20:06:37 +0000 |
alezost pushed a commit to branch wip-emacs-popup-ui
in repository guix.
commit 6e261a75422423589485da89b30d16a7d89f593f
Author: Alex Kost <address@hidden>
Date: Thu Aug 13 11:06:45 2015 +0300
emacs: Add "guix-popup.el".
* emacs/guix-popup.el: New file.
* emacs.am (ELFILES): Add it.
---
emacs.am | 1 +
emacs/guix-popup.el | 48 ++++++++++++++++++++++++++++++++++++++++++++++++
2 files changed, 49 insertions(+), 0 deletions(-)
diff --git a/emacs.am b/emacs.am
index 18ff091..e3f2001 100644
--- a/emacs.am
+++ b/emacs.am
@@ -28,6 +28,7 @@ ELFILES = \
emacs/guix-list.el \
emacs/guix-messages.el \
emacs/guix-pcomplete.el \
+ emacs/guix-popup.el \
emacs/guix-prettify.el \
emacs/guix-read.el \
emacs/guix-utils.el \
diff --git a/emacs/guix-popup.el b/emacs/guix-popup.el
new file mode 100644
index 0000000..59e98a3
--- /dev/null
+++ b/emacs/guix-popup.el
@@ -0,0 +1,48 @@
+;;; guix-popup.el --- Popup windows library
+
+;; Copyright © 2015 Alex Kost <address@hidden>
+
+;; This file is part of GNU Guix.
+
+;; GNU Guix is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Guix is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This file provides `guix-define-popup' macro which is just an alias
+;; to `magit-define-popup'. According to the manual (info
+;; "(magit-popup) Defining prefix and suffix commands") `magit-popup'
+;; library will eventually be superseded by a more general library.
+
+;;; Code:
+
+(require 'magit-popup)
+
+(defalias 'guix-define-popup 'magit-define-popup)
+
+(defvar guix-popup-font-lock-keywords
+ (eval-when-compile
+ `((,(rx "("
+ (group "guix-define-popup")
+ symbol-end
+ (zero-or-more blank)
+ (zero-or-one
+ (group (one-or-more (or (syntax word) (syntax symbol))))))
+ (1 font-lock-keyword-face)
+ (2 font-lock-function-name-face nil t)))))
+
+(font-lock-add-keywords 'emacs-lisp-mode guix-popup-font-lock-keywords)
+
+(provide 'guix-popup)
+
+;;; guix-popup.el ends here
- 11/24: guix graph: Export node types and <node-type> accessors., (continued)
- 11/24: guix graph: Export node types and <node-type> accessors., Alex Kost, 2015/08/28
- 12/24: emacs: Add 'guix-graph-type-names'., Alex Kost, 2015/08/28
- 13/24: emacs: Add 'guix-package-names'., Alex Kost, 2015/08/28
- 17/24: ui: Add 'run-guix'., Alex Kost, 2015/08/28
- 15/24: emacs: Add minibuffer readers., Alex Kost, 2015/08/28
- 18/24: emacs: Add code to run guix command in REPL., Alex Kost, 2015/08/28
- 14/24: emacs: Add help variables., Alex Kost, 2015/08/28
- 20/24: doc: Reorganize "Emacs Interface" node., Alex Kost, 2015/08/28
- 23/24: emacs: Use prompt for packages instead popup for edit action., Alex Kost, 2015/08/28
- 19/24: emacs: Add code to run guix command in shell., Alex Kost, 2015/08/28
- 21/24: emacs: Add "guix-popup.el".,
Alex Kost <=
- 24/24: emacs: Use popup interface instead 'guix-pull' command., Alex Kost, 2015/08/28
- 16/24: emacs: Add and use alist accessors., Alex Kost, 2015/08/28
- 22/24: emacs: Add popup interface for guix commands., Alex Kost, 2015/08/28