Replace org-mode-p with usual (eq major-mode 'org-mode) check
[org-mode.git] / lisp / org-docbook.el
index f09740f..13cb039 100644 (file)
@@ -293,7 +293,7 @@ then use this command to convert it."
   (interactive "r")
   (let (reg docbook buf)
     (save-window-excursion
-      (if (org-mode-p)
+      (if (eq major-mode 'org-mode)
          (setq docbook (org-export-region-as-docbook
                         beg end t 'string))
        (setq reg (buffer-substring beg end)