# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 743142304 0
# Node ID 33ace0ef7c4d172352d26173b2cbfd2217d91fe3
# Parent  341cd3b063ae0b5721377376401e09d7ed593221
(gnus-current-time-zone): Fix typo.
(gnus-inews-organization): Fix zero length string operation bug.

diff -r 341cd3b063ae -r 33ace0ef7c4d lisp/=gnuspost.el
--- a/lisp/=gnuspost.el	Tue Jul 20 03:02:12 1993 +0000
+++ b/lisp/=gnuspost.el	Tue Jul 20 04:25:04 1993 +0000
@@ -3,6 +3,7 @@
 ;; Copyright (C) 1989, 1990, 1993 Free Software Foundation, Inc.
 
 ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
+;; Version: $Header: gnuspost.el,v 4.1 93/07/19 15:43:46 umerin Exp $
 ;; Keywords: news
 
 ;; This file is part of GNU Emacs.
@@ -693,7 +694,7 @@
 
 (defun gnus-current-time-zone (time)
   "The local time zone in effect at TIME, or nil if not known."
-  (let ((z (and (fboundp 'current-time-zone) (current-time-zone now))))
+  (let ((z (and (fboundp 'current-time-zone) (current-time-zone time))))
     (if (and z (car z)) z gnus-local-timezone)))
 
 (defun gnus-inews-date ()
@@ -758,6 +759,7 @@
 			   gnus-local-organization
 			   private-file)))
     (and (stringp organization)
+	 (> (length organization) 0)
 	 (string-equal (substring organization 0 1) "/")
 	 ;; Get it from the user and system file.
 	 ;; Suggested by roland@wheaties.ai.mit.edu (Roland McGrath).