X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/d408351780bbec58d3ed672fca9b0537a47a5318..f10533854f4c7bb54247a11981191bf37b70cb36:/packages/tramp-theme/tramp-theme.el

diff --git a/packages/tramp-theme/tramp-theme.el b/packages/tramp-theme/tramp-theme.el
index 4b58e4a34..2bf9e9b69 100644
--- a/packages/tramp-theme/tramp-theme.el
+++ b/packages/tramp-theme/tramp-theme.el
@@ -69,7 +69,7 @@ changes the background color to \"Green\" for frames connected to
 the remote host \"bar\", and it inverses the fringe face for
 frames using the remote user \"root\":
 
-   '((nil \"^root$\" (fringe (:inherit fringe :inverse-video t)))
+    ((nil \"^root$\" (fringe (:inherit fringe :inverse-video t)))
      (\"^foo$\" nil (default (:background \"Red\")))
      (\"^bar$\" nil (default (:background \"Green\"))))
 
@@ -151,6 +151,12 @@ Used in different hooks, in order to accelerate the redisplay."
       'tramp-theme-hook-function
       (delete 'tramp-theme-hook-function eshell-directory-change-hook)))))
 
+;;;###autoload
+(when load-file-name
+  (add-to-list
+   'custom-theme-load-path
+   (file-name-as-directory (file-name-directory load-file-name))))
+
 (provide-theme 'tramp)
 
 ;;; TODO:
@@ -159,8 +165,4 @@ Used in different hooks, in order to accelerate the redisplay."
 ;;   to edit the faces.  Maybe use (widget-get custom-face-edit :args)
 ;;   for this.
 
-;; Local Variables:
-;; no-byte-compile: t
-;; End:
-
 ;;; tramp-theme.el ends here