(load (concat "set-" (cond
                      ((eq window-system 'x)   "x11")
                      ((eq window-system 'w32) "w32")
                      ((eq window-system 'mac) "aqua")
                      ((null window-system)    "console")) ))