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