Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

*** empty log message ***

  • Loading branch information...
commit 04981c253f65b8f93dc5b97a38369ec8b9be46b8 1 parent 8010e9b
@larsmagne larsmagne authored
View
16 lisp/ChangeLog
@@ -1,3 +1,19 @@
+Thu Sep 12 01:16:38 1996 Lars Magne Ingebrigtsen <larsi@ylfing.ifi.uio.no>
+
+ * gnus.el: Red Gnus v0.33 is released.
+
+Wed Sep 11 00:22:01 1996 Lars Magne Ingebrigtsen <larsi@ylfing.ifi.uio.no>
+
+ * gnus-score.el (gnus-adaptive-word-syntax-table): Modified
+ standard syntax table.
+
+ * nntp.el (nntp-read-server-type): Worked in the wrong buffer.
+
+ * gnus-demon.el (gnus-demon-cancel): Put
+ nnheader-cancel-function-timers back in again.
+
+ * gnus.el: Red Gnus v0.32 is released.
+
Tue Sep 10 19:10:09 1996 Lars Magne Ingebrigtsen <larsi@ylfing.ifi.uio.no>
* gnus-kill.el (gnus-batch-score): Didn't work at all.
View
5 lisp/gnus-demon.el
@@ -112,8 +112,9 @@ time Emacs has been idle for IDLE `gnus-demon-timestep's.")
(nnheader-cancel-timer gnus-demon-timer))
(setq gnus-demon-timer nil
gnus-use-demon nil)
- ;;(nnheader-cancel-function-timers 'gnus-demon)
- )
+ (condition-case ()
+ (nnheader-cancel-function-timers 'gnus-demon)
+ (error t)))
(defun gnus-demon-is-idle-p ()
"Whether Emacs is idle or not."
View
2  lisp/gnus-score.el
@@ -271,7 +271,7 @@ If nil, the user will be asked for a duration.")
(numbers '(?0 ?1 ?2 ?3 ?4 ?5 ?6 ?7 ?8 ?9)))
(while numbers
(modify-syntax-entry (pop numbers) " " table))
- (modify-syntax-entry ?' "w")
+ (modify-syntax-entry ?' "w" table)
table)
"Syntax table used when doing adaptive word scoring.")
View
2  lisp/gnus.el
@@ -28,7 +28,7 @@
(eval '(run-hooks 'gnus-load-hook))
-(defconst gnus-version-number "0.32"
+(defconst gnus-version-number "0.34"
"Version number for this version of Gnus.")
(defconst gnus-version (format "Red Gnus v%s" gnus-version-number)
View
7 lisp/nntp.el
@@ -310,6 +310,7 @@ server there that you can connect to. See also `nntp-open-connection-function'"
(defun nntp-try-list-active (group)
(nntp-list-active-group group)
(save-excursion
+ (set-buffer nntp-server-buffer)
(goto-char (point-min))
(cond ((looking-at "5[0-9]+")
(setq nntp-server-list-active-group nil))
@@ -579,8 +580,10 @@ It will prompt for a password."
(caar (push (list process buffer nil)
nntp-connection-alist))
(push process nntp-connection-list)
- (nntp-read-server-type)
- (run-hooks 'nntp-server-opened-hook))
+ (save-excursion
+ (set-buffer nntp-server-buffer)
+ (nntp-read-server-type)
+ (run-hooks 'nntp-server-opened-hook)))
(when (buffer-name (process-buffer process))
(kill-buffer (process-buffer process)))
nil))))
View
61 texi/Makefile
@@ -0,0 +1,61 @@
+TEXI2DVI=texi2dvi
+EMACS=emacs
+MAKEINFO=$(EMACS) -batch -q -no-site-file
+INFOSWI=-l texinfmt -f texinfo-every-node-update -f texinfo-format-buffer -f save-buffer
+LATEX=latex
+DVIPS=dvips
+PERL=perl
+
+all: gnus message
+
+most: texi2latexi.elc latex latexps
+
+gnus: gnus.texi
+ $(MAKEINFO) gnus.texi $(INFOSWI)
+
+message: message.texi
+ $(MAKEINFO) message.texi $(INFOSWI)
+
+dvi: gnus.texi
+ $(PERL) -n -e 'if (/\@iflatex/) { $$latex=1; } if (!$$latex) { print; } if (/\@end iflatex/) { $$latex=0; }' gnus.texi > gnus.tmptexi
+ $(TEXI2DVI) gnus.tmptexi
+
+refcard.dvi: refcard.tex gnuslogo.refcard gnusref.tex
+ $(LATEX) refcard.tex
+
+clean:
+ rm -f gnus.*.bak gnus.ky gnus.cp gnus.fn gnus.cps gnus.kys *.log \
+ gnus.log gnus.pg gnus.tp gnus.vr gnus.toc gnus.latexi *.aux gnus.cidx \
+ gnus.cind gnus.ilg gnus.ind gnus.kidx gnus.kind gnus.idx \
+ gnus.tmptexi gnus.tmplatexi *.latexi texput.log *.orig *.rej
+
+makeinfo:
+ makeinfo -o gnus gnus.texi
+ makeinfo -o message message.texi
+
+texi2latexi.elc:
+ $(EMACS) -batch -l bytecomp -f batch-byte-recompile-directory
+
+latex: gnus.texi
+ $(EMACS) -batch -q -no-site-file gnus.texi -l ./texi2latex.elc -f latexi-translate
+
+latexps:
+ $(LATEX) gnus.latexi
+ splitindex
+ makeindex -o gnus.kind gnus.kidx
+ makeindex -o gnus.cind gnus.cidx
+ egrep -v "end{document}|label.*Index|chapter.*Index" gnus.latexi > gnus.tmplatexi
+ cat postamble.tex >> gnus.tmplatexi
+ $(LATEX) gnus.tmplatexi
+ $(DVIPS) -f gnus.dvi > gnus.ps
+
+latexboth:
+ rm -f gnus-manual-a4.ps.gz gnus-manual-standard.ps.gz
+ make latexps
+ mv gnus.ps gnus-manual-a4.ps
+ gzip gnus-manual-a4.ps
+ sed 's/,a4paper//' gnus.latexi > gnus-standard.latexi
+ make latexps
+ mv gnus.ps gnus-manual-standard.ps
+ gzip gnus-manual-standard.ps
+
View
3  texi/gnus.texi
@@ -57,6 +57,7 @@
\newcommand{\gnushash}{\#}
\newcommand{\gnushat}{\symbol{"5E}}
\newcommand{\gnusunderline}{\symbol{"5F}}
+\newcommand{\gnusnot}{\#}
\newcommand{\gnustilde}{\symbol{"7E}}
\newcommand{\gnusless}{{$<$}}
\newcommand{\gnusgreater}{{$>$}}
@@ -10808,7 +10809,7 @@ myself:
@lisp
("references"
- "<x6[0-9a-z]+\\.fsf@.*eyesore.no>" 1000 nil r)
+ "<x6[0-9a-z]+\\.fsf@@.*eyesore.no>" 1000 nil r)
@end lisp
Whether it's the first two or first three characters that are ``yours''
View
3  texi/postamble.tex
@@ -0,0 +1,3 @@
+\input{gnus.kind}
+\input{gnus.cind}
+\end{document}
Please sign in to comment.
Something went wrong with that request. Please try again.