[Savannah-cvs] [746] make code snippets easier to use

[iank]

Revision: 746
          
http://svn.savannah.gnu.org/viewvc/?view=rev&root=administration&revision=746
Author:   iank
Date:     2024-01-10 19:57:25 -0500 (Wed, 10 Jan 2024)
Log Message:
-----------
make code snippets easier to use

Modified Paths:
--------------
    trunk/sviki/fsf/tickets/lists/remove-me-from-all-lists.mdwn
    trunk/sviki/fsf/tools/rsync.mdwn

Modified: trunk/sviki/fsf/tickets/lists/remove-me-from-all-lists.mdwn
===================================================================
--- trunk/sviki/fsf/tickets/lists/remove-me-from-all-lists.mdwn 2024-01-11 
00:57:20 UTC (rev 745)
+++ trunk/sviki/fsf/tickets/lists/remove-me-from-all-lists.mdwn 2024-01-11 
00:57:25 UTC (rev 746)
@@ -16,11 +16,20 @@
 Checking what lists some email addresses are subscribed to:
 
 ```
-declare -A ba
-ba[a@example.com]=t
-ba[a2@example.com]=t
-cd /home/list/mailman/bin
-time for list in $(./list_lists -b); do for m in $(./list_members $list); do 
if [[ ${ba[$m]} ]]; then echo $list $m; fi; done; done
+# usage: EMAIL...
+get-subs() {
+  local email
+  local -A ba
+  for email; do
+    ba[$email]=t
+  done
+  cd /home/list/mailman/bin
+  time for list in $(./list_lists -b); do
+    for m in $(./list_members $list); do
+    if [[ ${ba[$m]} ]]; then echo $list $m; fi
+    done
+  done
+}
 ```
 
 For example, removing 2 addresses from all @gnu.org lists.

Modified: trunk/sviki/fsf/tools/rsync.mdwn
===================================================================
--- trunk/sviki/fsf/tools/rsync.mdwn    2024-01-11 00:57:20 UTC (rev 745)
+++ trunk/sviki/fsf/tools/rsync.mdwn    2024-01-11 00:57:25 UTC (rev 746)
@@ -75,11 +75,14 @@
 ```
 mnt=/mnt/monolith
 m() { df -BM $mnt | tail -n1 | awk '{print $3}'| sed 's/[^0-9]//g'; }
-old=$(m)
-while true; do
-  sleep 600
-  new=$(m)
-  printf "%s %'d MB/min in last 10 minutes\n" "$(date)" $(( (new - old) / 10))
-  old=$new
-done
+size-watch() {
+  old=$(m)
+  while true; do
+    sleep 600
+    new=$(m)
+    printf "%s %'d MB/min in last 10 minutes\n" "$(date)" $(( (new - old) / 
10))
+    old=$new
+  done
+}
+size-watch
 ```