Bash-completion is written with FHS in mind where completion scripts
all get added to /usr/share/bash-completion/completions and are picked
up by the dynamic completion loader from there---whether they are
part of bash-completion or installed by another package.

On Guix systems, we want not only to search within bash-completion's own
directory, but also in the user's profile and in the system profile.
This is what this patch does.


--- a/bash_completion
+++ b/bash_completion
@@ -2016,7 +2016,13 @@ complete -F _minimal ''
 
 __load_completion()
 {
-    local -a dirs=( ${BASH_COMPLETION_USER_DIR:-${XDG_DATA_HOME:-$HOME/.local/share}/bash-completion}/completions )
+    local -a dirs=(
+        "$HOME/.guix-profile/share/bash-completion/completions/$base"
+        "$HOME/.guix-profile/etc/bash_completion.d/$base"
+        "/run/current-system/profile/share/bash-completion/completions/$base"
+        "/run/current-system/profile/etc/bash_completion.d/$base"
+        ${BASH_COMPLETION_USER_DIR:-${XDG_DATA_HOME:-$HOME/.local/share}/bash-completion}/completions )
+
     local OIFS=$IFS IFS=: dir cmd="${1##*/}" compfile
     for dir in ${XDG_DATA_DIRS:-/usr/local/share:/usr/share}; do
         dirs+=( $dir/bash-completion/completions )
><a href='/guix/tree/gnu/installer/newt/substitutes.scm?id=f219f33bf81e98e6d6fb64e722fab7136aa65b82'>tree</a><a href='/guix/commit/gnu/installer/newt/substitutes.scm?id=f219f33bf81e98e6d6fb64e722fab7136aa65b82'>commit</a><a href='/guix/diff/gnu/installer/newt/substitutes.scm?id=f219f33bf81e98e6d6fb64e722fab7136aa65b82'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/installer/newt/substitutes.scm'>
<input type='hidden' name='id' value='f219f33bf81e98e6d6fb64e722fab7136aa65b82'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=f219f33bf81e98e6d6fb64e722fab7136aa65b82'>root</a>/<a href='/guix/log/gnu?id=f219f33bf81e98e6d6fb64e722fab7136aa65b82'>gnu</a>/<a href='/guix/log/gnu/installer?id=f219f33bf81e98e6d6fb64e722fab7136aa65b82'>installer</a>/<a href='/guix/log/gnu/installer/newt?id=f219f33bf81e98e6d6fb64e722fab7136aa65b82'>newt</a>/<a href='/guix/log/gnu/installer/newt/substitutes.scm?id=f219f33bf81e98e6d6fb64e722fab7136aa65b82'>substitutes.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/installer/newt/substitutes.scm?id=f219f33bf81e98e6d6fb64e722fab7136aa65b82&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2022-10-17 07:29:09 +0200'>2022-10-17</span></td><td><a href='/guix/commit/gnu/installer/newt/substitutes.scm?id=82b0f3755d12e04578a54ee53b3a8051958e8143'>guix: Fix typos.</a><span class='msg-avail'>...<span class='msg-tooltip'>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.
</span></span></td><td>Julien Lepiller</td></tr>