Mercurial > emacs

comparison lisp/w32-fns.el @ 98778:0f8ccfd21a74

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* w32-fns.el (w32-check-shell-configuration): Doc fix. (w32-add-charset-info): Fix typo in docstring.
author Juanma Barranquero <lekktu@gmail.com>
date Thu, 16 Oct 2008 15:28:29 +0000
parents b4be5834c484
children eeef1de115b3
comparison
equal deleted inserted replaced
98777:63f2a735a59d 98778:0f8ccfd21a74
110 (w32-system-shell-p (getenv "COMSPEC"))))) 110 (w32-system-shell-p (getenv "COMSPEC")))))
111 111
112 (defvar w32-quote-process-args) ;; defined in w32proc.c 112 (defvar w32-quote-process-args) ;; defined in w32proc.c
113 113
114 (defun w32-check-shell-configuration () 114 (defun w32-check-shell-configuration ()
115 "Check the configuration of shell variables on Windows NT/9X. 115 "Check the configuration of shell variables on Windows.
116 This function is invoked after loading the init files and processing 116 This function is invoked after loading the init files and processing
117 the command line arguments. It issues a warning if the user or site 117 the command line arguments. It issues a warning if the user or site
118 has configured the shell with inappropriate settings." 118 has configured the shell with inappropriate settings."
119 (interactive) 119 (interactive)
120 (let ((prev-buffer (current-buffer)) 120 (let ((prev-buffer (current-buffer))
349 349
350 (defun w32-add-charset-info (xlfd-charset windows-charset codepage) 350 (defun w32-add-charset-info (xlfd-charset windows-charset codepage)
351 "Function to add character sets to display with Windows fonts. 351 "Function to add character sets to display with Windows fonts.
352 Creates entries in `w32-charset-info-alist'. 352 Creates entries in `w32-charset-info-alist'.
353 XLFD-CHARSET is a string which will appear in the XLFD font name to 353 XLFD-CHARSET is a string which will appear in the XLFD font name to
354 identify the character set. WINDOWS-CHARSET is a symbol identifying 354 identify the character set. WINDOWS-CHARSET is a symbol identifying
355 the Windows character set this maps to. For the list of possible 355 the Windows character set this maps to. For the list of possible
356 values, see the documentation for `w32-charset-info-alist'. CODEPAGE 356 values, see the documentation for `w32-charset-info-alist'. CODEPAGE
357 can be a numeric codepage that Windows uses to display the character 357 can be a numeric codepage that Windows uses to display the character
358 set, t for Unicode output with no codepage translation or nil for 8 358 set, t for Unicode output with no codepage translation or nil for 8
359 bit output with no translation." 359 bit output with no translation."
360 (add-to-list 'w32-charset-info-alist 360 (add-to-list 'w32-charset-info-alist
361 (cons xlfd-charset (cons windows-charset codepage))) 361 (cons xlfd-charset (cons windows-charset codepage))))
362 )
363 362
364 ;; The last charset we add becomes the "preferred" charset for the return 363 ;; The last charset we add becomes the "preferred" charset for the return
365 ;; value from w32-select-font etc, so list the most important charsets last. 364 ;; value from w32-select-font etc, so list the most important charsets last.
366 (w32-add-charset-info "iso8859-14" 'w32-charset-ansi 28604) 365 (w32-add-charset-info "iso8859-14" 'w32-charset-ansi 28604)
367 (w32-add-charset-info "iso8859-15" 'w32-charset-ansi 28605) 366 (w32-add-charset-info "iso8859-15" 'w32-charset-ansi 28605)