From ef98a614f6d7afc81f81d31f4546c575e052cc5b Mon Sep 17 00:00:00 2001
From: Bastien Guerry <bzg@altern.org>
Date: Tue, 11 Jun 2013 03:17:27 +0200
Subject: [PATCH] org-compat.el: Fix indentation.

---
 lisp/org-compat.el | 54 +++++++++++++++++++++++-----------------------
 1 file changed, 27 insertions(+), 27 deletions(-)

diff --git a/lisp/org-compat.el b/lisp/org-compat.el
index 3ebe5847d..d10aeea78 100644
--- a/lisp/org-compat.el
+++ b/lisp/org-compat.el
@@ -125,28 +125,28 @@ Don't do the aliasing when `defvaralias' is not bound."
 	     (boundp 'user-init-directory))
     (org-defvaralias 'user-emacs-directory 'user-init-directory)))
 
-  (when (featurep 'xemacs)
-    (defadvice custom-handle-keyword
-      (around org-custom-handle-keyword
-	      activate preactivate)
-      "Remove custom keywords not recognized to avoid producing an error."
-      (cond
-       ((eq (ad-get-arg 1) :package-version))
-       (t ad-do-it)))
-    (defadvice define-obsolete-variable-alias
-      (around org-define-obsolete-variable-alias
-	      (obsolete-name current-name &optional when docstring)
-	      activate preactivate)
-      "Declare arguments defined in later versions of Emacs."
-      ad-do-it)
-    (defadvice define-obsolete-function-alias
-      (around org-define-obsolete-function-alias
-	      (obsolete-name current-name &optional when docstring)
-	      activate preactivate)
-      "Declare arguments defined in later versions of Emacs."
-      ad-do-it)
-    (defvar customize-package-emacs-version-alist nil)
-    (defvar temporary-file-directory (temp-directory)))
+(when (featurep 'xemacs)
+  (defadvice custom-handle-keyword
+    (around org-custom-handle-keyword
+	    activate preactivate)
+    "Remove custom keywords not recognized to avoid producing an error."
+    (cond
+     ((eq (ad-get-arg 1) :package-version))
+     (t ad-do-it)))
+  (defadvice define-obsolete-variable-alias
+    (around org-define-obsolete-variable-alias
+	    (obsolete-name current-name &optional when docstring)
+	    activate preactivate)
+    "Declare arguments defined in later versions of Emacs."
+    ad-do-it)
+  (defadvice define-obsolete-function-alias
+    (around org-define-obsolete-function-alias
+	    (obsolete-name current-name &optional when docstring)
+	    activate preactivate)
+    "Declare arguments defined in later versions of Emacs."
+    ad-do-it)
+  (defvar customize-package-emacs-version-alist nil)
+  (defvar temporary-file-directory (temp-directory)))
 
 ;; Keys
 (defconst org-xemacs-key-equivalents
@@ -413,11 +413,11 @@ TIME defaults to the current time."
   "Suppress popup windows.
 Let-bind some variables to nil around BODY to achieve the desired
 effect, which variables to use depends on the Emacs version."
-    (if (org-version-check "24.2.50" "" :predicate)
-	`(let (pop-up-frames display-buffer-alist)
-	   ,@body)
-      `(let (pop-up-frames special-display-buffer-names special-display-regexps special-display-function)
-	 ,@body)))
+  (if (org-version-check "24.2.50" "" :predicate)
+      `(let (pop-up-frames display-buffer-alist)
+	 ,@body)
+    `(let (pop-up-frames special-display-buffer-names special-display-regexps special-display-function)
+       ,@body)))
 
 (if (fboundp 'string-match-p)
     (defalias 'org-string-match-p 'string-match-p)