9:13 p.m.
Hello
Look at
Char: ∞ (U+221E jit-ucs-charset-0 32 55) point=289 of 289(100%) column 4
this is really small but I don't know how to amplify it
using
XEmacs.font: -*-courier-bold-r-*-*-18-180-*-*-*-*-*-*
in my .Xdefaults file.
Uwe Brauer
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
6:22 a.m.
Uwe Brauer writes:
Hello
Look at
Char: ~ (U+221E jit-ucs-charset-0 32 55) point=289 of 289(100%) column 4
this is really small but I don't know how to amplify it
using
XEmacs.font: -*-courier-bold-r-*-*-18-180-*-*-*-*-*-*
Using XEmacs.font is usually not a good idea; it is too likely to be
shadowed by face settings. Better to use XEmacs.default.attributeFont
in most cases.
Start by nuking the "18" (which says "use this many pixels", and due
to the implementation will vary in screen size for bitmap fonts):
XEmacs.default.attributeFont: -*-courier-bold-r-*-*-*-180-*-*-*-*-*-*
which says "use a font that appears to be 18.0 points for this screen"
which also is likely to be absolutely incorrect, but gives you a much
better chance of having the same size for all characters. (You can
also try with XEmacs.font. If it works for you now in most ways, it
probably will keep working.)
You also need to be sure that there is a font containing that glyph of
appropriate size on your system. On most modern systems, all fonts
are scalable, so you should be OK. But it's possible that something
silly like the GNU international font is being used.
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
8:57 a.m.
> Regarding some utf8 chars are terrible small.; "Stephen J.
Turnbull" <stephen(a)xemacs.org> adds:
Uwe Brauer writes:
> Hello
>
> Look at
>
> Char: ~ (U+221E jit-ucs-charset-0 32 55) point=289 of 289(100%) column 4
>
> this is really small but I don't know how to amplify it
> using
> XEmacs.font: -*-courier-bold-r-*-*-18-180-*-*-*-*-*-*
Using XEmacs.font is usually not a good idea; it is too likely to be
shadowed by face settings. Better to use XEmacs.default.attributeFont
in most cases.
Start by nuking the "18" (which says "use this many
pixels", and due
to the implementation will vary in screen size for bitmap fonts):
XEmacs.default.attributeFont: -*-courier-bold-r-*-*-*-180-*-*-*-*-*-*
I now tried
M-: (set-face-font 'default
"-*-courier-bold-r-*-*-*-180-*-*-*-*-*-*")
deleting the 18 has a terrible effect on the font, chars to
large and to thin, but the UTF8 symbols in question *do not*
change, in fact they were better represented in 21.4.21... :'(.
which says "use a font that appears to be 18.0 points for this
screen"
which also is likely to be absolutely incorrect, but gives you a much
better chance of having the same size for all characters. (You can
also try with XEmacs.font. If it works for you now in most ways, it
probably will keep working.)
You also need to be sure that there is a font containing that glyph
of
appropriate size on your system. On most modern systems, all fonts
are scalable, so you should be OK. But it's possible that something
silly like the GNU international font is being used.
I did not compile with xft support, could that be the reason?
Uwe
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
2:47 p.m.
Uwe Brauer writes:
> Start by nuking the "18" (which says "use this
many pixels", and due
> to the implementation will vary in screen size for bitmap fonts):
> XEmacs.default.attributeFont: -*-courier-bold-r-*-*-*-180-*-*-*-*-*-*
I now tried
M-: (set-face-font 'default
"-*-courier-bold-r-*-*-*-180-*-*-*-*-*-*")
deleting the 18 has a terrible effect on the font, chars to
large and to thin, but the UTF8 symbols in question *do not*
change,
That's not entirely surprising. It's somewhat surprising that the
main font changes. However, the UTF-8 symbols are coming from a
different font from the main font.
BTW, when are you getting the infinity symbol? Is this related to
X-symbol or in general text?
in fact they were better represented in 21.4.21... :'(.
That's not entirely surprising. In 21.4, you're using mule-ucs, and
the non-Latin symbols are being translated, probably to Japanese
characters. Very likely you have more fonts available that way.
I did not compile with xft support, could that be the reason?
Xft support might give you better, even much better, results. But I
can't promise that, because it's not done, and you could run into some
of the remaining issues. Sorry I can't be more helpful in advance,
but I'm just as happy to see \infinity as ∞. :-)
I think you should try it, though.
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
5:08 p.m.
> Regarding Re: some utf8 chars are terrible small.; "Stephen
J. Turnbull" <stephen(a)xemacs.org> adds:
Uwe Brauer writes:
That's not entirely surprising. It's somewhat surprising
that the
main font changes. However, the UTF-8 symbols are coming from a
different font from the main font.
BTW, when are you getting the infinity symbol? Is this related to
X-symbol or in general text?
No! X-symbols would just change say \int to the symbol ∫
using fonts but would *not* save the symbol.
This feature which is mostly useful for emails is thanks to
Aidan and his nifty
http://www.parhasard.net/xemacs/TeX-escape-region.el
> in fact they were better represented in 21.4.21... :'(.
That's not entirely surprising. In 21.4, you're using
mule-ucs, and
the non-Latin symbols are being translated, probably to Japanese
characters. Very likely you have more fonts available that way.
Uwe
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
4:55 p.m.
Uwe Brauer wrote:
I now tried
M-: (set-face-font 'default
"-*-courier-bold-r-*-*-*-180-*-*-*-*-*-*")
deleting the 18 has a terrible effect on the font, chars to
large and to thin,
That's not terribly surprising. On my system, that font specification
matches 4 fonts:
-adobe-courier-bold-r-normal--18-180-75-75-m-110-iso10646-1
-adobe-courier-bold-r-normal--18-180-75-75-m-110-iso8859-1
-adobe-courier-bold-r-normal--25-180-100-100-m-150-iso10646-1
-adobe-courier-bold-r-normal--25-180-100-100-m-150-iso8859-1
Depending on what you have installed on your system, you could be
getting a font that doesn't match the resolution of your display, or you
could be getting a different foundry's version of Courier.
If you can't get Xft working well enough for your needs, see if the
xfontsel command is installed on your system. You can select the family
(Courier), weight (bold), slant (r), and point size (180), at which
point xfontsel should display the same characters that you're seeing in
XEmacs. Then you can play with the other settings to find a font that
you like. (I'd start with the foundry and resx settings.) When you've
got the settings adjusted to your taste, copy out the font specification
from the pane in the xfontsel window.
mike
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
2:53 p.m.
On 2011-06-19, Uwe Brauer <oub(a)mat.ucm.es> wrote:
Char: ∞ (U+221E jit-ucs-charset-0 32 55) point=289 of 289(100%)
column 4
this is really small but I don't know how to amplify it
using
XEmacs.font: -*-courier-bold-r-*-*-18-180-*-*-*-*-*-*
in my .Xdefaults file.
Probably your first step is to find out what font is actually being
used. I find the following little function (provided by the nice people on
the list, but I forget exactly who!) invaluable in sorting out font
problems.
;; return the font used to display the character at point in the
;; default face
(defun ffi ()
(interactive)
(face-font-instance 'default nil (char-after (point))))
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
5:17 p.m.
> Regarding Re: some utf8 chars are terrible small.; Julian
Bradfield <jcb+xeb(a)jcbradfield.org> adds:
On 2011-06-19, Uwe Brauer <oub(a)mat.ucm.es> wrote:
Probably your first step is to find out what font is actually being
used. I find the following little function (provided by the nice people on
the list, but I forget exactly who!) invaluable in sorting out font
problems.
;; return the font used to display the character at point in the
;; default face
(defun ffi ()
(interactive)
(face-font-instance 'default nil (char-after (point))))
Thanks but for me in Xemacs 21.5.29 I obtain the following
error:
∞
Wrong type argument: symbolp, ?\n
Uwe
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
6:42 p.m.
Uwe Brauer writes:
> (defun ffi ()
> (interactive)
> (face-font-instance 'default nil (char-after (point))))
Try
(defun ffi ()
(interactive)
(face-font-instance 'default nil (char-charset (char-after (point)))))
This is due to the change in the API for specifier-matching-instance.
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
7:53 p.m.
> Regarding Re: some utf8 chars are terrible small.; "Stephen
J. Turnbull" <stephen(a)xemacs.org> adds:
Uwe Brauer writes:
> > (defun ffi ()
> > (interactive)
> > (face-font-instance 'default nil (char-after (point))))
Try
(defun ffi ()
(interactive)
(face-font-instance 'default nil (char-charset (char-after (point)))))
does
not work as well here comes the bug trace
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
5:36 a.m.
Uwe Brauer writes:
>> Regarding Re: some utf8 chars are terrible small.;
"Stephen J. Turnbull" <stephen(a)xemacs.org> adds:
> Uwe Brauer writes:
>> > (defun ffi ()
>> > (interactive)
>> > (face-font-instance 'default nil (char-after (point))))
> Try
> (defun ffi ()
> (interactive)
> (face-font-instance 'default nil (char-charset (char-after (point)))))
does not work as well here comes the bug trace
Works for me. What patches have you applied to XEmacs? Your
backtrace makes me suspect it's due to the "brute force make x-symbol
work" patch.
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
12:06 p.m.
> Regarding Re: some utf8 chars are terrible small.; "Stephen
J. Turnbull" <turnbull(a)sk.tsukuba.ac.jp> adds:
>
> > (defun ffi ()
> > (interactive)
> > (face-font-instance 'default nil (char-charset (char-after (point)))))
> does not work as well here comes the bug trace
Works for me. What patches have you applied to XEmacs? Your
backtrace makes me suspect it's due to the "brute force make x-symbol
work" patch.
Exactly. I will compile it without the patch and see.
BTW what is the state of this patch for 21.5.30/31? Just
from this behaviour I assume you don't want it to be
included in.
Uwe
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
2:14 p.m.
Uwe Brauer writes:
BTW what is the state of this patch for 21.5.30/31? Just
from this behaviour I assume you don't want it to be
included in.
Well, this is the kind of thing that made me hesitate. I think that
probably I want to find a solution in x-symbol.
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
12:20 p.m.
> Regarding Re: some utf8 chars are terrible small.; "Stephen
J. Turnbull" <turnbull(a)sk.tsukuba.ac.jp> adds:
Uwe Brauer writes:
Works for me. What patches have you applied to XEmacs? Your
backtrace makes me suspect it's due to the "brute force make x-symbol
work" patch.
I just compiled a x-symbol-patch-free Xemcacs 21.5.29 Mule.
When I use the command
(defun ffi2 ()
(interactive)
(face-font-instance 'default nil (char-charset (char-after
(point)))))
C^∞
^here is the cursor
C^∞
^here is the cursor
The function does *not* return anything! What does it return
in your case?
Uwe
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
1:05 p.m.
Tue, 21 Jun 2011 (13:20 +0200 UTC) Uwe Brauer wrote:
>> Regarding Re: some utf8 chars are terrible small.;
"Stephen J. Turnbull" <turnbull(a)sk.tsukuba.ac.jp> adds:
> Uwe Brauer writes:
> Works for me. What patches have you applied to XEmacs? Your
> backtrace makes me suspect it's due to the "brute force make x-symbol
> work" patch.
I just compiled a x-symbol-patch-free Xemcacs 21.5.29 Mule.
When I use the command
(defun ffi2 ()
(interactive)
(face-font-instance 'default nil (char-charset (char-after
(point)))))
C^∞
^here is the cursor
C^∞
^here is the cursor
The function does *not* return anything! What does it return
in your case?
Uwe
Try defining something like this (after defining your ffi2:
(defun ffi3 () (interactive) (setq thechar (ffi2)))
Then run it in the *scratch* buffer. You can examine what 'thechar' is
to see the return. Here, is what I got:
#<font-instance "Bitstream
Charter-14:style=Regular:slant=0:weight=80:pixelsize=14.5833:foundry=bitstream:antialias=True:hintstyle=3:outline=True:scalable=True:dpi=75:rgba=1:fontformat=Type
1:embeddedbitmap=True:decorative=False" on #<x-device on
"/tmp/launch-X2HQVN/org.macosforge.xquartz:0.0" 0x2> xft font: 0x130b000
0xd>
--
There is but one HappyNet, and its master is Kibo.
-John_-_Winston
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
1:56 p.m.
> Regarding Re: some utf8 chars are terrible small.; robert delius
royar <xemacs(a)frinabulax.org> adds:
Tue, 21 Jun 2011 (13:20 +0200 UTC) Uwe Brauer wrote:
> Uwe
Try defining something like this (after defining your ffi2:
(defun ffi3 () (interactive) (setq thechar (ffi2)))
Cool! That worked.
Then run it in the *scratch* buffer. You can examine what
'thechar' is
to see the return. Here, is what I got:
I got:
Value: #<font-instance
"-adobe-courier-bold-r-normal--18-180-75-75-m-110-iso8859-1" on #<x-device on
":0.0" 0x2b228> font id: 0x4600074, 0x30302>
So that is not a UTF8 as it seems, strange.
I tried a little around when I use
(set-face-font 'default
"-misc-fixed-medium-r-normal--20-200-75-75-c-100-iso8859-7"))
Then thecar is
Value: #<font-instance
"-misc-fixed-medium-r-semicondensed--13-120-75-75-c-60-iso10646-1" on
#<x-device on ":0.0" 0x2b228> font id: 0x460026b, 0x293919>
It is still not clear to me how to enhance the size of the
symbol. I think I will try to compile xemacs with xft
support.
Uwe
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
2:55 p.m.
Uwe Brauer writes:
Value: #<font-instance
"-adobe-courier-bold-r-normal--18-180-75-75-m-110-iso8859-1" on
#<x-device on ":0.0" 0x2b228> font id: 0x4600074, 0x30302>
I think you must have missed the character. Please try again, if you
did not miss, there is probably a bug in XEmacs here.
Note the --18. This says that the character cell is 18 pixels high
(that normally includes a couple of pixels of padding, and of course
the lemniscate is likely to be less than half the total height.
I tried a little around when I use
(set-face-font 'default
"-misc-fixed-medium-r-normal--20-200-75-75-c-100-iso8859-7"))
Greek?
Then thecar is
Value: #<font-instance
"-misc-fixed-medium-r-semicondensed--13-120-75-75-c-60-iso10646-1" on
#<x-device on ":0.0" 0x2b228> font id: 0x460026b, 0x293919>
Note that this is a 13-pixel font. Probably this is the (nominally)
12pt version of the GNU international font.
It is still not clear to me how to enhance the size of the
symbol.
Try using "xlsfonts -fn -*-iso10646-1" to see if you have other
fonts. If you see a series of 0-0-0 in the middle of a font name,
then it's scalable. However, there's no guarantee that it contains
the needed characters.
I think I will try to compile xemacs with xft support.
That's probably the shortest route to a better display.
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
4:54 p.m.
> Regarding Re: some utf8 chars are terrible small.; "Stephen
J. Turnbull" <stephen(a)xemacs.org> adds:
Uwe Brauer writes:
> Value: #<font-instance
> "-adobe-courier-bold-r-normal--18-180-75-75-m-110-iso8859-1" on
> #<x-device on ":0.0" 0x2b228> font id: 0x4600074, 0x30302>
I think you must have missed the character. Please try again, if
you
did not miss, there is probably a bug in XEmacs here.
Ok again.
∞
^cursor on the symbol
#<font-instance
#"-misc-fixed-medium-r-semicondensed--13-120-75-75-c-60-iso10646-1"
#on #<x-device on ":0.0" 0x2b228> font id: 0x460026b,
#0x293919>
∞
^cursor behind the symbol
#<font-instance "-adobe-courier-bold-r-normal--18-180-75-75-m-110-iso8859-1"
on #<x-device on ":0.0" 0x2b228> font id: 0x4600074, 0x30302>
I presume the first font is the font in question. And right
via xfontsel I can see the tiny infty symbol.
Note the --18. This says that the character cell is 18 pixels high
(that normally includes a couple of pixels of padding, and of course
the lemniscate is likely to be less than half the total height.
> I tried a little around when I use
> (set-face-font 'default
> "-misc-fixed-medium-r-normal--20-200-75-75-c-100-iso8859-7"))
Greek?
Yes for greek symbols such as α
This font is good:
#<font-instance
#"-microsoft-georgia-medium-r-normal--19-140-100-100-p-0-iso8859-7"
#on #<x-device on ":0.0" 0x2b228> font id: 0x4600736,
#0x1bacbcb>
This is not bad neither
#<font-instance "-misc-fixed-medium-r-normal--20-200-75-75-c-100-iso8859-7"
on #<x-device on ":0.0" 0x2b228> font id: 0x4600743, 0x1bb2189>
> It is still not clear to me how to enhance the size of the
> symbol.
Try using "xlsfonts -fn -*-iso10646-1" to see if you have
other
fonts. If you see a series of 0-0-0 in the middle of a font name,
then it's scalable. However, there's no guarantee that it contains
the needed characters.
Ok I found a solution. I am ashamed to tell you that it is a
MS font. So the following works:
(cond ((and (string-match "XEmacs\\|Lucid" emacs-version)
(= emacs-major-version 21)
(>= emacs-minor-version 5))
(let ((basic "-*-courier-bold-r-*-*-18-180-*-*-*-*-*-*")
;; this font is better for the symbols
;; (fallback
"-microsoft-verdana-medium-r-normal--0-0-0-0-p-0-iso10646-1"))
;; that font is better for greek
(fallback
"-microsoft-verdana-medium-r-normal--0-0-0-0-p-0-iso10646-1"))
(set-specifier
(face-font 'default)
`(((tty) . "normal") ((x) . ,basic) ((x encode-as-utf-8 initial
x-coverage-instantiator) . ,fallback) ((x two-dimensional initial) . ,fallback)
((x two-dimensional initial) . ,fallback)
((x two-dimensional initial) . ,fallback)
((x one-dimensional final x-coverage-instantiator) . ,fallback)
((x two-dimensional final x-coverage-instantiator) . ,fallback)
((x) . "*"))
nil nil 'remove-tag-set-prepend))))
> I think I will try to compile xemacs with xft support.
That's probably the shortest route to a better display.
I have to try this later since I need to reinstall my
Kubuntu version for this. KDE3 is in conflict with
freetype-dev......:'(
Uwe
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
5:40 p.m.
Uwe Brauer writes:
Ok I found a solution. I am ashamed to tell you that it is a
MS font.
Don't be. Fonts are the kind of thing that free software really sucks
at, because it's all about hand-tuned details ... the kind of work any
sane person must be paid to do. Free Japanese fonts are by and large
horrid (and the first Type 1 and TrueType ones were paid for by
government research grants!) Microsoft's fonts are very beautiful.
Don Knuth and Computer Modern is a happy accident, that's all. (And
there are better fonts.)
So the following works:
I think the following should get you better results for Greek. (My
changes and suggestions have comments in ALL CAPS.)
(cond ((and (string-match "XEmacs\\|Lucid" emacs-version)
(= emacs-major-version 21)
(>= emacs-minor-version 5))
(let ((basic "-*-courier-bold-r-*-*-18-180-*-*-*-*-*-*")
;; BIND A VARIABLE FOR A GREEK FONT HERE
(greek "-misc-fixed-medium-r-normal--20-200-75-75-c-100-iso8859-7")
(fallback "-microsoft-verdana-medium-r-normal--0-0-0-0-p-0-iso10646-1"))
(set-specifier
(face-font 'default)
`(((tty) . "normal")
((x) . ,basic)
;; XEmacs SHOULD USE THIS GREEK FONT FOR GREEK, BUT NOT LATIN OR MATH
((x) . ,greek)
((x encode-as-utf-8 initial x-coverage-instantiator) . ,fallback)
((x two-dimensional initial) . ,fallback) ;; <= TYPOS HERE?
((x two-dimensional initial) . ,fallback) ;; <= TYPOS HERE?
((x two-dimensional initial) . ,fallback)
((x one-dimensional final x-coverage-instantiator) . ,fallback)
((x two-dimensional final x-coverage-instantiator) . ,fallback)
((x) . "*"))
nil nil 'remove-tag-set-prepend))))
I have to try this later since I need to reinstall my
Kubuntu version for this. KDE3 is in conflict with
freetype-dev......:'(
Grrrrr.....
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
5:51 p.m.
> Regarding Re: some utf8 chars are terrible small.; "Stephen
J. Turnbull" <stephen(a)xemacs.org> adds:
Uwe Brauer writes:
> So the following works:
I think the following should get you better results for Greek. (My
changes and suggestions have comments in ALL CAPS.)
Cool, thanks, I have to add that the code I sent is not mine
but from Aidan (I am not sure whether he posted it in beta
or in a private mail)
> I have to try this later since I need to reinstall my
> Kubuntu version for this. KDE3 is in conflict with
> freetype-dev......:'(
Grrrrr.....
I tried to install it in a virtualbox but now it is
stuck. Moreover (K)ubunt has the annoying feature of quiting
its version very soon (not like Debian) and I did not pay
attention and did not install a LTS (long time support) version....
A free software sometimes.....
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
7:26 p.m.
New subject: now X-symbol has a problem (was: some utf8 chars are terrible small.)
> Regarding Re: some utf8 chars are terrible small.; "Stephen
J. Turnbull" <stephen(a)xemacs.org> adds:
Uwe Brauer writes:
(cond ((and (string-match "XEmacs\\|Lucid" emacs-version)
(= emacs-major-version 21)
(>= emacs-minor-version 5))
(let ((basic "-*-courier-bold-r-*-*-18-180-*-*-*-*-*-*")
;; BIND A VARIABLE FOR A GREEK FONT HERE
(greek "-misc-fixed-medium-r-normal--20-200-75-75-c-100-iso8859-7")
(fallback "-microsoft-verdana-medium-r-normal--0-0-0-0-p-0-iso10646-1"))
[snip]
I am terrible sorry to report another problem. Once I chose
the setting Aidan and you propose, x-symbol now uses very
small fonts for the integrals and other symbols!
x-symbol setting is governed by
(setq x-symbol-xsymb0-fonts
'(("-adobe-symbol-*-*-*-*-*-240-*-*-*-*-*-*"
"-xsymb-xsymb0-medium-r-normal--14-140-75-75-p-85-adobe-fontspecific"
"-adobe-symbol-medium-r-normal-*-*-140-*-*-*-*-adobe-fontspecific")
(
"-adobe-symbol_sub-medium-r-normal-*-*-140-*-*-*-*-adobe-fontspecific"
"-xsymb-xsymb0_sub-medium-r-normal--12-120-75-75-p-74-adobe-fontspecific"
)
("-adobe-symbol_sup-medium-r-normal-*-*-140-*-*-*-*-adobe-fontspecific"
"-*-xsymbol_sup-medium-r-normal-*-*-140-*-*-*-*-*-*"
"-xsymb-xsymb0_sup-medium-r-normal--12-120-75-75-p-74-adobe-fontspecific"
)))
(setq x-symbol-xsymb1-fonts
'(
("-xsymb-xsymb1-medium-r-normal-*-*-140-*-*-*-*-xsymb-xsymb1")
("-xsymb-xsymb1_sub-medium-r-normal-*-*-240-*-*-*-*-xsymb-xsymb1")
("-xsymb-xsymb1_sup-medium-r-normal-*-*-240-*-*-*-*-xsymb-xsymb1")))
(setq x-symbol-latin1-fonts
'(("-adobe-helvetica-medium-r-normal-*-*-140-*-*-*-*-iso8859-1")
("-adobe-helvetica_sub-medium-r-*-*-*-140-*-*-*-*-iso8859-1")
("-adobe-helvetica_sup-medium-r-*-*-*-140-*-*-*-*-iso8859-1")))
So I wrapped just some interactive function
bodys around your settings.
I restart xemacs, go to a tex buffer with x-symbol turned
on. Everything is fine. I use TeX-to-char-turn-on-font and
oops the integral shrinks very much. I try to call a
turn-off function, see below for details, evaluate the
x-symbol-xsymb1-fonts, but nothing happens, now x-symbol is
doomed with some very small fonts.
Maybe the turn off function TeX-to-char-turn-off-font is not
correct?
(defun TeX-to-char-turn-on-font ()
(interactive)
(cond ((and (string-match "XEmacs\\|Lucid" emacs-version)
(= emacs-major-version 21)
(>= emacs-minor-version 5))
(let ((basic "-*-courier-bold-r-*-*-18-180-*-*-*-*-*-*")
;; BIND A VARIABLE FOR A GREEK FONT HERE
(greek "-misc-fixed-medium-r-normal--20-200-75-75-c-100-iso8859-7")
(fallback "-microsoft-verdana-medium-r-normal--0-0-0-0-p-0-iso10646-1"))
(set-specifier
(face-font 'default)
`(((tty) . "normal")
((x) . ,basic)
;; XEmacs SHOULD USE THIS GREEK FONT FOR GREEK, BUT NOT LATIN OR MATH
((x) . ,greek)
((x encode-as-utf-8 initial x-coverage-instantiator) . ,fallback)
((x two-dimensional initial) . ,fallback) ;; <= TYPOS HERE?
((x two-dimensional initial) . ,fallback) ;; <= TYPOS HERE?
((x two-dimensional initial) . ,fallback)
((x one-dimensional final x-coverage-instantiator) . ,fallback)
((x two-dimensional final x-coverage-instantiator) . ,fallback)
((x) . "*"))
nil nil 'remove-tag-set-prepend)))))
(defun TeX-to-char-turn-off-font ()
(interactive)
(cond ((and (string-match "XEmacs\\|Lucid" emacs-version)
(= emacs-major-version 21)
(>= emacs-minor-version 5))
(let ((basic "-*-courier-bold-r-*-*-18-180-*-*-*-*-*-*")
;; BIND A VARIABLE FOR A GREEK FONT HERE
(greek "-*-courier-bold-r-*-*-18-180-*-*-*-*-*-*")
(fallback "-*-courier-bold-r-*-*-18-180-*-*-*-*-*-*"))
(set-specifier
(face-font 'default)
`(((tty) . "normal")
((x) . ,basic)
;; XEmacs SHOULD USE THIS GREEK FONT FOR GREEK, BUT NOT LATIN OR MATH
((x) . ,greek)
((x encode-as-utf-8 initial x-coverage-instantiator) . ,fallback)
((x two-dimensional initial) . ,fallback) ;; <= TYPOS HERE?
((x two-dimensional initial) . ,fallback) ;; <= TYPOS HERE?
((x two-dimensional initial) . ,fallback)
((x one-dimensional final x-coverage-instantiator) . ,fallback)
((x two-dimensional final x-coverage-instantiator) . ,fallback)
((x) . "*"))
nil nil 'remove-tag-set-prepend)))))
Uwe
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
2:48 a.m.
New subject: now X-symbol has a problem (was: some utf8 chars are terrible small.)
Uwe Brauer writes:
I am terrible sorry to report another problem. Once I chose
the setting Aidan and you propose, x-symbol now uses very
small fonts for the integrals and other symbols!
I restart xemacs, go to a tex buffer with x-symbol turned
on. Everything is fine. I use TeX-to-char-turn-on-font and
oops the integral shrinks very much.
This happens because something is requesting an ambiguous font that is
being resolved to a very small font.
x-symbol setting is governed by
These don't contain tag sets, and therefore are not removed by the
call to set-specifier. For some reason none of the other fonts are
catching these symbols, so those characters "fall through" to here.
(setq x-symbol-xsymb0-fonts
'(("-adobe-symbol-*-*-*-*-*-240-*-*-*-*-*-*"
This is very large (24pt).
"-xsymb-xsymb0-medium-r-normal--14-140-75-75-p-85-adobe-fontspecific"
This is the same size as the "tiny infinity" font (one nominal pixel
larger).
"-adobe-symbol-medium-r-normal-*-*-140-*-*-*-*-adobe-fontspecific")
How big this font is depends on the DPI setting of X.
(
"-adobe-symbol_sub-medium-r-normal-*-*-140-*-*-*-*-adobe-fontspecific"
"-xsymb-xsymb0_sub-medium-r-normal--12-120-75-75-p-74-adobe-fontspecific"
This is insanely small, smaller than the font that produces the "tiny
infinity symbol". I guess that's OK since apparently they're intended
for subscripts. The problem is that they share a charset with other
fonts not intended for subscripts, so they may get picked up.
)
("-adobe-symbol_sup-medium-r-normal-*-*-140-*-*-*-*-adobe-fontspecific"
"-*-xsymbol_sup-medium-r-normal-*-*-140-*-*-*-*-*-*"
"-xsymb-xsymb0_sup-medium-r-normal--12-120-75-75-p-74-adobe-fontspecific"
)))
(setq x-symbol-xsymb1-fonts
'(
("-xsymb-xsymb1-medium-r-normal-*-*-140-*-*-*-*-xsymb-xsymb1")
("-xsymb-xsymb1_sub-medium-r-normal-*-*-240-*-*-*-*-xsymb-xsymb1")
("-xsymb-xsymb1_sup-medium-r-normal-*-*-240-*-*-*-*-xsymb-xsymb1")))
(setq x-symbol-latin1-fonts
'(("-adobe-helvetica-medium-r-normal-*-*-140-*-*-*-*-iso8859-1")
("-adobe-helvetica_sub-medium-r-*-*-*-140-*-*-*-*-iso8859-1")
("-adobe-helvetica_sup-medium-r-*-*-*-140-*-*-*-*-iso8859-1")))
These fonts are all small.
I try to call a turn-off function, see below for details, evaluate
the x-symbol-xsymb1-fonts, but nothing happens, now x-symbol is
doomed with some very small fonts. Maybe the turn off function
TeX-to-char-turn-off-font is not correct?
As far as I can see the the turn-on and turn-off functions are
identical. Is that correct?
You could try changing the last line in each function
nil nil 'remove-tag-set-prepend)))))
to
nil nil 'remove-all)))))
This has global effect, so make sure you can conveniently quit and
restart XEmacs to restore sanity if necessary. I don't expect your
text to disappear or anything like that, but since I don't know your
full set up, be careful.
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
9:27 a.m.
New subject: now X-symbol has a problem
> Regarding now X-symbol has a problem (was: some utf8 chars are
terrible small.); "Stephen J. Turnbull" <stephen(a)xemacs.org> adds:
Uwe Brauer writes:
This happens because something is requesting an ambiguous font that
is
being resolved to a very small font.
But why after applying your setting and not before?
> x-symbol setting is governed by
These don't contain tag sets, and therefore are not removed by
the
call to set-specifier. For some reason none of the other fonts are
catching these symbols, so those characters "fall through" to here.
I had the "brilliant" idea of setting
(setq x-symbol-xsymb0-fonts
'(("-adobe-symbol-*-*-*-*-*-240-*-*-*-*-*-*"
"-adobe-symbol-*-*-*-*-*-240-*-*-*-*-*-*"
"-adobe-symbol-*-*-*-*-*-240-*-*-*-*-*-*")
("-adobe-symbol_sub-medium-r-normal-*-*-140-*-*-*-*-adobe-fontspecific"
"-adobe-symbol_sub-medium-r-normal-*-*-140-*-*-*-*-adobe-fontspecific")
("-adobe-symbol_sup-medium-r-normal-*-*-140-*-*-*-*-adobe-fontspecific"
"-adobe-symbol_sup-medium-r-normal-*-*-140-*-*-*-*-adobe-fontspecific"
"-adobe-symbol_sup-medium-r-normal-*-*-140-*-*-*-*-adobe-fontspecific")))
(setq x-symbol-xsymb1-fonts
'(("-xsymb-xsymb1-medium-r-normal-*-*-140-*-*-*-*-xsymb-xsymb1")
("-xsymb-xsymb1_sub-medium-r-normal-*-*-240-*-*-*-*-xsymb-xsymb1")
("-xsymb-xsymb1_sup-medium-r-normal-*-*-240-*-*-*-*-xsymb-xsymb1")))
(setq x-symbol-latin1-fonts
'(("-adobe-helvetica-medium-r-normal-*-*-140-*-*-*-*-iso8859-1")
("-adobe-helvetica_sub-medium-r-*-*-*-140-*-*-*-*-iso8859-1")
("-adobe-helvetica_sup-medium-r-*-*-*-140-*-*-*-*-iso8859-1")))
This did not help at all, well as expected the subscripts
fonts became very large.
As far as I can see the the turn-on and turn-off functions are
identical. Is that correct?
I thought I changed the setting of the
basic
greek and
fallback
variables.
But the correct setting which goes back to the original
setting should be
(let ((basic "-*-courier-bold-r-*-*-18-180-*-*-*-*-*-*")
(greek "-misc-fixed-medium-r-semicondensed--13-120-75-75-c-60-iso10646-1")
(fallback "-misc-fixed-medium-r-semicondensed--13-120-75-75-c-60-iso10646-1"))
Indeed after applying this modified function, the \infty
symbol again is small. But the x-symbol fonts do *not* change
You could try changing the last line in each function
nil nil 'remove-tag-set-prepend)))))
to
nil nil 'remove-all)))))
I did this but it had no effect.
I resume: when I turn your setting on, \infty becomes big, but
the x-symbols become insanely small. When I try to turn your
setting off \infty becomes small again, but x-symbol stays
small, I have to restart xemacs.
Uwe
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
10:06 a.m.
New subject: now X-symbol has a problem
Uwe Brauer writes:
>> Regarding now X-symbol has a problem (was: some utf8 chars
are terrible small.); "Stephen J. Turnbull" <stephen(a)xemacs.org> adds:
> Uwe Brauer writes:
> This happens because something is requesting an ambiguous font that is
> being resolved to a very small font.
But why after applying your setting and not before?
Don't know. It's an interaction between x-symbol itself and the other
code you're using, and it's pretty complicated to figure out what
specifiers are going to do in this kind of situation.
I am very surprised that 'remove-all doesn't change things, though.
BTW, I'm probably not going to have time to look at this again
until July, unfortunately.
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
2:12 p.m.
New subject: Solution (was: now X-symbol has a problem)
> Regarding Re: now X-symbol has a problem; "Stephen J.
Turnbull" <stephen(a)xemacs.org> adds:
Uwe Brauer writes:
I am very surprised that 'remove-all doesn't change things,
though.
BTW, I'm probably not going to have time to look at this again
until July, unfortunately.
Ok, sure I understand, thanks for your help, I will come
back to you, when you have more time.
Just playing around the following works, don't ask me why:
(defun TeX-to-char-turn-on-font ()
(interactive)
(cond ((and (string-match "XEmacs\\|Lucid" emacs-version)
(= emacs-major-version 21)
(>= emacs-minor-version 5))
(let ((basic "-*-courier-bold-r-*-*-18-180-*-*-*-*-*-*")
;; BIND A VARIABLE FOR A GREEK FONT HERE
(greek "-adobe-symbol-*-*-*-*-*-240-*-*-*-*-*-*")
(fallback "-misc-fixed-medium-r-normal--20-200-75-75-c-100-iso8859-7"))
(set-specifier
(face-font 'default)
`(((tty) . "normal")
((x) . ,basic)
;; XEmacs SHOULD USE THIS GREEK FONT FOR GREEK, BUT NOT LATIN OR MATH
((x) . ,greek)
((x encode-as-utf-8 initial x-coverage-instantiator) . ,fallback)
((x two-dimensional initial) . ,fallback) ;; <= TYPOS HERE?
((x two-dimensional initial) . ,fallback) ;; <= TYPOS HERE?
((x two-dimensional initial) . ,fallback)
((x one-dimensional final x-coverage-instantiator) . ,fallback)
((x two-dimensional final x-coverage-instantiator) . ,fallback)
((x) . "*"))
; nil nil 'remove-tag-set-prepend)))))
nil nil 'remove-all)))))
Uwe
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
5:45 p.m.
Uwe Brauer writes:
∞
^cursor on the symbol
#<font-instance
#"-misc-fixed-medium-r-semicondensed--13-120-75-75-c-60-iso10646-1"
#on #<x-device on ":0.0" 0x2b228> font id: 0x460026b,
#0x293919>
∞
^cursor behind the symbol
#<font-instance "-adobe-courier-bold-r-normal--18-180-75-75-m-110-iso8859-1"
on #<x-device on ":0.0" 0x2b228> font id: 0x4600074, 0x30302>
I presume the first font is the font in question.
Yup, those are the kind of results I expected. Thanks for confirming
that XEmacs does this little thing right!
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
2:20 p.m.
Uwe Brauer writes:
When I use the command
(defun ffi2 ()
The function does *not* return anything! What does it return
in your case?
Well, to be precise it *returns* the font instance. However, it
doesn't *print* anything. You could either modify the definition to
(defun ffi3 ()
(interactive)
(message "%s" (ffi2)))
or use M-: (ffi2) RET
I'm not sure why Julian uses the function without a way to print
output. I didn't notice because I just used the guts of the function
by typing C-x C-e in the right place to test it. Sorry for being so
lazy.:-)
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
2:26 p.m.
I'm not sure why Julian uses the function without a way to print
output. I didn't notice because I just used the guts of the function
by typing C-x C-e in the right place to test it. Sorry for being so
lazy.:-)
I just call it with M-: (ffi) RET
It's not like it's something I do more than once in a blue moon!
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
4685
days inactive
4688
days old
27 comments
6 participants
participants (6)
-
Julian Bradfield -
Mike Kupfer -
robert delius royar -
Stephen J. Turnbull -
Stephen J. Turnbull -
Uwe Brauer