 
 ;; Commented out
 ;;
-(if nil (progn 
+(if nil (progn
   (autoload 'sgml-mode "psgml" "Major mode to edit SGML files." t)
   (autoload 'xml-mode "psgml" "Major mode to edit XML files." t)
 
   ;; Things to set once, for all files.
   ;;
-  (eval-after-load "psgml" 
+  (eval-after-load "psgml"
     '(lambda()
        (setq sgml-set-face t
              sgml-ignore-undefined-elements t

         '(highlight ((t (:background "Gray"))))
         '(underline ((t (:underline "purple4"))))
         ;; Faces that inherit from others.
         '(font-lock-doc-face 
           ((t (:inherit font-lock-comment-face :background "azure"))))
         '(bold-italic ((t (:inherit (bold italic)))))
         '(woman-bold-face ((t (:inherit bold :foreground "blue"))))
         '(woman-italic-face 
           ((t (:inherit italic :foreground "Purple4" :underline t))))
         )
        (if is-version-twentytwo
            (progn
              (jpw-custom-set-faces-nonsaved
               '(mode-line ((t (:background "grey75" 
                                :foreground "black" 
                                :box (:line-width -1 
                                      :style released-button)))) t)
               '(mode-line-inactive ((t (:inherit mode-line 
                                         :background "grey90" 
                                         :foreground "grey35" 
                                         :box (:line-width -1 
                                               :style released-button) 
                                         :weight light))))
               )
              )

;; Core Emacs Setup File
;;
;;  Copyright  1995-2008 John P. Weiss
;;
;;  This package is free software; you can redistribute it and/or modify
;;  it under the terms of the Artistic License, included as the file
;;  "LICENSE" in the source code archive.
