6c40b7b703
Extract the code for defining buffer interface from "guix-base.el", generalize it and move to "guix-buffer.el". * emacs.am (ELFILES): Add "emacs/guix-buffer.el". * emacs/guix-base.el (guix-profile, guix-entries, guix-buffer-type) (guix-entry-type, guix-search-type, guix-search-vals, guix-set-vars) (guix-get-symbol, guix-show-entries, guix-get-show-entries) (guix-set-buffer, guix-history-call, guix-make-history-item) (guix-get-params-for-receiving): Remove. (guix-switch-to-buffer): Rename to 'guix-buffer-display' and move to "guix-buffer.el". (guix-get-entries): Rename to 'guix-ui-get-entries' and move to "guix-ui.el". (guix-buffer-data, guix-buffer-value, guix-buffer-param-title) (guix-buffer-name, guix-buffer-history-size) (guix-buffer-revert-confirm?, guix-buffer-map, guix-buffer-revert) (guix-buffer-after-redisplay-hook, guix-buffer-redisplay) (guix-buffer-redisplay-goto-button): Move to... * emacs/guix-buffer.el: ... here. New file. (guix-buffer-item): New variable. (guix-buffer-with-item, guix-buffer-with-current-item) (guix-buffer-define-current-item-accessor) (guix-buffer-define-current-item-accessors) (guix-buffer-define-current-args-accessor) (guix-buffer-define-current-args-accessors): New macros. (guix-buffer-get-entries, guix-buffer-mode-enable) (guix-buffer-mode-initialize, guix-buffer-insert-entries) (guix-buffer-show-entries-default, guix-buffer-show-entries) (guix-buffer-message, guix-buffer-history-item, guix-buffer-set) (guix-buffer-display-entries-current) (guix-buffer-get-display-entries-current) (guix-buffer-display-entries, guix-buffer-get-display-entries): New procedures. * emacs/guix-info.el: Adjust for the procedures renaming. (guix-info-define-interface): Add ':show-entries-function' keyword. * emacs/guix-list.el: Likewise. * emacs/guix-ui.el (guix-ui-define-interface): Generate 'guix-ENTRY-TYPE-BUFFER-TYPE-get-entries' procedure based on 'guix-ui-get-entries'. * emacs/guix.el (guix-get-show-packages, guix-get-show-generations): Adjust for the procedures renaming.
64 lines
1.9 KiB
Text
64 lines
1.9 KiB
Text
# GNU Guix --- Functional package management for GNU
|
|
# Copyright © 2014, 2015 Alex Kost <alezost@gmail.com>
|
|
#
|
|
# 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 GNU Guix. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
AUTOLOADS = emacs/guix-autoloads.el
|
|
|
|
ELFILES = \
|
|
emacs/guix-backend.el \
|
|
emacs/guix-base.el \
|
|
emacs/guix-build-log.el \
|
|
emacs/guix-buffer.el \
|
|
emacs/guix-command.el \
|
|
emacs/guix-devel.el \
|
|
emacs/guix-emacs.el \
|
|
emacs/guix-entry.el \
|
|
emacs/guix-external.el \
|
|
emacs/guix-geiser.el \
|
|
emacs/guix-guile.el \
|
|
emacs/guix-help-vars.el \
|
|
emacs/guix-history.el \
|
|
emacs/guix-info.el \
|
|
emacs/guix-init.el \
|
|
emacs/guix-list.el \
|
|
emacs/guix-messages.el \
|
|
emacs/guix-pcomplete.el \
|
|
emacs/guix-popup.el \
|
|
emacs/guix-prettify.el \
|
|
emacs/guix-profiles.el \
|
|
emacs/guix-read.el \
|
|
emacs/guix-ui.el \
|
|
emacs/guix-utils.el \
|
|
emacs/guix.el
|
|
|
|
if HAVE_EMACS
|
|
|
|
dist_lisp_DATA = \
|
|
$(ELFILES) \
|
|
$(AUTOLOADS)
|
|
|
|
nodist_lisp_DATA = emacs/guix-config.el
|
|
|
|
$(AUTOLOADS): $(ELFILES)
|
|
$(EMACS) --batch --eval \
|
|
"(let ((backup-inhibited t) \
|
|
(generated-autoload-file \
|
|
(expand-file-name \"$(AUTOLOADS)\" \"$(srcdir)\"))) \
|
|
(update-directory-autoloads \
|
|
(expand-file-name \"emacs\" \"$(srcdir)\")))"
|
|
|
|
endif HAVE_EMACS
|