diff options
| author | Alex Kost <alezost@gmail.com> | 2015-12-07 11:57:56 +0300 |
|---|---|---|
| committer | Alex Kost <alezost@gmail.com> | 2015-12-09 19:54:19 +0300 |
| commit | dcb00c0ad5f33d76dc4cac03ba6f7f8568ddfc57 (patch) | |
| tree | 700f36a11be7f649fd2d6ceedde810f3aa1eca3d /emacs/guix-build-log.el | |
| parent | d7a58c60d6e167d0fb0661afdbc3450476db10cb (diff) | |
emacs: Add 'guix-build-log-find-file'.
* emacs/guix-build-log.el (guix-build-log-find-file): New procedure.
* emacs/guix-command.el (guix-run-view-build-log): Use it.
Diffstat (limited to 'emacs/guix-build-log.el')
| -rw-r--r-- | emacs/guix-build-log.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/emacs/guix-build-log.el b/emacs/guix-build-log.el index 3f78121a90..e08a88f6cc 100644 --- a/emacs/guix-build-log.el +++ b/emacs/guix-build-log.el @@ -24,6 +24,8 @@ ;;; Code: +(require 'guix-utils) + (defgroup guix-build-log nil "Settings for `guix-build-log-mode'." :group 'guix) @@ -359,6 +361,11 @@ programmatically using hooks: (when guix-build-log-minor-mode-activate (guix-build-log-minor-mode))) +(defun guix-build-log-find-file (file-or-url) + "Open FILE-OR-URL in `guix-build-log-mode'." + (guix-find-file-or-url file-or-url) + (guix-build-log-mode)) + ;;;###autoload (add-to-list 'auto-mode-alist ;; Regexp for log files (usually placed in /var/log/guix/...) |