Mercurial > emacs
comparison lisp/gnus/format-spec.el @ 86891:8e8fed96cf27
(top-level): Don't require cl when compiling.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Sat, 01 Dec 2007 03:24:02 +0000 |
parents | a3c27999decb |
children | bb60c896c5d2 |
comparison
equal
deleted
inserted
replaced
86890:1a8f68353dd2 | 86891:8e8fed96cf27 |
---|---|
24 ;; Boston, MA 02110-1301, USA. | 24 ;; Boston, MA 02110-1301, USA. |
25 | 25 |
26 ;;; Commentary: | 26 ;;; Commentary: |
27 | 27 |
28 ;;; Code: | 28 ;;; Code: |
29 | |
30 (eval-when-compile (require 'cl)) | |
31 | 29 |
32 (defun format-spec (format specification) | 30 (defun format-spec (format specification) |
33 "Return a string based on FORMAT and SPECIFICATION. | 31 "Return a string based on FORMAT and SPECIFICATION. |
34 FORMAT is a string containing `format'-like specs like \"bash %u %k\", | 32 FORMAT is a string containing `format'-like specs like \"bash %u %k\", |
35 while SPECIFICATION is an alist mapping from format spec characters | 33 while SPECIFICATION is an alist mapping from format spec characters |