Préparation à elvish 0.17 (3)

lib/moi/completion/arc.elv

@@ -44,5 +44,5 @@ fn complete [@argv]{
   }
 }
 
-edit:completion:arg-completer[arc] = $complete~
+set edit:completion:arg-completer[arc] = $complete~
 

lib/moi/completion/archiver.elv

@@ -1,4 +1,4 @@
-options = [
+var options = [
   z
   l
   x
@@ -7,7 +7,7 @@ options = [
   h
 ]
 
-description = [
+var description = [
   &z='zst compression (default)'
   &l='lz4 compression'
   &x='xz compression'
@@ -26,5 +26,5 @@ fn complete [@argv]{
   edit:complete-getopt $argv [(-options)] [ $edit:complete-filename~ ...]
 }
 
-edit:completion:arg-completer[archiver] = $complete~
+set edit:completion:arg-completer[archiver] = $complete~
 

lib/moi/completion/desarchiver.elv

@@ -9,4 +9,4 @@ fn complete [@argv]{
   file:match-extensions &type=$type $m $@extensions
 }
 
-edit:completion:arg-completer[desarchiver] = $complete~
+set edit:completion:arg-completer[desarchiver] = $complete~

lib/moi/completion/kcp.elv

@@ -38,4 +38,4 @@ fn complete [@argv]{
   }
 }
 
-edit:completion:arg-completer[kcp] = $complete~
+set edit:completion:arg-completer[kcp] = $complete~

lib/moi/completion/mpv.elv

@@ -56,4 +56,4 @@ fn complete [@argv]{
   }
 }
 
-edit:completion:arg-completer[mpv] = $complete~
+set edit:completion:arg-completer[mpv] = $complete~

lib/moi/completion/pacman.elv

@@ -15,7 +15,7 @@ fn -repo-packages {
   peach [p]{
     str:split '/' $p
   } $packages | peach [e]{
-    spackages[$e] = $nil
+    set spackages[$e] = $nil
   }
   keys $spackages
   all $packages
@@ -102,4 +102,4 @@ fn complete [@argv]{
   }
 }
 
-edit:completion:arg-completer[pacman] = $complete~
+set edit:completion:arg-completer[pacman] = $complete~

lib/moi/completion/ssh.elv

@@ -65,17 +65,17 @@ fn -complete-args [hosts cmd @argv]{
   }
   var n h = $arg[..$i] $arg[(+ $i 1)..]
   if (eq $cmd scp) {
-    i = (str:index $h :)
+    set i = (str:index $h :)
     if (>= $i 0) {
       var d = $h[(+ $i 1)..]
-      h = $h[..$i]
+      set h = $h[..$i]
       if (list:includes $h $hosts) {
         var p = (-port $cmd @argv)
         var e = [ (str:split / $d) ]
         if (not-eq $e[-1] '') {
-          d = (str:join / $e[..-1])
+          set d = (str:join / $e[..-1])
           if (eq $d '') {
-            d = /
+            set d = /
           }
         }
         -complete-remote-dir $p $n@$h $d
@@ -102,5 +102,5 @@ fn complete [@argv]{
   }
 }
 
-edit:completion:arg-completer[scp] = $complete~
-edit:completion:arg-completer[ssh] = $complete~
+set edit:completion:arg-completer[scp] = $complete~
+set edit:completion:arg-completer[ssh] = $complete~

lib/moi/completion/sudo.elv

@@ -6,5 +6,5 @@ fn complete [@argv]{
   }
 }
 
-edit:completion:arg-completer[sudo] = $edit:complete-sudo~
+set edit:completion:arg-completer[sudo] = $edit:complete-sudo~
 #edit:completion:arg-completer[sudo] = $-complete~

lib/moi/completion/use.elv

@@ -12,7 +12,7 @@ var builtin_modules = [
   unix
 ]
 
-edit:completion:arg-completer[use] = [@argv]{
+set edit:completion:arg-completer[use] = [@argv]{
   use str
   use path
   all $builtin_modules