diff options
| author | Kenichi Handa <handa@m17n.org> | 1998-11-06 10:59:09 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 1998-11-06 10:59:09 +0000 |
| commit | 86e411c97ce184fa554fa1e3dc70bbc0c62ac50b (patch) | |
| tree | 2e75418c41baf0fa7fef6ed324603f22bff5ad40 /lisp/international/fontset.el | |
| parent | bb63e573a85226d50608af72fa30757d98e7e855 (diff) | |
| download | emacs-86e411c97ce184fa554fa1e3dc70bbc0c62ac50b.tar.gz | |
(create-fontset-from-fontset-spec): Give correct arg to `error'.
Diffstat (limited to 'lisp/international/fontset.el')
| -rw-r--r-- | lisp/international/fontset.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/international/fontset.el b/lisp/international/fontset.el index 1d53cad219b..697ad1508cb 100644 --- a/lisp/international/fontset.el +++ b/lisp/international/fontset.el @@ -473,7 +473,7 @@ It returns a name of the created fontset." fontlist full-fontlist ascii-font resolved-ascii-font charset) (if (query-fontset name) (or noerror - (error "Fontset \"%s\" already exists")) + (error "Fontset \"%s\" already exists" name)) ;; At first, extract pairs of charset and fontname from FONTSET-SPEC. (while (string-match "[, \t\n]*\\([^:]+\\):\\([^,]+\\)" fontset-spec idx) (setq idx (match-end 0)) |