emu.el

   1 ;;;
   2 ;;; emu: Emulation module for each Emacs variants
   3 ;;;
   4 ;;; $Id: emu.el,v 2.0 1995/09/08 17:47:33 morioka Exp $
   5 ;;;
   6
   7 (cond ((boundp 'MULE)  (require 'emu-mule))
   8       ((boundp 'NEMACS)(require 'emu-nemacs))
   9       (t               (require 'emu-orig))
  10       )
  11
  12 (if (string-match "XEmacs\\|Lucid" emacs-version)
  13     (require 'emu-xemacs)
  14   )
  15
  16
  17 ;;; @ Emacs 19.29 emulation
  18 ;;;
  19
  20 (if (not (fboundp 'buffer-substring-no-properties))
  21     (defalias 'buffer-substring-no-properties 'buffer-substring)
  22   )
  23
  24
  25 ;;; @ end
  26 ;;;
  27
  28 (provide 'emu)