[sawfish] user.jl: load extras.jl

[Christopher Bratusek <chrisb src gnome org>]

commit 402c5644959db09a19e39c5cb93fe99883c4d4e9
Author: chrisb <zanghar freenet de>
Date:   Sun Aug 30 21:30:33 2009 +0200

    user.jl: load extras.jl

 lisp/sawfish/wm/user.jl |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)
---
diff --git a/lisp/sawfish/wm/user.jl b/lisp/sawfish/wm/user.jl
index 7f50ef6..624c4a6 100644
--- a/lisp/sawfish/wm/user.jl
+++ b/lisp/sawfish/wm/user.jl
@@ -113,7 +113,9 @@
 		(when rest
 		  (if (rc-file-exists-p (car rest))
 		      (safe-load (car rest) t t t)
-		    (loop (cdr rest))))))))
+		    (loop (cdr rest)))))
+		    
+	      (load "sawfish/wm/extras" t))))
       (error
        (format (stderr-file) "error in local config--> %S\n" error-data))))