gnuservを自動で再起動させる方法

俺はEmacs23になってもいまだにgnuserv/gnuclientを使っている。しかし、なにかのひょうしでgnuservが落ちて「Gnuserv process exited; restart with `M-x gnuserv-start'」と出てきてしまい、落ちたままになっている。そうなると、gnuclientが動かなくなり、とても困ってしまう。
メッセージを表示している関数がgnuserv-sentinelだと判明し、読んでみたところ、「以前は落ちたら自動的に再起動していたが、下手すると無限ループする可能性がある」と書いてあった。
かといって、落ちたまま放置しているといろいろ困るので、せめて「gnuservが落ちているなら立ち上げる」関数を1分毎に動かすことにした。

(defun gnuserv-start-maybe ()
  (interactive)
  (or gnuserv-process (gnuserv-start)))
(run-with-timer 0 60 'gnuserv-start-maybe)