Subject: Re: bug#909: not finding etc/charsets/ should give some error/warning

From: Glenn Morris <[email-masked]>
Date: Wed, 10 Sep 2008 16:59:59 -0400

Dan Nicolaescu wrote:

> It would be great if some warning/error would be shown if
> etc/charsets/* is not found.

*** charset.c	3 Jun 2008 04:22:55 -0000	1.163
--- charset.c	10 Sep 2008 21:00:06 -0000
***************
*** 2044,2052 ****
  void
  init_charset ()
  {
!   Vcharset_map_path
!     = Fcons (Fexpand_file_name (build_string ("charsets"), Vdata_directory),
! 	     Qnil);
  }

--- 2044,2055 ----
  void
  init_charset ()
  {
!   Lisp_Object tempdir;
!   tempdir = Fexpand_file_name (build_string ("charsets"), Vdata_directory);
!   if (access (SDATA (tempdir), 0) < 0)
!     dir_warning ("Warning: charsets directory (%s) does not exist.\n",
! 		 tempdir);
! 
!   Vcharset_map_path = Fcons (tempdir, Qnil);
  }