Re: `set-default-font' does not function anymore

[Chong Yidong]

Zhang Wei <address@hidden> writes:

> `set-default-font' does not function anymore, I've got the following
> settings in my .emacs:
>
> (create-fontset-from-fontset-spec
>  (concat
>   "-*-courier-medium-r-normal-*-14-*-*-*-*-*-fontset-courier,"
>   "chinese-gb2312:-*-simsun-medium-r-*-*-14-*-*-*-c-*-gb2312*-*,"
>   "mule-unicode-0100-24ff:-*-simsun-medium-r-*-*-14-*-*-*-c-*-iso10646*-*,"
>   "korean-ksc5601:-*-*-medium-r-*-*-14-*-*-*-*-*-ksc5601*-*,"
>   "chinese-cns11643-5:-*-simsun-medium-r-*-*-14-*-*-*-c-*-gbk*-*,"
>   "chinese-cns11643-6:-*-simsun-medium-r-*-*-14-*-*-*-c-*-gbk*-*,"
>   "chinese-cns11643-7:-*-simsun-medium-r-*-*-14-*-*-*-c-*-gbk*-*,"
>   "sjis:-*-medium-r-normal--14-*-jisx0208*-*"))
> (set-default-font "fontset-courier")
>
> but M-x describe-fontset <RET> <RET> shows the current frame still
> using `fontset-default', I don't know when does this happens, but the
> setting works fine several weeks ago.

I can't reproduce this.  With .emacs containing

  (create-fontset-from-fontset-spec
   (concat
    "-*-courier-medium-r-normal-*-14-*-*-*-*-*-fontset-courier,"
    "chinese-gb2312:-*-simsun-medium-r-*-*-14-*-*-*-c-*-gb2312*-*,"
    "mule-unicode-0100-24ff:-*-simsun-medium-r-*-*-14-*-*-*-c-*-iso10646*-*,"
    "korean-ksc5601:-*-*-medium-r-*-*-14-*-*-*-*-*-ksc5601*-*,"
    "chinese-cns11643-5:-*-simsun-medium-r-*-*-14-*-*-*-c-*-gbk*-*,"
    "chinese-cns11643-6:-*-simsun-medium-r-*-*-14-*-*-*-c-*-gbk*-*,"
    "chinese-cns11643-7:-*-simsun-medium-r-*-*-14-*-*-*-c-*-gbk*-*,"
    "sjis:-*-medium-r-normal--14-*-jisx0208*-*"))
  (set-default-font "fontset-courier")

M-x describe-fontset RET RET gives

  Fontset: -*-courier-medium-r-normal-*-14-*-*-*-*-*-fontset-courier
  CHARSET or CHAR RANGE FONT NAME
  --------------------- ---------
  ascii                 
-adobe-courier-medium-r-normal--14-100-100-100-m-90-iso8859-1
       [-Adobe-Courier-Bold-R-Normal--14-100-100-100-M-90-ISO8859-1]
       [-Adobe-Courier-Medium-R-Normal--14-100-100-100-M-90-ISO8859-1]
  ...

Without those lines in .emacs, M-x describe-fontset RET RET gives

  Fontset: -*-*-medium-*-*-*-14-*-*-*-*-*-fontset-startup
  CHARSET or CHAR RANGE FONT NAME
  --------------------- ---------
  ascii                 -misc-fixed-medium-r-normal--14-130-75-75-c-70-iso8859-1
       [-Misc-Fixed-Bold-R-Normal--14-130-75-75-C-70-ISO8859-1]
       [-Misc-Fixed-Medium-R-Normal--14-130-75-75-C-70-ISO8859-1]
  latin-iso8859-1               -misc-fixed-*-iso8859-1
  latin-iso8859-2               -*-iso8859-2

So it does take effect.