[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[STUMP] Re: contrib/mem.lisp
From: |
Vitaly Mayatskikh |
Subject: |
[STUMP] Re: contrib/mem.lisp |
Date: |
Fri, 30 Jan 2009 16:25:50 +0100 |
User-agent: |
Wanderlust/2.15.6 (Almost Unreal) Emacs/22.2 Mule/5.0 (SAKAKI) |
At Thu, 29 Jan 2009 16:05:40 +0100, Vitaly Mayatskikh wrote:
> (defun fmt-mem-usage-bar (ml &optional (width *mem-usage-bar-width*) (full
> *mem-usage-bar-full*) (empty *mem-usage-bar-empty*))
> "Returns a coloured bar-graph representing the current allocation of
> memory."
> (declare (ignore ml))
> (let ((cpu (truncate (* 100 (nth 2 (mem-usage))))))
> (bar cpu width full empty)))
My bad, here should be stumpwm::bar.
mem.lisp
Description: Binary data
--
wbr, Vitaly