build: Use $HOME/ path for errs12.

[nethome.git] / bin / m

diff --git a/bin/m b/bin/m
index 6b017e5..459572c 100755 (executable)
--- a/bin/m
+++ b/bin/m
@@ -1,8 +1,11 @@
 #! /bin/sh
+LINES=$[`stty size|cut -d ' ' -f 1`]
+FETCHMAILHOME=$HOME/priv/${USER}mail
 case $# in
-  0) ls -ltL ~/Mail #|less
+  0) ls -ltL ~/Mail|head -n $[$LINES-2]
      ;;
-  1) exec mutt -f ="$1"
+  1) mutt -f ="$1"
+     test "$1" = "=" -a -d $FETCHMAILHOME && echo cleaning && (FETCHMAILHOME=$FETCHMAILHOME fetchmail >/dev/null &)
      ;;
   *) echo "Error parameters"
      ;;