+nb_repos_status

diff --git a/etc/profile.d/nb.sh b/etc/profile.d/nb.sh
index 3067eeb6d469070241c9b7029167a11c36bef7b8..3dbedd271537a61acd7f0e33e25cc8382946a726 100644 (file)
--- a/etc/profile.d/nb.sh
+++ b/etc/profile.d/nb.sh
@@ -1,10 +1,26 @@
+nb_repos_status() {
+  shell_help "List repos git status" "$@" && return
+  local status
+  for i in $(nb-repo-dirs); do
+    cd "$i" || continue
+
+    status=$(git status -s "$i"|sed 's/^/ /')
+    [ -z "$status" ] || status=$'\n'"$status"
+
+    printf ">%s%s\n" "$i" "$status"
+  done
+}
+
 nb_auth() {
   curl -ku nico https://nico.nbdom.net/private/auth/
 }
 
 nb_mails() {
   printf '| 1-$ cat\nx\n' | mail | perl -MDate::Manip -MEncode -ne '
-BEGIN { $SIG{__WARN__} = sub{ } }
+BEGIN {
+  $SIG{__WARN__} = sub{ };
+  "'"$LANG $LC_ALL $LC_CTYPE"'" =~ /yes/ and binmode STDOUT, ":utf8"; 
+}
 $. == 2 and print;
 /^From / .. /^$/ or next;
 chomp;
@@ -13,15 +29,15 @@ if ($_ eq "") {
   $h{Date} = &UnixDate($h{Date},"%Y-%m-%d %H:%M");
   $h{Subject} = decode("MIME-Header",$h{Subject});
   push(@m,[
-    $h{From},
     $h{Date},
+    $h{From},
     $h{Subject},
   ]);
   %h = ();
   next;
 }
 /^(Date|Subject|From): (.*)$/ and $h{$1} = $2;
-END { print map {sprintf "%20.20s | %16.16s | %s\n",@$_;} sort {$b->[1] cmp $a->[1]} @m }
+END { print map {sprintf "%s | %s | %s\n",@$_;} sort {$b->[1] cmp $a->[1]} @m }
 '
 #/var/spool/mail/$USER
   #printf 'f *\nx\n' | mail |  perl -e '@_=<>; shift @_; print shift @_; print reverse @_'