From: shuhei-k <shuhei-k>
Date: Sun, 30 Aug 1998 16:53:04 +0000 (+0000)
Subject: (gnus-tilde-pad-form): New function.
X-Git-Tag: shuhei-k-199811302358~5
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=64ec2b4078fe1124066f0e83cee441dfe7806760;p=elisp%2Fgnus.git-

(gnus-tilde-pad-form): New function.
---

diff --git a/lisp/gnus-spec.el b/lisp/gnus-spec.el
index 0e52f33..1294f6a 100644
--- a/lisp/gnus-spec.el
+++ b/lisp/gnus-spec.el
@@ -282,6 +282,11 @@
        (if (equal val ,ignore-value)
 	   "" val))))
 
+;;; dummy function. XEmacs will redefine this.
+(defun gnus-tilde-pad-form (el pad-width)
+  "Return a form that pads EL to PAD-WIDTH."
+  )
+
 (defun gnus-parse-format (format spec-alist &optional insert)
   ;; This function parses the FORMAT string with the help of the
   ;; SPEC-ALIST and returns a list that can be eval'ed to return the