每个emacs框架有不同的自定义主题(不是颜色主题)？

我试图让Emacs(v24.3.1)在创建的框架中加载新的自定义主题.也就是说,我的初始帧中有我的默认主题,所有后续帧都应该有一个单独的主题(允许我轻松识别初始帧).

这是我到目前为止:

;make new frames use a different custom theme
(defun apply-custom-theme (frame)
  "Apply custom theme to a frame based on whether its a 'real'
   window or a console window."
  (select-frame frame)
  (if (window-system frame)
      (load-theme 'light-blue t)
    (load-theme 'tango-black t)))
(add-hook 'after-make-frame-functions 'apply-custom-theme)

这有效,除了加载的主题影响所有帧,包括初始帧.[我知道即使没有我的钩子,一个帧中的'load-theme'也会影响所有帧.]

我知道我可以用旧的颜色主题设施来实现这个目标......我很想知道是否也可以使用Emacs 24x自定义主题(这样可以轻松创建和自定义新主题等) .