lisp/ns-carbon-compat.el

   1 ;;; ns-carbon-compat.el ---
   2 ;;;     Carbon compatibility layer for Mac users of NS (Cocoa) GUI.
   3 ;;; Copyright (C) 2008 Free Software Foundation, Inc.
   4
   5 ;;; Author: Adrian Robert
   6 ;;; Keywords: Carbon, MacOSX
   7
   8 ;;; This file is part of GNU Emacs.
   9 ;;;
  10 ;;; GNU Emacs is free software; you can redistribute it and/or modify
  11 ;;; it under the terms of the GNU General Public License as published by
  12 ;;; the Free Software Foundation; either version 2, or (at your option)
  13 ;;; any later version.
  14 ;;;
  15 ;;; GNU Emacs is distributed in the hope that it will be useful,
  16 ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  17 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18 ;;; GNU General Public License for more details.
  19 ;;;
  20 ;;; You should have received a copy of the GNU General Public License
  21 ;;; along with GNU Emacs; see the file COPYING.  If not, write to
  22 ;;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  23
  24 ;;; Commentary:
  25
  26 ;; ns-carbon-compat.el:  this file is loaded from termp/ns-win.el when
  27 ;; run on a Mac OS X system.  It sets up a number of aliases and other
  28 ;; layers to enable human and machine users (Mac distributions of GNU Emacs)
  29 ;; to pretend they are using the Choi/Mitsuharu Carbon port.
  30
  31 ;;; Code:
  32
  33 (defvaralias 'mac-allow-anti-aliasing 'ns-antialias-text)
  34 (defvaralias 'mac-command-modifier 'ns-command-modifier)
  35 (defvaralias 'mac-control-modifier 'ns-control-modifier)
  36 (defvaralias 'mac-option-modifier 'ns-option-modifier)
  37 (defvaralias 'mac-function-modifier 'ns-function-modifier)