Mercurial > emacs
comparison lisp/term/w32-win.el @ 90645:7eeafaaa9eab
Merge from emacs--devo--0
Patches applied:
* emacs--devo--0 (patch 476-489)
- Update from CVS
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 153-160)
- Merge from emacs--devo--0
- Update from CVS
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-127
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Mon, 30 Oct 2006 08:54:41 +0000 |
| parents | a8190f7e546e aedc3ce99a17 |
| children | 6588c6259dfb |
comparison
equal
deleted
inserted
replaced
| 90644:9b62e05dedf6 | 90645:7eeafaaa9eab |
|---|---|
| 206 (if left (list left)) | 206 (if left (list left)) |
| 207 (if top (list top))))) | 207 (if top (list top))))) |
| 208 (setq x-invocation-args (cdr x-invocation-args)))) | 208 (setq x-invocation-args (cdr x-invocation-args)))) |
| 209 | 209 |
| 210 (defun x-handle-name-switch (switch) | 210 (defun x-handle-name-switch (switch) |
| 211 "Handle a \"-name\" SWITCH." | 211 "Handle the \"-name\" SWITCH." |
| 212 ;; Handle the -name option. Set the variable x-resource-name | 212 ;; Handle the -name option. Set the variable x-resource-name |
| 213 ;; to the option's operand; set the name of the initial frame, too. | 213 ;; to the option's operand; set the name of the initial frame, too. |
| 214 (or (consp x-invocation-args) | 214 (or (consp x-invocation-args) |
| 215 (error "%s: missing argument to `%s' option" (invocation-name) switch)) | 215 (error "%s: missing argument to `%s' option" (invocation-name) switch)) |
| 216 (setq x-resource-name (pop x-invocation-args)) | 216 (setq x-resource-name (pop x-invocation-args)) |
| 1089 "String of fontset spec of the standard fontset. | 1089 "String of fontset spec of the standard fontset. |
| 1090 This defines a fontset consisting of the Courier New variations for | 1090 This defines a fontset consisting of the Courier New variations for |
| 1091 European languages which are distributed with Windows as | 1091 European languages which are distributed with Windows as |
| 1092 \"Multilanguage Support\". | 1092 \"Multilanguage Support\". |
| 1093 | 1093 |
| 1094 See the documentation of `create-fontset-from-fontset-spec for the format.") | 1094 See the documentation of `create-fontset-from-fontset-spec' for the format.") |
| 1095 | 1095 |
| 1096 ;; Conditional on new-fontset so bootstrapping works on non-GUI compiles | 1096 ;; Conditional on new-fontset so bootstrapping works on non-GUI compiles |
| 1097 (if (fboundp 'new-fontset) | 1097 (if (fboundp 'new-fontset) |
| 1098 (progn | 1098 (progn |
| 1099 ;; Setup the default fontset. | 1099 ;; Setup the default fontset. |