Replace org-mode-p with usual (eq major-mode 'org-mode) check
[org-mode.git] / lisp / org-html.el
index a2a9426..05c3801 100644 (file)
@@ -713,7 +713,7 @@ command to convert it."
   (interactive "r")
   (let (reg html buf pop-up-frames)
     (save-window-excursion
-      (if (org-mode-p)
+      (if (eq major-mode 'org-mode)
          (setq html (org-export-region-as-html
                      beg end t 'string))
        (setq reg (buffer-substring beg end)