[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/dframe.el,v
From: |
Dan Nicolaescu |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/dframe.el,v |
Date: |
Tue, 25 Dec 2007 19:21:44 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Dan Nicolaescu <dann> 07/12/25 19:21:40
Index: dframe.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/dframe.el,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -b -r1.14 -r1.15
--- dframe.el 27 Aug 2007 04:00:08 -0000 1.14
+++ dframe.el 25 Dec 2007 19:21:38 -0000 1.15
@@ -115,35 +115,6 @@
;;; Code:
-;; From custom web page for compatibility between versions of custom
-;; with help from address@hidden (Proto Type)
-(eval-and-compile
- (condition-case ()
- (require 'custom)
- (error nil))
- (if (and (featurep 'custom) (fboundp 'custom-declare-variable)
- ;; Some XEmacsen w/ custom don't have :set keyword.
- ;; This protects them against custom.
- (fboundp 'custom-initialize-set))
- nil ;; We've got what we needed
- ;; We have the old custom-library, hack around it!
- (if (boundp 'defgroup)
- nil
- (defmacro defgroup (&rest args)
- nil))
- (if (boundp 'defface)
- nil
- (defmacro defface (var values doc &rest args)
- ;; To make colors for your faces you need to set your .Xdefaults
- ;; or set them up ahead of time in your .emacs file.
- `(make-face ,var)
- ))
- (if (boundp 'defcustom)
- nil
- (defmacro defcustom (var value doc &rest args)
- `(defvar ,var ,value ,doc)))))
-
-
;;; Compatibility functions
;;
(defalias 'dframe-frame-parameter
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/dframe.el,v,
Dan Nicolaescu <=