diff options
| author | Glenn Morris <rgm@stanford.edu> | 2017-12-12 00:00:33 -0800 |
|---|---|---|
| committer | Glenn Morris <rgm@stanford.edu> | 2017-12-12 00:00:33 -0800 |
| commit | 8c5be9cbaabc02f7c78f2bafb68e2e4ab35e130f (patch) | |
| tree | 1fe185c91790c07567f20bd0e6fd53dae00f5eae /lisp/term/w32-win.el | |
| parent | b585a2040148fb5d7f21ba8e51c731c594c64ef2 (diff) | |
| download | emacs-8c5be9cbaabc02f7c78f2bafb68e2e4ab35e130f.tar.gz | |
Make functions invocation-directory and invocation-name obsolete
* lisp/subr.el (invocation-directory, invocation-name):
Mark the function versions as obsolete. (Bug#10476)
* lisp/startup.el (tty-handle-args):
* lisp/term/common-win.el (x-handle-xrm-switch, x-handle-name-switch):
* lisp/term/ns-win.el (top-level):
* lisp/term/pc-win.el (top-level):
* lisp/term/w32-win.el (window-system-initialization):
* lisp/term/x-win.el (top-level, x-handle-parent-id)
(x-handle-smid, window-system-initialization):
* test/lisp/htmlfontify-tests.el (htmlfontify-bug25468):
Use invocation-directory and invocation-name as variables.
Diffstat (limited to 'lisp/term/w32-win.el')
| -rw-r--r-- | lisp/term/w32-win.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el index 1db90aec984..737bf7fb5df 100644 --- a/lisp/term/w32-win.el +++ b/lisp/term/w32-win.el @@ -66,7 +66,7 @@ ;; ../startup.el. ;; (if (not (eq window-system 'w32)) -;; (error "%s: Loading w32-win.el but not compiled for w32" (invocation-name))) +;; (error "%s: Loading w32-win.el but not compiled for w32" invocation-name)) (eval-when-compile (require 'cl-lib)) (require 'frame) @@ -310,7 +310,7 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.") (setq x-resource-name ;; Change any . or * characters in x-resource-name to hyphens, ;; so as not to choke when we use it in X resource queries. - (replace-regexp-in-string "[.*]" "-" (invocation-name)))) + (replace-regexp-in-string "[.*]" "-" invocation-name))) (x-open-connection "w32" x-command-line-resources ;; Exit with a fatal error if this fails and we |