Mercurial > emacs
comparison lisp/textmodes/artist.el @ 87384:20bb7aaa7b12
* calculator.el:
* dframe.el:
* iswitchb.el:
* whitespace.el:
* winner.el:
* emacs-lisp/checkdoc.el:
* mail/feedmail.el:
* net/quickurl.el:
* obsolete/fast-lock.el:
* play/5x5.el:
* progmodes/delphi.el:
* progmodes/idlw-shell.el:
* progmodes/idlwave.el:
* textmodes/artist.el:
* textmodes/ispell.el:
* textmodes/texinfmt.el:
* textmodes/texinfo.el: Remove obsolete definitions of backward
compatibility macros for defcustom, defgroup, defface, when,
unless, with-current-buffer and with-temp-message.
author | Dan Nicolaescu <dann@ics.uci.edu> |
---|---|
date | Tue, 25 Dec 2007 19:21:38 +0000 |
parents | e50a2e215441 |
children | 107ccd98fa12 56a72e2bd635 |
comparison
equal
deleted
inserted
replaced
87383:e8864ce8543f | 87384:20bb7aaa7b12 |
---|---|
198 | 198 |
199 (defconst artist-version "1.2.6") | 199 (defconst artist-version "1.2.6") |
200 (defconst artist-maintainer-address "tab@lysator.liu.se") | 200 (defconst artist-maintainer-address "tab@lysator.liu.se") |
201 | 201 |
202 (defvar x-pointer-crosshair) | 202 (defvar x-pointer-crosshair) |
203 | |
204 (eval-and-compile | |
205 (condition-case () | |
206 (require 'custom) | |
207 (error nil)) | |
208 (if (and (featurep 'custom) (fboundp 'custom-declare-variable)) | |
209 nil ;; We've got what we needed | |
210 ;; We have the old custom-library, hack around it! | |
211 (defmacro defgroup (&rest args) | |
212 nil) | |
213 (defmacro defface (var values doc &rest args) | |
214 `(make-face ,var)) | |
215 (defmacro defcustom (var value doc &rest args) | |
216 `(defvar ,var ,value ,doc)))) | |
217 | 203 |
218 ;; User options | 204 ;; User options |
219 ;; vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv | 205 ;; vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv |
220 | 206 |
221 (defgroup artist nil | 207 (defgroup artist nil |