Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
c2350548
Commit
c2350548
authored
Nov 24, 2012
by
Jan Djärv
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
* term/ns-win.el (ns-initialize-window-system): Move creation of
fontsets here. Fixes: debbugs:11964
parent
ecfc364c
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
15 additions
and
12 deletions
+15
-12
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/term/ns-win.el
lisp/term/ns-win.el
+10
-12
No files found.
lisp/ChangeLog
View file @
c2350548
2012-11-24 Jan Djärv <jan.h.d@swipnet.se>
* term/ns-win.el (ns-initialize-window-system): Move creation of
fontsets here (Bug#11964).
2012-11-24 Vincent Belaïche <vincentb1@users.sourceforge.net>
* ses.el (ses-rename-cell): Correct bug on mode-line update after
...
...
lisp/term/ns-win.el
View file @
c2350548
...
...
@@ -656,18 +656,6 @@ This defines a fontset consisting of the Courier and other fonts that
come
with
OS
X.
See
the
documentation
of
`
create-fontset-from-fontset-spec
'
for
the
format.
")
;; Conditional on new-fontset so bootstrapping works on non-GUI compiles.
(when (fboundp 'new-fontset)
;; Setup the default fontset.
(create-default-fontset)
;; Create the standard fontset.
(condition-case err
(create-fontset-from-fontset-spec ns-standard-fontset-spec t)
(error (display-warning
'initialization
(format "
Creation
of
the
standard
fontset
failed:
%s
" err)
:error))))
(defvar ns-reg-to-script) ; nsfont.m
;; This maps font registries (not exposed by NS APIs for font selection) to
...
...
@@ -914,6 +902,16 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.")
;; PENDING: not needed?
(setq command-line-args (x-handle-args command-line-args))
;; Setup the default fontset.
(create-default-fontset)
;; Create the standard fontset.
(condition-case err
(create-fontset-from-fontset-spec ns-standard-fontset-spec t)
(error (display-warning
'initialization
(format "
Creation
of
the
standard
fontset
failed:
%s
" err)
:error)))
(x-open-connection (system-name) nil t)
(dolist (service (ns-list-services))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment