[sawfish] unused variable

[Christopher Bratusek <chrisb src gnome org>]

commit 496f2403645dcc0b1eda0c290f7adce18d78294f
Author: chrisb <zanghar freenet de>
Date:   Sat Jul 25 18:06:42 2009 +0200

    unused variable

 lisp/sawfish/wm/gnome/integration.jl |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)
---
diff --git a/lisp/sawfish/wm/gnome/integration.jl b/lisp/sawfish/wm/gnome/integration.jl
index 16a7511..cdda373 100644
--- a/lisp/sawfish/wm/gnome/integration.jl
+++ b/lisp/sawfish/wm/gnome/integration.jl
@@ -34,8 +34,8 @@
 
   ;; delete the `Restart' and `Quit' items from the root menu
   (let ((restart (rassoc '(restart) root-menu))
-	(quit (rassoc '(quit) root-menu))
-	(programs (rassoc 'apps-menu root-menu)))
+	(quit (rassoc '(quit) root-menu)))
+;;	(programs (rassoc 'apps-menu root-menu)))
     (when restart
       (setq root-menu (delq restart root-menu)))
     (when quit