 (defface factor-font-lock-help-mode-headlines '((t (:bold t :weight bold)))
   "Face for headlines in help buffers."
   :group 'factor-faces)
+
++
+;;; Compatibility
+(when (not (fboundp 'ring-member))
+  (defun ring-member (ring item)
+    (catch 'found
+      (dotimes (ind (ring-length ring) nil)
+        (when (equal item (ring-ref ring ind))
+          (throw 'found ind))))))
 
  

(factor--define-key ?s 'factor-see t)
(factor--define-key ?e 'factor-edit)
(factor--define-key ?z 'switch-to-factor t)
(factor--define-key ?c 'comment-region)

(factor--define-auto-indent-key ?\])

(require 'font-lock)
(require 'comint)
(require 'view)
(require 'ring)

;;; Customization:

