From ab53c9eeb511a944145391851b5499f5f294c65f Mon Sep 17 00:00:00 2001 From: morioka Date: Tue, 16 Mar 1999 12:57:36 +0000 Subject: [PATCH] rearrangement (particularly to eliminate RCS keyword). --- pcustom.el | 7 +++---- tinycustom.el | 10 ++++++---- 2 files changed, 9 insertions(+), 8 deletions(-) diff --git a/pcustom.el b/pcustom.el index 51418f0..c687061 100644 --- a/pcustom.el +++ b/pcustom.el @@ -1,13 +1,12 @@ ;;; pcustom.el -- a portable custom.el. + ;; Copyright (C) 1999 Mikio Nakajima ;; Author: Mikio Nakajima ;; Maintainer: Mikio Nakajima -;; Version: $Id: pcustom.el,v 1.1 1999-03-16 11:51:29 morioka Exp $ ;; Keywords: emulating, custom -;; Last Modified: $Date: 1999-03-16 11:51:29 $ -;; This file is not part of APEL (A Portable Emacs Library) yet. +;; This file is part of APEL (A Portable Emacs Library). ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the GNU General Public License as @@ -24,7 +23,6 @@ ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, ;; Boston, MA 02111-1307, USA. -;;; Commentary: ;;; Code: (condition-case nil @@ -32,4 +30,5 @@ (error (require 'tinycustom)) ) (provide 'pcustom) + ;; end of pcustom.el diff --git a/tinycustom.el b/tinycustom.el index 47789ad..a912103 100644 --- a/tinycustom.el +++ b/tinycustom.el @@ -1,13 +1,12 @@ ;; tinycustom.el -- a tiny custom.el for emulating purpose. + ;; Copyright (C) 1999 Mikio Nakajima ;; Author: Mikio Nakajima ;; Maintainer: Mikio Nakajima -;; Version: $Id: tinycustom.el,v 1.1 1999-03-16 11:51:30 morioka Exp $ ;; Keywords: emulating, custom -;; Last Modified: $Date: 1999-03-16 11:51:30 $ -;; This file is not part of APEL (A Portable Emacs Library) yet. +;; This file is part of APEL (A Portable Emacs Library). ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the GNU General Public License as @@ -25,12 +24,14 @@ ;; Boston, MA 02111-1307, USA. ;;; Commentary: -;; Purpose of this program is emulating for who does not have + +;; Purpose of this program is emulating for who does not have ;; `custom.el'. ;; DEFCUSTOM below has the same effect as the original DEFVAR has. ;; DEFGROUP and DEFFACE below are just nop macro. ;;; Code: + (require 'poe) (defmacro-maybe defgroup (symbol members doc &rest args) @@ -58,4 +59,5 @@ This is a nop defface only for emulating purpose." (provide 'tinycustom) (provide 'custom) + ;; end of tinycustom.el -- 1.7.10.4