summary refs log tree commit diff
diff options
context:
space:
mode:
authorMarius Bakke <mbakke@fastmail.com>2020-04-07 22:09:14 +0200
committerMarius Bakke <mbakke@fastmail.com>2020-04-07 22:09:14 +0200
commit1c86577d624b97a03138640b4d849823b504570e (patch)
tree76147b26478667af9a1af303c3ba1c1f44eddcf5
parent9f1b787120b1b81abffaf0fa13fdbdf4cca39f2d (diff)
downloadguix-1c86577d624b97a03138640b4d849823b504570e.tar.gz
Revert "Allow double-click select of URL in status"
As discussed on #guix, this should wait until 1.1.0 is branched off to avoid
having to update translations.

This reverts commit 9f1b787120b1b81abffaf0fa13fdbdf4cca39f2d.
-rw-r--r--guix/status.scm10
1 files changed, 5 insertions, 5 deletions
diff --git a/guix/status.scm b/guix/status.scm
index 45e441eac5..4b2edc2f3c 100644
--- a/guix/status.scm
+++ b/guix/status.scm
@@ -472,16 +472,16 @@ addition to build events."
            (let ((count (match (assq-ref properties 'graft)
                           (#f  0)
                           (lst (or (assq-ref lst 'count) 0)))))
-             (format port (info (N_ "applying ~a graft for ~a ..."
-                                    "applying ~a grafts for ~a ..."
+             (format port (info (N_ "applying ~a graft for ~a..."
+                                    "applying ~a grafts for ~a..."
                                     count))
                      count drv)))
          ('profile
           (let ((count (match (assq-ref properties 'profile)
                          (#f  0)
                          (lst (or (assq-ref lst 'count) 0)))))
-            (format port (info (N_ "building profile with ~a package ..."
-                                   "building profile with ~a packages ..."
+            (format port (info (N_ "building profile with ~a package..."
+                                   "building profile with ~a packages..."
                                    count))
                     count)))
          ('profile-hook
@@ -525,7 +525,7 @@ addition to build events."
        (newline port)))
     (('download-started item uri _ ...)
      (erase-current-line*)
-     (format port (info (G_ "downloading from ~a ...")) uri)
+     (format port (info (G_ "downloading from ~a...")) uri)
      (newline port))
     (('download-progress item uri
                          (= string->number size)