From 883fc5ed422cdfb32e63c963882755240c32b8f2 Mon Sep 17 00:00:00 2001
From: Alex Kost <alezost@gmail.com>
Date: Tue, 12 Jan 2016 17:37:44 +0300
Subject: emacs: Add missing shell completions.

* emacs/guix-pcomplete.el (guix-pcomplete-complete-option-arg): Complete
  file name for '--install-from-file' option of 'guix package' command,
  and for '--file' and '--with-source' options of 'guix build' command.
---
 emacs/guix-pcomplete.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'emacs')

diff --git a/emacs/guix-pcomplete.el b/emacs/guix-pcomplete.el
index 85b267a78d..785e54ef6d 100644
--- a/emacs/guix-pcomplete.el
+++ b/emacs/guix-pcomplete.el
@@ -262,7 +262,8 @@ INPUT is the current partially completed string."
         (complete (guix-pcomplete-all-packages)))
        ((option? "-p" "--profile")
         (complete* (pcomplete-dirs)))
-       ((option? "-m" "--manifest")
+       ((or (option? "-f" "--install-from-file")
+            (option? "-m" "--manifest"))
         (complete* (pcomplete-entries)))))
 
      ((and (command? "archive" "build" "size")
@@ -270,7 +271,9 @@ INPUT is the current partially completed string."
       (complete* guix-help-system-types))
 
      ((and (command? "build")
-           (option? "-r" "--root"))
+           (or (option? "-f" "--file")
+               (option? "-r" "--root")
+               (string= "--with-source" option)))
       (complete* (pcomplete-entries)))
 
      ((and (command? "graph")
-- 
cgit v1.2.3