03/03: ui: Don't truncate search output when inside Emacs.

[guix-commits]

ambrevar pushed a commit to branch master
in repository guix.

commit 9b7f9e6f9ba8dc9ea8b99573e0862856ff1b9475
Author: Pierre Neidhardt <address@hidden>
AuthorDate: Mon Feb 17 14:38:48 2020 +0100

    ui: Don't truncate search output when inside Emacs.
    
    * guix/ui.scm (display-search-results): Loop over all results when
      INSIDE_EMACS is set.
---
 guix/ui.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/guix/ui.scm b/guix/ui.scm
index 371af4e..22a6d6c 100644
--- a/guix/ui.scm
+++ b/guix/ui.scm
@@ -1473,7 +1473,8 @@ them.  If PORT is a terminal, print at most a full screen 
of results."
                                  #:hyperlinks? links?
                                  #:extra-fields
                                  `((relevance . ,score)))))))
-         (if (and max-rows
+         (if (and (not (getenv "INSIDE_EMACS"))
+                  max-rows
                   (> (port-line port) first-line) ;print at least one result
                   (> (+ 4 (line-count text) (port-line port))
                      max-rows))