guix: Fix typos.

These typos were found and reported through weblate.

* gnu/packages/audio.scm (wildmidi)[description]: Fix typo.
* gnu/packages/games.scm (cgoban)[description]: Fix typo.
* gnu/services/version-control.scm (gitolite-service-type)[description]:
  Fix typo.
* gnu/installer/newt/substitutes.scm (run-substitutes-page): Remove full
  stop at end of title.
* gnu/machine/ssh.scm (machine-ssh-configuration-system): Move
  punctuation outside of quotes.
* guix/scripts/home.scm (process-action): Remove trailing space before
  newline.
* guix/scripts/system.scm (show-help): Fix typo.
* guix/scripts/environment.scm (with-store/maybe): Fix typo.
This commit is contained in:
Julien Lepiller 2022-10-16 12:26:54 +02:00
parent 46b0143714
commit 82b0f3755d
No known key found for this signature in database
GPG key ID: 53D457B2D636EE82
8 changed files with 10 additions and 9 deletions

View file

@ -28,7 +28,7 @@ (define* (run-substitutes-page)
(match (current-clients)
(()
(case (choice-window
(G_ "Substitute server discovery.")
(G_ "Substitute server discovery")
(G_ "Enable") (G_ "Disable")
(G_ " By turning this option on, you allow Guix to fetch \
substitutes (pre-built binaries) during installation from servers \

View file

@ -466,7 +466,7 @@ (define system (machine-ssh-configuration-system config))
(machine-configuration machine))
(unless (file-exists? %public-key-file)
(raise (formatted-message (G_ "no signing key '~a'. \
have you run 'guix archive --generate-key?'")
Have you run 'guix archive --generate-key'?")
%public-key-file)))
(remote-authorize-signing-key (call-with-input-file %public-key-file
(lambda (port)

View file

@ -236,7 +236,7 @@ (define-public wildmidi
("openal" ,openal)))
(synopsis "Software Synthesizer")
(description "WildMIDI is a simple software midi player which has a core
softsynth library that can be use with other applications.")
softsynth library that can be used with other applications.")
(home-page "https://www.mindwerks.net/projects/wildmidi/")
(license
(list

View file

@ -10814,7 +10814,8 @@ (define-public cgoban
(description "Provides a large set of Go-related services for X11:
@itemize
@item Local games with precise implementation of the Chinese and Japanese rulesets
@item Edition and visualization of SGF files-Connection to the NNGS or IGS Go servers
@item Edition and visualization of SGF files
@item Connection to the NNGS or IGS Go servers
@item Bridge to Go modem protocol, allowing to play against Go modem-capable AIs
such as GnuGo.
@end itemize")

View file

@ -405,7 +405,7 @@ (define gitolite-service-type
(list
(gitolite-configuration-package config))))))
(description
"Setup @command{gitolite}, a Git hosting tool providing access over SSH..
"Set up @command{gitolite}, a Git hosting tool providing access over SSH.
By default, the @code{git} user is used, but this is configurable.
Additionally, Gitolite can integrate with with tools like gitweb or cgit to
provide a web interface to view selected repositories.")))

View file

@ -1016,9 +1016,9 @@ (define-syntax-rule (with-store/maybe store exp ...)
(when (and (not container?) user)
(leave (G_ "'--user' cannot be used without '--container'~%")))
(when (and (not container?) no-cwd?)
(leave (G_ "--no-cwd cannot be used without --container~%")))
(leave (G_ "--no-cwd cannot be used without '--container'~%")))
(when (and (not container?) emulate-fhs?)
(leave (G_ "'--emulate-fhs' cannot be used without '--container~'%")))
(leave (G_ "'--emulate-fhs' cannot be used without '--container~%'")))
(with-store/maybe store

View file

@ -476,7 +476,7 @@ (define (process-action action args opts)
(define (ensure-home-environment file-or-exp obj)
(ensure-profile-directory)
(unless (home-environment? obj)
(leave (G_ "'~a' does not return a home environment ~%")
(leave (G_ "'~a' does not return a home environment~%")
file-or-exp))
obj)

View file

@ -1046,7 +1046,7 @@ (define (show-help)
(newline)
(display (G_ "
--graph-backend=BACKEND
use BACKEND for 'extension-graphs' and 'shepherd-graph'"))
use BACKEND for 'extension-graph' and 'shepherd-graph'"))
(newline)
(display (G_ "
-I, --list-installed[=REGEXP]