Mercurial > hg > xemacs-beta

comparison lisp/hm--html-menus/hm--html.el @ 42:8b8b7f3559a2 r19-15b104

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b104
author cvs
date Mon, 13 Aug 2007 08:54:51 +0200
parents 441bb1e64a06
children 6a22abad6937
comparison
equal deleted inserted replaced
41:5d6df4963a99 42:8b8b7f3559a2
1 ;;; $Id: hm--html.el,v 1.4 1997/03/02 03:43:20 steve Exp $ 1 ;;; $Id: hm--html.el,v 1.5 1997/03/24 01:26:53 steve Exp $
2 ;;; 2 ;;;
3 ;;; Copyright (C) 1993 - 1997 Heiko Muenkel 3 ;;; Copyright (C) 1993 - 1997 Heiko Muenkel
4 ;;; email: muenkel@tnt.uni-hannover.de 4 ;;; email: muenkel@tnt.uni-hannover.de
5 ;;; 5 ;;;
6 ;;; This program is free software; you can redistribute it and/or modify 6 ;;; This program is free software; you can redistribute it and/or modify
2501 2501
2502 2502
2503 (defun hm--html-make-newsgroup-alist () 2503 (defun hm--html-make-newsgroup-alist ()
2504 "Makes a hm--html-make-newsgroup-alist from a .newsrc.el file. 2504 "Makes a hm--html-make-newsgroup-alist from a .newsrc.el file.
2505 The function looks at the environment variable NNTPSERVER. 2505 The function looks at the environment variable NNTPSERVER.
2506 If this variable exists, it trys to open the file with the Name 2506 If this variable exists, it tries to open the file with the Name
2507 ~/$NNTPSERVER.el. If this file exists, the alist of the file is 2507 ~/$NNTPSERVER.el. If this file exists, the alist of the file is
2508 returned as the newsgroup-alist. If the file doesn't exist, it 2508 returned as the newsgroup-alist. If the file doesn't exist, it
2509 tries to use the file ~/$NNTPSERVER to make the alist. The function 2509 tries to use the file ~/$NNTPSERVER to make the alist. The function
2510 returns '((\"\"))" 2510 returns '((\"\"))"
2511 (if hm--html-newsgroup-alist 2511 (if hm--html-newsgroup-alist