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 |