andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Merge from emacs--devo--0

Browse source 
Patches applied:

 * emacs--devo--0  (patch 460-475)

   - Update from CVS
   - Merge from gnus--rel--5.10

 * gnus--rel--5.10  (patch 145-152)

   - Merge from emacs--devo--0
   - Update from CVS

Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-118
This commit is contained in:
Miles Bader 2006-10-15 02:54:13 +00:00
commit bb9c4b4f8b
96 changed files with 5533 additions and 2679 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

167
AUTHORS
View file

@ -112,13 +112,13 @@ Andreas Leue: changed artist.el
Andreas Luik: changed xfns.c xterm.c
Andreas Schwab: changed Makefile.in files.el lisp.h xdisp.c alloc.c
configure.in fns.c coding.c dired.el editfns.c info.el print.c eval.c
configure.in fns.c print.c coding.c dired.el editfns.c info.el eval.c
fileio.c simple.el buffer.c minibuf.c xterm.c emacs.c keyboard.c
process.c and 443 other files
process.c and 444 other files
Andreas Seltenreich: changed nnweb.el gnus-art.el gnus-ml.el gnus-srvr.el
gnus-start.el gnus-util.el gnus.el gnus.texi mm-url.el url-cookie.el
url-http.el
gnus-start.el gnus-util.el gnus.el gnus.texi mm-url.el nnslashdot.el
url-cookie.el url-http.el
Andrew Choi: wrote mac-win.el
and changed macterm.c mac.c macfns.c INSTALL macmenu.c darwin.h macterm.h
@ -236,6 +236,8 @@ and changed isearch.el sendmail.el
Bob Halley: changed esh-io.el
Bob Rogers: changed ffap.el
Bob Weiner: changed info.el quail.el
Boris Goldowsky: wrote avoid.el descr-text.el enriched.el facemenu.el
@ -309,17 +311,18 @@ Charlie Martin: wrote autoinsert.el
Cheng Gao: changed MORE.STUFF flymake.el tips.texi url-dired.el
url-file.el url-handlers.el url-http.el url-nfs.el
Chong Yidong: changed cus-edit.el custom.el display.texi longlines.el
files.el simple.el text.texi custom.texi files.texi cus-theme.el
info.el keyboard.c wid-edit.el xterm.c frames.texi image-mode.el
misc.texi mouse.el sendmail.el xfns.c anti.texi and 152 other files
Chong Yidong: changed cus-edit.el custom.el simple.el display.texi
longlines.el files.el text.texi custom.texi files.texi wid-edit.el
cus-theme.el info.el keyboard.c xterm.c compile.el frames.texi
image-mode.el keymaps.texi misc.texi mouse.el sendmail.el
and 156 other files
Chris Hanson: changed xscheme.el scheme.el xterm.c hpux.h x11term.c
hp9000s300.h keyboard.c process.c texinfmt.el emacsclient.c sort.el
syntax.c texnfo-upd.el x11fns.c xfns.c dired.el fileio.c hp9000s800.h
indent.c info.el man.el and 17 other files
Chris Moore: changed wdired.el
Chris Moore: changed dired.el wdired.el
Chris Prince: changed w32term.c
@ -430,7 +433,7 @@ Dave Love: wrote autoarg.el autoconf.el benchmark.el cfengine.el
welsh.el
and changed configure.in Makefile.in help.el fortran.el browse-url.el
mule-cmds.el simple.el xterm.c cus-edit.el files.el info.el mule.el
wid-edit.el vc.el fns.c rfc2047.el bindings.el cus-start.el buffer.c
wid-edit.el fns.c vc.el rfc2047.el bindings.el cus-start.el buffer.c
byte-opt.el bytecomp.el and 729 other files
Dave Pearson: wrote 5x5.el quickurl.el
@ -475,10 +478,9 @@ David J. Mackenzie: changed configure.in etags.c fakemail.c movemail.c
etags-vmslib.c fortran.el hexl.c isearch.el and 12 other files
David Kastrup: changed greek.el replace.el search.c ange-ftp.el faq.texi
calc.el meta-mode.el process.c search.texi DEBUG MAILINGLISTS
Makefile.in autoload.el browse-url.el buffer.c building.texi
calc-alg.el configure.in cus-theme.el desktop.el dispnew.c
and 21 other files
help.el mouse.el Makefile.in calc.el desktop.el keymaps.texi
meta-mode.el process.c search.texi DEBUG MAILINGLISTS autoload.el
browse-url.el buffer.c building.texi calc-alg.el and 30 other files
David K,Ae(Bgedal: wrote tempo.el
and changed sendmail.el xmenu.c
@ -535,6 +537,8 @@ Deepak Goel: changed README ada-mode.el ada-xref.el appt.el apropos.el
Denis Howe: wrote browse-url.el
Denis St,A|(Bnkel: changed ibuf-ext.el
Derek Atkins: changed pgg-pgp.el
Derek L. Davies: changed gud.el
@ -607,7 +611,7 @@ Eli Zaretskii: wrote codepage.el rxvt.el tty-colors.el
and changed msdos.c Makefile.in files.el makefile.w32-in info.el fileio.c
startup.el mainmake.v2 config.bat menu-bar.el pc-win.el simple.el
internal.el msdos.h xfaces.c frame.c rmail.el dosfns.c faces.el
frame.el emacs.c and 514 other files
frame.el emacs.c and 517 other files
Emanuele Giaquinta: changed rxvt.el configure.in etags.c frame.el
sh-script.el text.texi
@ -802,7 +806,7 @@ Glenn Morris: changed f90.el diary-lib.el calendar.el fortran.el
calendar.texi appt.el sh-script.el timeclock.el cal-menu.el
cal-hebrew.el cal-islam.el files.el holidays.el programs.texi
scroll-all.el startup.el cal-coptic.el cal-julian.el cal-move.el
cal-tex.el cal-x.el and 36 other files
cal-tex.el cal-x.el and 37 other files
Glynn Clements: wrote gamegrid.el snake.el tetris.el
@ -966,9 +970,9 @@ and changed bytecode.c mail-extr.el subr.el
Jan Dj,Ad(Brv: wrote dnd.el x-dnd.el
and changed gtkutil.c xterm.c xfns.c xmenu.c xterm.h gtkutil.h
configure.in keyboard.c Makefile.in config.in configure frames.texi
emacs.c x-win.el xselect.c alloc.c xlwmenu.c startup.el xdisp.c
xresources.texi fileio.c and 171 other files
configure.in keyboard.c Makefile.in config.in frames.texi configure
x-win.el emacs.c xselect.c alloc.c xlwmenu.c startup.el xdisp.c
xresources.texi cus-start.el and 172 other files
Jan Nieuwenhuizen: changed info.el TUTORIAL.nl emacs.c emacsclient.c
gnus-start.el gud.el nnmh.el server.el startup.el
@ -990,13 +994,13 @@ Jason Rumney: wrote w32-vars.el
and changed w32fns.c w32term.c w32menu.c w32-win.el w32term.h
makefile.w32-in w32.c w32bdf.c w32-fns.el w32select.c w32console.c
w32gui.h w32proc.c keyboard.c mule-cmds.el emacs.c fileio.c w32bdf.h
w32inevt.c config.nt configure.bat and 78 other files
w32inevt.c config.nt configure.bat and 79 other files
Jay Belanger: changed calc.texi calc.el calc-ext.el calc-embed.el
calc-aent.el calc-prog.el calc-arith.el calc-help.el calc-lang.el
calcalg2.el calc-graph.el calc-store.el calc-units.el calc-misc.el
calc-yank.el calc-alg.el calc-poly.el calccomp.el calc-mode.el
calc-rewr.el calc-sel.el and 26 other files
calcalg2.el COPYING calc-graph.el calc-store.el calc-units.el
calc-misc.el calc-yank.el calc-alg.el calc-poly.el calccomp.el
calc-mode.el calc-rewr.el and 34 other files
Jay K. Adams: wrote jka-cmpr-hook.el jka-compr.el
@ -1006,6 +1010,8 @@ Jean-Philippe Theberge: wrote thumbs.el
Jeff Dwork: changed ehelp.el facemenu.el
Jeff Miller: changed appt.el
Jeff Morgenthaler: changed flow-ctrl.el vt200.el vt201.el vt220.el
vt240.el
@ -1101,10 +1107,10 @@ Joel Ray Holveck: changed gnus-sum.el info.el
Joev Dubach: changed nntp.el
Johan Bockg,Ae(Brd: changed erc.el erc-backend.el cl-macs.el erc-match.el
erc-nickserv.el erc-ring.el erc-speak.el erc-track.el align.el
calendar.el cl.texi custom.el dired-aux.el display.texi erc-bbdb.el
erc-button.el erc-compat.el erc-dcc.el erc-list.el erc-log.el
erc-nicklist.el and 9 other files
erc-nickserv.el erc-ring.el erc-speak.el erc-track.el simple.el
align.el calendar.el cl.texi custom.el dired-aux.el display.texi
erc-bbdb.el erc-button.el erc-compat.el erc-dcc.el erc-list.el
erc-log.el and 10 other files
Johan Vromans: wrote forms-d2.el forms.el iso-acc.el
and changed complete.el
@ -1203,7 +1209,7 @@ and changed files.el perl-mode.el
Juanma Barranquero: changed makefile.w32-in help-fns.el subr.el faces.el
files.el w32fns.c cperl-mode.el replace.el simple.el eval.c
sh-script.el vhdl-mode.el comint.el org.el xdisp.c allout.el bs.el
desktop.el idlwave.el keyboard.c process.c and 549 other files
desktop.el idlwave.el keyboard.c process.c and 550 other files
Juergen Hoetzel: changed url-handlers.el
@ -1217,8 +1223,8 @@ Jure Cuhalev: changed ispell.el
Juri Linkov: changed info.el simple.el isearch.el replace.el compile.el
faces.el display.texi grep.el descr-text.el cus-edit.el dired.el
dired-aux.el edebug.el files.el lisp-mode.el lisp.el mule.el
compare-w.el desktop.el files.texi font-lock.el and 220 other files
dired-aux.el edebug.el files.el lisp-mode.el lisp.el modes.texi mule.el
compare-w.el desktop.el files.texi and 220 other files
Justin Sheehy: changed gnus-sum.el nntp.el
@ -1246,9 +1252,9 @@ Kailash C. Chowksey: changed HELLO Makefile.in ind-util.el kannada.el
Karl Berry: changed info.texi emacs.texi elisp.texi emacs-xtra.texi
filelock.c anti.texi building.texi cmdargs.texi copyright.el
customize.texi dired.c faq.texi gnu.texi help.texi macos.texi
minibuf.texi msdog.texi mule.texi sending.texi texinfo.el texinfo.tex
and 64 other files
custom.texi customize.texi dired.c display.texi faq.texi frames.texi
gnu.texi help.texi macos.texi minibuf.texi msdog.texi mule.texi
and 65 other files
Karl Chen: changed files.el align.el cc-vars.el gnus-art.el help-mode.el
jka-cmpr-hook.el make-mode.el perl-mode.el python.el tex-mode.el
@ -1278,7 +1284,7 @@ Katsuhiro Hermit Endo: changed gnus-spec.el
Katsumi Yamaoka: wrote canlock.el
and changed gnus-art.el message.el gnus-sum.el gnus.texi mm-decode.el
mm-view.el gnus-util.el gnus-msg.el gnus.el mm-util.el lpath.el
gnus-start.el gnus-group.el mm-uu.el rfc2047.el dgnushack.el
gnus-start.el rfc2047.el gnus-group.el mm-uu.el dgnushack.el
gnus-agent.el nntp.el mml.el nnrss.el nnheader.el and 71 other files
Kaveh R. Ghazi: changed delta88k.h xterm.c
@ -1316,7 +1322,7 @@ Ken Stevens: wrote ispell.el
Kenichi Handa: wrote cyrillic.el isearch-x.el py-punct.el pypunct-b5.el
quail.el thai-word.el
and changed coding.c mule-cmds.el mule.el charset.c fileio.c xterm.c
fns.c ccl.c mule-conf.el Makefile.in fontset.c charset.h coding.h
fns.c ccl.c Makefile.in mule-conf.el fontset.c charset.h coding.h
fontset.el mule-diag.el xdisp.c editfns.c process.c insdel.c
japanese.el characters.el and 277 other files
@ -1361,10 +1367,10 @@ and changed info-look.el info.el gnus-art.el gnus-sum.el mailcap.el
Kim F. Storm: wrote bindat.el cua-base.el cua-gmrk.el cua-rect.el
ido.el keypad.el kmacro.el
and changed xdisp.c dispextern.h simple.el xterm.c window.c keyboard.c
process.c w32term.c lisp.h subr.el dispnew.c fringe.c macterm.c
display.texi alloc.c fns.c xfaces.c xfns.c xterm.h .gdbinit buffer.c
and 235 other files
and changed xdisp.c dispextern.h simple.el window.c xterm.c keyboard.c
process.c w32term.c dispnew.c subr.el lisp.h fringe.c macterm.c
display.texi fns.c alloc.c xfaces.c xfns.c xterm.h keymap.c .gdbinit
and 238 other files
Kim-Minh Kaplan: changed gnus-picon.el gnus-sum.el gnus-start.el
gnus-win.el gnus-xmas.el gnus.texi message.el nndraft.el nnml.el
@ -1486,7 +1492,7 @@ and changed emacsclient.c emacsserver.c etags.c lisp.h movemail.c
Maciek Pasternacki: changed nnrss.el
Magnus Henoch: changed ispell.el
Magnus Henoch: changed ispell.el rcirc.el
Manuel Serrano: wrote flyspell.el
@ -1584,10 +1590,10 @@ Martin Lorentzon: changed vc.el vc-cvs.el vc-hooks.el vc-rcs.el
Martin Neitzel: changed sc.el
Martin Rudalics: changed cus-edit.el wid-edit.el font-lock.el insdel.c
syntax.c buffer.c buffer.h casefiddle.c cus-start.el custom.el
editfns.c fileio.c files.el find-func.el hideif.el info.el jit-lock.el
lisp-mode.el lisp.h midnight.el mouse.el and 5 other files
Martin Rudalics: changed cus-edit.el wid-edit.el cus-start.el files.el
font-lock.el insdel.c syntax.c buffer.c buffer.h casefiddle.c custom.el
dispextern.h editfns.c eldoc.el fileio.c find-func.el hideif.el info.el
jit-lock.el lisp-mode.el lisp.h and 13 other files
Martin Stjernholm: wrote cc-bytecomp.el
and changed cc-engine.el cc-cmds.el cc-langs.el cc-defs.el cc-mode.el
@ -1604,8 +1610,8 @@ and changed gnuspost.el
Masatake Yamato: wrote cc-subword.el ld-script.el
and changed etags.el asm-mode.el xdisp.c bindings.el hexl.el man.el
simple.el wid-edit.el compile.el faces.el pcvs.el register.el
ruler-mode.el add-log.el buffer.c cus-face.el dired-x.el display.texi
simple.el wid-edit.el add-log.el compile.el faces.el pcvs.el
register.el ruler-mode.el buffer.c cus-face.el dired-x.el display.texi
etags.c font-lock.el gdb-ui.el and 57 other files
Masayuki Ataka: changed texinfmt.el texinfo.el characters.el make-mode.el
@ -1691,7 +1697,7 @@ Michael Olson: changed erc.el erc-backend.el Makefile erc.texi
erc-stamp.el erc-log.el erc-autoaway.el erc-identd.el erc-track.el
erc-match.el erc-dcc.el erc-notify.el erc-goodies.el erc-ibuffer.el
erc-list.el erc-pcomplete.el erc-spelling.el erc-bbdb.el erc-compat.el
erc-nicklist.el erc-*.el and 41 other files
erc-nicklist.el and 42 other files
Michael Piotrowski: changed ps-print.el
@ -1713,14 +1719,17 @@ Michael Sperber [Mr. Preprocessor]: changed aix3-1.h aix4-2.h
Michael Staats: wrote pc-select.el
Michael Welsh Duggan: changed lisp.h w32term.c buffer.c gnus-spec.el
keyboard.c nnmail.el termhooks.h url-http.el w32-win.el w32fns.c
w32menu.c w32term.h xdisp.c xterm.c
Michael Welsh Duggan: changed lisp.h sh-script.el w32term.c buffer.c
gnus-spec.el keyboard.c nnmail.el termhooks.h url-http.el w32-win.el
w32fns.c w32menu.c w32term.h xdisp.c xterm.c
Michal Jankowski: changed insdel.c keyboard.c
Micha,Ak(Bl Cadilhac: changed ispell.el dispnew.c make-mode.el pong.el
print.c process.c startup.el
Michal Nazarewicz: changed ispell.el
Micha,Ak(Bl Cadilhac: changed ispell.el cus-edit.el dispnew.c ido.el info.el
life.el lpr.el make-mode.el pong.el print.c process.c startup.el
uni-input.el
Michelangelo Grigni: wrote ffap.el
and changed gnus-score.el
@ -1750,8 +1759,8 @@ Mikio Nakajima: changed ring.el viper-util.el
Milan Zamazal: wrote czech.el glasses.el tildify.el
and changed slovak.el abbrev.el compile.el filecache.el files.el
Miles Bader: wrote button.el image-file.el macroexp.el mb-depth.el
minibuf-eldef.el rfn-eshadow.el
Miles Bader: wrote button.el image-file.el macroexp.el minibuf-eldef.el
rfn-eshadow.el
and changed comint.el faces.el simple.el editfns.c xfaces.c info.el
xdisp.c minibuf.c wid-edit.el xterm.c subr.el window.el cus-edit.el
diff-mode.el dispextern.h xfns.c help.el lisp.h quick-install-emacs
@ -1760,7 +1769,7 @@ and changed comint.el faces.el simple.el editfns.c xfaces.c info.el
Miyashita Hisashi: changed ccl.c coding.c coding.h mule-cmds.el
mule-conf.el mule.el pop3.el
Miyoshi Masanori: changed mouse.el xdisp.c
Miyoshi Masanori: changed mouse.el smtpmail.el xdisp.c
Morioka Tomohiko: changed rmail.el rmailout.el rmailsum.el fns.c
message.el nnheader.el nnmail.el rmailkwd.el smiley.el
@ -1858,6 +1867,8 @@ Olivier Lecarme: changed make-mode.el ange-ftp.el apropos.el bibtex.el
Olli Savia: changed etags.c syssignal.h
Osamu Yamane: changed smtpmail.el
Oscar Figueiredo: wrote eudc-bob.el eudc-export.el eudc-hotlist.el
eudc-vars.el eudc.el eudcb-bbdb.el eudcb-ldap.el eudcb-ph.el ldap.el
and changed ph.el
@ -1879,7 +1890,7 @@ Paul Eggert: wrote cal-dst.el rcs2log vcdiff
and changed editfns.c vc.el Makefile.in configure.in vc-hooks.el data.c
emacs.c gnus.el calendar.el config.in floatfns.c process.c sysdep.c
dired.el xterm.c callproc.c fileio.c filelock.c lread.c print.c
rmail.el and 287 other files
rmail.el and 290 other files
Paul Fisher: changed fns.c
@ -2030,9 +2041,9 @@ and changed gnus-art.el gnus-msg.el gnus.texi message.el nnmail.el
Reiner Steib: wrote gmm-utils.el
and changed gnus-art.el message.el gnus.texi gnus-sum.el gnus.el
gnus-group.el mml.el gnus-faq.texi gnus-score.el gnus-start.el
gnus-util.el gnus-msg.el message.texi gnus-agent.el files.el mm-util.el
gnus-util.el gnus-msg.el message.texi gnus-agent.el mm-util.el files.el
spam-report.el nnweb.el spam.el deuglify.el mm-decode.el
and 156 other files
and 161 other files
Remek Trzaska: changed gnus-ems.el
@ -2060,8 +2071,8 @@ Richard M. Stallman: wrote [The original GNU emacs and numerous files]
easymenu.el font-lock.el image-mode.el menu-bar.el paren.el
and changed keyboard.c files.el simple.el xterm.c xdisp.c rmail.el
fileio.c process.c sysdep.c xfns.c buffer.c Makefile.in window.c
configure.in subr.el editfns.c emacs.c sendmail.el startup.el info.el
dispnew.c and 1331 other files
configure.in subr.el startup.el emacs.c editfns.c sendmail.el info.el
dispnew.c and 1334 other files
Richard Mlynarik: wrote cl-indent.el ebuff-menu.el ehelp.el env.c
rfc822.el terminal.el yow.el
@ -2126,7 +2137,7 @@ Romain Francoise: changed faq.texi dired-x.el ibuf-ext.el compile.el
message.el puresize.h replace.el files.texi gnus-fun.el gnus.texi
help-fns.el make-dist rcirc.el subr.el Makefile.in antlr-mode.el
bookmark.el buffer.c comint.el diary-lib.el dired.el
and 119 other files
and 121 other files
Roman Belenov: changed which-func.el
@ -2174,8 +2185,8 @@ Satyaki Das: wrote mh-acros.el mh-gnus.el mh-junk.el mh-search.el
and changed mh-e.el mh-utils.el mh-seq.el mh-index.el mh-comp.el
mh-mime.el mh-customize.el mh-loaddefs.el mh-funcs.el Makefile
mh-alias.el mh-pick.el mh-unit.el mh-init.el mh-identity.el mh-make.el
mh-xemacs-toolbar.el mh-xemacs-compat.el mh-inc.el highlight.xpm
mh-func.el and 7 other files
mh-xemacs-toolbar.el mh-xemacs-compat.el pgg-gpg.el mh-inc.el
highlight.xpm and 7 other files
Schlumberger Technology Corporation: changed gud.el
@ -2224,8 +2235,8 @@ Simon Josefsson: wrote dig.el dns-mode.el flow-fill.el fringe.el imap.el
mml-sec.el mml-smime.el nnfolder.el nnimap.el nnml.el rfc2104.el
sieve-manage.el sieve-mode.el sieve.el smime.el starttls.el tls.el
url-imap.el
and changed message.el gnus-sum.el gnus-art.el smtpmail.el pgg-gpg.el
pgg.el gnus-agent.el mml2015.el mml.el mm-decode.el mml1991.el
and changed message.el gnus-sum.el gnus-art.el smtpmail.el pgg.el
pgg-gpg.el gnus-agent.el mml2015.el mml.el mm-decode.el mml1991.el
gnus-group.el gnus-msg.el gnus.el pgg-pgp5.el gnus-cache.el
gnus-sieve.el browse-url.el gnus-int.el mail-source.el pgg-parse.el
and 91 other files
@ -2242,7 +2253,8 @@ and changed comint.el font-lock.el shell.el rmail.el fortran.el
Skip Collins: changed w32fns.c w32term.c w32term.h
Slawomir Nowaczyk: changed TUTORIAL.pl emacs.py flyspell.el ls-lisp.el
Slawomir Nowaczyk: changed python.el TUTORIAL.pl emacs.py flyspell.el
ls-lisp.el
Spencer Thomas: changed dabbrev.el emacsclient.c emacsserver.c gnus.texi
server.el tcp.c unexec.c
@ -2253,15 +2265,17 @@ Stefan Monnier: wrote bibtex.el cvs-status.el diff-mode.el log-edit.el
log-view.el pcvs-defs.el pcvs-info.el pcvs-parse.el pcvs-util.el
reveal.el smerge-mode.el
and changed vc.el font-lock.el pcvs.el newcomment.el subr.el lisp.h
keyboard.c tex-mode.el fill.el keymap.c alloc.c compile.el
easy-mmode.el files.el simple.el info.el regex.c syntax.c vc-hooks.el
xdisp.c sh-script.el and 509 other files
keyboard.c keymap.c tex-mode.el fill.el alloc.c compile.el files.el
regex.c easy-mmode.el simple.el info.el syntax.c xdisp.c vc-hooks.el
sh-script.el and 511 other files
Stephan Stahl: changed which-func.el buff-menu.el buffer.c dired-x.texi
ediff-mult.el
Stephen A. Wood: changed fortran.el
Stephen Berman: changed allout.el
Stephen Eglen: wrote iswitchb.el mspools.el
and changed diary-lib.el locate.el octave-inf.el replace.el hexl.el
info-look.el sendmail.el spell.el uce.el MORE.STUFF add-log.el
@ -2269,8 +2283,9 @@ and changed diary-lib.el locate.el octave-inf.el replace.el hexl.el
bib-mode.el bruce.el c-mode.el ccl.el and 71 other files
Stephen Gildea: wrote mh-funcs.el mh-pick.el refcard.tex
and changed time-stamp.el mh-e.el mh-utils.el mh-comp.el mh-customize.el
fileio.c files.el fortran.el mh-e.texi mh-mime.el mwheel.el tex-mode.el
and changed time-stamp.el mh-e.el mh-comp.el mh-utils.el mh-customize.el
fileio.c files.el fortran.el mh-e.texi mh-junk.el mh-mime.el mwheel.el
tex-mode.el
Stephen J. Turnbull: changed ediff-init.el strings.texi subr.el
@ -2396,7 +2411,7 @@ Tim Van Holder: changed Makefile.in compile.el configure.in which-func.el
Tobias C. Rittweiler: changed font-lock.el
Toby Allsopp: changed eudc.el
Toby Allsopp: changed ldap.el eudc.el
Toby Speight: changed window.el
@ -2527,7 +2542,7 @@ and changed latin-pre.el pl-refcard.ps pl-refcard.tex refcard-pl.ps
Wolfgang Glas: changed unexsgi.c
Wolfgang Jenkner: changed pcvs.el
Wolfgang Jenkner: changed conf-mode.el pcvs.el
Wolfgang Rupprecht: wrote float-sup.el floatfns.c sup-mouse.el
and changed process.c alloc.c callint.c config.h.in config.in
@ -2544,10 +2559,10 @@ Xavier Maillard: changed gnus-faq.texi gnus-score.el
Yagi Tatsuya: changed gnus-art.el gnus-start.el
Yamamoto Mitsuharu: changed macterm.c mac-win.el macfns.c mac.c macterm.h
Yamamoto Mitsuharu: changed macterm.c macfns.c mac-win.el mac.c macterm.h
macgui.h image.c macmenu.c macselect.c keyboard.c makefile.MPW xdisp.c
emacs.c macos.texi xfaces.c Makefile.in config.h darwin.h dispextern.h
w32term.c Info.plist and 61 other files
emacs.c config.h macos.texi xfaces.c Makefile.in darwin.h dispextern.h
w32term.c INSTALL and 66 other files
Yann Dirson: changed imenu.el

4
ChangeLog
View file

@ -1,3 +1,7 @@
2006-10-03 Kim F. Storm <storm@cua.dk>
* AUTHORS: Regenerate.
2006-09-30 Eli Zaretskii <eliz@gnu.org>
* configure: Regenerated.

19
admin/FOR-RELEASE
View file

@ -2,12 +2,13 @@ Tasks needed before the next release.
* TO BE DONE SHORTLY BEFORE RELEASE
** Update release dates of manuals.
** Check for widow and orphan lines in manuals;
make sure all the pages really look ok in the manual as formatted.
** Check for text in manuals that assumes current version is 21.
** Update AUTHORS.
[Done 2006-10-03]
** Regenerate the postscript files of the reference cards in etc.
@ -34,22 +35,16 @@ These don't need to be fixed to start pretest, but we call the
attention of Windows users to fixing them.
** Drew Adams 12 Aug bug rpt: overlay display artifact: trace left behind
Windows only bug.
Windows only bug. Bug appears only when Cleartype enabled, probably related
to the hack introduced on 2005-07-01 to fix some other Cleartype problem.
** henman@it.to-be.co.jp 09 Aug 2006: ispell.el problem on Cygwin.
(Did we decide that is unreproducible?)
** kitty@dre.vanderbilt.edu Sep 20 says make-frame ignores left and top.
* BUGS
** Enrico Schwass, Sep 13 help-gnu-emacs: display japanese outputdoesnt work quite right
** XIM hotkey doesn't work in Emacs with gnome-settings-demon.
** jpff@codemist.co.uk, Sep 29: rmail g gets Wrong type argument error.
** M.P.Hodges@rl.ac.uk Sep 30: list-processes and process sentinels not run.
** hashiz@tomba.meridiani.jp, Oct 6: bootstrap failure on FreeBSD 6.2
Can't be reproduced on GNU/Linux.
* DOCUMENTATION

7
admin/make-tarball.txt
View file

@ -62,8 +62,11 @@ For each step, check for possible errors.
echo directory: emacs/pretest > FILE.directive (for a pretest)
echo directory: emacs > FILE.directive (for a release)
gpg --clearsign FILE.directive
Upload by anonymous ftp to ftp://ftp-upload.gnu.org/incoming/ftp/
the files FILE, FILE.sig, FILE.directive.asc
Upload by anonymous ftp to ftp://ftp-upload.gnu.org/ the files FILE,
FILE.sig, FILE.directive.asc.
For a release, place the files in the /incoming/ftp directory.
For a pretest, place the files in /incoming/alpha instead, so that
they appear on ftp://alpha.gnu.org/.
13. After five minutes, verify that the files are visible at
ftp://alpha.gnu.org/gnu/emacs/pretest/ for a pretest, at

130
etc/ChangeLog
View file

@ -1,3 +1,16 @@
2006-10-09 David Kastrup <dak@gnu.org>
* DEVEL.HUMOR: Add the topic line for last entry since that was
what the joke was about.
2006-10-07 Ognyan Kulev <ogi@fmi.uni-sofia.bg>
* TUTORIAL.bg: Synchronize with TUTORIAL.
2006-10-06 Juanma Barranquero <lekktu@gmail.com>
* DEVEL.HUMOR: New file.
2006-09-30 Chong Yidong <cyd@stupidchicken.com>
* PROBLEMS: Document Emacs/XIM/gnome-settings-terminal clash.
@ -26,7 +39,7 @@
2006-09-15 David Kastrup <dak@gnu.org>
* NEWS: explain new behavior and arguments of `key-binding' and
* NEWS: Explain new behavior and arguments of `key-binding' and
`command-remapping'.
2006-09-11 Paul Eggert <eggert@cs.ucla.edu>
@ -216,8 +229,7 @@
2006-06-19 Carsten Dominik <dominik@science.uva.nl>
* orgcard.tex (section{Clocking Time}): Add new clocking
commands.
* orgcard.tex (section{Clocking Time}): Add new clocking commands.
(section{Structure Editing}): Add global archiving command.
2006-06-14 Thien-Thi Nguyen <ttn@gnu.org>
@ -304,8 +316,7 @@
2006-05-24 Carsten Dominik <dominik@science.uva.nl>
* orgcard.tex: (section{Motion}): Added the item navigation
commands.
* orgcard.tex (section{Motion}): Added the item navigation commands.
(section{Publishing}): New section.
(section{Links}): Documented elisp and shell links.
@ -317,8 +328,7 @@
* pl-refcard.tex (Local variables): Add compile-command.
* ru-refcard.tex (Local variables): Add compile-command and
coding.
* ru-refcard.tex (Local variables): Add compile-command and coding.
* pt-br-refcard.tex: Don't \input psfig.
@ -332,7 +342,7 @@
* pl-refcard.tex (section{Info}): Ditto. Translation suggested by
Slawomir Nowaczyk <slawomir.nowaczyk.847@student.lu.se>.
* cs-refcard.tex (section{Info}): Use `s' instead of `M-s'. Entry
* cs-refcard.tex (section{Info}): Use `s' instead of `M-s'. Entry
for `i' is not translated yet.
* pt-br-refcard.tex (section{Info}): Ditto.
@ -413,7 +423,7 @@
2006-04-11 Carsten Dominik <dominik@science.uva.nl>
* orgcard.tex: (section{Tables}): Document column narrowing.
* orgcard.tex (section{Tables}): Document column narrowing.
(section{Links}): Document bracket links.
2006-04-11 Kenichi Handa <handa@m17n.org>
@ -442,11 +452,11 @@
New bitmaps for new images.
* images/refresh.xpm, images/sort-ascending.xpm,
* images/sort-descending.xpm: Update with GTK 2.x images. Note
* images/sort-descending.xpm: Update with GTK 2.x images. Note
that the default GTK icons are not overridden by the GNOME theme
due to a bug which was fixed in GNOME 2.15. Once GNOME 2.16 is in
due to a bug which was fixed in GNOME 2.15. Once GNOME 2.16 is in
wide circulation, then the GTK icons should be replaced with the
equivalent GNOME icons. Until then, we should be consistent with
equivalent GNOME icons. Until then, we should be consistent with
GTK first, then GNOME.
* images/mail/repack.xpm, images/mail/reply-from.xpm:
@ -504,9 +514,9 @@
2006-03-11 Bill Wohler <wohler@newt.com>
* NEWS: Document `image-load-path-for-library'. Note that all
* NEWS: Document `image-load-path-for-library'. Note that all
images have been moved from lisp into etc/images in `find-image'
item. Fix typo in `copy-tree'.
item. Fix typo in `copy-tree'.
2006-03-09 Reiner Steib <Reiner.Steib@gmx.de>
@ -528,7 +538,7 @@
2006-02-22 Carsten Dominik <dominik@science.uva.nl>
* orgcard.tex: (section{Links}): Rewritten to cover the modified
* orgcard.tex (section{Links}): Rewritten to cover the modified
link system.
2006-02-18 Bill Wohler <wohler@newt.com>
@ -602,11 +612,11 @@
2006-01-23 Michael Albinus <michael.albinus@gmx.de>
* NEWS: tramp can be removed by M-x tramp-unload-tramp.
* NEWS: Tramp can be removed by M-x tramp-unload-tramp.
2006-01-15 Dan Nicolaescu <dann@ics.uci.edu>
* e/eterm-color.ti: Re-enable the ri entry. Add kich1.
* e/eterm-color.ti: Re-enable the ri entry. Add kich1.
2006-01-13 Richard M. Stallman <rms@gnu.org>
@ -711,7 +721,7 @@
2005-10-27 Dan Nicolaescu <dann@ics.uci.edu>
* e/eterm-color.ti (el1): Undo 2005-10-23 change.
Add some comments on how to update this file. Add ri
Add some comments on how to update this file. Add ri
capability that has long been supported by term.el.
2005-10-25 Nick Roberts <nickrob@snap.net.nz>
@ -738,7 +748,7 @@
2005-10-17 Bill Wohler <wohler@newt.com>
Moved all remaining images from lisp/toolbar to etc/images. The
Moved all remaining images from lisp/toolbar to etc/images. The
low resolution images were placed in their own directory (low-color).
* images/attach.*, images/cancel.*, images/close.*:
@ -885,7 +895,7 @@
* GNUS-NEWS: Fix IDNA notes.
2005-09-27 Jay Belanger <belanger@truman.edu>
2005-09-27 Jay Belanger <belanger@truman.edu>
* calccard.tex: Update `versionnumber', remove `versiondate'.
(Error Recovery): Refer to "initial state" rather than "default state".
@ -1292,7 +1302,7 @@
2004-09-26 Dan Nicolaescu <dann@ics.uci.edu>
* e/eterm.ti: Comment out smcup, rmcup. Add kbs, kdch1, rc, sc.
* e/eterm.ti: Comment out smcup, rmcup. Add kbs, kdch1, rc, sc.
Reformat.
* e/eterm: Regenerate.
@ -1403,7 +1413,7 @@
2004-06-10 Lars Hansen <larsh@math.ku.dk>
* NEWS: Describe dired-omit-mode. Describe desktop package changes.
* NEWS: Describe dired-omit-mode. Describe desktop package changes.
2004-05-29 Steven Tamm <steventamm@mac.com>
@ -1426,7 +1436,7 @@
2004-04-13 Marcelo Toledo <marcelo@gnu.org>
* TUTORIAL.pt_BR: initial check-in.
* TUTORIAL.pt_BR: Initial check-in.
2004-05-06 Dave Love <fx@gnu.org>
@ -1790,7 +1800,7 @@
2001-08-05 Pavel Jan,Am(Bk <Pavel@Janik.cz>
* TUTORIAL.cs, TUTORIAL.sk, cs-refcard.tex, sk-refcard.tex: e-mail
* TUTORIAL.cs, TUTORIAL.sk, cs-refcard.tex, sk-refcard.tex: E-mail
address of Milan Zamazal changed.
2001-08-04 Pavel Jan,Am(Bk <Pavel@Janik.cz>
@ -1904,7 +1914,7 @@
2001-01-08 Kevin Gallagher <kevingal@onramp.net>
* edt-user.doc: Updated to reflect EDT Emulation version 4.0
enhancements.
enhancements.
2000-12-29 Gerd Moellmann <gerd@gnu.org>
@ -2229,7 +2239,7 @@
1995-06-28 Eric S. Raymond <esr@spiff.gnu.ai.mit.edu>
* termcap.dat, termcap.ucb: deleted and replaced.
* termcap.dat, termcap.ucb: Deleted and replaced.
* termcap: New termcap file from the ncurses project; bigger,
better, brighter, does away with waxy yellow buildup. Email
@ -2322,7 +2332,7 @@
1993-06-16 Jim Blandy (jimb@wookumz.gnu.ai.mit.edu)
Bring mumbleclean targets into conformance with GNU coding standards.
Bring mumbleclean targets into conformance with GNU coding standards.
* Makefile (distclean): Don't remove backup and autosave files.
These are easy to get rid of in other ways, and a pain to lose.
(mostlyclean, realclean): New targets.
@ -2345,7 +2355,7 @@
1993-05-22 Jim Blandy (jimb@geech.gnu.ai.mit.edu)
* Version 19.7 released.
* Version 19.7 released.
1993-05-19 Jim Blandy (jimb@wookumz.gnu.ai.mit.edu)
@ -2366,7 +2376,7 @@
out of date. This file referenced LNEWS when it should have
said news.texi; fixed.
news.texi: invocation-name now exists.
* news.texi: invocation-name now exists.
1993-03-27 Eric S. Raymond (eric@geech.gnu.ai.mit.edu)
@ -2386,7 +2396,7 @@
1993-03-19 Eric S. Raymond (eric@geech.gnu.ai.mit.edu)
* MACHINES: Deleted some VMS caveats. If the src and lisp
* MACHINES: Deleted some VMS caveats. If the src and lisp
ChangeLogs are correct, dired and mail and process control are now
fully supported.
@ -2408,7 +2418,7 @@
I nuked it. Let the file mod date serve. Merged in APOLLO and
SUNBUG files. Changed references to 18.* to past tense.
* emacs.names: merged into JOKES. I faked a mail header from the
* emacs.names: Merged into JOKES. I faked a mail header from the
Unknown User to delimit the first (unheaded) bit.
* Makefile (relock, unlock): New productions.
@ -2420,30 +2430,30 @@
the Emacs distribution, I have the following changes in the etc
directory:
* CHARACTERS: merged into TO-DO file under the heading "Long Range:"
* CHARACTERS: Merged into TO-DO file under the heading "Long Range:"
* DIFF, CCADIFF and GOSDIFF: merged into a new outline file titled
* DIFF, CCADIFF, GOSDIFF: Merged into a new outline file titled
OTHER.EMACSES. The present names don't really convey anything.
Various key bindings and feature descriptions have been updated.
* NICKLES.WORTH. Nuked. This is copyrighted material that could land
* NICKLES.WORTH: Nuked. This is copyrighted material that could land
FSF in hot water.
* INTERVAL.IDEAS: Nuked. RMS's thinking, and indeed the
* INTERVAL.IDEAS: Nuked. RMS's thinking, and indeed the
implementation of intervals, have progressed way beyond this.
* RCP: Nuked. It no longer said anything but "Ooops, sorry!"
* RCP: Nuked. It no longer said anything but "Ooops, sorry!"
* ED.WORSHIP, GNU.JOKES: merged into a mailbox called JOKES.
* ED.WORSHIP, GNU.JOKES: Merged into a mailbox called JOKES.
Future jokes can accumulate there.
* DISTRIB: the actual domestic order form is now ORDERS.USA.
* DISTRIB: The actual domestic order form is now ORDERS.USA.
The DISTRIB text now mentions 19.
* ORDERS.USA: created. This is just the order form. DISTRIB
* ORDERS.USA: Created. This is just the order form. DISTRIB
has a pointer to it at the beginning.
* EUROPE: renamed to ORDERS.EUROPE. DISTRIB now has a pointer
* EUROPE: Renamed to ORDERS.EUROPE. DISTRIB now has a pointer
to it at the beginning.
* OOOONEWS, OOOONEWS: Nuked. It's version 19 --- nobody needs the
@ -2455,7 +2465,7 @@
1993-03-17 Eric S. Raymond (eric@mole.gnu.ai.mit.edu)
* XENIX: nuked (moved to =XENIX). The hackery it describes is
* XENIX: Nuked (moved to =XENIX). The hackery it describes is
no longer necessary in the presence of 19's function-key-map
feature; I've added an explanation to the beginning of the file.
@ -2560,7 +2570,7 @@
1992-03-31 Jim Blandy (jimb@pogo.cs.oberlin.edu)
* lib-src/Makefile, etc/MACHINES, etc/NEWS: Changed references to
* lib-src/Makefile, etc/MACHINES, etc/NEWS: Changed references to
`config.emacs' to `configure'.
* lib-src/Makefile: Adjusted for renaming of share-lib to etc.
@ -2656,7 +2666,7 @@
* etags.c (C_entries): Process token before handling end of line.
When inner loops reach end of line, just back up.
Let the real end of line processing happen in just one place.
(consider_token): Likewise.
(consider_token): Likewise.
1991-04-11 Jim Blandy (jimb@geech.gnu.ai.mit.edu)
@ -2727,7 +2737,7 @@
1990-08-30 David Lawrence (tale@pogo.ai.mit.edu)
* emacs.1: Add break before -nw option.
* emacs.1: Add break before -nw option.
1990-08-19 David J. MacKenzie (djm@apple-gunkies)
@ -2769,7 +2779,7 @@
1990-03-14 Joseph Arceneaux (jla@churchy.ai.mit.edu)
* etags.c (getit): Recognize '$' as beginning identifiers.
* etags.c (getit): Recognize '$' as beginning identifiers.
1990-02-22 David Lawrence (tale@pogo.ai.mit.edu)
@ -2891,15 +2901,15 @@
1989-04-18 Richard Stallman (rms@sugar-bombs.ai.mit.edu)
* loadst.c: on bsd4.3, use gettimeofday instead of CPUSTATES.
* loadst.c: On bsd4.3, use gettimeofday instead of CPUSTATES.
1989-03-15 Jeff Peck (rms@sugar-bombs.ai.mit.edu)
* emacstool.c: setenv IN_EMACSTOOL=t, TERM=sun, TERMCAP=.
* emacsstool.1: update to document environment variables.
* emacsstool.1: Update to document environment variables.
1989-02-21 Mosur Mohan (email@notavailable)
1989-02-21 Mosur Mohan (email@notavailable)
* etags.c (PAS_funcs): New function.
@ -2913,7 +2923,7 @@
1989-02-15 Richard Stallman (rms@sugar-bombs.ai.mit.edu)
* etags.c: Prolog support from Sunichirou Sugou
* etags.c: Prolog support from Sunichirou Sugou.
1989-02-03 Richard Stallman (rms@sugar-bombs.ai.mit.edu)
@ -2926,7 +2936,7 @@
1989-01-19 Sam Kendall (email@notavailable)
* etags.c: Greatly rewritten for C++ support and for multiple tags
per line.
per line.
1989-01-03 Richard Stallman (rms@sugar-bombs.ai.mit.edu)
@ -2936,8 +2946,8 @@
1988-12-31 Richard Mlynarik (mly@rice-chex.ai.mit.edu)
* env.c: Add decl for my-index
* etags.c (file-entries): .oak => scheme
* env.c: Add decl for my-index.
* etags.c (file-entries): .oak => scheme
1988-12-30 Richard Stallman (rms@sugar-bombs.ai.mit.edu)
@ -2981,8 +2991,8 @@
1988-11-29 Richard Mlynarik (mly@pickled-brain.ai.mit.edu)
* movemail.c: Better error message when can't create tempname.
This file needs a great deal of extra error-checking and lucid reporting...
* movemail.c: Better error message when can't create tempname.
This file needs a great deal of extra error-checking and lucid reporting...
1988-11-16 Richard Stallman (rms@sugar-bombs.ai.mit.edu)
@ -3000,7 +3010,7 @@
1988-09-24 Richard Stallman (rms@gluteus.ai.mit.edu)
* etags.c (main): default setting of eflag was backwards.
* etags.c (main): Default setting of eflag was backwards.
1988-09-23 Richard Stallman (rms@sugar-bombs.ai.mit.edu)
@ -3065,8 +3075,8 @@
1988-05-13 Chris Hanson (cph@kleph)
* emacsclient.c: Delete references to unused variable `out'. This
caused a bus error when used under hp-ux.
* emacsclient.c: Delete references to unused variable `out'.
This caused a bus error when used under hp-ux.
1988-05-06 Richard Stallman (rms@frosted-flakes.ai.mit.edu)
@ -3083,7 +3093,7 @@
1988-04-28 Richard Stallman (rms@frosted-flakes.ai.mit.edu)
* movemail.c: #undef close, since config can #define it on V.3.
* emacsclient.c, fakemail.c, loadst.c, server.c: likewise.
* emacsclient.c, fakemail.c, loadst.c, server.c: Likewise.
1988-04-26 Richard Stallman (rms@lucky-charms.ai.mit.edu)
@ -3094,9 +3104,9 @@
1988-03-20 Richard M. Stallman (rms@wilson)
* server.c [not BSD and not HAVE_SYSVIPC]: fix error message.
* server.c [not BSD and not HAVE_SYSVIPC]: Fix error message.
* loadst.c (main) [XENIX]: use /usr/spool/mail, not /usr/mail.
* loadst.c (main) [XENIX]: Use /usr/spool/mail, not /usr/mail.
;; Local Variables:
;; coding: iso-2022-7bit

138
etc/DEVEL.HUMOR Normal file
View file

@ -0,0 +1,138 @@
---------------- -*- mode: text; coding: utf-8; fill-column: 70 -*- --
-- --
-- Humor (sometimes unintended) on the Emacs developer's list --
-- --
----------------------------------------------------------------------
"Is it legal for a `struct interval' to have a total_length field of
zero?"
"We can't be arrested for it as far as I know, but it is definitely
invalid for an interval to have zero length."
-- Miles Bader and RMS
----------------------------------------------------------------------
Re: lost argument and doc string
I remember when I lost an argument. Boy did that hurt! ;-).
-- RMS
----------------------------------------------------------------------
"'Cowardly' is not an adverb, although it looks like one. It is an
adjective. It makes a statement about general temperament, rather
than a specific occasion. I don't think Emacs has a general
temperament."
"Mine does."
-- RMS and Eli Zaretskii
----------------------------------------------------------------------
"In order to bring the user's attention to the minibuffer when an
item such as 'Edit -> Search' is activated from the menu, I was just
thinking that we could draw a big rectangle around the minibuffer,
blinking (or zooming in-and-out) until some input is typed in."
"How about dancing elephants?"
"They don't fit in my office."
"Well once the elephants are done, your office will be much...
bigger."
-- Stefan Monnier, Miles Bader and Kai Grossjohann
----------------------------------------------------------------------
I remember these versions as yard-rocks (is that between inch-pebbles
and mile-stones?).
-- Kai Grossjohann
----------------------------------------------------------------------
"I think it depends on video drivers. I cannot reproduce it on my
home PC, but I can at work."
"Can you try to find a workaround at work? (I guess you don't need
a homearound at home. ;-)"
-- Jason Rumney and RMS
----------------------------------------------------------------------
By the way, I also really really hate this unibyte/multibyte problem.
Sometimes I think I should have opposed to the introduction of such a
concept more strongly.
imagine there's no unibyte
it's easy if you try
no bytes below us
above us only chars
imagine all the people living in multibyte
-- Kenichi Handa
----------------------------------------------------------------------
I try to uphold the ideals that I was taught to value as an American,
but every year I get less and less help from the United States.
-- RMS
----------------------------------------------------------------------
"If the terminfo entry is most likely wrong, and we know it, then it
doesn't make sense to follow it."
"Nevertheless, until now, we always did."
"So.... should we not fix old bugs?"
"Why fix an old bug if you can write three new ones in the same
time?"
-- Miles Bader, Eli Zaretskii and David Kastrup
----------------------------------------------------------------------
[...] As is well known, people who speak American English tend to
be more resource-conscious and try to avoid wasting precious bits
transferring those redundant "u"s.
Think of the number of occurrences of "color" and "behavior" in the
Emacs tarball, multiply that by the number of times it'll be
downloaded, stored on hard disks, archived, ...that's a substantial
saving.
-- Stefan Monnier
----------------------------------------------------------------------
Re: Parent of a derived mode's keymap.
"I can't decide whether the title of this thread is more fitting for
a blues song or a pulp fiction booklet. It certainly projects drama."
"Hey, it says derived, not deprived."
"Actually, for some keymaps 'depraved' would fit better."
"I knew it! You're one of them vi lovers! There is nothing wrong
with Emacs using escape, meta, alt, control, and shift!"
-- David Kastrup and Lute Kamstra
----------------------------------------------------------------------
"Aren't user-defined constants useful in other languages?"
"The only user-defined constant is ignorance. (With programmers,
this is a variable concept ;-)"
-- Juanma Barranquero and Thien-Thi Nguyen
----------------------------------------------------------------------
"Uh, 'archaic' and 'alive' is not a contradiction."
"Yes it is. 'Archaic' does not mean 'old' or 'early'. It means
'obsolete'."
"'He arche' in Greek means 'the beginning'. John 1 starts off with
'En arche en ho Logos': in the beginning, there was the word. Now of
course we all know that Emacs was there before Word, but this might
have escaped John's notice."
-- David Kastrup and RMS
----------------------------------------------------------------------
Re: patch for woman (woman-topic-at-point)
"Sorry for the long message. I wanted to make the problem clear
also for people not familiar with `woman'."
"Most hackers, I take?
For a moment there I thought you had a patch that you could put on
a woman, and it would make her come right to the topic at point
without attempting any course of action that requires an advance
course in divination.
There'd be quite a sensational market for that, you know."
-- Emilio Lopes and David Kastrup

6
etc/NEWS
View file

@ -983,6 +983,12 @@ Such individual settings are now preserved when windows are split
horizontally or vertically, a saved window configuration is restored,
or when the frame is resized.
+++
*** The %c and %l constructs are now ignored in frame-title-format.
Due to technical limitations in how Emacs interacts with windowing
systems, these constructs often failed to render properly, and could
even cause Emacs to crash.
** Cursor display changes:
+++

298
etc/TUTORIAL.bg
View file

@ -1,6 +1,6 @@
Въведение в Emacs. Условията за копиране са в края на текста.
Въведението на Емакс. Условията за копиране са в края на текста.
Командите на Emacs най-често включват клавишите CONTROL (понякога
Командите на Емакс най-често включват клавишите CONTROL (понякога
отбелязван с CTRL или CTL) и META (понякога отбелязван с EDIT или
ALT). Вместо да се изписват с пълно име всеки път, ние ще използваме
следните съкращения:
@ -14,7 +14,7 @@ ALT).
клавиша ESC и след това въведете <знак>. Ние
записваме <ESC>, за да отбележим клавиша ESC.
Важна бележка: в края на Emacs сесията въведете двата знака C-x C-c.
Важна бележка: в края на Емакс сесията въведете двата знака C-x C-c.
Знаците ">>" отляво ви дават указание да изпълните команда. Например:
<<Blank lines inserted here by startup of help-with-tutorial>>
>> Сега въведете C-v (Покажи следващия екран), за да се придвижите към
@ -92,7 +92,7 @@ Next (
Всеки ред от текст завършва със знак за нов ред, който служи за
отделянето на реда от следващия ред. Последният ред във вашия файл
трябва да има знак за нов ред в края (но Emacs не изисква такъв,
трябва да има знак за нов ред в края (но Емакс не изисква такъв,
когато прочита файла).
>> Опитайте C-b в началото на ред. Това трябва да ви придвижи в края
@ -108,7 +108,7 @@ C-f
Когато се придвижвате след горния или долния край на екрана, текстът
отвъд края се измества към екрана. Това се нарича "скролиране". То
позволява на Emacs да придвижва курсора към зададеното място в текста,
позволява на Емакс да придвижва курсора към зададеното място в текста,
без да го изкарва извън екрана.
>> Опитайте се да придвижите курсора след долния край на екрана с C-n
@ -191,7 +191,7 @@ Shift
Вие можете също да се придвижвате с клавишите-стрелки, ако вашият
терминал има такива. Ние препоръчваме да научите C-b, C-f, C-n и C-p
по три причини. Първо, те работят на всички видове терминали. Второ,
веднъж след като добиете практика в използването на Emacs, ще
веднъж след като добиете практика в използването на Емакс, ще
откриете, че въвеждането на тези Control-знаци е по-бързо от
въвеждането на клавишите стрелки, защото не трябва да премествате
ръката си далеч от областта на клавишите с букви. Трето, веднъж след
@ -199,7 +199,7 @@ Shift
можете също така лесно да научите по-напредналите команди за движение
на курсора.
Повечето Emacs команди приемат числов аргумент; за повечето от тях той
Повечето Емакс команди приемат числов аргумент; за повечето от тях той
служи като брояч на повторения. Начинът, по който давате числов
брояч, е с въвеждане на C-u, последвано от въвеждане на цифрите, и
всичко това преди въвеждане на самата команда. Ако имате клавиш META
@ -231,7 +231,7 @@ C-v
Ако използвате графичен интерфейс, като X11 или MS-Windows, би
трябвало да има тънка правоъгълна област, наречена плъзгач (scroll
bar), в лявата страна на прозореца на Emacs. Вие можете да скролирате
bar), в лявата страна на прозореца на Емакс. Вие можете да скролирате
текста, щракайки с мишката в плъзгача.
>> Опитайте да натиснете средния бутон на върха на осветената област
@ -243,10 +243,10 @@ bar),
нагоре и надолу, като движите мишката.
* КОГАТО EMACS Е БЛОКИРАЛ
* КОГАТО ЕМАКС Е БЛОКИРАЛ
-------------------------
Ако Emacs спре да отговаря на вашите команди, вие можете да го спрете
Ако Емакс спре да отговаря на вашите команди, вие можете да го спрете
безопасно, като въведете C-g. Може да използвате C-g, за да спрете
команда, която се изпълнява твърде дълго.
@ -263,15 +263,15 @@ bar),
* ЗАБРАНЕНИ КОМАНДИ
-------------------
Някои команди на Emacs са "забранени", така че начинаещите потребители
Някои команди на Емакс са "забранени", така че начинаещите потребители
да не могат да ги употребят по погрешка.
Ако въведете някоя от забранените команди, Emacs извежда съобщение,
Ако въведете някоя от забранените команди, Емакс извежда съобщение,
казвайки каква е била командата и питайки ви дали искате да продължите
напред и да изпълните командата.
Ако наистина искате да изпробвате командата, въведете <SPC> (клавиша
интервал) в отговор на въпроса. Обикновено ако не искате да изпълните
Ако наистина искате да изпробвате командата, въведете клавиша интервал
в отговор на въпроса. Обикновено ако не искате да изпълните
забранената команда, отговаряте на въпроса с "n".
>> Въведете C-x C-l (която е забранена команда), и след това въведете
@ -281,7 +281,7 @@ bar),
* ПРОЗОРЦИ
----------
Emacs може да управлява няколко прозореца, всеки извеждайки свой
Емакс може да управлява няколко прозореца, всеки извеждайки свой
собствен текст. Ние ще обясним по-късно как да използвате няколко
прозореца. Точно сега ние искаме да обясним как да се отървете от
допълнителни прозорци и да се върнете към основното редактиране с един
@ -311,13 +311,13 @@ Emacs
----------------------
Ако искате да вмъкнете текст, просто го въведете. Знаците, които
могат да се виждат, като А, 7, * и т.н., се възприемат от Emacs като
могат да се виждат, като А, 7, * и т.н., се възприемат от Емакс като
текст и се вмъкват веднага. Въведете <Return> (клавишът за връщане в
началото на реда), за да вмъкнете знак за нов ред.
Може да изтриете последния знак, който сте въвели, с въвеждане на
<Delback>. <Delback> е клавиш от клавиатурата -- същият, който
обикновено използвате извън Emacs, за да изтриете последния въведен от
обикновено използвате извън Емакс, за да изтриете последния въведен от
вас знак. Обикновено е голям клавиш, на няколко реда разстояние от
клавиша <Return>, и обикновено е отбелязан с "Delete", "Del" или
"Backspace".
@ -357,24 +357,24 @@ Emacs
>> Въведете <Return>, за да вмъкнете наново знака за нов ред, който
изтрихте.
Запомнете, че на повечето команди на Emacs може да бъде зададен брояч
Запомнете, че на повечето команди на Емакс може да бъде зададен брояч
на повторенията; това включва вмъкването на текстови знаци.
Повтарянето на текстов знак го вмъква няколко пъти.
>> Опитайте това сега -- въведете C-u 8 *, за да вмъкнете ********.
Сега вие сте научили най-основните начини за въвеждане на нещо в Emacs
Сега вие сте научили най-основните начини за въвеждане на нещо в Емакс
и поправяне на грешки. Можете също така да изтривате думи или редове.
Ето обобщение на изтриващите действия:
<Delback> Изтриване на знака точно преди курсора
C-d Изтриване на знака точно след курсора
<Delback> изтриване на знака точно преди курсора
C-d изтриване на знака точно след курсора
M-<Delback> Изтриване на думата непосредствено преди курсора
M-d Изтриване на думата след курсора
M-<Delback> изтриване на думата непосредствено преди курсора
M-d изтриване на думата след курсора
C-k Изтриване от мястото на курсора до края на реда
M-k Изтриване до края на текущото изречение
C-k изтриване от мястото на курсора до края на реда
M-k изтриване до края на текущото изречение
Забележете, че <Delback> и C-d, сравнени с M-<Delback> и M-d,
разширяват подобието, започнато от C-f и M-f (добре, <Delback> не е
@ -384,12 +384,12 @@ M-k
Можете също да премахнете всяка част от буфера с един универсален
начин. Придвижете се до единия край на частта и въведете C-@ или
C-<SPC> (което и да е от двете). (<SPC> е клавишът интервал.)
Придвижете се до другия край на частта и въведете C-w. Това ще изреже
целия текст между тези два края.
C-интервал (което и да е от двете). Придвижете се до другия край на
частта и въведете C-w. Това ще изреже целия текст между тези два
края.
>> Придвижете курсора до знака "М" в началото на предишния абзац.
>> Въведете C-<SPC>. Emacs трябва да изведе съобщение "Mark set" в
>> Въведете C-интервал. Емакс трябва да изведе съобщение "Mark set" в
долния край на екрана.
>> Придвижете курсора до буквата "р" в "край" на втория ред от абзаца.
>> Въведете C-w. Това ще изреже текста, започващ от "М" и завършващ
@ -419,9 +419,9 @@ C-k
Връщането обратно на текст се нарича "вмъкване". (Мислете за него
като за изваждане обратно, или дръпване обратно, на текст, който е бил
изрязан.) Можете да вмъквате изрязания текст или на същото място,
откъдето е бил премахнат, или на друго място в редактирания текст,
даже и в различен файл. Можете да вмъквате един и същ текст няколко
пъти; това прави няколко копия от него.
откъдето е бил премахнат, или на друго място в буфера, даже и в
различен файл. Можете да вмъквате един и същ текст няколко пъти; това
прави няколко копия от него.
Командата за вмъкване е C-y. Тя вмъква наново последния изрязан текст
в текущото място на курсора.
@ -500,25 +500,25 @@ C_-
---------
За да направите текста, който редактирате, постоянен, трябва да го
сложите във файл. В противен случай той ще изчезне, когато Emacs
сложите във файл. В противен случай той ще изчезне, когато Емакс
приключи. За да сложите вашия текст във файл, трябва да "намерите"
файла преди да въвеждате текст. (Това също се нарича "посещаване" на
файла.)
Намиране на файл означава, че виждате съдържанието му в Emacs. В
Намиране на файл означава, че виждате съдържанието му в Емакс. В
много случаи това е като да редактирате самия файл. Обаче промените,
които правите, използвайки Emacs, не остават постоянни, докато не
които правите, използвайки Емакс, не остават постоянни, докато не
"запишете" файла. Това е така, за да се предотврати оставянето на
полупроменен файл в системата, когато не искате това. Дори когато
записвате, Emacs оставя началния файл под променено име, в случай, че
записвате, Емакс оставя началния файл под променено име, в случай, че
по-късно решите, че вашите промени са били грешка.
Ако погледнете в дъното на екрана, ще видите ред, който започва и
завършва с тирета и започва с "-R:-- TUTORIAL.bg" или нещо подобно.
завършва с тирета и започва с "-b:-- TUTORIAL.bg" или нещо подобно.
Тази част от екрана показва името на файла, който сте посетили. Точно
сега вие сте посетили файл, наречен "TUTORIAL.bg", който е вашето
лично копие-чернова на Emacs въведението. Когато намерите файл в
Emacs, името на този файл ще се появи на същото място.
лично копие-чернова на Емакс въведението. Когато намерите файл в
Емакс, името на този файл ще се появи на същото място.
Особеност на командата за намиране на файл е, че трябва да кажете
името на файла, който искате. Ние го наричаме "четене на аргумент от
@ -527,10 +527,10 @@ Emacs,
C-x C-f Намиране на файл
Emacs ви подканя да въведете името на файла. Името на файла, което
Емакс ви подканя да въведете името на файла. Името на файла, което
напишете, се появява в дъното на екрана. Редът в дъното на екрана се
нарича минибуфер, когато се използва за този вид вход. Можете да
използвате обикновените команди за редактиране на Emacs, за да
използвате обикновените команди за редактиране на Емакс, за да
редактирате името на файла.
Когато въвеждате името на файла (или какъвто и да е вход в
@ -551,12 +551,12 @@ Emacs
C-x C-s Запазване на файла
Това копира текста от Emacs във файла. Първия път, когато това се
направи, Emacs преименува началния файл с ново име, така че той да не
Това копира текста от Емакс във файла. Първия път, когато това се
направи, Емакс преименува началния файл с ново име, така че той да не
се изгуби. Новото име се построява с добавяне на "~" в края на името
на началния файл.
Когато запазването е свършило, Emacs извежда името на файла, който е
Когато запазването е свършило, Емакс извежда името на файла, който е
бил записан. Трябва да записвате достатъчно често, така че да не
изгубите много работа, ако системата се срине по някаква причина.
@ -564,19 +564,19 @@ Emacs
Това трябва да изведе "Wrote ...TUTORIAL.bg" в дъното на екрана.
ЗАБЕЛЕЖКА: На някои системи въвеждането на C-x C-s ще замръзи екрана и
вие няма да виждате повече изход от Emacs. Това показва, че една
вие няма да виждате повече изход от Емакс. Това показва, че една
"способност" на операционната система, наричана "управление на потока"
(flow control), е прихванала C-s и не го пропуска към Emacs. За да
(flow control), е прихванала C-s и не го пропуска към Емакс. За да
размразите екрана, въведете C-q. Тогава вижте секцията "Спонтанно
включване на постъпково търсене" (Spontaneous Entry to Incremental
Search) в ръководството на Emacs за съвет как да се справите с тази
Search) в ръководството на Емакс за съвет как да се справите с тази
"способност".
Може да намерите съществуващ файл, да го разгледате и да го
редактирате. Можете също да намерите файл, който не съществува. Това
е начинът за създаване на нови файлове в Emacs: намирате файла, който
е начинът за създаване на нови файлове в Емакс: намирате файла, който
ще бъде в началото празен, и тогава започвате вмъкването на текста за
файла. Когато говорите за "записване" на файл, Emacs всъщност ще
файла. Когато говорите за "записване" на файл, Емакс всъщност ще
създаде файла с текста, който сте въвели. Оттам нататък може да
считате, че редактирате вече съществуващ файл.
@ -584,9 +584,9 @@ Search)
* БУФЕРИ
--------
Ако намерите втори файл с C-x C-f, първият файл остава в Emacs.
Ако намерите втори файл с C-x C-f, първият файл остава в Емакс.
Можете да превключите обратно към него, като го намерите пак с C-x
C-f. По този начин може да получите доста на брой файлове в Emacs.
C-f. По този начин може да получите доста на брой файлове в Емакс.
>> Създайте файл с име "foo", въвеждайки C-x C-f foo <Return>.
Вмъкнете малко текст, редактирайте го и запазете "foo" с въвеждане
@ -594,16 +594,16 @@ C-f.
Накрая въведете C-x C-f TUTORIAL.bg <Return>, за да се върнете
обратно във въведението.
Emacs запазва текста на всеки файл в обект, наричан "буфер".
Намирането на файл прави нов буфер в Emacs. За да видите списък на
буферите, които в момента съществуват във вашия Emacs, въведете
Емакс запазва текста на всеки файл в обект, наричан "буфер".
Намирането на файл прави нов буфер в Емакс. За да видите списък на
буферите, които в момента съществуват във вашия Емакс, въведете
C-x C-b Показване на буферите
>> Опитайте C-x C-b сега.
Вижте как всеки буфер има име, а понякога и име на файл за файла,
чието съдържание държи. ВСЕКИ текст, който виждате в Emacs прозорец,
чието съдържание държи. ВСЕКИ текст, който виждате в Емакс прозорец,
е винаги част от някакъв буфер.
>> Въведете C-x 1, за да махнете списъка с буферите.
@ -625,13 +625,13 @@ Emacs
Списъкът с буферите, който правите с C-x C-b, винаги ви показва името
на всеки буфер.
ВСЕКИ текст, който виждате в Emacs прозорец, е винаги част от някакъв
ВСЕКИ текст, който виждате в Емакс прозорец, е винаги част от някакъв
буфер. Някои буфери не съответстват на файлове. Например буферът,
именуван "*Buffer List*", не съответства на файл. Това е буферът,
който съдържа списъка с буферите, които сте направили с C-x C-b.
Буферът, именуван "*Messages*", също не съответства на файл; той
съдържа съобщенията, които се появяват в дъното на екрана по време на
Emacs сесията.
Емакс сесията.
>> Въведете C-x b *Messages* <Return>, за да видите буфера със
съобщенията. След това въведете C-x C-b TUTORIAL <Return>, за да
@ -639,7 +639,7 @@ Emacs
Ако направите промени в текста на един файл и тогава намерите друг
файл, това няма да запише първия файл. Неговите промени остават вътре
в Emacs, в буфера на файла. Създаването или редактирането на буфера
в Емакс, в буфера на файла. Създаването или редактирането на буфера
на втория файл няма ефект върху буфера на първия файл. Това е много
полезно, но също означава, че се нуждаете от удобен начин да запазите
буфера на първия файл. Ще е неудобно да превключите обратно с C-x
@ -658,8 +658,8 @@ C-x s
* РАЗШИРЯВАНЕ НА НАБОРА КОМАНДИ
-------------------------------
Има много, много повече команди на Emacs, отколкото могат да се сложат
на всички контролни и мета знаци. Emacs заобикаля това с X (eXtended)
Има много, много повече команди на Емакс, отколкото могат да се сложат
на всички контролни и мета знаци. Емакс заобикаля това с X (eXtended)
командата. Това става по два начина:
C-x Знаково разширяване. Последвано от един знак.
@ -667,49 +667,49 @@ C-x s
име.
Тези команди са общо взето полезни, но по-малко, отколкото командите,
които досега сте научили. Вече видяхте няколко от тях: например
командите върху файлове C-x C-f за намиране (Find) и C-x C-s за
запазване (Save). Друг пример е командата за край на Emacs сесията --
това е командата C-x C-c. (Не се безпокойте, че може да изгубите
всички промени, които сте направили; C-x C-c предлага да запази всеки
променен файл, преди да премахне Emacs.)
които досега сте научили. Вече видяхте две от тях: командите върху
файлове C-x C-f за намиране (Find) и C-x C-s за запазване (Save).
Друг пример е командата за край на Емакс сесията -- това е командата
C-x C-c. (Не се безпокойте, че може да изгубите всички промени, които
сте направили; C-x C-c предлага да запази всеки променен файл, преди
да премахне Емакс.)
C-z е командата за излизане от Emacs *временно* -- така че да можете
да се върнете към същата Emacs сесия по-късно.
C-z е командата за излизане от Емакс *временно* -- така че да можете
да се върнете към същата Емакс сесия по-късно.
На системи, които позволяват това, C-z "изоставя" (suspend) Emacs,
т.е. връща към обвивката, но не разрушава Emacs. В повечето обвивки
можете да продължите Emacs сесията с командата "fg" или с "%emacs".
На системи, които позволяват това, C-z "изоставя" (suspend) Емакс,
т.е. връща към обвивката, но не разрушава Емакс. В повечето обвивки
можете да продължите Емакс сесията с командата "fg" или с "%emacs".
На системи, които не позволяват изоставяне, C-z създава нова
подобвивка, която върви под Emacs, за да ви даде шанс да стартирате
други програми и да се върнете към Emacs след това; това не е истинско
"излизане" от Emacs. В този случай командата на обвивката "exit" е
обикновеният начин да се върнете обратно към Emacs от подобвивката.
подобвивка, която върви под Емакс, за да ви даде шанс да стартирате
други програми и да се върнете към Емакс след това; това не е истинско
"излизане" от Емакс. В този случай командата на обвивката "exit" е
обикновеният начин да се върнете обратно към Емакс от подобвивката.
Моментът да използвате C-x C-c е, когато искате да излезете от
системата. Това е и правилната команда за излизане, когато Emacs е
системата. Това е и правилната команда за излизане, когато Емакс е
извикан от пощенска програма или други странични програми, тъй като те
може и да не знаят как да се справят с изоставянето на Emacs. При
може и да не знаят как да се справят с изоставянето на Емакс. При
обикновени обстоятелства, обаче, ако не сте тръгнали да излизате от
системата, по-добре е да изоставите Emacs с C-z, вместо да излизате от
Emacs.
системата, по-добре е да изоставите Емакс с C-z, вместо да излизате от
Емакс.
Има много команди C-x. Ето списък на тези, които сте научили:
C-x C-f Намиране на файл
C-x C-s Запазване на файл
C-x C-b Списък на буферите
C-x C-c Излизане от Emacs
C-x 1 Изтриване на всички прозорци, освен един
C-x u Отмяна
C-x C-f Намиране на файл.
C-x C-s Запазване на файл.
C-x C-b Списък на буферите.
C-x C-c Излизане от Емакс.
C-x 1 Изтриване на всички прозорци освен един.
C-x u Отмяна.
Именуваните разширени команди са команди, които се използват даже още
по-рядко, или команди, които се използват само в определени режими.
Пример е командата replace-string, която заменя глобално един низ с
друг. Когато въведете M-x, Emacs ви подсказва в дъното на екрана с
друг. Когато въведете M-x, Емакс ви подсказва в дъното на екрана с
M-x и вие трябва да въведете името на командата, в този случай
"replace-string". Просто въведете "repl s<TAB>" и Emacs ще завърши
"replace-string". Просто въведете "repl s<TAB>" и Емакс ще завърши
името. (<TAB> е клавишът Tab, обикновено намиращ се над клавиша
CapsLock или клавиша Shift близо до левия край на клавиатурата.)
Завършете името на командата с <Return>.
@ -733,11 +733,11 @@ CapsLock
Когато сте направили промени във файл, но още не сте го запазили, те
могат да бъдат загубени, ако компютърът внезапно се изключи. За да ви
предпази от такива ситуации, Emacs периодично запазва "автоматично
предпази от такива ситуации, Емакс периодично запазва "автоматично
запазван" файл за всеки файл, който редактирате. Името на автоматично
запазвания файл има # в началото и в края; например, ако вашият файл е
с име "hello.c", името на неговия автоматично запазван файл ще бъде
"#hello.c#". Когато запазвате файл по обикновения начин, Emacs
"#hello.c#". Когато запазвате файл по обикновения начин, Емакс
изтрива неговия автоматично записван файл.
Ако компютърът зависне, може да възстановите вашата автоматично
@ -751,7 +751,7 @@ M-x recover file<Return>.
* ЕХО ОБЛАСТТА
--------------
Ако Emacs види, че въвеждате многознакови команди бавно, ще ви ги
Ако Емакс види, че въвеждате многознакови команди бавно, ще ви ги
покаже в дъното на екрана, в област, наричана "ехо област". Ехо
областта обхваща последния ред от екрана.
@ -762,18 +762,18 @@ M-x recover file<Return>.
Редът точно над ехо областта се нарича "ред на режима" (mode line).
Той показва нещо като:
-D:** TUTORIAL.bg 63% L749 (Fundamental)---------------------
-b:** TUTORIAL.bg (Fundamental)--L670--58%----------------
Този ред дава полезна информация за състоянието на Emacs и текста,
Този ред дава полезна информация за състоянието на Емакс и текста,
който редактирате.
Вече знаете какво означава името на файла -- това е файлът, който сте
намерили. NN% показва вашата текуща позиция в текста; това означава,
че NN процента от текста е над върха на екрана. Ако началото на файла
е на екрана, ще се показва --Top-- (връх) вместо --00%--. Ако краят
на файла е на екрана, ще се показва --Bot-- (дъно). Ако гледате
текст, който е толкова малък, че се показва изцяло на екрана, редът на
режима ще изведе --All--.
намерили. -NN%-- показва вашата текуща позиция в текста; това
означава, че NN процента от текста е над върха на екрана. Ако
началото на файла е на екрана, ще се показва --Top-- (връх) вместо
--00%--. Ако края на файла е на екрана, ще се показва --Bot-- (дъно).
Ако гледате текст, който е толкова малък, че се показва изцяло на
екрана, редът на режима ще изведе --All--.
Знакът L и цифрите показват мястото по друг начин: това е номерът на
текущия ред на точката.
@ -787,7 +787,7 @@ M-x recover file<Return>.
Fundamental (Основен), който използвате в момента. Това е пример за
"главен режим" (major mode).
Emacs има много главни режими. Някои от тях са предвидени за
Емакс има много главни режими. Някои от тях са предвидени за
редактиране на различни езици и/или видове текст, като например режим
Лисп, режим Текст и други. Във всеки един момент от време точно един
главен режим е активен и неговото име може винаги да бъде намерено в
@ -806,7 +806,7 @@ Emacs
>> Въведете M-x text mode<Return>.
Не се безпокойте, никоя от Emacs командите, които сте научили, няма да
Не се безпокойте, никоя от Емакс командите, които сте научили, няма да
се промени по някакъв съществен начин. Но може да забележите, че M-f
и M-b сега възприемат апострофите (') като част от думите. Преди
това, в основния режим (Fundamental), M-f и M-b се възприемаха като
@ -835,7 +835,7 @@ m.
Един главен режим, който е много полезен, особено за редактиране на
текст на естествен език, е режимът на автоматично запълване (Auto Fill
mode). Когато този режим е включен, Emacs автоматично разделя реда
mode). Когато този режим е включен, Емакс автоматично разделя реда
при мястото между думите, когато вмъквате текст и направите ред, който
е твърде дълъг.
@ -855,7 +855,7 @@ auto fill mode<Return>.
аргумент на командата.
>> Въведете C-x f с аргумент 20. (C-u 2 0 C-x f).
Сега въведете някакъв текст и вижте как Emacs запълва редовете с по
Сега въведете някакъв текст и вижте как Емакс запълва редовете с по
не повече от 20 знака. После върнете обратно границата на 70,
използвайки C-x f отново.
@ -870,12 +870,12 @@ auto fill mode<Return>.
* ТЪРСЕНЕ
---------
Emacs може да извършва търсения на низове (това са последователности
Емакс може да извършва търсения на низове (това са последователности
от знаци или думи) или напред в текста, или назад в него. Търсенето
на низ е придвижваща курсора команда; тя премества курсора на
следващото място, където се среща низът.
Командата за търсене на Emacs се различава от командата за търсене на
Командата за търсене на Емакс се различава от командата за търсене на
повечето редактори по това, че тя е "постъпкова". Това означава, че
търсенето се извършва още докато въвеждате текста, който търсите.
@ -883,7 +883,7 @@ Emacs
търсене назад. НО ПОЧАКАЙТЕ! Не ги пробвайте сега.
Когато въведете C-s, ще забележите, че низът "I-search" се появява
като подсказка в ехо областта. Това ви казва, че Emacs е в това,
като подсказка в ехо областта. Това ви казва, че Емакс е в това,
което се нарича постъпково търсене, чакайки ви да въвеждате текста,
който искате да търсите. <Return> приключва търсенето.
@ -895,19 +895,19 @@ Emacs
>> Сега въведете <Delback> три пъти и вижте как се придвижва курсора.
>> Въведете <Return>, за да прекратите търсенето.
Забелязахте ли какво стана? Emacs, когато търси постъпково, се опитва
Забелязахте ли какво стана? Емакс, когато търси постъпково, се опитва
да намери следващото съвпадение на низа, който се въвежда. За да
отидете на следващото съвпадение на "търсне", просто отново въведете
C-s. Ако няма такова съвпадение, Emacs бибипва и ви казва, че
C-s. Ако няма такова съвпадение, Емакс бибипва и ви казва, че
търсенето е "провалено" (failing). C-g също прекратява търсенето.
ЗАБЕЛЕЖКА: На някои системи въвеждането на C-s ще замрази екрана и вие
няма да може да видите повече реакция от Emacs. Това показва, че
няма да може да видите повече реакция от Емакс. Това показва, че
"способност" на операционната система, наречена "управление на потока"
(flow control), е прихванала C-s и не го пропуска до Emacs. За да
(flow control), е прихванала C-s и не го пропуска до Емакс. За да
размразите екрана, въведете C-q. Тогава вижте секцията "Спонтанно
включване на постъпковото търсене" (Spontaneous Entry to Incremental
Search) в ръководството на Emacs за съвет как да се справите с тази
Search) в ръководството на Емакс за съвет как да се справите с тази
"способност".
Ако сте в средата на постъпково търсене и въведете <Delback>, ще
@ -929,9 +929,9 @@ C-s
* МНОЖЕСТВО ПРОЗОРЦИ
--------------------
----------------
Една от привлекателните способности на Emacs е тази, че може да
Една от привлекателните способности на Емакс е тази, че може да
гледате повече от един прозорец на екрана в даден момент от време.
>> Придвижете курсора до този ред и въведете C-u 0 C-l (това е
@ -942,7 +942,7 @@ C-s
остава на по-горния прозорец.
>> Въведете C-M-v, за да скролирате долния прозорец. (Ако нямате
истински клавиш META, въведете <ESC> C-v.)
истински клавиш META, въведете ESC C-v.)
>> Въведете C-x o ("o" от "other" -- "друг"), за да придвижите
курсора в долния прозорец.
@ -971,10 +971,10 @@ C-M-v
първи", защото и двата клавиша действат, модифицирайки знака, който
сте въвели.
Ако нямате истински клавиш META и използвате <ESC> вместо това, редът
има значение: трябва да въвеждате <ESC>, последван от CONTROL-v,
защото CONTROL-<ESC> v няма да работи. Това е така, защото <ESC> е
собствен знак, а не модификатор.
Ако нямате истински клавиш META и използвате ESC вместо това, редът
има значение: трябва да въвеждате ESC, последван от CONTROL-v, защото
CONTROL-ESC v няма да работи. Това е така, защото ESC е собствен
знак, а не модификатор.
>> Въведете C-x 1 (в горния прозорец), за да махнете долния прозорец.
@ -1007,13 +1007,13 @@ C-M-v
на главния режим. Например, може да видите [(Fundamental)] вместо
(Fundamental).
За да се махнете от вложеното ниво на редактиране, въведете <ESC>
<ESC> <ESC>. Това е обща команда за "излизане". Може и да я
използвате за махане (скриване) на допълнителни прозорци, както и за
да се махнете от минибуфера.
За да се махнете от вложеното ниво на редактиране, въведете ESC ESC
ESC. Това е обща команда за "излизане". Може и да я използвате за
махане (скриване) на допълнителни прозорци, както и за да се махнете
от минибуфера.
>> Въведете M-x, за да влезете в минибуфер; тогава въведете <ESC> <ESC>
<ESC>, за да излезете.
>> Въведете M-x, за да влезете в минибуфер; тогава въведете ESC ESC
ESC, за да излезете.
Не можете да използвате C-g, за да излезете от вложено ниво на
редактиране. Това е така, защото C-g се използва за прекратяване на
@ -1024,16 +1024,16 @@ C-M-v
----------------------------------
В това въведение се опитахме да осигурим достатъчно информация, за да
започнете да използвате Emacs. Има толкова много още в Emacs, че не е
започнете да използвате Емакс. Има толкова много още в Емакс, че не е
възможно то да бъде обяснено всичкото тук. Обаче може да поискате да
научите повече за Emacs, тъй като той притежава още много полезни
способности. Emacs има команди за четене на документацията на Emacs
научите повече за Емакс, тъй като той притежава още много полезни
способности. Емакс има команди за четене на документацията на Емакс
командите. Тези "помощни" команди всички започват със знака
CONTROL-h, който се нарича "знакът за помощ".
За да използвате възможностите на тази помощ, въведете знака C-h и
след това знака, казващ какъв вид помощ искате. Ако НАИСТИНА сте се
изгубили, въведете C-h ? и Emacs ще ви каже с какво може да ви
изгубили, въведете C-h ? и Емакс ще ви каже с какво може да ви
помогне. Ако сте въвели C-h и решите, че не се нуждаете от помощ,
просто въведете C-g, за да я прекратите.
@ -1045,7 +1045,7 @@ CONTROL-h,
Най-основното помощно средство е C-h c. Въведете C-h, знака c и
команден знак или последователност от знаци, образуващи команда;
тогава Emacs ще изведе много кратко описание на командата.
тогава Емакс ще изведе много кратко описание на командата.
>> Type C-h c C-p.
@ -1055,7 +1055,7 @@ CONTROL-h,
(C-p изпълнява командата предишен-ред)
Това ви казва "името на функцията". Имената на функциите се използват
най-вече за настройване и разширяване на Emacs. Но тъй като имената
най-вече за настройване и разширяване на Емакс. Но тъй като имената
на функциите са избрани така, че да показват какво прави командата, те
могат да служат и за много кратка документация -- достатъчна, за да ви
припомни команди, които вече сте учили.
@ -1069,7 +1069,7 @@ c.
>> Въведете C-h k C-p.
Това извежда документацията на функцията, както и нейното име, в
отделен Emacs прозорец. Когато я прочетете, въведете C-x 1, за да
отделен Емакс прозорец. Когато я прочетете, въведете C-x 1, за да
махнете помощния текст. Не е нужно да правите това точно сега. Може
да редактирате, докато се обръщате към помощния текст за справка, и
след това да въведете C-x 1.
@ -1080,14 +1080,14 @@ c.
функцията.
>> Опитайте с въвеждане на C-h f previous-line<Return>.
Това извежда цялата информация, която Emacs знае за функцията,
Това извежда цялата информация, която Емакс знае за функцията,
която осъществява командата C-p.
Подобна команда, C-h v, извежда документацията на променливите, които
може да променяте, за да настройвате поведението на Emacs. Трябва да
въведете името на променливата, когато Emacs ви подскаже това.
може да променяте, за да настройвате поведението на Емакс. Трябва да
въведете името на променливата, когато Емакс ви подскаже това.
C-h a Команда Апропос. Въведете ключова дума и Emacs ще
C-h a Команда Апропос. Въведете ключова дума и Емакс ще
покаже списък на всички команди, чието име съдържа
тази ключова дума. Тези команди могат всички да бъдат
извикани чрез META-x. За някои команди командата
@ -1110,18 +1110,18 @@ C-f,
специален буфер, наричан "*info*", където може да
четете ръководствата на инсталираните във вашата
система пакети. Въведете m emacs <Return>, за да
четете ръководството на Emacs. Ако никога преди това
не сте използвали Info, въведете ? и Emacs ще включи
четете ръководството на Емакс. Ако никога преди това
не сте използвали Info, въведете ? и Емакс ще включи
въведение във възможностите на режима Инфо. Веднъж
след като сте преминали това въведение, трябва да се
консултирате с Emacs Инфо ръководството като ваша
консултирате с Емакс Инфо ръководството като ваша
основна документация.
* ОЩЕ ВЪЗМОЖНОСТИ
-----------------
Може да научите повече за Emacs с четене на неговото ръководство, или
Може да научите повече за Емакс с четене на неговото ръководство, или
като книга, или в Инфо (използвайте менюто помощ (Help) или въведете
F10 h r). Две възможности, които може да желаете в началото, са
довършване (completion), което спестява писане, и dired, който
@ -1129,26 +1129,26 @@ F10 h r).
Довършването е начин да избягвате ненужно писане. Например, ако
искате да превключите към буфера *Messages*, може да въведете C-x b
*M<Tab> и Emacs ще запълни останалата част от името на буфера,
*M<Tab> и Емакс ще запълни останалата част от името на буфера,
доколкото може да се определи от това, което сте въвели. Довършването
е описано в Инфо-ръководството на Emacs в страницата "Довършване"
е описано в Инфо-ръководството на Емакс в страницата "Довършване"
("Completion").
Dired ви позволява да гледате списъка от файлове в директория (и като
възможност: нейните поддиректории), да се придвижвате в този списък,
да посещавате, преименувате, изтривате и изобщо действате върху
файловете. Dired е описан в Инфо-ръководството на Emacs в страницата
файловете. Dired е описан в Инфо-ръководството на Емакс в страницата
"Dired".
Ръководството на Emacs описва още много други възможности на
Ръководството на Емакс описва още много други възможности на
редактора.
* ЗАКЛЮЧЕНИЕ
------------
Запомнете: за да излезете безвъзвратно от Emacs, използвайте C-x C-c.
За да излезете временно в обвивка, така че да се върнете в Emacs
Запомнете: за да излезете безвъзвратно от Емакс, използвайте C-x C-c.
За да излезете временно в обвивка, така че да се върнете в Емакс
по-късно, използвайте C-z.
Това въведение е предвидено да бъде разбираемо за всички нови
@ -1159,10 +1159,10 @@ Dired
* КОПИРАНЕ
----------
Това въведение произлиза от дълга поредица въведения в Emacs,
започвайки от едно, написано от Стюърт Кракрафт за началния Emacs.
Това въведение произлиза от дълга поредица въведения в Емакс,
започвайки от едно, написано от Стюърт Кракрафт за началния Емакс.
Тази версия на въведението, както и GNU Emacs, е защитена с авторски
Тази версия на въведението, както и ГНУ Емакс, е защитена с авторски
права и идва с разрешение да разпространявате копия при следните
условия:
@ -1183,8 +1183,8 @@ Copyright (C) 1985, 1996, 1998, 2001, 2002, 2003, 2004,
under the above conditions, provided also that they
carry prominent notices stating who last altered them.
Условията за копиране на самия Emacs са по-сложни, но в същия дух.
Моля, прочетете файла COPYING и тогава давайте копия на GNU Emacs на
Условията за копиране на самия Емакс са по-сложни, но в същия дух.
Моля, прочетете файла COPYING и тогава давайте копия на ГНУ Емакс на
свои приятели. Помогнете да спрем затвореността на програмите
("притежанието"), като използваме, пишем и споделяме свободен софтуер!

14
leim/ChangeLog
View file

@ -1,3 +1,17 @@
2006-10-12 Kenichi Handa <handa@m17n.org>
* Makefile.in (install): Be sure to make ${INSTALLDIR} before `cd'
to it.
2006-10-05 Chong Yidong <cyd@stupidchicken.com>
* quail/latin-ltx.el: Fix typo in previous change.
2006-10-05 Stefan Monnier <monnier@iro.umontreal.ca>
* quail/latin-ltx.el: Remove rules that start with { since they are
redundant and hence impact the { key for no good reason.
2006-10-02 Kenichi Handa <handa@m17n.org>
* Makefile.in (install): Fix previous change.

11
leim/Makefile.in
View file

@ -216,13 +216,12 @@ leim-list.el: ${SUBDIRS} ${NON-TIT-MISC} changed.tit changed.misc ${srcdir}/leim
sed -n '/^[^;]/ p' < ${srcdir}/leim-ext.el >> $@
install: all
if [ ! -d ${INSTALLDIR} ] ; then \
${srcdir}/${dot}${dot}/mkinstalldirs ${INSTALLDIR}; \
else true; fi
if [ x`(cd ${INSTALLDIR} && /bin/pwd)` != x`(/bin/pwd)` ] ; then \
if [ -d ${INSTALLDIR} ] ; then \
rm -rf ${INSTALLDIR}/leim-list.el; \
rm -rf ${INSTALLDIR}/quail ${INSTALLDIR}/ja-dic ; \
else \
${srcdir}/${dot}${dot}/mkinstalldirs ${INSTALLDIR}; \
fi; \
rm -rf ${INSTALLDIR}/leim-list.el; \
rm -rf ${INSTALLDIR}/quail ${INSTALLDIR}/ja-dic ; \
echo "Copying leim files to ${INSTALLDIR} ..." ; \
if [ x`(cd ${srcdir} && /bin/pwd)` = x`(/bin/pwd)` ] ; then \
tar -chf - leim-list.el quail ja-dic \

32
leim/quail/latin-ltx.el
View file

@ -45,17 +45,17 @@ system, including many technical ones. Examples:
(quail-define-rules
("!`" ?¡)
("{\\pounds}" ?£) ("\\pounds" ?£)
("{\\S}" ?§) ("\\S" ?§)
("\\pounds" ?£) ;; ("{\\pounds}" ?£)
("\\S" ?§) ;; ("{\\S}" ?§)
("\\\"{}" ?¨)
("{\\copyright}" ?©) ("\\copyright" ?©)
("\\copyright" ?©) ;; ("{\\copyright}" ?©)
("$^a$" ?ª)
("\\={}" ?¯)
("$\\pm$" ?±) ("\\pm" ?±)
("$^2$" ?²)
("$^3$" ?³)
("\\'{}" ?´)
("{\\P}" ?¶) ("\\P" ?¶)
("\\P" ?¶) ;; ("{\\P}" ?¶)
;; Fixme: Yudit has the equivalent of ("\\cdot" ?⋅), for U+22C5, DOT
;; OPERATOR, whereas · is MIDDLE DOT. JadeTeX translates both to
;; \cdot.
@ -71,8 +71,8 @@ system, including many technical ones. Examples:
("\\~{A}" ?Ã) ("\\~A" ?Ã)
("\\\"{A}" ?Ä) ("\\\"A" ?Ä)
("\\\k{A}" ?Ą)
("{\\AA}" ?Å) ("\\AA" ?Å)
("{\\AE}" ?Æ) ("\\AE" ?Æ)
("\\AA" ?Å) ;; ("{\\AA}" ?Å)
("\\AE" ?Æ) ;; ("{\\AE}" ?Æ)
("\\c{C}" ?Ç) ("\\cC" ?Ç)
("\\`{E}" ?È) ("\\`E" ?È)
("\\'{E}" ?É) ("\\'E" ?É)
@ -93,14 +93,14 @@ system, including many technical ones. Examples:
("\\\"{O}" ?Ö) ("\\\"O" ?Ö)
("\\\k{O}" ?Ǫ)
("$\\times$" ?×) ("\\times" ?×)
("{\\O}" ?Ø) ("\\O" ?Ø)
("\\O" ?Ø) ;; ("{\\O}" ?Ø)
("\\`{U}" ?Ù) ("\\`U" ?Ù)
("\\'{U}" ?Ú) ("\\'U" ?Ú)
("\\^{U}" ?Û) ("\\^U" ?Û)
("\\\"{U}" ?Ü) ("\\\"U" ?Ü)
("\\\k{U}" ?Ų)
("\\'{Y}" ?Ý) ("\\'Y" ?Ý)
("{\\ss}" ?ß) ("\\ss" ?ß)
("\\ss" ?ß) ;; ("{\\ss}" ?ß)
("\\`{a}" ?à) ("\\`a" ?à)
("\\'{a}" ?á) ("\\'a" ?á)
@ -108,8 +108,8 @@ system, including many technical ones. Examples:
("\\~{a}" ?ã) ("\\~a" ?ã)
("\\\"{a}" ?ä) ("\\\"a" ?ä)
("\\\k{a}" ?ą)
("{\\aa}" ?å) ("\\aa" ?å)
("{\\ae}" ?æ) ("\\ae" ?æ)
("\\aa" ?å) ;; ("{\\aa}" ?å)
("\\ae" ?æ) ;; ("{\\ae}" ?æ)
("\\c{c}" ?ç) ("\\cc" ?ç)
("\\`{e}" ?è) ("\\`e" ?è)
("\\'{e}" ?é) ("\\'e" ?é)
@ -130,7 +130,7 @@ system, including many technical ones. Examples:
("\\\"{o}" ?ö) ("\\\"o" ?ö)
("\\\k{o}" ?ǫ)
("$\\div$" ?÷) ("\\div" ?÷)
("{\\o}" ?ø) ("\\o" ?ø)
("\\o" ?ø) ;; ("{\\o}" ?ø)
("\\`{u}" ?ù) ("\\`u" ?ù)
("\\'{u}" ?ú) ("\\'u" ?ú)
("\\^{u}" ?û) ("\\^u" ?û)
@ -181,7 +181,7 @@ system, including many technical ones. Examples:
("\\u{\\i}" ?ĭ) ("\\ui" ?ĭ)
("\\.{I}" ?İ) ("\\.I" ?İ)
("{\\i}" ?ı) ("\\i" ?ı)
("\\i" ?ı) ;; ("{\\i}" ?ı)
("\\^{J}" ?Ĵ) ("\\^J" ?Ĵ)
("\\^{\\j}" ?ĵ) ("\\^j" ?ĵ)
("\\c{K}" ?Ķ) ("\\cK" ?Ķ)
@ -191,8 +191,8 @@ system, including many technical ones. Examples:
("\\c{L}" ?Ļ) ("\\cL" ?Ļ)
("\\c{l}" ?ļ) ("\\cl" ?ļ)
("{\\L}" ?Ł) ("\\L" ?Ł)
("{\\l}" ?ł) ("\\l" ?ł)
("\\L" ?Ł) ;; ("{\\L}" ?Ł)
("\\l" ?ł) ;; ("{\\l}" ?ł)
("\\'{N}" ?Ń) ("\\'N" ?Ń)
("\\'{n}" ?ń) ("\\'n" ?ń)
("\\c{N}" ?Ņ) ("\\cN" ?Ņ)
@ -206,8 +206,8 @@ system, including many technical ones. Examples:
("\\H{O}" ?Ő) ("\\HO" ?Ő)
("\\U{o}" ?ő) ("\\Uo" ?ő)
("{\\OE}" ?Œ) ("\\OE" ?Œ)
("{\\oe}" ?œ) ("\\oe" ?œ)
("\\OE" ?Œ) ;; ("{\\OE}" ?Œ)
("\\oe" ?œ) ;; ("{\\oe}" ?œ)
("\\'{R}" ?Ŕ) ("\\'R" ?Ŕ)
("\\'{r}" ?ŕ) ("\\'r" ?ŕ)
("\\c{R}" ?Ŗ) ("\\cR" ?Ŗ)

6
lib-src/ChangeLog
View file

@ -1,3 +1,7 @@
2006-10-09 Eli Zaretskii <eliz@gnu.org>
* makefile.w32-in (../src/config.h): Fix error message.
2006-09-30 Eli Zaretskii <eliz@gnu.org>
* .cvsignore: Add blessmail.
@ -19,7 +23,7 @@
2006-08-07 Masatake YAMATO <jet@gyve.org>
* etags.c (TEX_mode): Check getc retruns EOF.
* etags.c (TEX_mode): Check getc returns EOF.
File ended without newline causes infinite loop.
2002-07-30 Adrian Aichner <adrian@xemacs.org> (tiny change)

2
lib-src/makefile.w32-in
View file

@ -308,7 +308,7 @@ cleanall: clean
# Headers we would preprocess if we could.
#
../src/config.h: ../nt/$(CONFIG_H)
echo config.h has changed. Re-run configure.bat.
echo $(CONFIG_H) has changed. Re-run configure.bat.
exit -1
getopt.h: getopt_.h

558
lisp/ChangeLog
View file

@ -1,3 +1,538 @@
2006-10-15 Kim F. Storm <storm@cua.dk>
* filesets.el (filesets-run-cmd--repl-fn): Use shell-quote-argument.
2006-10-14 Lennart Borgman <lennart.borgman.073@student.lu.se>
* filesets.el (filesets-cmd-shell-command): Quote buffer-file-name
to protect whitespace and metacharacters from the shell.
2006-10-13 Giorgos Keramidas <keramida@ceid.upatras.gr> (tiny change)
* apropos.el (apropos-pattern-quoted): Fix a typo in a doc
string.
2006-10-13 Eli Zaretskii <eliz@gnu.org>
* subr.el (start-process-shell-command): Doc fix.
2006-10-13 Andrea Russo <rastandy@salug.it> (tiny change)
* info-look.el <maxima-mode, inferior-maxima-mode>: Allow [0-9] in
the regexp for Maxima symbols.
2006-10-13 Stefan Monnier <monnier@iro.umontreal.ca>
* vc-hooks.el (vc-ignore-dir-regexp): Make it into a defcustom.
(vc-find-root): Don't walk higher up than ~.
2006-10-12 Chong Yidong <cyd@stupidchicken.com>
* international/utf-8.el (utf-translate-cjk-load-tables):
Avoid clobbering last-coding-system-used during load.
2006-10-12 Carsten Dominik <dominik@science.uva.nl>
* textmodes/reftex-global.el (reftex-create-tags-file): Quote file
arguments.
2006-10-12 Richard Stallman <rms@gnu.org>
* files.el (file-name-history): Add defvar.
(save-some-buffers-action-alist): Improve description strings.
2006-10-12 Andreas Schwab <schwab@suse.de>
* files.el (auto-mode-alist): Match change log file name also with
a dash before a numeric extension.
2006-10-11 Ilya Zakharevich <ilyaz@cpan.org>
* progmodes/cperl-mode.el: Merge from upstream, upto version 5.22.
After 5.0:
(cperl-add-tags-recurse-noxs-fullpath): New function (for -batch mode).
After 5.1: Major edit. Summary of most visible changes:
- Multiple <<HERE per line allowed.
- Handles multiline subroutine declaration headers (with comments).
(The exception is `cperl-etags' - but it is not used in the rest
of the mode.)
- Fontifies multiline my/our declarations (even with comments,
and with legacy `font-lock').
- Major speedup of syntaxification, both immediate and postponed
(3.5x to 15x [for different CPUs and versions of Emacs] on the
huge real-life document I tested).
- New bindings, edits to imenu.
- "_" is made into word-char during fontification/syntaxification;
some attempts to recognize non-word "_" during other operations too.
- Detect bug in Emacs with `looking-at' inside `narrow' and bulk out.
- autoload some more perldoc-related stuff
- New convenience features: ISpell POD/HEREDOCs, narrow-to-HEREDOC.
- Attempt to incorporate XEmacs edits which reached me.
Fine-grained changelog:
(cperl-hook-after-change): New configuration variable.
(cperl-vc-sccs-header): Likewise.
(cperl-vc-sccs-header): Likewise.
(cperl-vc-header-alist): Default via two preceding variables.
(cperl-invalid-face): Remove double quoting under XEmacs
(still needed under 21.2).
(cperl-tips): Update URLs for resources.
(cperl-problems): Likewise.
(cperl-praise): Mention new features.
New C-c key bindings: for `cperl-find-bad-style',
`cperl-pod-spell', `cperl-here-doc-spell', `cperl-narrow-to-here-doc',
`cperl-perdoc', and `cperl-perldoc-at-point'.
CPerl Mode menu changes: "Fix style by spaces", "Imenu on Perl Info"
moved, new submenu of Tools with Ispell entries and narrowing.
(cperl-after-sub-regexp): New defsubst.
(cperl-imenu--function-name-regexp-perl): Use `cperl-after-sub-regexp'.
Allows heads up to head4.
Allow "package;".
(defun-prompt-regexp): Use `cperl-after-sub-regexp'.
(paren-backwards-message): ??? Something for XEmacs???
(cperl-mode): Never auto-switch abbrev-mode off.
Try to allow '_' be non-word char.
Do not use `font-lock-unfontify-region-function' on XEmacs.
Reset syntax cache on mode start.
Support multiline facification (even on legacy `font-lock').
(cperl-facemenu-add-face-function): ??? Some contributed code ???
(cperl-after-change-function): Since `font-lock' and `lazy-lock'
refuse to inform us whether the fontification is due to lazy
calling or due to edit to a buffer, install our own hook
(controlled by `cperl-hook-after-change').
(cperl-electric-pod): =cut may have been recognized as start.
(cperl-block-p): Move, updatedfor attributes.
(cperl-calculate-indent): Try to allow '_' be non-word char
Support subs with attributes.
(cperl-where-am-i): Queit (?) a warning.
(cperl-cached-syntax-table) New function.
(cperl-forward-re): Use `cperl-cached-syntax-table'.
(cperl-unwind-to-safe): Recognize `syntax-type' property
changing in a middle of line.
(cperl-find-sub-attrs): New function.
(cperl-find-pods-heres): Allow many <<EOP per line.
Allow subs with attributes.
Major speedups (3.5x..15x on a real-life test file nph-proxy.pl).
Recognize "extproc " (OS/2) case-folded and only at start.
/x on s///x with empty replacement was not recognized.
Better comments.
(cperl-after-block-p): Remarks on diff with `cperl-block-p'.
Allow subs with attributes, labels.
Do not confuse "else::foo" with "else".
Minor optimizations...
(cperl-after-expr-p): Try to allow '_' be non-word char.
(cperl-fill-paragraph): Try to detect a major bug in Emacs
with `looking-at' inside `narrow' and bulk out if found.
(cperl-imenu--create-perl-index): Updates for new
`cperl-imenu--function-name-regexp-perl'.
(cperl-outline-level): Likewise.
(cperl-init-faces): Allow multiline subroutine headers
and my/our declarations, and ones with comments.
Allow subroutine attributes.
(cperl-imenu-on-info): Better docstring.
(cperl-etags): Rudimentary support for attributes.
Support for packages and "package;".
(cperl-add-tags-recurse-noxs): Better (?) docstring.
(cperl-add-tags-recurse-noxs-fullpath): Likewise.
(cperl-tags-hier-init): Misprint for `fboundp' fixed.
(cperl-not-bad-style-regexp): Try to allow '_' be non-word char.
(cperl-perldoc): Add autoload.
(cperl-perldoc-at-point): Likewise.
(cperl-here-doc-spell): New function.
(cperl-pod-spell): Likewise.
(cperl-map-pods-heres): Likewise.
(cperl-get-here-doc-region): Likewise.
(cperl-font-lock-fontify-region-function): Likewise (backward
compatibility for legacy `font-lock').
(cperl-font-lock-unfontify-region-function): Fix style.
(cperl-fontify-syntaxically): Recognize and optimize away deferred
calls with no-change. Governed by `cperl-hook-after-change'.
(cperl-fontify-update): Recognize that syntaxification region
can be larger than fontification one.
XXXX we leave `cperl-postpone' property, so this is quadratic...
(cperl-fontify-update-bad): Temporary placeholder until
it is clear how to implement `cperl-fontify-update'.
(cperl-time-fontification): New function.
(attrib-group): New text attribute.
(multiline): New value: `syntax-type' text attribute.
After 5.2:
(cperl-emulate-lazy-lock): New function.
(cperl-fontify-syntaxically): Would skip large regions.
Add `cperl-time-fontification', `cperl-emulate-lazy-lock' to menu.
Some globals were declared, but uninitialized.
After 5.3, 5.4:
(cperl-facemenu-add-face-function): Add docs, fix U<>.
Copyright message updated.
(cperl-init-faces): Work around a bug in `font-lock'. May slow
facification down a bit.
Misprint for my|our|local for old `font-lock'
"our" was not fontified same as "my|local".
Highlight variables after "my" etc even in
a middle of an expression.
Do not facify multiple variables after my etc
unless parentheses are present.
After 5.5, 5.6
(cperl-fontify-syntaxically): after-change hook could reset.
(cperl-syntax-done-to) to a middle of line; unwind to BOL.
After 5.7:
(cperl-init-faces): Allow highlighting of local ($/).
(cperl-problems-old-emaxen): New variable (for the use of DOCSTRING).
(cperl-problems): Remove fixed problems.
(cperl-find-pods-heres): Recognize #-comments in m##x too.
Recognize charclasses (unless delimiter is \).
(cperl-fontify-syntaxically): Unwinding to safe was done in wrong order.
(cperl-regexp-scan): Update docs.
(cperl-beautify-regexp-piece): Use information got from regexp scan.
After 5.8:
Major user visible changes:
Recognition and fontification of character classes in RExen.
Variable indentation of RExen according to groups.
(cperl-find-pods-heres): Recognize POSIX classes in REx charclasses.
Fontify REx charclasses in variable-name face.
Fontify POSIX charclasses in "type" face.
Fontify unmatched "]" in function-name face.
Mark first-char of HERE-doc as `front-sticky'.
Reset `front-sticky' property when needed.
(cperl-calculate-indent): Indents //x -RExen accordning to parens level.
(cperl-to-comment-or-eol): Recognize ends of `syntax-type' constructs.
(cperl-backward-to-noncomment): Recognize stringy `syntax-type'
constructs. Support `narrow'ed buffers.
(cperl-praise): Remove a reservation.
(cperl-make-indent): New function.
(cperl-indent-for-comment): Use `cperl-make-indent'.
(cperl-indent-line): Likewise.
(cperl-lineup): Likewise.
(cperl-beautify-regexp-piece): Likewise.
(cperl-contract-level): Likewise.
(cperl-toggle-set-debug-unwind): New function.
New menu entry for this.
(fill-paragraph-function): Use when `boundp'.
(cperl-calculate-indent): Take into account groups when indenting RExen.
(cperl-to-comment-or-eol): Recognize # which end a string.
(cperl-modify-syntax-type): Make only syntax-table property non-sticky.
(cperl-fill-paragraph): Return t: needed for `fill-paragraph-function'.
(cperl-fontify-syntaxically): More clear debugging message.
(cperl-pod2man-build-command): Check (XEmacs) `Man-filter-list'.
(cperl-init-faces): More complicated highlight even on XEmacs (new).
Merge cosmetic changes from XEmacs.
After 5.9:
(cperl-1+): Move to before the first use.
(cperl-1-): Likewise.
After 5.10:
This code may lock Emacs hard!!! Use on your own risk!
(cperl-font-locking): New internal variable.
(cperl-beginning-of-property): New function.
(cperl-calculate-indent): Use `cperl-beginning-of-property'
instead of `previous-single-property-change'.
(cperl-unwind-to-safe): Likewise.
(cperl-after-expr-p): Likewise.
(cperl-get-here-doc-region): Likewise.
(cperl-font-lock-fontify-region-function): Likewise.
(cperl-to-comment-or-eol): Do not call `cperl-update-syntaxification'
recursively.
Bound `next-single-property-change' via `point-max'.
(cperl-unwind-to-safe): Bound likewise
(cperl-font-lock-fontify-region-function): Likewise
(cperl-find-pods-heres): Mark as recursive for `cperl-to-comment-or-eol'
Initialization of `cperl-font-lock-multiline-start' could be
missed if the "main" fontification did not run due to the
keyword being already fontified.
(cperl-pod-spell): Return t from do-one-chunk function.
(cperl-map-pods-heres): Stop when the worker returns nil.
Call `cperl-update-syntaxification'.
(cperl-get-here-doc-region): Call `cperl-update-syntaxification'.
(cperl-get-here-doc-delim): Remove unused function.
After 5.11:
The possible lockup of Emacs (introduced in 5.10) fixed.
(cperl-unwind-to-safe): `cperl-beginning-of-property' won't return nil.
(cperl-syntaxify-for-menu): New customization variable.
(cperl-select-this-pod-or-here-doc): New function.
(cperl-get-here-doc-region): Extra argument.
Do not adjust pos by 1.
New menu entries
(Perl/Tools): Selection of current POD or HERE-DOC section.
(Debugging CPerl:) backtrace on fontification.
After 5.12:
(cperl-cached-syntax-table): Use `car-safe'.
(cperl-forward-re): Remove spurious argument SET-ST.
Add documentation.
(cperl-forward-group-in-re): New function.
(cperl-find-pods-heres): Find and highlight (?{}) blocks in RExen
(XXXX Temporary (?) hack is to syntax-mark them as comment).
After 5.13:
(cperl-string-syntax-table): Make { and } not-grouping
(Sometimes they ARE grouping in RExen, but matching them would only
confuse in many situations when they are not)
(beginning-of-buffer): Replace two occurences with goto-char...
(cperl-calculate-indent): `char-after' could be nil...
(cperl-find-pods-heres): REx can start after "[" too.
Hightlight (??{}) in RExen too.
(cperl-maybe-white-and-comment-rex): New constant
(cperl-white-and-comment-rex): Likewise.
XXXX Not very efficient, but hard to make
better while keeping 1 group.
After 5.13:
(cperl-find-pods-heres): $foo << identifier() is not a HERE-DOC.
Likewise for 1 << identifier.
After 5.14:
(cperl-find-pods-heres): Different logic for $foo .= <<EOF etc.
Error-less condition-case could fail.
(cperl-font-lock-fontify-region-function): Likewise.
(cperl-init-faces): Likewise.
After 5.15:
(cperl-find-pods-heres): Support property REx-part2.
(cperl-calculate-indent): Likewise.
Don't special-case REx with non-empty 1st line.
(cperl-find-pods-heres): In RExen, highlight non-literal backslashes.
Invert highlighting of charclasses:
now the envelop is highlighted.
Highlight many others 0-length builtins.
(cperl-praise): Mention indenting and highlight in RExen.
After 5.15:
(cperl-find-pods-heres): Highlight capturing parens in REx.
After 5.16:
(cperl-find-pods-heres): Highlight '|' for alternation
Initialize `font-lock-warning-face' if not present.
(cperl-find-pods-heres): Use `font-lock-warning-face' instead of
`font-lock-function-name-face'.
(cperl-look-at-leading-count): Likewise.
(cperl-find-pods-heres): Localize `font-lock-variable-name-face',
`font-lock-keyword-face' (needed for
batch processing), etc...
Use `font-lock-builtin-face' for builtin in REx
Now `font-lock-variable-name-face'
is used for interpolated variables
Use "talking aliases" for faces inside REx
Highlight parts of REx (except in charclasses)
according to the syntax and/or semantic
Syntax-mark a {}-part of (?{}) as "comment"
(it was the ()-part)
Better logic to distinguish what is what in REx
(cperl-tips-faces): Document REx highlighting
(cperl-praise): Mention REx syntax highlight etc.
After 5.17:
(cperl-find-sub-attrs): Would not always manage to print error message.
(cperl-find-pods-heres): Localize `font-lock-constant-face'.
After 5.18:
(cperl-find-pods-heres): Misprint in REx for parsing REx.
Very minor optimization.
`my-cperl-REx-modifiers-face' got quoted.
Recognize "print $foo <<END" as HERE-doc.
Put `REx-interpolated' text attribute if needed.
(cperl-invert-if-unless-modifiers): New function.
(cperl-backward-to-start-of-expr): Likewise.
(cperl-forward-to-end-of-expr): Likewise.
(cperl-invert-if-unless): Works in "the opposite way" too.
Cursor position on return is on the switch-word.
Indents comments better.
(REx-interpolated): New text attribute.
(cperl-next-interpolated-REx): New function.
(cperl-next-interpolated-REx-0): Likewise.
(cperl-next-interpolated-REx-1): Likewise.
"\C-c\C-x", "\C-c\C-y", "\C-c\C-v": New keybinding for these functions.
Perl/Regexp menu: 3 new entries for `cperl-next-interpolated-REx'.
(cperl-praise): Mention finded interpolated RExen.
After 5.19:
(cperl-init-faces): Highlight %$foo, @$foo too.
(cperl-short-docs): Better docs for system, exec.
(cperl-find-pods-heres): Better detect << after print {FH} <<EOF etc.
Would not find HERE-doc ended by EOF without NL.
(cperl-short-docs): Correct not-doubled \-escapes.
start block: Put some `defvar' for stuff gone from XEmacs.
After 5.20:
initial comment: Extend copyright, fix email address.
(cperl-indent-comment-at-column-0): New customization variable.
(cperl-comment-indent): Indentation after $#a would increasy by 1.
(cperl-mode): Make `defun-prompt-regexp' grok BEGIN/END etc.
(cperl-find-pods-heres): Mark CODE of s///e as `syntax-type' `multiline'
(cperl-at-end-of-expr): Would fail if @BAR=12 follows after ";".
(cperl-init-faces): If `cperl-highlight-variables-indiscriminately'
highlight $ in $foo too (UNTESTED).
(cperl-set-style): Docstring missed some available styles.
toplevel: Menubar/Perl/Indent-Styles had FSF, now K&R.
Change "Current" to "Memorize Current".
(cperl-indent-wrt-brace): New customization variable; the default is
as for pre-5.2 version.
(cperl-styles-entries): Keep `cperl-extra-newline-before-brace-multiline'.
(cperl-style-alist): Likewise.
(cperl-fix-line-spacing): Support `cperl-merge-trailing-else' being nil,
and `cperl-extra-newline-before-brace' etc
being t
(cperl-indent-exp): Plans B and C to find continuation blocks even
if `cperl-extra-newline-before-brace' is t.
After 5.21:
Improve some docstrings concerning indentation.
(cperl-indent-rules-alist): New variable.
(cperl-sniff-for-indent): New function name
(separated from `cperl-calculate-indent').
(cperl-calculate-indent): Separate the sniffer and the indenter;
uses `cperl-sniff-for-indent' now.
(cperl-comment-indent): Test for `cperl-indent-comment-at-column-0'
was inverted;
Support `comment-column' = 0.
2006-10-11 Martin Rudalics <rudalics@gmx.at>
* dnd.el (dnd-handle-one-url): Fix typo in doc-string.
* help-at-pt.el (scan-buf-move-to-region): Likewise.
* longlines.el (longlines-window-change-function): Likewise.
* simple.el (undo-ask-before-discard): Likewise.
* wid-edit.el (widget-field-prompt-internal)
(widget-documentation-link-p): Likewise.
2006-10-10 Stefan Monnier <monnier@iro.umontreal.ca>
* progmodes/sh-script.el (sh-get-kw): | is not among the allowed chars
for a keyword.
2006-10-09 Stefan Monnier <monnier@iro.umontreal.ca>
* newcomment.el (comment-valid-prefix-p): Make the check
more thorough. From an idea by Martin Rudalics <rudalics@gmx.at>.
(comment-indent-new-line): Adjust call.
2006-10-09 Ken Manheimer <ken.manheimer@gmail.com>
* allout.el (allout-back-to-current-heading): Base on lower-level
routines to get proper disqualification of aberrant topics.
2006-10-09 Richard Stallman <rms@gnu.org>
* textmodes/two-column.el (2C-two-columns): Doc fix.
2006-10-09 Kim F. Storm <storm@cua.dk>
* shell.el (explicit-csh-args, explicit-bash-args): Add comment
about implicit use.
2006-10-08 Richard Stallman <rms@gnu.org>
* textmodes/two-column.el (2C-two-columns): Doc fix.
2006-10-08 Reiner Steib <Reiner.Steib@gmx.de>
* files.el: Mark `buffer-read-only' as safe-local-variable.
2006-10-08 Nick Roberts <nickrob@snap.net.nz>
* progmodes/gdb-ui.el (gdb-speedbar-expand-node): Burp if
GUD buffer has been killed.
2006-10-07 Stefan Monnier <monnier@iro.umontreal.ca>
* completion.el (add-completions-from-c-buffer):
Don't presume an error's second element is a string.
Use looking-at rather than buffer-substring + member.
2006-10-07 Eli Zaretskii <eliz@gnu.org>
* mail/rmail.el (rmail-redecode-body): If the old encoding is
`undecided', call find-coding-systems-region to find a proper
non-trivial encoding.
(rmail-mime-charset-pattern): Allow a TAB between "Content-Type"
and "text/plain".
2006-10-07 Kevin Ryde <user42@zip.com.au>
* textmodes/reftex-vars.el (defgroup reftex): Update home page
url-link.
* strokes.el (defgroup strokes): Remove invalid url-link.
2006-10-07 Magnus Henoch <mange@freemail.hu>
* autoinsert.el (auto-insert-alist): Doc fix.
2006-10-07 Johan Bockg,be(Brd <bojohan@dd.chalmers.se>
* mouse-sel.el (mouse-insert-selection-internal):
Use insert-for-yank, so that yank handlers are run.
2006-10-07 Kim F. Storm <storm@cua.dk>
* ido.el (ido-file-extension-aux): Fix comparison.
2006-10-06 Kim F. Storm <storm@cua.dk>
* ido.el (ido-wide-find-dirs-or-files): Use shell-quote-argument.
2006-10-05 Juanma Barranquero <lekktu@gmail.com>
* emacs-lisp/advice.el (ad-remove-advice, ad-parse-arglist)
(ad-make-mapped-call): Use `let', not `let*'.
2006-10-05 Chong Yidong <cyd@stupidchicken.com>
* international/mule-cmds.el (coding-system-change-eol-conversion):
Ensure the coding system is initialized before calling
coding-system-eol-type.
2006-10-04 Carsten Dominik <dominik@science.uva.nl>
* textmodes/org.el (org-rm-props, org-activate-plain-links)
(org-activate-angle-links, org-activate-dates)
(org-activate-target-links, org-activate-camels)
(org-activate-tags): Add `rear-nonsticky' text property to avoid
textproperty keymaps from being active beyond the end of a line.
(org-unfontify-region): Also remove `rear-nonsticky' property.
2006-10-04 Kenichi Handa <handa@m17n.org>
* international/code-pages.el (next): Table fixed.
2006-10-04 Stefan Monnier <monnier@iro.umontreal.ca>
* progmodes/sh-script.el (sh-prev-thing): Remove (forward-char 1) now
that it's been made unnecessary by removing narrowing.
2006-10-03 Stefan Monnier <monnier@iro.umontreal.ca>
* progmodes/sh-script.el (sh-prev-thing): Massage to untangle the
control flow a bit, simplify another bit, and add comments.
2006-10-03 David Kastrup <dak@gnu.org>
* help.el (describe-mode): For clicks on mode-line, use "@"
interactive argument to get the major mode of the click instead of
the current buffer.
* isearch.el (isearch-mouse-2): Use new semantics of `key-binding'
in order to better redirect mouse-2 clicks. Also allow default
bindings to apply.
2006-10-03 Kim F. Storm <storm@cua.dk>
* emacs-lisp/cl.el (pushnew-internal): Remove defvar.
(pushnew): Fix last change.
2006-10-03 Denis St,A|(Bnkel <dstuenkel@googlemail.com> (tiny change)
* ibuf-ext.el (eval, view-and-eval) <define-ibuffer-op>:
@ -7,7 +542,7 @@
* progmodes/sh-script.el (sh-prev-thing): Fix last change.
2006-10-02 MIYOSHI Masanori <miyoshi@meadowy.org> (tiny change)
2006-10-02 MIYOSHI Masanori <miyoshi@meadowy.org> (tiny change)
* mail/smtpmail.el (smtpmail-try-auth-methods): Fix typo in
2006-09-28 commit.
@ -16,7 +551,7 @@
* international/code-pages.el (iso-8859-6): Table fixed.
2006-10-01 Chris Moore <christopher.ian.moore@gmail.com> (tiny change)
2006-10-01 Chris Moore <christopher.ian.moore@gmail.com> (tiny change)
* dired.el (dired-build-subdir-alist): Fix previous change.
@ -141,7 +676,7 @@
* international/mule.el (after-insert-file-set-coding):
If VISIT, don't let set-buffer-multibyte make undo info.
2006-09-28 Osamu Yamane <yamane@green.ocn.ne.jp> (tiny change)
2006-09-28 Osamu Yamane <yamane@green.ocn.ne.jp> (tiny change)
* mail/smtpmail.el (smtpmail-try-auth-methods): Do not break long
lines in base64-encoded authentication response.
@ -217,7 +752,7 @@
* help.el (describe-key-briefly, describe-key): Don't expect an
extra up event if a down-event is generated by a popup menu.
2006-09-23 Michal Nazarewicz <mnazarewicz@gmail.com> (tiny change)
2006-09-23 Michal Nazarewicz <mnazarewicz@gmail.com> (tiny change)
* textmodes/ispell.el (ispell-change-dictionary): Don't check the
local dictionary when changing the global dictionary.
@ -265,8 +800,7 @@
2006-09-22 Chong Yidong <cyd@stupidchicken.com>
* files.el (save-some-buffers-action-alist): Display diff in
view-mode.
* files.el (save-some-buffers-action-alist): Display diff in view-mode.
2006-09-22 Masatake YAMATO <jet@gyve.org>
@ -284,11 +818,6 @@
* mouse.el (mouse-posn-property): Fix typo for `event-start' in
doc string.
2006-09-21 Kim F. Storm <storm@cua.dk>
* emacs-lisp/cl.el (pushnew-internal): Remove defvar.
(pushnew): Fix last change.
2006-09-21 Kenichi Handa <handa@m17n.org>
* language/european.el ("Latin-1"): Add windows-1252 to
@ -305,8 +834,7 @@
2006-09-20 Kenichi Handa <handa@m17n.org>
* isearch.el (isearch-process-search-char): Cancel the previous
change.
* isearch.el (isearch-process-search-char): Cancel the previous change.
(isearch-search-string): New function.
(isearch-search): Use isearch-search-string.
(isearch-lazy-highlight-search): Likewise.
@ -4192,7 +4720,7 @@
compatibility function (Emacs 18/19).
(idlwave-is-continuation-line): Always return point at start of
previous non-blank continuation line.
`keyword-parameters': Fix continued comment font-lock matcher.
(keyword-parameters): Fix continued comment font-lock matcher.
(idlwave-font-lock-fontify-region): Written, use as
font-lock-fontify-region-function, to fix continued keyword
fontification issues.
@ -4445,7 +4973,7 @@
(mac-TIFF-to-string): New functions.
(x-get-selection, x-selection-value)
(mac-select-convert-to-string): Use them.
(mac-text-encoding-mac-japanese-basic-variant): New constant.
(mac-text-encoding-mac-japanese-basic-variant): New constant.
(mac-dnd-types-alist): New customization variable.
(mac-dnd-handle-furl, mac-dnd-handle-hfs, mac-dnd-insert-utxt)
(mac-dnd-insert-TEXT, mac-dnd-insert-TIFF, mac-dnd-drop-data)

28
lisp/allout.el
View file

@ -2736,24 +2736,22 @@ otherwise skip white space between bullet and ensuing text."
(1- allout-recent-prefix-end)))
;;;_ > allout-back-to-current-heading ()
(defun allout-back-to-current-heading ()
"Move to heading line of current topic, or beginning if already on the line.
"Move to heading line of current topic, or beginning if not in a topic.
Return value of point, unless we started outside of (before any) topics,
in which case we return nil."
If interactive, we position at the end of the prefix.
Return value of resulting point, unless we started outside
of (before any) topics, in which case we return nil."
(allout-beginning-of-current-line)
(if (or (allout-on-current-heading-p)
(and (re-search-backward (concat "^\\(" allout-regexp "\\)")
nil 'move)
(progn (while (allout-hidden-p)
(allout-beginning-of-current-line)
(if (not (looking-at allout-regexp))
(re-search-backward allout-regexp
nil 'move)))
(allout-prefix-data))))
(if (interactive-p)
(allout-end-of-prefix)
(point))))
(let ((bol-point (point)))
(allout-goto-prefix-doublechecked)
(if (<= (point) bol-point)
(if (interactive-p)
(allout-end-of-prefix)
(point))
(goto-char (point-min))
nil)))
;;;_ > allout-back-to-heading ()
(defalias 'allout-back-to-heading 'allout-back-to-current-heading)
;;;_ > allout-pre-next-prefix ()

2
lisp/apropos.el
View file

@ -142,7 +142,7 @@ If value is `verbose', the computed score is shown for each match."
"Apropos pattern as entered by user.")
(defvar apropos-pattern-quoted nil
"Apropos pattern passed through `regexp-quoute'.")
"Apropos pattern passed through `regexp-quote'.")
(defvar apropos-words ()
"Current list of apropos words extracted from `apropos-pattern'.")

2
lisp/autoinsert.el
View file

@ -215,7 +215,7 @@ If this contains a %s, that will be replaced by the matching rule."
;;; " (file-name-nondirectory (buffer-file-name)) " ends here\n"))
"A list specifying text to insert by default into a new file.
Elements look like (CONDITION . ACTION) or ((CONDITION . DESCRIPTION) . ACTION).
CONDITION maybe a regexp that must match the new file's name, or it may be
CONDITION may be a regexp that must match the new file's name, or it may be
a symbol that must match the major mode for this element to apply.
Only the first matching element is effective.
Optional DESCRIPTION is a string for filling `auto-insert-prompt'.

11
lisp/completion.el
View file

@ -1885,7 +1885,7 @@ Prefix args ::
(save-excursion
(goto-char (point-min))
(catch 'finish-add-completions
(with-syntax-table completion-c-def-syntax-table
(with-syntax-table completion-c-def-syntax-table
(while t
;; we loop here only when scan-sexps fails
;; (i.e. unbalance exps.)
@ -1895,8 +1895,7 @@ Prefix args ::
(cond
((= (preceding-char) ?#)
;; preprocessor macro, see if it's one we handle
(setq string (buffer-substring (point) (+ (point) 6)))
(cond ((member string '("define" "ifdef "))
(cond ((looking-at "\\(define\\|ifdef\\)\\>")
;; skip forward over definition symbol
;; and add it to database
(and (forward-word 2)
@ -1944,9 +1943,9 @@ Prefix args ::
(throw 'finish-add-completions t))
(error
;; Check for failure in scan-sexps
(if (or (string-equal (nth 1 e)
"Containing expression ends prematurely")
(string-equal (nth 1 e) "Unbalanced parentheses"))
(if (member (nth 1 e)
'("Containing expression ends prematurely"
"Unbalanced parentheses"))
;; unbalanced paren., keep going
;;(ding)
(forward-line 1)

2
lisp/dnd.el
View file

@ -91,7 +91,7 @@ The handler is first located by looking at `dnd-protocol-alist'.
If no match is found here, and the value of `browse-url-browser-function'
is a pair of (REGEXP . FUNCTION), those regexps are tried for a match.
If no match is found, just call `dnd-insert-text'.
WINDOW is where the drop happend, ACTION is the action for the drop,
WINDOW is where the drop happened, ACTION is the action for the drop,
URL is what has been dropped.
Returns ACTION."
(require 'browse-url)

6
lisp/emacs-lisp/advice.el
View file

@ -2409,7 +2409,7 @@ If such an advice was found it will be removed from the list of advices
in that CLASS."
(interactive (ad-read-advice-specification "Remove advice of"))
(if (ad-is-advised function)
(let* ((advice-to-remove (ad-find-advice function class name)))
(let ((advice-to-remove (ad-find-advice function class name)))
(if advice-to-remove
(ad-set-advice-info-field
function class
@ -2747,7 +2747,7 @@ For that it has to be fbound with a non-autoload definition."
A three-element list is returned, where the 1st element is the list of
required arguments, the 2nd is the list of optional arguments, and the 3rd
is the name of an optional rest parameter (or nil)."
(let* (required optional rest)
(let (required optional rest)
(setq rest (car (cdr (memq '&rest arglist))))
(if rest (setq arglist (reverse (cdr (memq '&rest (reverse arglist))))))
(setq optional (cdr (memq '&optional arglist)))
@ -2958,7 +2958,7 @@ Example: `(ad-map-arglists '(a &rest args) '(w x y z))' will return
(defun ad-make-mapped-call (source-arglist target-arglist target-function)
"Make form to call TARGET-FUNCTION with args from SOURCE-ARGLIST."
(let* ((mapped-form (ad-map-arglists source-arglist target-arglist)))
(let ((mapped-form (ad-map-arglists source-arglist target-arglist)))
(if (eq (car mapped-form) 'funcall)
(cons target-function (cdr (cdr mapped-form)))
(prog1 mapped-form

5
lisp/emacs-lisp/cl.el
View file

@ -149,8 +149,6 @@ be a symbol, or any generalized variable allowed by `setf'."
(if (symbolp place) (list 'setq place (list 'cons x place))
(list 'callf2 'cons x place)))
(defvar pushnew-internal)
(defmacro pushnew (x place &rest keys)
"(pushnew X PLACE): insert X at the head of the list if not already there.
Like (push X PLACE), except that the list is unmodified if X is `eql' to
@ -159,7 +157,8 @@ an element already on the list.
\n(fn X PLACE [KEYWORD VALUE]...)"
(if (symbolp place)
(if (null keys)
`(if (memql ,x ,place) ,place (setq ,place (cons ,x ,place)))
`(let ((x ,x))
(if (memql x ,place) ,place (setq ,place (cons x ,place))))
(list 'setq place (list* 'adjoin x place keys)))
(list* 'callf2 'adjoin x place keys)))

13
lisp/files.el
View file

@ -514,6 +514,9 @@ using \\[toggle-read-only]."
:type 'boolean
:group 'view)
(defvar file-name-history nil
"History list of file names entered in the minibuffer.")
(put 'ange-ftp-completion-hook-function 'safe-magic t)
(defun ange-ftp-completion-hook-function (op &rest args)
"Provides support for ange-ftp host name completion.
@ -1906,7 +1909,7 @@ in that case, this function acts as if `enable-local-variables' were t."
("\\.[sS]\\'" . asm-mode)
("\\.asm\\'" . asm-mode)
("[cC]hange\\.?[lL]og?\\'" . change-log-mode)
("[cC]hange[lL]og\\.[0-9]+\\'" . change-log-mode)
("[cC]hange[lL]og[-.][0-9]+\\'" . change-log-mode)
("\\$CHANGE_LOG\\$\\.TXT" . change-log-mode)
("\\.scm\\.[0-9]*\\'" . scheme-mode)
("\\.[ck]?sh\\'\\|\\.shar\\'\\|/\\.z?profile\\'" . sh-mode)
@ -2397,10 +2400,10 @@ asking you for confirmation."
;;
;; For variables defined in the C source code the declaration should go here:
;; FIXME: Some variables should be moved according to the rules above.
(mapc (lambda (pair)
(put (car pair) 'safe-local-variable (cdr pair)))
'((fill-column . integerp) ;; C source code
'((buffer-read-only . booleanp) ;; C source code
(fill-column . integerp) ;; C source code
(indent-tabs-mode . booleanp) ;; C source code
(left-margin . integerp) ;; C source code
(no-update-autoloads . booleanp)
@ -3730,7 +3733,7 @@ This requires the external program `diff' to be in your `exec-path'."
(recursive-edit)
;; Return nil to ask about BUF again.
nil)
"view this file")
"view this buffer")
(?d (lambda (buf)
(save-window-excursion
(diff-buffer-with-file buf))
@ -3738,7 +3741,7 @@ This requires the external program `diff' to be in your `exec-path'."
(lambda (ignore) (exit-recursive-edit)))
(recursive-edit)
nil)
"view changes in file"))
"view changes in this buffer"))
"ACTION-ALIST argument used in call to `map-y-or-n-p'.")
(defvar buffer-save-without-query nil

4
lisp/filesets.el
View file

@ -1603,7 +1603,7 @@ Replace <file-name> or <<file-name>> with filename."
((equal arg "<file-name>")
(buffer-file-name))
((equal arg "<<file-name>>")
(filesets-quote (buffer-file-name)))
(shell-quote-argument (buffer-file-name)))
(t
arg))))
@ -1701,7 +1701,7 @@ Replace <file-name> or <<file-name>> with filename."
ok)
t)))
(when ok
(let ((cmd (format txt (buffer-file-name))))
(let ((cmd (format txt (shell-quote-argument (buffer-file-name)))))
(message "Filesets: %s" cmd)
(filesets-cmd-show-result cmd
(shell-command-to-string cmd))))))

65
lisp/gnus/ChangeLog
View file

@ -1,3 +1,56 @@
2006-10-13 Andreas Seltenreich <uwi7@rz.uni-karlsruhe.de>
* mm-uu.el (mm-uu-pgp-signed-extract-1): Use RFC 2440 definition of
"blank line" when searching for end of armor headers.
2006-10-11 Katsumi Yamaoka <yamaoka@jpl.org>
* gmm-utils.el (gmm-write-region): Fix variable name.
2006-10-10 Reiner Steib <Reiner.Steib@gmx.de>
* gmm-utils.el (gmm-write-region): New function based on compatibility
code from `mm-make-temp-file'.
* mm-util.el (mm-make-temp-file): Use `gmm-write-region'.
* nnmaildir.el (nnmaildir--update-nov)
(nnmaildir-request-replace-article, nnmaildir-request-accept-article):
Use `gmm-write-region'.
2006-10-04 Reiner Steib <Reiner.Steib@gmx.de>
* gnus-sum.el (gnus-summary-make-menu-bar): Clarify
gnus-summary-limit-to-articles.
2006-10-04 Romain Francoise <romain@orebokech.com>
* gnus-util.el (gnus-alist-to-hashtable, gnus-hashtable-to-alist):
Moved here (and renamed) from gnus-registry.el.
* gnus-registry.el: Require gnus-util.
Use `gnus-alist-to-hashtable' and `gnus-hashtable-to-alist'.
2006-10-04 Reiner Steib <Reiner.Steib@gmx.de>
* pop3.el (pop3-authentication-scheme): Clarify doc.
(pop3-movemail): Warn about pop3-leave-mail-on-server.
2006-10-04 Dave Love <fx@gnu.org>
* pop3.el (pop3-authentication-scheme): Add custom version.
2006-10-04 Jesper Harder <harder@ifa.au.dk>
* pop3.el (pop3-leave-mail-on-server): Don't quote nil in
doc string. Improve doc string.
2006-10-03 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus-util.el (gnus-with-local-quit): New macro.
* gnus-demon.el (gnus-demon): Replace with-local-quit with it.
2006-09-28 Reiner Steib <Reiner.Steib@gmx.de>
* gmm-utils.el (gmm): Adjust custom version.
@ -1273,7 +1326,7 @@
as a buffer-local variable. This avoids creating truncated
dribble files as a result of a hang up, eg.
2005-11-04 Ken Manheimer <ken.manheimer@gmail.com>
2005-11-04 Ken Manheimer <ken.manheimer@gmail.com>
* pgg-pgp.el (pgg-pgp-encrypt-region, pgg-pgp-decrypt-region)
(pgg-pgp-encrypt-symmetric-region, pgg-pgp-encrypt-symmetric)
@ -4017,7 +4070,7 @@
* gnus-sum.el (gnus-summary-insert-subject): Remove list identifiers.
2004-09-03 Hiroshi Fujishima <pooh@nature.tsukuba.ac.jp> (tiny change)
2004-09-03 Hiroshi Fujishima <pooh@nature.tsukuba.ac.jp> (tiny change)
* spam-stat.el (spam-stat-reduce-size): Set spam-stat-dirty.
(spam-stat-save): Accept prefix argument.
@ -4164,17 +4217,17 @@
* gnus-sum.el (gnus-newsgroup-variables): Doc fix.
2004-08-26 YAGI Tatsuya <ynyaaa@ybb.ne.jp> (tiny change)
2004-08-26 YAGI Tatsuya <ynyaaa@ybb.ne.jp> (tiny change)
* gnus-art.el (gnus-article-next-page): Fix the way to find a real
end-of-buffer.
2004-08-26 Stefan Wiens <s.wi@gmx.net> (tiny change)
2004-08-26 Stefan Wiens <s.wi@gmx.net> (tiny change)
* gnus-sum.el (gnus-read-header): Don't remove a header for the
parent article of a sparse article in the thread hashtb.
2004-08-26 David Hedbor <dhedbor@real.com> (tiny change)
2004-08-26 David Hedbor <dhedbor@real.com> (tiny change)
* nnmail.el (nnmail-split-lowercase-expanded): New user option.
(nnmail-expand-newtext): Lowercase expanded entries if
@ -4370,7 +4423,7 @@
* gnus-msg.el (gnus-summary-followup-with-original):
Document yanking of region when active.
2004-04-13 Kevin Greiner <kgreiner@xpediantsolutions.com>
2004-04-13 Kevin Greiner <kgreiner@xpediantsolutions.com>
* gnus-agent.el: Merged 7.3 through 7.7 updates into branch.
Revision 7.2 changes excluded to maintain compatibility with all

973
lisp/gnus/ChangeLog.2
View file

File diff suppressed because it is too large Load diff

15
lisp/gnus/gmm-utils.el
View file

@ -401,6 +401,21 @@ If mode is nil, use `major-mode' of the curent buffer."
(string-match "^\\(.+\\)-mode$" mode)
(match-string 1 mode))))))
(defun gmm-write-region (start end filename &optional append visit
lockname mustbenew)
"Compatibility function for `write-region'.
In XEmacs, the seventh argument of `write-region' specifies the
coding-system."
(if (and mustbenew
(or (featurep 'xemacs)
(= emacs-major-version 20)))
(if (file-exists-p filename)
(signal 'file-already-exists
(list "File exists" filename))
(write-region start end filename append visit lockname))
(write-region start end filename append visit lockname mustbenew)))
(provide 'gmm-utils)
;; arch-tag: e0b60920-2ce6-40c1-bfc0-cadbbe26b602

6
lisp/gnus/gnus-demon.el
View file

@ -218,7 +218,7 @@ time Emacs has been idle for IDLE `gnus-demon-timestep's."
(< idle gnus-demon-idle-time)) ; Idle timed out.
(t (< 0 gnus-demon-idle-time)))) ; Or just need to be idle.
;; So we call the handler.
(with-local-quit
(gnus-with-local-quit
(ignore-errors (funcall (car handler)))
;; And reset the timer.
(setcar (nthcdr 1 handler)
@ -232,7 +232,7 @@ time Emacs has been idle for IDLE `gnus-demon-timestep's."
(gnus-demon-is-idle-p))
;; We want to call this handler each and every time that
;; Emacs is idle.
(with-local-quit
(gnus-with-local-quit
(ignore-errors (funcall (car handler)))))
(t
;; We want to call this handler only if Emacs has been idle
@ -240,7 +240,7 @@ time Emacs has been idle for IDLE `gnus-demon-timestep's."
(and (not (memq (car handler) gnus-demon-idle-has-been-called))
(< idle gnus-demon-idle-time)
(gnus-demon-is-idle-p)
(with-local-quit
(gnus-with-local-quit
(ignore-errors (funcall (car handler)))
;; Make sure the handler won't be called once more in
;; this idle-cycle.

28
lisp/gnus/gnus-registry.el
View file

@ -60,6 +60,7 @@
(require 'gnus)
(require 'gnus-int)
(require 'gnus-sum)
(require 'gnus-util)
(require 'nnmail)
(defvar gnus-registry-dirty t
@ -243,7 +244,8 @@ way."
(gnus-registry-clean-empty-function))
;; now trim the registry appropriately
(setq gnus-registry-alist (gnus-registry-trim
(hashtable-to-alist gnus-registry-hashtb)))
(gnus-hashtable-to-alist
gnus-registry-hashtb)))
;; really save
(gnus-registry-cache-save)
(setq gnus-registry-entry-caching caching)
@ -262,7 +264,7 @@ way."
(defun gnus-registry-read ()
(gnus-registry-cache-read)
(setq gnus-registry-hashtb (alist-to-hashtable gnus-registry-alist))
(setq gnus-registry-hashtb (gnus-alist-to-hashtable gnus-registry-alist))
(setq gnus-registry-dirty nil))
(defun gnus-registry-trim (alist)
@ -290,26 +292,6 @@ way."
(cdr (gethash (car a) timehash))
(cdr (gethash (car b) timehash))))))))))
(defun alist-to-hashtable (alist)
"Build a hashtable from the values in ALIST."
(let ((ht (make-hash-table
:size 4096
:test 'equal)))
(mapc
(lambda (kv-pair)
(puthash (car kv-pair) (cdr kv-pair) ht))
alist)
ht))
(defun hashtable-to-alist (hash)
"Build an alist from the values in HASH."
(let ((list nil))
(maphash
(lambda (key value)
(setq list (cons (cons key value) list)))
hash)
list))
(defun gnus-registry-action (action data-header from &optional to method)
(let* ((id (mail-header-id data-header))
(subject (gnus-registry-simplify-subject
@ -660,7 +642,7 @@ Returns the first place where the trail finds a group name."
"Clear the Gnus registry."
(interactive)
(setq gnus-registry-alist nil)
(setq gnus-registry-hashtb (alist-to-hashtable gnus-registry-alist))
(setq gnus-registry-hashtb (gnus-alist-to-hashtable gnus-registry-alist))
(setq gnus-registry-dirty t))
;;;###autoload

2
lisp/gnus/gnus-sum.el
View file

@ -2438,7 +2438,7 @@ gnus-summary-show-article-from-menu-as-charset-%s" cs))))
["Unread" gnus-summary-limit-to-unread t]
["Unseen" gnus-summary-limit-to-unseen t]
["Non-dormant" gnus-summary-limit-exclude-dormant t]
["Next articles" gnus-summary-limit-to-articles t]
["Next or process marked articles" gnus-summary-limit-to-articles t]
["Pop limit" gnus-summary-pop-limit t]
["Show dormant" gnus-summary-limit-include-dormant t]
["Hide childless dormant"

41
lisp/gnus/gnus-util.el
View file

@ -746,6 +746,28 @@ If there's no subdirectory, delete DIRECTORY as well."
(unless dir
(delete-directory directory)))))
;; The following two functions are used in gnus-registry.
;; They were contributed by Andreas Fuchs <asf@void.at>.
(defun gnus-alist-to-hashtable (alist)
"Build a hashtable from the values in ALIST."
(let ((ht (make-hash-table
:size 4096
:test 'equal)))
(mapc
(lambda (kv-pair)
(puthash (car kv-pair) (cdr kv-pair) ht))
alist)
ht))
(defun gnus-hashtable-to-alist (hash)
"Build an alist from the values in HASH."
(let ((list nil))
(maphash
(lambda (key value)
(setq list (cons (cons key value) list)))
hash)
list))
(defun gnus-strip-whitespace (string)
"Return STRING stripped of all whitespace."
(while (string-match "[\r\n\t ]+" string)
@ -1616,6 +1638,25 @@ empty directories from OLD-PATH."
(defalias 'gnus-set-process-query-on-exit-flag
'process-kill-without-query))
(if (fboundp 'with-local-quit)
(defalias 'gnus-with-local-quit 'with-local-quit)
(defmacro gnus-with-local-quit (&rest body)
"Execute BODY, allowing quits to terminate BODY but not escape further.
When a quit terminates BODY, `gnus-with-local-quit' returns nil but
requests another quit. That quit will be processed as soon as quitting
is allowed once again. (Immediately, if `inhibit-quit' is nil.)"
;;(declare (debug t) (indent 0))
`(condition-case nil
(let ((inhibit-quit nil))
,@body)
(quit (setq quit-flag t)
;; This call is to give a chance to handle quit-flag
;; in case inhibit-quit is nil.
;; Without this, it will not be handled until the next function
;; call, and that might allow it to exit thru a condition-case
;; that intends to handle the quit signal next time.
(eval '(ignore nil))))))
(provide 'gnus-util)
;;; arch-tag: f94991af-d32b-4c97-8c26-ca12a934de49

16
lisp/gnus/mm-util.el
View file

@ -1057,17 +1057,11 @@ If SUFFIX is non-nil, add that at the end of the file name."
(setq file (concat file suffix)))
(if dir-flag
(make-directory file)
(if (or (featurep 'xemacs)
(= emacs-major-version 20))
;; NOTE: This is unsafe if Emacs 20
;; users and XEmacs users don't use
;; a secure temp directory.
(if (file-exists-p file)
(signal 'file-already-exists
(list "File exists" file))
(write-region "" nil file nil 'silent))
(write-region "" nil file nil 'silent
nil 'excl)))
;; NOTE: This is unsafe if Emacs 20
;; users and XEmacs users don't use
;; a secure temp directory.
(gmm-write-region "" nil file nil 'silent
nil 'excl))
nil)
(file-already-exists t)
;; The Emacs 20 and XEmacs versions of

2
lisp/gnus/mm-uu.el
View file

@ -373,7 +373,7 @@ Return that buffer."
mm-security-handle 'gnus-details
(format "Clear verification not supported by `%s'.\n" mml2015-use))))
(goto-char (point-min))
(if (search-forward "\n\n" nil t)
(if (re-search-forward "\n[\t ]*\n" nil t)
(delete-region (point-min) (point)))
(if (re-search-forward mm-uu-pgp-beginning-signature nil t)
(delete-region (match-beginning 0) (point-max)))

11
lisp/gnus/nnmaildir.el
View file

@ -428,7 +428,8 @@ by nnmaildir-request-article.")
(prin1 (vector storage-version num msgid nov) (current-buffer))
(setq file (concat novfile ":"))
(nnmaildir--unlink file)
(write-region (point-min) (point-max) file nil 'no-message nil 'excl))
(gmm-write-region (point-min) (point-max) file nil 'no-message nil
'excl))
(rename-file file novfile 'replace)
(setf (nnmaildir--art-msgid article) msgid)
nov)))
@ -1246,8 +1247,8 @@ by nnmaildir-request-article.")
(throw 'return nil))
(save-excursion
(set-buffer buffer)
(write-region (point-min) (point-max) tmpfile nil 'no-message nil
'excl))
(gmm-write-region (point-min) (point-max) tmpfile nil 'no-message nil
'excl))
(unix-sync) ;; no fsync :(
(rename-file tmpfile (concat (nnmaildir--cur dir) file suffix) 'replace)
t)))
@ -1341,8 +1342,8 @@ by nnmaildir-request-article.")
(condition-case nil
(add-name-to-file nnmaildir--file tmpfile)
(error
(write-region (point-min) (point-max) tmpfile nil 'no-message nil
'excl)
(gmm-write-region (point-min) (point-max) tmpfile nil 'no-message nil
'excl)
(unix-sync))) ;; no fsync :(
(nnheader-cancel-timer 24h)
(condition-case err

33
lisp/gnus/pop3.el
View file

@ -75,22 +75,22 @@
(defcustom pop3-authentication-scheme 'pass
"*POP3 authentication scheme.
Defaults to 'pass, for the standard USER/PASS authentication. Other valid
values are 'apop."
:version "22.1" ;; Oort Gnus
:type '(choice (const :tag "USER/PASS" pass)
Defaults to `pass', for the standard USER/PASS authentication. The other
valid value is 'apop'."
:type '(choice (const :tag "Normal user/password" pass)
(const :tag "APOP" apop))
:version "22.1" ;; Oort Gnus
:group 'pop3)
(defcustom pop3-leave-mail-on-server nil
"*Non-nil if the mail is to be left on the POP server after fetching.
If the `pop3-leave-mail-on-server' is non-`nil' the mail is to be
left on the POP server after fetching. Note that POP servers
maintain no state information between sessions, so what the
client believes is there and what is actually there may not match
up. If they do not, then you may get duplicate mails or the
whole thing can fall apart and leave you with a corrupt mailbox."
If `pop3-leave-mail-on-server' is non-nil the mail is to be left
on the POP server after fetching. Note that POP servers maintain
no state information between sessions, so what the client
believes is there and what is actually there may not match up.
If they do not, then you may get duplicate mails or the whole
thing can fall apart and leave you with a corrupt mailbox."
;; We can't use the UILD support from XEmacs mail-lib or cvs.m17n.org:
;; http://thread.gmane.org/v9lld8fml4.fsf@marauder.physik.uni-ulm.de
;; http://thread.gmane.org/b9yy8hzy9ej.fsf@jpl.org
@ -170,11 +170,14 @@ Shorter values mean quicker response, but are more CPU intensive.")
(unless pop3-leave-mail-on-server
(pop3-dele process n))
(setq n (+ 1 n))
(if pop3-debug (sit-for 1) (sit-for 0.1))
)
(if pop3-debug (sit-for 1) (sit-for 0.1))) ; why?
(when (and pop3-leave-mail-on-server
(> n 1))
(message "pop3.el doesn't support UIDL. Setting `pop3-leave-mail-on-server'
to %s might not give the result you'd expect." pop3-leave-mail-on-server)
(sit-for 1))
(pop3-quit process))
(kill-buffer crashbuf)
)
(kill-buffer crashbuf))
t)
(defun pop3-get-message-count ()
@ -316,6 +319,8 @@ If NOW, use that time instead."
;; Date: 08 Jul 1996 23:22:24 -0400
;; should be
;; Tue Jul 9 09:04:21 1996
;; Fixme: This should use timezone on the date field contents.
(setq date
(cond ((not date)
"Tue Jan 1 00:00:0 1900")

2
lisp/help-at-pt.el
View file

@ -246,7 +246,7 @@ properties, to enable buffer local values."
(defun scan-buf-move-to-region (prop &optional arg hook)
"Go to the start of the next region with non-nil PROP property.
Then run HOOK, which should be a quoted symbol that is a normal
hook.variable, or an expression evaluating to such a symbol.
hook variable, or an expression evaluating to such a symbol.
Adjacent areas with different non-nil PROP properties are
considered different regions.

2
lisp/help.el
View file

@ -764,7 +764,7 @@ descriptions of the minor modes, each on a separate page.
For this to work correctly for a minor mode, the mode's indicator
variable \(listed in `minor-mode-alist') must also be a function
whose documentation describes the minor mode."
(interactive)
(interactive "@")
(unless buffer (setq buffer (current-buffer)))
(help-setup-xref (list #'describe-mode buffer)
(interactive-p))

19
lisp/ido.el
View file

@ -3084,12 +3084,14 @@ for first matching file."
(let ((oa (ido-file-extension-order a n))
(ob (ido-file-extension-order b n)))
(cond
((= oa ob)
lessp)
((and oa ob)
(if lessp
(> oa ob)
(< oa ob)))
(cond
((= oa ob)
lessp)
(lessp
(> oa ob))
(t
(< oa ob))))
(oa
(not lessp))
(ob
@ -3136,7 +3138,12 @@ for first matching file."
(let ((filenames
(split-string
(shell-command-to-string
(concat "find " dir " -name \"" (if prefix "" "*") file "*\" -type " (if finddir "d" "f") " -print"))))
(concat "find "
(shell-quote-argument dir)
" -name "
(shell-quote-argument
(concat (if prefix "" "*") file "*"))
" -type " (if finddir "d" "f") " -print"))))
filename d f
res)
(while filenames

3
lisp/info-look.el
View file

@ -843,12 +843,13 @@ Return nil if there is nothing appropriate in the buffer near point."
(info-lookup-maybe-add-help
:mode 'maxima-mode
:ignore-case t
:regexp "[a-zA-Z_%]+"
:regexp "[a-zA-Z0-9_%]+"
:doc-spec '( ("(maxima)Function and Variable Index" nil
"^ -+ [^:]+:[ ]+\\(\\[[^=]*=[ ]+\\)?" nil)))
(info-lookup-maybe-add-help
:mode 'inferior-maxima-mode
:regexp "[a-zA-Z0-9_%]+"
:other-modes '(maxima-mode))
;; coreutils and bash builtins overlap in places, eg. printf, so there's a

28
lisp/international/mule-cmds.el
View file

@ -219,19 +219,21 @@ They means `unix', `dos', and `mac' respectively."
((eq eol-type 'dos) 1)
((eq eol-type 'mac) 2)
(t eol-type))))
(let ((orig-eol-type (coding-system-eol-type coding-system)))
(if (vectorp orig-eol-type)
(if (not eol-type)
coding-system
(aref orig-eol-type eol-type))
(let ((base (coding-system-base coding-system)))
(if (not eol-type)
base
(if (= eol-type orig-eol-type)
coding-system
(setq orig-eol-type (coding-system-eol-type base))
(if (vectorp orig-eol-type)
(aref orig-eol-type eol-type))))))))
;; We call `coding-system-base' before `coding-system-eol-type',
;; because the coding-system may not be initialized until then.
(let* ((base (coding-system-base coding-system))
(orig-eol-type (coding-system-eol-type coding-system)))
(cond ((vectorp orig-eol-type)
(if (not eol-type)
coding-system
(aref orig-eol-type eol-type)))
((not eol-type)
base)
((= eol-type orig-eol-type)
coding-system)
((progn (setq orig-eol-type (coding-system-eol-type base))
(vectorp orig-eol-type))
(aref orig-eol-type eol-type)))))
(defun coding-system-change-text-conversion (coding-system coding)
"Return a coding system which differs from CODING-SYSTEM in text conversion.

11
lisp/isearch.el
View file

@ -1289,23 +1289,18 @@ If search string is empty, just beep."
(defun isearch-mouse-2 (click)
"Handle mouse-2 in Isearch mode.
For a click in the echo area, invoke `isearch-yank-x-selection'.
Otherwise invoke whatever mouse-2 is bound to outside of Isearch."
Otherwise invoke whatever the calling mouse-2 command sequence
is bound to outside of Isearch."
(interactive "e")
(let* ((w (posn-window (event-start click)))
(overriding-terminal-local-map nil)
(key (vector (event-basic-type click)))
;; FIXME: `key-binding' should accept an event as argument
;; and do all the overlay/text-properties lookup etc...
(binding (with-current-buffer
(if (window-live-p w) (window-buffer w) (current-buffer))
(key-binding key))))
(binding (key-binding (this-command-keys-vector) t)))
(if (and (window-minibuffer-p w)
(not (minibuffer-window-active-p w))) ; in echo area
(isearch-yank-x-selection)
(when (functionp binding)
(call-interactively binding)))))
(defun isearch-yank-internal (jumpform)
"Pull the text from point to the point reached by JUMPFORM.
JUMPFORM is a lambda expression that takes no arguments and returns a

2
lisp/longlines.el
View file

@ -410,7 +410,7 @@ This is called by `post-command-hook' after each command."
(defun longlines-window-change-function ()
"Re-wrap the buffer if the window width has changed.
This is called by `window-size-change-functions'."
This is called by `window-configuration-change-hook'."
(when (/= fill-column (- (window-width) window-min-width))
(setq fill-column (- (window-width) window-min-width))
(let ((mod (buffer-modified-p)))

8
lisp/mail/rmail.el
View file

@ -623,7 +623,7 @@ the variable `rmail-mime-feature'.")
;;;###autoload
(defvar rmail-mime-charset-pattern
(concat "^content-type:[ ]*text/plain;"
(concat "^content-type:[ \t]*text/plain;"
"\\(?:[ \t\n]*\\(?:format\\|delsp\\)=\"?[-a-z0-9]+\"?;\\)*"
"[ \t\n]*charset=\"?\\([^ \t\n\";]+\\)\"?")
"Regexp to match MIME-charset specification in a header of message.
@ -2875,6 +2875,12 @@ iso-8859, koi8-r, etc."
(coding-system-change-eol-conversion
coding
(coding-system-eol-type old-coding)))
;; If old-coding is `undecided', encode-coding-region
;; will not encode the text at all. Find a proper
;; non-trivial encoding to use.
(if (memq (coding-system-base old-coding) '(nil undecided))
(setq old-coding
(car (find-coding-systems-region msgbeg msgend))))
(setq x-coding-header (point-marker))
(narrow-to-region msgbeg msgend)
(encode-coding-region (point) msgend old-coding)

3
lisp/mouse-sel.el
View file

@ -737,7 +737,8 @@ If `mouse-yank-at-point' is non-nil, insert at point instead."
(mouse-set-point event))
(when mouse-sel-get-selection-function
(push-mark (point) 'nomsg)
(insert (or (funcall mouse-sel-get-selection-function selection) ""))))
(insert-for-yank
(or (funcall mouse-sel-get-selection-function selection) ""))))
;;=== Handle loss of selections ===========================================

49
lisp/newcomment.el
View file

@ -238,7 +238,7 @@ behavior for explicit filling, you might as well use \\[newline-and-indent]."
(defcustom comment-empty-lines nil
"If nil, `comment-region' does not comment out empty lines.
If t, it always comments out empty lines.
if `eol' it only comments out empty lines if comments are
If `eol' it only comments out empty lines if comments are
terminated by the end of line (i.e. `comment-end' is empty)."
:type '(choice (const :tag "Never" nil)
(const :tag "Always" t)
@ -1124,12 +1124,44 @@ This has no effect in modes that do not define a comment syntax."
:group 'comment)
(defun comment-valid-prefix-p (prefix compos)
(or
;; Accept any prefix if the current comment is not EOL-terminated.
(save-excursion (goto-char compos) (comment-forward) (not (bolp)))
;; Accept any prefix that starts with a comment-start marker.
(string-match (concat "\\`[ \t]*\\(?:" comment-start-skip "\\)")
prefix)))
"Check that the adaptive-fill-prefix is consistent with the context.
PREFIX is the prefix (presumably guessed by `adaptive-fill-mode').
COMPOS is the position of the beginning of the comment we're in, or nil
if we're not inside a comment."
;; This consistency checking is mostly needed to workaround the limitation
;; of auto-fill-mode whose paragraph-determination doesn't pay attention
;; to comment boundaries.
(if (null compos)
;; We're not inside a comment: the prefix shouldn't match
;; a comment-starter.
(not (and comment-start comment-start-skip
(string-match comment-start-skip prefix)))
(or
;; Accept any prefix if the current comment is not EOL-terminated.
(save-excursion (goto-char compos) (comment-forward) (not (bolp)))
;; Accept any prefix that starts with the same comment-start marker
;; as the current one.
(when (string-match (concat "\\`[ \t]*\\(?:" comment-start-skip "\\)")
prefix)
(let ((prefix-com (comment-string-strip (match-string 0 prefix) nil t)))
(string-match "\\`[ \t]*" prefix-com)
(let* ((prefix-space (match-string 0 prefix-com))
(prefix-indent (string-width prefix-space))
(prefix-comstart (substring prefix-com (match-end 0))))
(save-excursion
(goto-char compos)
;; The comstart marker is the same.
(and (looking-at (regexp-quote prefix-comstart))
;; The indentation as well.
(or (= prefix-indent
(- (current-column) (current-left-margin)))
;; Check the indentation in two different ways, just
;; to try and avoid most of the potential funny cases.
(equal prefix-space
(buffer-substring (point)
(progn (move-to-left-margin)
(point)))))))))))))
;;;###autoload
(defun comment-indent-new-line (&optional soft)
@ -1182,8 +1214,7 @@ unless optional argument SOFT is non-nil."
;; If there's an adaptive prefix, use it unless we're inside
;; a comment and the prefix is not a comment starter.
((and fill-prefix
(or (not compos)
(comment-valid-prefix-p fill-prefix compos)))
(comment-valid-prefix-p fill-prefix compos))
(indent-to-left-margin)
(insert-and-inherit fill-prefix))
;; If we're not inside a comment, just try to indent.

4130
lisp/progmodes/cperl-mode.el
View file

File diff suppressed because it is too large Load diff

33
lisp/progmodes/gdb-ui.el
View file

@ -902,20 +902,23 @@ Changed values are highlighted with the face `font-lock-warning-face'."
TEXT is the text of the button we clicked on, a + or - item.
TOKEN is data related to this node.
INDENT is the current indentation depth."
(cond ((string-match "+" text) ;expand this node
(if (and
(eq (buffer-local-value 'gud-minor-mode gud-comint-buffer) 'gdba)
(string-equal gdb-version "pre-6.4"))
(gdb-var-list-children token)
(gdb-var-list-children-1 token)))
((string-match "-" text) ;contract this node
(dolist (var gdb-var-list)
(if (string-match (concat token "\\.") (car var))
(setq gdb-var-list (delq var gdb-var-list))))
(speedbar-change-expand-button-char ?+)
(speedbar-delete-subblock indent))
(t (error "Ooops... not sure what to do")))
(speedbar-center-buffer-smartly))
(if (and gud-comint-buffer (buffer-name gud-comint-buffer))
(progn
(cond ((string-match "+" text) ;expand this node
(if (and (eq (buffer-local-value
'gud-minor-mode gud-comint-buffer) 'gdba)
(string-equal gdb-version "pre-6.4"))
(gdb-var-list-children token)
(gdb-var-list-children-1 token)))
((string-match "-" text) ;contract this node
(dolist (var gdb-var-list)
(if (string-match (concat token "\\.") (car var))
(setq gdb-var-list (delq var gdb-var-list))))
(speedbar-change-expand-button-char ?+)
(speedbar-delete-subblock indent))
(t (error "Ooops... not sure what to do")))
(speedbar-center-buffer-smartly))
(message-box "GUD session has been killed")))
(defun gdb-get-target-string ()
(with-current-buffer gud-comint-buffer
@ -1132,7 +1135,7 @@ This filter may simply queue input for a later time."
(if gdb-prompting
(progn
(gdb-send-item item)
(setq gdb-prompting nil))
(setq gdb-prompting nil))
(push item gdb-input-queue))))
(defun gdb-dequeue-input ()

90
lisp/progmodes/sh-script.el
View file

@ -2460,55 +2460,45 @@ we go to the end of the previous line and do not check for continuations."
;;
(if (bolp)
nil
(let (c min-point
(start (point)))
(save-restriction
(narrow-to-region
(if (sh-this-is-a-continuation)
(setq min-point (sh-prev-line nil))
(save-excursion
(beginning-of-line)
(setq min-point (point))))
(point))
(skip-chars-backward " \t;")
(unless (looking-at "\\s-*;;")
(skip-chars-backward "^)}];\"'`({[")
(setq c (char-before)))
(sh-debug "stopping at %d c is %s start=%d min-point=%d"
(point) c start min-point)
(if (< (point) min-point)
(error "point %d < min-point %d" (point) min-point))
(cond
((looking-at "\\s-*;;")
;; (message "Found ;; !")
";;")
((or (eq c ?\n)
(eq c nil)
(eq c ?\;))
(let (done kwd next
(boundary (point)))
(skip-chars-forward " \t\n\\\\")
(while (and (not done) (not (eobp)))
(if next (setq boundary next))
;; skip forward over white space newline and \ at eol
(sh-debug "Now at %d start=%d" (point) start)
(if (>= (point) start)
(progn
(sh-debug "point: %d >= start: %d" (point) start)
nil)
(setq kwd (sh-get-word))
(unless (eobp) (forward-char 1))
(if (member kwd (sh-feature sh-leading-keywords))
(setq next (point))
(setq done t)))
(skip-chars-forward " \t\n\\\\"))
(goto-char boundary)
kwd))
(t
;; c -- return a string
(char-to-string c)
))
))))
(let ((start (point))
(min-point (if (sh-this-is-a-continuation)
(sh-prev-line nil)
(line-beginning-position))))
(skip-chars-backward " \t;" min-point)
(if (looking-at "\\s-*;;")
;; (message "Found ;; !")
";;"
(skip-chars-backward "^)}];\"'`({[" min-point)
(let ((c (if (> (point) min-point) (char-before))))
(sh-debug "stopping at %d c is %s start=%d min-point=%d"
(point) c start min-point)
(if (not (memq c '(?\n nil ?\;)))
;; c -- return a string
(char-to-string c)
;; Return the leading keyword of the "command" we supposedly
;; skipped over. Maybe we skipped too far (e.g. past a `do' or
;; `then' that precedes the actual command), so check whether
;; we're looking at such a keyword and if so, move back forward.
(let ((boundary (point))
kwd next)
(while
(progn
;; Skip forward over white space newline and \ at eol.
(skip-chars-forward " \t\n\\\\" start)
(if (>= (point) start)
(progn
(sh-debug "point: %d >= start: %d" (point) start)
nil)
(if next (setq boundary next))
(sh-debug "Now at %d start=%d" (point) start)
(setq kwd (sh-get-word))
(if (member kwd (sh-feature sh-leading-keywords))
(progn
(setq next (point))
t)
nil))))
(goto-char boundary)
kwd)))))))
(defun sh-this-is-a-continuation ()
@ -2527,7 +2517,7 @@ If AND-MOVE is non-nil then move to end of word."
(goto-char where))
(prog1
(buffer-substring (point)
(progn (skip-chars-forward "^ \t\n;&")(point)))
(progn (skip-chars-forward "^ \t\n;&|()")(point)))
(unless and-move
(goto-char start)))))

9
lisp/shell.el
View file

@ -272,6 +272,8 @@ This is effective only if directory tracking is enabled."
:type '(choice (const :tag "None" nil) file)
:group 'shell)
;; Note: There are no explicit references to the variable `explicit-csh-args'.
;; It is used implicitly by M-x shell when the shell is `csh'.
(defcustom explicit-csh-args
(if (eq system-type 'hpux)
;; -T persuades HP's csh not to think it is smarter
@ -283,12 +285,15 @@ Value is a list of strings, which may be nil."
:type '(repeat (string :tag "Argument"))
:group 'shell)
;; Note: There are no explicit references to the variable `explicit-bash-args'.
;; It is used implicitly by M-x shell when the interactive shell is `bash'.
(defcustom explicit-bash-args
;; Tell bash not to use readline, except for bash 1.x which doesn't grook --noediting.
;; Bash 1.x has -nolineediting, but process-send-eof cannot terminate bash if we use it.
(let* ((prog (or (and (boundp 'explicit-shell-file-name) explicit-shell-file-name)
(getenv "ESHELL") shell-file-name))
(name (file-name-nondirectory prog)))
;; Tell bash not to use readline, except for bash 1.x which
;; doesn't grook --noediting. Bash 1.x has -nolineediting, but
;; process-send-eof cannot terminate bash if we use it.
(if (and (not purify-flag)
(equal name "bash")
(file-executable-p prog)

2
lisp/simple.el
View file

@ -1675,7 +1675,7 @@ is not *inside* the region START...END."
Normally, Emacs discards the undo info for the current command if
it exceeds `undo-outer-limit'. But if you set this option
non-nil, it asks in the echo area whether to discard the info.
If you answer no, there a slight risk that Emacs might crash, so
If you answer no, there is a slight risk that Emacs might crash, so
only do it if you really want to undo the command.
This option is mainly intended for debugging. You have to be

3
lisp/strokes.el
View file

@ -142,6 +142,8 @@
;; the user to enter strokes which "remove the pencil from the paper"
;; so to speak, so one character can have multiple strokes.
;; NOTE (Oct 7, 2006): The URLs below seem to be invalid!!!
;; You can read more about strokes at:
;; http://www.mit.edu/people/cadet/strokes-help.html
@ -211,7 +213,6 @@ static char * stroke_xpm[] = {
(defgroup strokes nil
"Control Emacs through mouse strokes."
:link '(emacs-commentary-link "strokes")
:link '(url-link "http://www.mit.edu/people/cadet/strokes-help.html")
:group 'mouse)
(defcustom strokes-modeline-string " Strokes"

4
lisp/subr.el
View file

@ -2235,7 +2235,9 @@ BUFFER is the buffer (or buffer name) to associate with the process.
BUFFER may be also nil, meaning that this process is not associated
with any buffer
COMMAND is the name of a shell command.
Remaining arguments are the arguments for the command.
Remaining arguments are the arguments for the command; they are all
spliced together with blanks separating between each two of them, before
passing the command to the shell.
Wildcards and redirection are handled as usual in the shell.
\(fn NAME BUFFER COMMAND &rest COMMAND-ARGS)"

9
lisp/textmodes/org.el
View file

@ -2690,7 +2690,7 @@ Also put tags into group 4 if tags are present.")
(make-variable-buffer-local 'org-keyword-time-regexp)
(defconst org-rm-props '(invisible t face t keymap t intangible t mouse-face t
mouse-map t)
rear-nonsticky t mouse-map t)
"Properties to remove when a string without properties is wanted.")
(defsubst org-match-string-no-properties (num &optional string)
@ -3140,6 +3140,7 @@ that will be added to PLIST. Returns the string that was modified."
(progn
(add-text-properties (match-beginning 0) (match-end 0)
(list 'mouse-face 'highlight
'rear-nonsticky t
'keymap org-mouse-map
))
t)))
@ -3150,6 +3151,7 @@ that will be added to PLIST. Returns the string that was modified."
(progn
(add-text-properties (match-beginning 0) (match-end 0)
(list 'mouse-face 'highlight
'rear-nonsticky t
'keymap org-mouse-map
))
t)))
@ -3188,6 +3190,7 @@ that will be added to PLIST. Returns the string that was modified."
(progn
(add-text-properties (match-beginning 0) (match-end 0)
(list 'mouse-face 'highlight
'rear-nonsticky t
'keymap org-mouse-map))
t)))
@ -3206,6 +3209,7 @@ that will be added to PLIST. Returns the string that was modified."
(progn
(add-text-properties (match-beginning 0) (match-end 0)
(list 'mouse-face 'highlight
'rear-nonsticky t
'keymap org-mouse-map
'help-echo "Radio target link"
'org-linked-text t))
@ -3271,6 +3275,7 @@ between words."
(progn
(add-text-properties (match-beginning 0) (match-end 0)
(list 'mouse-face 'highlight
'rear-nonsticky t
'keymap org-mouse-map))
t)))
@ -3279,6 +3284,7 @@ between words."
(progn
(add-text-properties (match-beginning 1) (match-end 1)
(list 'mouse-face 'highlight
'rear-nonsticky t
'keymap org-mouse-map))
t)))
@ -3380,6 +3386,7 @@ between words."
deactivate-mark buffer-file-name buffer-file-truename)
(remove-text-properties beg end
'(mouse-face nil keymap nil org-linked-text nil
rear-nonsticky nil
invisible nil intangible nil))))
;;; Visibility cycling

3
lisp/textmodes/reftex-global.el
View file

@ -38,7 +38,8 @@ The TAGS file is also immediately visited with `visit-tags-table'."
(reftex-access-scan-info current-prefix-arg)
(let* ((master (reftex-TeX-master-file))
(files (reftex-all-document-files))
(cmd (format "etags %s" (mapconcat 'identity files " "))))
(cmd (format "etags %s" (mapconcat 'shell-quote-argument
files " "))))
(save-excursion
(set-buffer (reftex-get-file-buffer-force master))
(message "Running etags to create TAGS file...")

2
lisp/textmodes/reftex-vars.el
View file

@ -232,7 +232,7 @@ distribution. Mixed-case symbols are convenience aliases.")
"LaTeX label and citation support."
:tag "RefTeX"
:link '(url-link :tag "Home Page"
"http://zon.astro.uva.nl/~dominik/Tools/")
"http://staff.science.uva.nl/~dominik/Tools/reftex/")
:link '(emacs-commentary-link :tag "Commentary in reftex.el" "reftex.el")
:link '(custom-manual "(reftex)Top")
:prefix "reftex-"

6
lisp/textmodes/two-column.el
View file

@ -340,9 +340,9 @@ The appearance of the screen can be customized by the variables
;;;###autoload
(defun 2C-two-columns (&optional buffer)
"Split current window vertically for two-column editing.
When called the first time, associates a buffer with the current
buffer in two-column minor mode (see \\[describe-mode] ).
Runs `2C-other-buffer-hook' in the new buffer.
\\<global-map>When called the first time, associates a buffer with the current
buffer in two-column minor mode (use \\[describe-mode] once in the mode,
for details.). It runs `2C-other-buffer-hook' in the new buffer.
When called again, restores the screen layout with the current buffer
first and the associated buffer to its right."
(interactive "P")

112
lisp/url/ChangeLog
View file

@ -1,3 +1,22 @@
2006-10-12 Magnus Henoch <mange@freemail.hu>
* url-http.el (url-http-find-free-connection): Handle
url-open-stream returning nil.
2006-10-11 Magnus Henoch <mange@freemail.hu>
* url-https.el: Remove (clashes with url-http on 8+3 systems).
* url-http.el: Move contents of url-https.el here. Add autoloads.
2006-10-09 Magnus Henoch <mange@freemail.hu>
* url-parse.el (url-generic-parse-url): Handle URLs with empty
path component and non-empty query component. Untangle path,
query and fragment parsing code. Add references to RFC 3986 in
comments.
(url-recreate-url-attributes): Start query string with "?", not ";".
2006-09-20 Stefan Monnier <monnier@iro.umontreal.ca>
* url-dav.el (url-dav-file-attributes): Simplify.
@ -420,32 +439,19 @@
2004-10-10 Lars Hansen <larsh@math.ku.dk>
* url-auth.el: Update header and footer.
* url-cache.el: Update header and footer.
* url-cid.el: Update header and footer.
* url-dired.el: Update header and footer.
* url-expand.el: Update header and footer.
* url-ftp.el: Update header and footer.
* url-gw.el: Update header and footer.
* url-imap.el: Update header and footer.
* url-irc.el: Update header and footer.
* url-misc.el: Update header and footer.
* url-news.el: Update header and footer.
* url-ns.el: Update header and footer.
* url-privacy.el: Update header and footer.
* url-auth.el:
* url-cache.el:
* url-cid.el:
* url-dired.el:
* url-expand.el:
* url-ftp.el:
* url-gw.el:
* url-imap.el:
* url-irc.el:
* url-misc.el:
* url-news.el:
* url-ns.el:
* url-privacy.el:
* url-proxy.el: Update header and footer.
* url-vars.el: Update header.
@ -490,42 +496,24 @@
2004-10-10 Lars Hansen <larsh@math.ku.dk>
* url-auth.el: Fix copyright notice.
* url-cache.el: Fix copyright notice.
* url-cookie.el: Fix copyright notice.
* url-dired.el: Fix copyright notice.
* url-file.el: Fix copyright notice.
* url-ftp.el: Fix copyright notice.
* url-handlers.el: Fix copyright notice.
* url-history.el: Fix copyright notice.
* url-irc.el: Fix copyright notice.
* url-mailto.el: Fix copyright notice.
* url-methods.el: Fix copyright notice.
* url-misc.el: Fix copyright notice.
* url-news.el: Fix copyright notice.
* url-nfs.el: Fix copyright notice.
* url-parse.el: Fix copyright notice.
* url-privacy.el: Fix copyright notice.
* url-vars.el: Fix copyright notice.
* url.el: Fix copyright notice.
* url-auth.el:
* url-cache.el:
* url-cookie.el:
* url-dired.el:
* url-file.el:
* url-ftp.el:
* url-handlers.el:
* url-history.el:
* url-irc.el:
* url-mailto.el:
* url-methods.el:
* url-misc.el:
* url-news.el:
* url-nfs.el:
* url-parse.el:
* url-privacy.el:
* url-vars.el:
* url.el:
* url-util.el: Fix copyright notice.
2004-10-06 Stefan Monnier <monnier@iro.umontreal.ca>

35
lisp/url/url-http.el
View file

@ -123,8 +123,10 @@ request.")
;; like authentication. But we use another buffer afterwards.
(unwind-protect
(let ((proc (url-open-stream host buf host port)))
;; Drop the temp buffer link before killing the buffer.
(set-process-buffer proc nil)
;; url-open-stream might return nil.
(when (processp proc)
;; Drop the temp buffer link before killing the buffer.
(set-process-buffer proc nil))
proc)
(kill-buffer buf)))))))
@ -1245,6 +1247,35 @@ p3p
(if buffer (kill-buffer buffer))
options))
;; HTTPS. This used to be in url-https.el, but that file collides
;; with url-http.el on systems with 8-character file names.
(require 'tls)
;;;###autoload
(defconst url-https-default-port 443 "Default HTTPS port.")
;;;###autoload
(defconst url-https-asynchronous-p t "HTTPS retrievals are asynchronous.")
;;;###autoload
(defalias 'url-https-expand-file-name 'url-http-expand-file-name)
(defmacro url-https-create-secure-wrapper (method args)
`(defun ,(intern (format (if method "url-https-%s" "url-https") method)) ,args
,(format "HTTPS wrapper around `%s' call." (or method "url-http"))
(let ((url-gateway-method (condition-case ()
(require 'ssl)
(error 'tls))))
(,(intern (format (if method "url-http-%s" "url-http") method))
,@(remove '&rest (remove '&optional args))))))
;;;###autoload (autoload 'url-https "url-http")
(url-https-create-secure-wrapper nil (url callback cbargs))
;;;###autoload (autoload 'url-https-file-exists-p "url-http")
(url-https-create-secure-wrapper file-exists-p (url))
;;;###autoload (autoload 'url-https-file-readable-p "url-http")
(url-https-create-secure-wrapper file-readable-p (url))
;;;###autoload (autoload 'url-https-file-attributes "url-http")
(url-https-create-secure-wrapper file-attributes (url &optional id-format))
(provide 'url-http)
;; arch-tag: ba7c59ae-c0f4-4a31-9617-d85f221732ee

56
lisp/url/url-https.el
View file

@ -1,56 +0,0 @@
;;; url-https.el --- HTTP over SSL/TLS routines
;; Copyright (C) 1999, 2004, 2005, 2006 Free Software Foundation, Inc.
;; Keywords: comm, data, processes
;; This file is part of GNU Emacs.
;;
;; GNU Emacs is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation; either version 2, or (at your option)
;; any later version.
;;
;; GNU Emacs is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;;
;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING. If not, write to the
;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
;; Boston, MA 02110-1301, USA.
;;; Commentary:
;;; Code:
(require 'url-gw)
(require 'url-util)
(require 'url-parse)
(require 'url-cookie)
(require 'url-http)
(require 'tls)
(defconst url-https-default-port 443 "Default HTTPS port.")
(defconst url-https-asynchronous-p t "HTTPS retrievals are asynchronous.")
(defalias 'url-https-expand-file-name 'url-http-expand-file-name)
(defmacro url-https-create-secure-wrapper (method args)
`(defun ,(intern (format (if method "url-https-%s" "url-https") method)) ,args
,(format "HTTPS wrapper around `%s' call." (or method "url-http"))
(let ((url-gateway-method (condition-case ()
(require 'ssl)
(error 'tls))))
(,(intern (format (if method "url-http-%s" "url-http") method))
,@(remove '&rest (remove '&optional args))))))
(url-https-create-secure-wrapper nil (url callback cbargs))
(url-https-create-secure-wrapper file-exists-p (url))
(url-https-create-secure-wrapper file-readable-p (url))
(url-https-create-secure-wrapper file-attributes (url &optional id-format))
(provide 'url-https)
;; arch-tag: c3645ac5-c248-4d12-ad41-7c4b6f7b6d19
;;; url-https.el ends here

53
lisp/url/url-parse.el
View file

@ -108,7 +108,7 @@
(defun url-recreate-url-attributes (urlobj)
"Recreate the attributes of an URL string from the parsed URLOBJ."
(when (url-attributes urlobj)
(concat ";"
(concat "?"
(mapconcat (lambda (x)
(if (cdr x)
(concat (car x) "=" (cdr x))
@ -120,11 +120,16 @@
"Return a vector of the parts of URL.
Format is:
\[TYPE USER PASSWORD HOST PORT FILE TARGET ATTRIBUTES FULL\]"
;; See RFC 3986.
(cond
((null url)
(make-vector 9 nil))
((or (not (string-match url-nonrelative-link url))
(= ?/ (string-to-char url)))
;; This isn't correct, as a relative URL can be a fragment link
;; (e.g. "#foo") and many other things (see section 4.2).
;; However, let's not fix something that isn't broken, especially
;; when close to a release.
(let ((retval (make-vector 9 nil)))
(url-set-filename retval url)
(url-set-full retval nil)
@ -148,6 +153,8 @@ Format is:
(insert url)
(goto-char (point-min))
(setq save-pos (point))
;; 3.1. Scheme
(if (not (looking-at "//"))
(progn
(skip-chars-forward "a-zA-Z+.\\-")
@ -156,13 +163,13 @@ Format is:
(skip-chars-forward ":")
(setq save-pos (point))))
;; We are doing a fully specified URL, with hostname and all
;; 3.2. Authority
(if (looking-at "//")
(progn
(setq full t)
(forward-char 2)
(setq save-pos (point))
(skip-chars-forward "^/")
(skip-chars-forward "^/\\?#")
(setq host (buffer-substring save-pos (point)))
(if (string-match "^\\([^@]+\\)@" host)
(setq user (match-string 1 host)
@ -170,6 +177,7 @@ Format is:
(if (and user (string-match "\\([^:]+\\):\\(.*\\)" user))
(setq pass (match-string 2 user)
user (match-string 1 user)))
;; This gives wrong results for IPv6 literal addresses.
(if (string-match ":\\([0-9+]+\\)" host)
(setq port (string-to-number (match-string 1 host))
host (substring host 0 (match-beginning 0))))
@ -181,29 +189,26 @@ Format is:
(if (not port)
(setq port (url-scheme-get-property prot 'default-port)))
;; Gross hack to preserve ';' in data URLs
;; 3.3. Path
(setq save-pos (point))
(if (string= "data" prot)
(goto-char (point-max))
;; Now check for references
(skip-chars-forward "^#")
(if (eobp)
nil
(delete-region
(point)
(progn
(skip-chars-forward "#")
(setq refs (buffer-substring (point) (point-max)))
(point-max))))
(goto-char save-pos)
(skip-chars-forward "^;")
(if (not (eobp))
(setq attr (url-parse-args (buffer-substring (point) (point-max)) t)
attr (nreverse attr))))
(skip-chars-forward "^#?")
(setq file (buffer-substring save-pos (point)))
;; 3.4. Query
(when (looking-at "\\?")
(forward-char 1)
(setq save-pos (point))
(skip-chars-forward "^#")
;; RFC 3986 specifies no general way of parsing the query
;; string, but `url-parse-args' seems universal enough.
(setq attr (url-parse-args (buffer-substring save-pos (point)) t)
attr (nreverse attr)))
;; 3.5. Fragment
(when (looking-at "#")
(forward-char 1)
(setq refs (buffer-substring (point) (point-max))))
(if (and host (string-match "%[0-9][0-9]" host))
(setq host (url-unhex-string host)))
(vector prot user pass host port file refs attr full))))))

11
lisp/vc-hooks.el
View file

@ -52,11 +52,13 @@ BACKEND, use `vc-handled-backends'.")
(defvar vc-header-alist ())
(make-obsolete-variable 'vc-header-alist 'vc-BACKEND-header)
(defvar vc-ignore-dir-regexp "\\`\\([\\/][\\/]\\|/net/\\|/afs/\\)\\'"
"Regexp matching directory names that are not under VC's control.
(defcustom vc-ignore-dir-regexp "\\`\\([\\/][\\/]\\|/net/\\|/afs/\\)\\'"
"Regexp matching directory names that are not under VC's control.
The default regexp prevents fruitless and time-consuming attempts
to determine the VC status in directories in which filenames are
interpreted as hostnames.")
interpreted as hostnames."
:type 'regexp
:group 'vc)
(defcustom vc-handled-backends '(RCS CVS SVN SCCS Arch MCVS)
;; Arch and MCVS come last because they are per-tree rather than per-dir.
@ -308,6 +310,9 @@ non-nil if FILE exists and its contents were successfully inserted."
"Find the root of a checked out project.
The function walks up the directory tree from FILE looking for WITNESS.
If WITNESS if not found, return nil, otherwise return the root."
;; Represent /home/luser/foo as ~/foo so that we don't try to look for
;; witnesses in /home or in /.
(setq file (abbreviate-file-name file))
(let ((root nil))
(while (not (or root
(equal file (setq file (file-name-directory file)))

4
lisp/wid-edit.el
View file

@ -1873,7 +1873,7 @@ If END is omitted, it defaults to the length of LIST."
"History of field minibuffer edits.")
(defun widget-field-prompt-internal (widget prompt initial history)
"Read string for WIDGET promptinhg with PROMPT.
"Read string for WIDGET prompting with PROMPT.
INITIAL is the initial input and HISTORY is a symbol containing
the earlier input."
(read-string prompt initial history))
@ -2864,7 +2864,7 @@ The first group should be the link itself."
(defcustom widget-documentation-link-p 'intern-soft
"Predicate used to test if a string is useful as a link.
The value should be a function. The function will be called one
The value should be a function. The function will be called with one
argument, a string, and should return non-nil if there should be a
link for that string."
:type 'function

22
lispref/ChangeLog
View file

@ -1,3 +1,21 @@
2006-10-13 Chong Yidong <cyd@stupidchicken.com>
* frames.texi (Frame Titles): %c and %l are ignored in
frame-title-format.
2006-10-11 Richard Stallman <rms@gnu.org>
* keymaps.texi (Key Sequences): Clarify use of kbd.
2006-10-10 Kim F. Storm <storm@cua.dk>
* lists.texi (Sets And Lists): Add memql.
2006-10-03 Richard Stallman <rms@gnu.org>
* searching.texi (Char Classes): Document :multibyte: and :unibyte:.
Clarify :ascii: and :nonascii:.
2006-09-29 Juri Linkov <juri@jurta.org>
* modes.texi (%-Constructs): Reorder coding systems in the
@ -18,10 +36,6 @@
* commands.texi (Command Loop Info): Explain how read-event affects
this-command-keys.
2006-09-21 Kim F. Storm <storm@cua.dk>
* lists.texi (Sets And Lists): Add memql.
2006-09-20 Richard Stallman <rms@gnu.org>
* os.texi (Timers): Clarify about REPEAT when timer is delayed.

3
lispref/frames.texi
View file

@ -899,7 +899,8 @@ frame is redisplayed.
@defvar frame-title-format
This variable specifies how to compute a name for a frame when you have
not explicitly specified one. The variable's value is actually a mode
line construct, just like @code{mode-line-format}. @xref{Mode Line
line construct, just like @code{mode-line-format}, except that the
@samp{%c} and @samp{%l} constructs are ignored. @xref{Mode Line
Data}.
@end defvar

44
lispref/keymaps.texi
View file

@ -94,6 +94,9 @@ function key names with @samp{<@dots{}>}.
(kbd "<f1> SPC") @result{} [f1 32]
(kbd "C-M-<down>") @result{} [C-M-down]
@end example
This macro is not meant for use with arguments that vary---only
with string constants.
@end defmac
@node Keymap Basics
@ -169,6 +172,15 @@ keymap.
This specifies one binding, for events of type @var{type}. Each
ordinary binding applies to events of a particular @dfn{event type},
which is always a character or a symbol. @xref{Classifying Events}.
In this kind of binding, @var{binding} is a command.
@item (@var{type} @var{item-name} .@: @var{binding})
This specifies a binding which is also a menu item
named @var{item-name}. @xref{Simple Menu Items}.
@item (@var{type} menu-item .@: @var{details})
This specifies a binding which is also a menu item and allows use of
other features. @xref{Extended Menu Items}.
@item (t .@: @var{binding})
@cindex default key binding
@ -1947,6 +1959,13 @@ This function returns the overall prompt string of @var{keymap},
or @code{nil} if it has none.
@end defun
The menu's items are the bindings in the keymap. Each binding
associates an event type to a definition, but the event types have no
significance for the menu appearance. (Usually we use pseudo-events,
symbols that the keyboard cannot generate, as the event types for menu
item bindings.) The menu is generated entirely from the bindings that
correspond in the keymap to these events.
The order of items in the menu is the same as the order of bindings in
the keymap. Since @code{define-key} puts new bindings at the front, you
should define the menu items starting at the bottom of the menu and
@ -1967,8 +1986,8 @@ an existing menu, you can specify its position in the menu using
@node Simple Menu Items
@subsubsection Simple Menu Items
The simpler and older way to define a menu keymap binding
looks like this:
The simpler (and original) way to define a menu item is to bind some
event type (it doesn't matter what event type) to a binding like this:
@example
(@var{item-string} . @var{real-binding})
@ -1984,25 +2003,26 @@ built with the Gtk+ toolkit.@footnote{In this case, the text is first
encoded using the @code{utf-8} coding system and then rendered by the
toolkit as it sees fit.}
You can also supply a second string, called the help string, as follows:
You can also supply a second string, called the help string, as follows:
@example
(@var{item-string} @var{help} . @var{real-binding})
@end example
@noindent
@var{help} specifies a ``help-echo'' string to display while the mouse
is on that item in the same way as @code{help-echo} text properties
(@pxref{Help display}).
As far as @code{define-key} is concerned, @var{item-string} and
As far as @code{define-key} is concerned, @var{item-string} and
@var{help-string} are part of the event's binding. However,
@code{lookup-key} returns just @var{real-binding}, and only
@var{real-binding} is used for executing the key.
If @var{real-binding} is @code{nil}, then @var{item-string} appears in
If @var{real-binding} is @code{nil}, then @var{item-string} appears in
the menu but cannot be selected.
If @var{real-binding} is a symbol and has a non-@code{nil}
If @var{real-binding} is a symbol and has a non-@code{nil}
@code{menu-enable} property, that property is an expression that
controls whether the menu item is enabled. Every time the keymap is
used to display a menu, Emacs evaluates the expression, and it enables
@ -2010,12 +2030,12 @@ the menu item only if the expression's value is non-@code{nil}. When a
menu item is disabled, it is displayed in a ``fuzzy'' fashion, and
cannot be selected.
The menu bar does not recalculate which items are enabled every time you
The menu bar does not recalculate which items are enabled every time you
look at a menu. This is because the X toolkit requires the whole tree
of menus in advance. To force recalculation of the menu bar, call
@code{force-mode-line-update} (@pxref{Mode Line Format}).
You've probably noticed that menu items show the equivalent keyboard key
You've probably noticed that menu items show the equivalent keyboard key
sequence (if any) to invoke the same command. To save time on
recalculation, menu display caches this information in a sublist in the
binding, like this:
@ -2035,9 +2055,9 @@ the item strings themselves, since that is redundant.
@kindex menu-item
An extended-format menu item is a more flexible and also cleaner
alternative to the simple format. It consists of a list that starts
with the symbol @code{menu-item}. To define a non-selectable string,
the item looks like this:
alternative to the simple format. You define an event type with a
binding that's a list starting with the symbol @code{menu-item}.
For a non-selectable string, the binding looks like this:
@example
(menu-item @var{item-name})
@ -2048,7 +2068,7 @@ A string starting with two or more dashes specifies a separator line;
see @ref{Menu Separators}.
To define a real menu item which can be selected, the extended format
item looks like this:
binding looks like this:
@example
(menu-item @var{item-name} @var{real-binding}

21
lispref/lists.texi
View file

@ -1395,6 +1395,27 @@ The function @code{delq} offers a way to perform this operation
destructively. See @ref{Sets And Lists}.
@end defun
@defun memql object list
The function @code{member} tests to see whether @var{object} is a member
of @var{list}, comparing members with @var{object} using @code{eql},
so floating point elements are compared by value.
If @var{object} is a member, @code{memql} returns a list starting with
its first occurrence in @var{list}. Otherwise, it returns @code{nil}.
Compare this with @code{memq}:
@example
@group
(memql 1.2 '(1.1 1.2 1.3) ; @r{@code{1.2} and @code{1.2} are @code{eql}.}
@result{} (1.2 1.3)
@end group
@group
(memq 1.2 '(1.1 1.2 1.3) ; @r{@code{1.2} and @code{1.2} are not @code{eq}.}
@result{} nil
@end group
@end example
@end defun
The following three functions are like @code{memq}, @code{delq} and
@code{remq}, but use @code{equal} rather than @code{eq} to compare
elements. @xref{Equality Predicates}.

8
lispref/searching.texi
View file

@ -515,7 +515,7 @@ and what they mean:
@table @samp
@item [:ascii:]
This matches any @acronym{ASCII} (unibyte) character.
This matches any @acronym{ASCII} character (codes 0--127).
@item [:alnum:]
This matches any letter or digit. (At present, for multibyte
characters, it matches anything that has word syntax.)
@ -535,8 +535,10 @@ characters, space, and the delete character.
@item [:lower:]
This matches any lower-case letter, as determined by
the current case table (@pxref{Case Tables}).
@item [:multibyte:]
This matches any multibyte character (@pxref{Text Representations}).
@item [:nonascii:]
This matches any non-@acronym{ASCII} (multibyte) character.
This matches any non-@acronym{ASCII} character.
@item [:print:]
This matches printing characters---everything except @acronym{ASCII} control
characters and the delete character.
@ -546,6 +548,8 @@ characters, it matches anything that has non-word syntax.)
@item [:space:]
This matches any character that has whitespace syntax
(@pxref{Syntax Class Table}).
@item [:unibyte:]
This matches any unibyte character (@pxref{Text Representations}).
@item [:upper:]
This matches any upper-case letter, as determined by
the current case table (@pxref{Case Tables}).

69
man/ChangeLog
View file

@ -1,3 +1,54 @@
2006-10-13 Andreas Seltenreich <uwi7@rz.uni-karlsruhe.de>
* gnus.texi (Other modes): Fix typo. Add alternative index entry for
gnus-dired-attach.
(Selecting a Group): Fix typo.
2006-10-12 Roberto Rodr,Am(Bguez <lanubeblanca@googlemail.com>
* widget.texi: Fix typos (tiny change)
2006-10-11 Kim F. Storm <storm@cua.dk>
* emacs.texi (Acknowledgments): Use @dotless{i}.
2006-10-08 Nick Roberts <nickrob@snap.net.nz>
* building.texi (Breakpoints Buffer): Mention catchpoints.
2006-10-08 Kim F. Storm <storm@cua.dk>
* ack.texi (Acknowledgments): Update.
* emacs.texi (Acknowledgments): Fix bad @/ form.
2006-10-06 Reiner Steib <Reiner.Steib@gmx.de>
* gnus.texi (Image Enhancements): Update for Emacs 22.
* gnus-faq.texi ([1.3]): Update.
2006-10-06 Richard Stallman <rms@gnu.org>
* faq.texi (Displaying the current line or column):
Delete "As of Emacs 20".
2006-10-06 Romain Francoise <romain@orebokech.com>
* faq.texi (VM): VM works with Emacs 22 too.
2006-10-06 Richard Stallman <rms@gnu.org>
* ebrowse.texi: Remove Emacs version "21" from title.
2006-10-05 Kim F. Storm <storm@cua.dk>
* emacs.texi (Acknowledgments): Add more contributors.
2006-10-03 Richard Stallman <rms@gnu.org>
* emacs.texi (Acknowledgments): Update version and edition.
2006-10-02 Reiner Steib <Reiner.Steib@gmx.de>
* gnus.texi (Foreign Groups): Say where change of editing commands are
@ -5,13 +56,13 @@
2006-10-01 Karl Berry <karl@gnu.org>
* custom.texi (Customization Groups): page break to keep example buffer
* custom.texi (Customization Groups): Page break to keep example buffer
on one page.
2006-09-30 Karl Berry <karl@gnu.org>
* programs.texi (Basic Indent): @need to improve page break.
* text.texi: rewording to improve page breaks, and use @LaTeX{}.
* text.texi: Rewording to improve page breaks, and use @LaTeX{}.
2006-09-29 Glenn Morris <rgm@gnu.org>
@ -19,11 +70,11 @@
2006-09-29 Karl Berry <karl@gnu.org>
* windows.texi (Basic Window): remove forced @break, no longer
* windows.texi (Basic Window): Remove forced @break, no longer
desirable.
* frames.texi (Frame Commands),
* mark.texi (Marking Objects): reword to avoid bad page break.
* display.texi (Auto Scrolling): use @tie{} to avoid bad line break.
* mark.texi (Marking Objects): Reword to avoid bad page break.
* display.texi (Auto Scrolling): Use @tie{} to avoid bad line break.
2006-09-19 Richard Stallman <rms@gnu.org>
@ -91,8 +142,8 @@
2006-09-01 Eli Zaretskii <eliz@gnu.org>
* rcirc.texi (Internet Relay Chat, Useful IRC commands): Don't use
@indicateurl.
* rcirc.texi (Internet Relay Chat, Useful IRC commands):
Don't use @indicateurl.
* cc-mode.texi (Subword Movement): Don't use @headitem.
(Custom Braces, Clean-ups): Don't use @tie.
@ -101,8 +152,8 @@
Sync with Tramp 2.0.54.
* tramp.texi (Bug Reports): The Tramp mailing list is moderated
now. Suggested by Adrian Phillips <a.phillips@met.no>.
* tramp.texi (Bug Reports): The Tramp mailing list is moderated now.
Suggested by Adrian Phillips <a.phillips@met.no>.
2006-08-28 Richard Stallman <rms@gnu.org>

79
man/ack.texi
View file

@ -33,6 +33,11 @@ art with a mouse or with keyboard keys.
Jay K.@: Adams wrote @file{jka-compr.el}, providing automatic
decompression and recompression for compressed files.
@item
Ralf Angeli wrote @file{scroll-lock.el}, a minor mode which keeps the
point vertically fixed by scrolling the window when moving up and down
in the buffer.
@item
Joe Arceneaux wrote the original text property implementation, and
implemented support for X11.
@ -61,6 +66,11 @@ Steven L.@: Baur wrote
footnotes in email messages, and @file{gnus-audio.el} which provides
sound effects for Gnus.
@item
Alexander L. Belikoff, Sergey Berezin, David Edmondson, Andreas
Fuchs, Mario Lang, Gergely Nagy, Michael Olson, and Alex Schroeder
contributed ERC, an advanced Internet Relay Chat client.
@item
Boaz Ben-Zvi wrote @file{profile.el}, to time Emacs Lisp functions.
@ -172,6 +182,10 @@ Andrew Csillag wrote M4 mode (@file{m4-mode.el}).
Doug Cutting and Jamie Zawinski wrote @file{disass.el}, a disassembler
for compiled Emacs Lisp code.
@item
Mathias Dahl wrote @file{tumme.el}, a package for viewing image files
as ``thumbnails.''
@item
Michael DeCorte wrote @file{emacs.csh}, a C-shell script that starts a
new Emacs job, or restarts a paused Emacs if one exists.
@ -368,8 +382,9 @@ taking the file name from the buffer.
Odd Gripenstam wrote @file{dcl-mode.el} for editing DCL command files.
@item
Kai Gro@ss{}johann wrote the Tramp package, which provides transparent
remote file editing using rcp, ssh, and other network protocols.
Kai Gro@ss{}johann and Michael Albinus wrote the Tramp package, which
provides transparent remote file editing using rcp, ssh, ftp, and other
network protocols.
@item
Michael Gschwind wrote @file{iso-cvt.el}, a package to convert between
@ -397,6 +412,9 @@ support for printing non-@acronym{ASCII} text on a PostScript printer.
Chris Hanson wrote @file{netuname.el}, a package to use HP-UX's Remote
File Access facility from Emacs.
@item
Jesper Harder wrote @file{yenc.el}, for decoding yenc encoded messages.
@item
K. Shane Hartman wrote:
@ -446,6 +464,8 @@ Kurt Hornik co-wrote Octave mode.
Tom Houlder wrote @file{mantemp.el}, which generates manual C@t{++}
template instantiations.
@item
Joakim Hove wrote @file{html2text.el}, a html to plain text converter.
@item
Denis Howe wrote @file{browse-url.el}, a package for invoking a WWW
browser to display a URL.
@ -462,7 +482,8 @@ Seiichiro Inoue improved Emacs's XIM support.
@item
Ulf Jasper wrote @file{icalendar.el}, a package for converting Emacs
diary entries to and from the iCalendar format.
diary entries to and from the iCalendar format, and
@file{newsticker.el}, an RSS and Atom based Newsticker.
@item
Kyle Jones wrote @file{life.el}, a package to play Conway's ``life'' game,
@ -492,6 +513,10 @@ in messages,
@file{rfc2104.el}, a hashed message authentication facility.
@end itemize
@item
Arne J@/orgensen wrote @file{latexenc.el}, a package to
automatically guess the correct coding system in LaTeX files.
@item
Tomoji Kagatani implemented @file{smtpmail.el}, used for sending out
mail with SMTP.
@ -545,7 +570,7 @@ David M.@: Koppelman wrote @file{hi-lock.el}, a minor mode for
interactive automatic highlighting of parts of the buffer text.
@item
Koseki Yoshinori wrote @file{iinline.el}, a minor mode for displaying
Koseki Yoshinori wrote @file{iimage.el}, a minor mode for displaying
inline images.
@item
@ -666,8 +691,16 @@ typical word processors,
@end itemize
@item
Eric Ludlam wrote the Speedbar package and @file{checkdoc.el}, a package
for checking doc strings in Emacs Lisp programs.
Eric Ludlam wrote the Speedbar package and the following packages:
@itemize @minus
@item
@file{checkdoc.el}, for checking doc strings in Emacs Lisp programs,
@item
@file{dframe.el}, providing dedicatd frame support modes, and
@item
@file{ezimage.el}, a generalized way to place images over text.
@end itemize
@item
Alan Mackenzie wrote the integrated AWK support in CC Mode.
@ -840,6 +873,10 @@ text, and @file{iris-ansi.el}, support for running Emacs on SGI's
@item
Jurgen Nickelsen wrote @file{ws-mode.el}, providing WordStar emulation.
@item
Hrvoje Niksic wrote @file{savehist.el}, for saving the minibuffer
history between Emacs sessions.
@item
Jeff Norden wrote @file{kermit.el}, a package to help the Kermit
dialup communications program run comfortably in an Emacs shell buffer.
@ -932,10 +969,18 @@ Christian Plaunt wrote @file{soundex.el}, an implementation of the
Soundex algorithm for comparing English words by their pronunciation.
@item
David Ponce wrote @file{recentf.el}, a package that puts a menu of
recently visited files in the Emacs menu bar, and
David Ponce wrote:
@itemize @minus
@item
@file{recentf.el}, a package that puts a menu of recently visited
files in the Emacs menu bar,
@item
@file{ruler-mode.el}, a minor mode for displaying a ruler in the
header line.
header line, and
@item
@file{tree-widget.el}, a package to display hierarchical data structures.
@end itemize
@item
Francesco A.@: Potorti wrote @file{cmacexp.el}, providing a command which
@ -1000,6 +1045,10 @@ Oram contributed to its documentation. Reingold has also contributed to
@file{tex-mode.el}, a mode for editing @TeX{} files, as have William
F.@: Schelter, Dick King, Stephen Gildea, Michael Prange, and Jacob Gore.
@item
David Reitter wrote @file{mailclient.el} which can send mail via the
system's designated mail client.
@item
Alex Rezinsky contributed @file{which-func.el}, a mode that shows the
name of the current function in the mode line.
@ -1238,6 +1287,10 @@ editing text in Slovak language.
Naoto Takahashi wrote @file{utf-8.el}, support for encoding and
decoding UTF-8 data.
@item
Luc Teirlinck wrote @file{help-at-pt.el}, providing local help through
the keyboard.
@item
Jean-Philippe Theberge wrote @file{thumbs.el}, a package for viewing
image files as ``thumbnails.''
@ -1261,9 +1314,11 @@ Tom Tromey and Chris Lindblad wrote @file{tcl.el}, a major mode for
editing Tcl/Tk source files and running a Tcl interpreter as an Emacs
subprocess.
@item
Eli Tziperman wrote @file{rmail-spam-filter.el}, a spam filter for RMAIL.
@item
Daiki Ueno wrote @file{starttls.el}, support for Transport Layer
Security protocol.
Security protocol, and the PGG package adding GnuPG and PGP support.
@item
Masanobu Umeda wrote:
@ -1422,13 +1477,15 @@ to exit with valuable buffers unsaved.
@item
Masatake Yamato wrote @file{ld-script.el}, an editing mode for GNU
linker scripts.
linker scripts, and contributed subword handling in CC mode.
@item
Jonathan Yavner wrote @file{testcover.el}, a package for keeping track
of the testing status of Emacs Lisp code, and the SES spreadsheet
package.
@item
Ryan Yeske wrote @file{rcirc.el} a simple Internet Relay Chat client.
@item
Ilya Zakharevich and Bob Olson contributed @file{cperl-mode.el}, a major
mode for editing Perl code. Ilya Zakharevich also wrote @file{tmm.el},

4
man/building.texi
View file

@ -964,8 +964,8 @@ for example, when re-setting a breakpoint.
@node Breakpoints Buffer
@subsubsection Breakpoints Buffer
The breakpoints buffer shows the existing breakpoints and
watchpoints (@pxref{Breakpoints,,, gdb, The GNU debugger}). It has
The breakpoints buffer shows the existing breakpoints, watchpoints and
catchpoints (@pxref{Breakpoints,,, gdb, The GNU debugger}). It has
these special commands, which mostly apply to the @dfn{current
breakpoint}, the breakpoint which point is on.

2
man/ebrowse.texi
View file

@ -41,7 +41,7 @@ license to the document, as described in section 6 of the license.
@titlepage
@title Ebrowse User's Manual
@sp 4
@subtitle Ebrowse/Emacs 21
@subtitle Ebrowse/Emacs
@sp 1
@subtitle May 2000
@sp 5

139
man/emacs.texi
View file

@ -4,8 +4,8 @@
@settitle GNU Emacs Manual
@c The edition number appears in several places in this file
@set EDITION Fourteenth
@set EMACSVER 22.0.50
@set EDITION Sixteenth
@set EMACSVER 22.1
@copying
This is the @value{EDITION} edition of the @cite{GNU Emacs Manual},
@ -1023,70 +1023,83 @@ occasionally, or subscribing to periodic updates.
@node Acknowledgments, Intro, Distrib, Top
@unnumberedsec Acknowledgments
Contributors to GNU Emacs include Per Abrahamsen, Tomas Abrahamsson,
Jay K.@: Adams, Joe Arceneaux, Miles Bader, David Bakhash, Eli
Barzilay, Steven L.@: Baur, Boaz Ben-Zvi, Ray Blaak, Jim Blandy, Per
Bothner, Terrence Brannon, Frank Bresz, Peter Breton, Emmanuel Briot,
Kevin Broadey, Vincent Broman, David M.@: Brown, Georges Brun-Cottan,
W@l{}odek Bzyl, Bill Carpenter, Per Cederqvist, Hans Chalupsky, Chris
Chase, Bob Chassell, Andrew Choi, James Clark, Mike Clarkson, Glynn
Clements, Andrew Csillag, Doug Cutting, Michael DeCorte, Gary Delp,
Matthieu Devin, Eri Ding, Jan Dj@"{a}rv, Carsten Dominik, Scott
Draves, Benjamin Drieu, Viktor Dukhovni, John Eaton, Rolf Ebert,
Stephen Eglen, Torbj@"orn Einarsson, Tsugutomo Enami, Hans Henrik
Eriksen, Michael Ernst, Ata Etemadi, Frederick Farnbach, Oscar
Figueiredo, Fred Fish, Karl Fogel, Gary Foster, Noah Friedman,
Hallvard Furuseth, Keith Gabryelski, Kevin Gallagher, Kevin Gallo,
Juan Le@'{o}n Lahoz Garc@'{i}a, Howard Gayle, Stephen Gildea, Julien
Gilles, David Gillespie, Bob Glickstein, Boris Goldowsky, Michelangelo
Grigni, Odd Gripenstam, Kai Gro@ss{}johann, Michael Gschwind, Henry
Guillaume, Doug Gwyn, Ken'ichi Handa, Chris Hanson, K. Shane Hartman,
John Heidemann, Jon K.@: Hellan, Markus Heritsch, Karl Heuer, Manabu
Higashida, Anders Holst, Kurt Hornik, Tom Houlder, Denis Howe, Lars
Ingebrigtsen, Andrew Innes, Seiichiro Inoue, Ulf Jasper, Michael
K. Johnson, Kyle Jones, Terry Jones, Simon Josefsson, Tomoji Kagatani,
Brewster Kahle, David Kaufman, Henry Kautz, Taichi Kawabata, Howard
Kaye, Michael Kifer, Richard King, Peter Kleiweg, Larry K.@: Kolodney,
Pavel Kobiakov, Larry K.@: Kolodney, David M.@: Koppelman, Koseki
Yoshinori, Robert Krawitz, Sebastian Kremer, Ryszard Kubiak, Geoff
Kuenning, David K@aa{}gedal, Daniel LaLiberte, Aaron Larson, James
R.@: Larus, Vinicius Jose Latorre, Frederic Lepied, Peter Liljenberg,
Lars Lindberg, Chris Lindblad, Anders Lindgren, Thomas Link, Dave
Love, Eric Ludlam, Alan Mackenzie, Christopher J.@: Madsen,
Neil M.@: Mager, Ken Manheimer, Bill Mann, Brian Marick, Simon
Marshall, Bengt Martensson, Charlie Martin, Thomas May, Roland McGrath,
Will Mengarini, David Megginson, Wayne Mesard, Brad Miller, Richard
Contributors to GNU Emacs include Jari Aalto, Per Abrahamsen, Tomas
Abrahamsson, Jay K.@: Adams, Michael Albinus, Nagy Andras, Ralf
Angeli, Joe Arceneaux, Miles Bader, David Bakhash, Juanma Barranquero,
Eli Barzilay, Steven L.@: Baur, Jay Belanger, Alexander L.@: Belikoff,
Boaz Ben-Zvi, Karl Berry, Ray Blaak, Jim Blandy, Johan Bockg@aa{}rd,
Per Bothner, Terrence Brannon, Frank Bresz, Peter Breton, Emmanuel
Briot, Kevin Broadey, Vincent Broman, David M.@: Brown, Georges
Brun-Cottan, Joe Buehler, W@l{}odek Bzyl, Bill Carpenter, Per
Cederqvist, Hans Chalupsky, Chris Chase, Bob Chassell, Andrew Choi,
Sacha Chua, James Clark, Mike Clarkson, Glynn Clements, Andrew
Csillag, Doug Cutting, Mathias Dahl, Satyaki Das, Michael DeCorte,
Gary Delp, Matthieu Devin, Eri Ding, Jan Dj@"{a}rv, Carsten Dominik,
Scott Draves, Benjamin Drieu, Viktor Dukhovni, John Eaton, Rolf Ebert,
Paul Eggert, Stephen Eglen, Torbj@"orn Einarsson, Tsugutomo Enami,
Hans Henrik Eriksen, Michael Ernst, Ata Etemadi, Frederick Farnbach,
Oscar Figueiredo, Fred Fish, Karl Fogel, Gary Foster, Romain
Francoise, Noah Friedman, Andreas Fuchs, Hallvard Furuseth, Keith
Gabryelski, Peter S.@: Galbraith, Kevin Gallagher, Kevin Gallo, Juan
Le@'{o}n Lahoz Garc@'{@dotless{i}}a, Howard Gayle, Stephen Gildea, Julien
Gilles, David Gillespie, Bob Glickstein, Deepak Goel, Boris Goldowsky,
Michelangelo Grigni, Odd Gripenstam, Kai Gro@ss{}johann, Michael
Gschwind, Henry Guillaume, Doug Gwyn, Ken'ichi Handa, Lars Hansen,
Chris Hanson, K. Shane Hartman, John Heidemann, Jon K.@: Hellan,
Jesper Harder, Markus Heritsch, Karl Heuer, Manabu Higashida, Anders
Holst, Jeffrey C.@: Honig, Kurt Hornik, Tom Houlder, Joakim Hove,
Denis Howe, Lars Ingebrigtsen, Andrew Innes, Seiichiro Inoue, Pavel
Janik, Paul Jarc, Ulf Jasper, Michael K. Johnson, Kyle Jones, Terry
Jones, Simon Josefsson, Arne J@/orgensen, Tomoji Kagatani, Brewster
Kahle, Lute Kamstra, David Kastrup, David Kaufman, Henry Kautz, Taichi
Kawabata, Howard Kaye, Michael Kifer, Richard King, Peter Kleiweg,
Shuhei Kobayashi, Pavel Kobiakov, Larry K.@: Kolodney, David M.@:
Koppelman, Koseki Yoshinori, Robert Krawitz, Sebastian Kremer, Ryszard
Kubiak, Geoff Kuenning, David K@aa{}gedal, Daniel LaLiberte, Mario
Lang, Aaron Larson, James R.@: Larus, Vinicius Jose Latorre, Werner
Lemberg, Frederic Lepied, Peter Liljenberg, Lars Lindberg, Chris
Lindblad, Anders Lindgren, Thomas Link, Juri Linkov, Francis Litterio,
Emilio C. Lopes, Dave Love, Sascha L@"{u}decke, Eric Ludlam,Alan
Mackenzie, Christopher J.@: Madsen, Neil M.@: Mager, Ken Manheimer,
Bill Mann, Brian Marick, Simon Marshall, Bengt Martensson, Charlie
Martin, Thomas May, Roland McGrath, Will Mengarini, David Megginson,
Ben A. Mesander, Wayne Mesard, Brad Miller, Lawrence Mitchell, Richard
Mlynarik, Gerd Moellmann, Stefan Monnier, Morioka Tomohiko, Keith
Moore, Sen Nagata, Erik Naggum, Thomas Neumann, Thien-Thi Nguyen, Mike
Newton, Jurgen Nickelsen, Dan Nicolaescu, Jeff Norden, Andrew Norman,
Alexandre Oliva, Bob Olson, Takaaki Ota, Pieter E.@: J.@: Pareit,
Moore, Glenn Morris, Diane Murray, Sen Nagata, Erik Naggum, Thomas
Neumann, Thien-Thi Nguyen, Mike Newton, Jurgen Nickelsen, Dan
Nicolaescu, Hrvoje Niksic, Jeff Norden, Andrew Norman, Alexandre
Oliva, Bob Olson, Michael Olson, Takaaki Ota, Pieter E.@: J.@: Pareit,
David Pearson, Jeff Peck, Damon Anton Permezel, Tom Perrine, William
M.@: Perry, Per Persson, Jens Petersen, Daniel Pfeiffer, Richard
L.@: Pieri, Fred Pierresteguy, Christian Plaunt, David Ponce, Francesco
A. Potorti, Michael D. Prange, Mukesh Prasad, Marko Rahamaa, Ashwin
Ram, Eric S. Raymond, Paul Reilly, Edward M. Reingold, Alex Rezinsky,
Rob Riepel, Nick Roberts, Roland B.@: Roberts, John Robinson, Danny
Roozendaal, William Rosenblatt, Guillermo J.@: Rozas, Ivar Rummelhoff,
Jason Rumney, Wolfgang Rupprecht, Kevin Ryde, James B. Salem, Masahiko
Sato, Holger Schauer, William Schelter, Ralph Schleicher, Gregor
M.@: Perry, Per Persson, Jens Petersen, Daniel Pfeiffer, Richard L.@:
Pieri, Fred Pierresteguy, Christian Plaunt, David Ponce, Francesco
A.@: Potorti, Michael D. Prange, Mukesh Prasad, Ken Raeburn, Marko
Rahamaa, Ashwin Ram, Eric S. Raymond, Paul Reilly, Edward M. Reingold,
Alex Rezinsky, Rob Riepel, David Reitter, Nick Roberts, Roland B.@:
Roberts, John Robinson, Danny Roozendaal, William Rosenblatt,
Guillermo J.@: Rozas, Martin Rudalics, Ivar Rummelhoff, Jason Rumney,
Wolfgang Rupprecht, Kevin Ryde, James B. Salem, Masahiko Sato, Jorgen
Schaefer, Holger Schauer, William Schelter, Ralph Schleicher, Gregor
Schmid, Michael Schmidt, Ronald S. Schnell, Philippe Schnoebelen, Jan
Schormann, Alex Schroeder, Stephen Schoef, Randal Schwartz, Oliver
Seidel, Manuel Serrano, Hovav Shacham, Stanislav Shalunov, Mark
Shapiro, Richard Sharman, Olin Shivers, Espen Skoglund, Rick Sladkey,
Lynn Slater, Chris Smith, David Smith, Paul D.@: Smith, Andre Spiegel,
Michael Staats, William Sommerfeld, Michael Staats, Sam Steingold, Ake
Stenhoff, Peter Stephenson, Ken Stevens, Jonathan Stigelman, Martin
Stjernholm, Kim F.@: Storm, Steve Strassman, Olaf Sylvester, Naoto
Takahashi, Jean-Philippe Theberge, Jens T.@: Berger Thielemann,
Spencer Thomas, Jim Thompson, Tom Tromey, Daiki Ueno, Masanobu Umeda,
Rajesh Vaidheeswarran, Neil W.@: Van Dyke, Didier Verna, Ulrik Vieth,
Geoffrey Voelker, Johan Vromans, Inge Wallin, Colin Walters, Barry
Warsaw, Morten Welinder, Joseph Brian Wells, Rodney Whitby, John
Wiegley, Ed Wilkinson, Mike Williams, Bill Wohler, Steven A. Wood,
Dale R.@: Worley, Francis J.@: Wright, Felix S. T. Wu, Tom Wurgler,
Masatake Yamato, Jonathan Yavner, Ilya Zakharevich, Milan Zamazal,
Victor Zandy, Eli Zaretskii, Jamie Zawinski, Shenghuo Zhu, Ian
T.@: Zimmermann, Reto Zimmermann, Neal Ziring, and Detlev Zundel.
Schormann, Alex Schroeder, Stephen Schoef, Raymond Scholz, Randal
Schwartz, Oliver Seidel, Manuel Serrano, Hovav Shacham, Stanislav
Shalunov, Mark Shapiro, Richard Sharman, Olin Shivers, Espen Skoglund,
Rick Sladkey, Lynn Slater, Chris Smith, David Smith, Paul D.@: Smith,
Andre Spiegel, Michael Staats, William Sommerfeld, Michael Staats,
Reiner Steib, Sam Steingold, Ake Stenhoff, Peter Stephenson, Ken
Stevens, Jonathan Stigelman, Martin Stjernholm, Kim F.@: Storm, Steve
Strassman, Olaf Sylvester, Naoto Takahashi, Steven Tamm, Jean-Philippe
Theberge, Jens T.@: Berger Thielemann, Spencer Thomas, Jim Thompson,
Luc Teirlinck, Tom Tromey, Enami Tsugutomo, Eli Tziperman, Daiki Ueno,
Masanobu Umeda, Rajesh Vaidheeswarran, Neil W.@: Van Dyke, Didier
Verna, Ulrik Vieth, Geoffrey Voelker, Johan Vromans, Inge Wallin, John
Paul Wallington, Colin Walters, Barry Warsaw, Morten Welinder, Joseph
Brian Wells, Rodney Whitby, John Wiegley, Ed Wilkinson, Mike Williams,
Bill Wohler, Steven A. Wood, Dale R.@: Worley, Francis J.@: Wright,
Felix S. T. Wu, Tom Wurgler, Katsumi Yamaoka, Masatake Yamato,
Jonathan Yavner, Ryan Yeske, Chong Yidong, Ilya Zakharevich, Milan
Zamazal, Victor Zandy, Eli Zaretskii, Jamie Zawinski, Shenghuo Zhu,
Ian T.@: Zimmermann, Reto Zimmermann, Neal Ziring, Teodor Zlatanov,
and Detlev Zundel.
@end iftex
@node Intro, Glossary, Distrib, Top

6
man/faq.texi
View file

@ -1382,7 +1382,7 @@ initialization disables it.) Note that Emacs will not display the line
number if the buffer's size in bytes is larger than the value of the
variable @code{line-number-display-limit}.
As of Emacs 20, you can similarly display the current column with
You can similarly display the current column with
@kbd{M-x column-number-mode}, or by putting the form
@lisp
@ -3848,8 +3848,8 @@ Java code. It is distributed with Emacs, but has
Or send reports to @email{bug-vm@@wonderworks.com}
@end table
VM 7 works well with Emacs 21. Older versions of VM suitable for use
with older versions of Emacs are available from
VM 7 works well with Emacs 21 and Emacs 22. Older versions of VM
suitable for use with older versions of Emacs are available from
@uref{ftp://ftp.wonderworks.com/pub/vm/, the same FTP site}.

13
man/gnus-faq.texi
View file

@ -172,13 +172,14 @@ Where and how to get Gnus?
@subsubheading Answer
The latest released version of Gnus isn't included in
Emacs 21, therefor you should get the Gnus tarball from
@uref{http://www.gnus.org/dist/gnus.tar.gz}
or via anonymous FTP from
Gnus is released independent from releases of Emacs and XEmacs.
Therefore, the version bundled with Emacs or the version in XEmacs'
package system might not be up to date (e.g. Gnus 5.9 bundled with Emacs
20 is outdated).
@c
You can get the latest released version of Gnus from
@uref{http://www.gnus.org/dist/gnus.tar.gz} or via anonymous FTP from
@uref{ftp://ftp.gnus.org/pub/gnus/gnus.tar.gz}.
If you use XEmacs instead of Emacs you can use XEmacs'
package system instead.
@node [1.4]
@subsubheading Question 1.4

9
man/gnus.texi
View file

@ -2139,7 +2139,7 @@ If @code{gnus-auto-select-first} is non-@code{nil}, select an article
automatically when entering a group with the @kbd{SPACE} command.
Which article this is is controlled by the
@code{gnus-auto-select-subject} variable. Valid values for this
variable is:
variable are:
@table @code
@ -22137,8 +22137,8 @@ It takes the group name as a parameter.
@section Image Enhancements
XEmacs, as well as Emacs 21@footnote{Emacs 21 on MS Windows doesn't
support images yet.}, is able to display pictures and stuff, so Gnus has
taken advantage of that.
support images, Emacs 22 does.} and up, are able to display pictures and
stuff, so Gnus has taken advantage of that.
@menu
* X-Face:: Display a funky, teensy black-and-white image.
@ -24471,7 +24471,7 @@ Save table: (spam-stat-save)
@subsection Dired
@cindex dired
@code{gnus-dired-minor-mode} provided some useful functions for dired
@code{gnus-dired-minor-mode} provides some useful functions for dired
buffers. It is enabled with
@lisp
(add-hook 'dired-mode-hook 'turn-on-gnus-dired-mode)
@ -24480,6 +24480,7 @@ buffers. It is enabled with
@table @kbd
@item C-c C-m C-a
@findex gnus-dired-attach
@cindex attachments, selection via dired
Send dired's marked files as an attachment (@code{gnus-dired-attach}).
You will be prompted for a message buffer.

24
man/widget.texi
View file

@ -158,7 +158,7 @@ it will be autoloaded when needed.
@comment node-name, next, previous, up
@section User Interface
A form consist of read only text for documentation and some fields,
A form consists of read only text for documentation and some fields,
where each field contains two parts, a tag and a value. The tags are
used to identify the fields, so the documentation can refer to the
@samp{foo field}, meaning the field tagged with @samp{Foo}. Here is an
@ -195,7 +195,7 @@ Select one:
@b{[Apply Form]} @b{[Reset Form]}
@end example
The top level widgets in is example are tagged @samp{Name},
The top level widgets in this example are tagged @samp{Name},
@samp{Choose}, @samp{Address}, @samp{_other work_}, @samp{Numbers},
@samp{Select multiple}, @samp{Select one}, @samp{[Apply Form]}, and
@samp{[Reset Form]}. There are basically two things the user can do
@ -277,19 +277,19 @@ The list is created by the @code{editable-list} widget.
@cindex embedded buttons
@item Embedded Buttons
The @samp{@b{_other work_}} is an example of an embedded
button. Embedded buttons are not associated with a fields, but can serve
button. Embedded buttons are not associated with any fields, but can serve
any purpose, such as implementing hypertext references. They are
usually created by the @code{link} widget.
@item The @samp{@b{[ ]}} and @samp{@b{[X]}} buttons
Activating one of these will convert it to the other. This is useful
for implementing multiple-choice fields. You can create it with the
for implementing multiple-choice fields. You can create them with the
@code{checkbox} widget.
@item The @samp{@b{( )}} and @samp{@b{(*)}} buttons
Only one radio button in a @code{radio-button-choice} widget can be
selected at any time. When you invoke one of the unselected radio
buttons, it will be selected and the previous selected radio button will
become unselected.
@item The @samp{@b{[Apply Form]}} @samp{@b{[Reset Form]}} buttons
@item The @samp{@b{[Apply Form]}} and @samp{@b{[Reset Form]}} buttons
These are explicit buttons made with the @code{push-button} widget. The
main difference from the @code{link} widget is that the buttons will be
displayed as GUI buttons when possible.
@ -492,7 +492,7 @@ property, @var{argument} is the value of the property, and @var{args}
are interpreted in a widget specific way.
@cindex keyword arguments
The following keyword arguments that apply to all widgets:
The following keyword arguments apply to all widgets:
@table @code
@vindex value@r{ keyword}
@ -807,7 +807,7 @@ TYPE ::= (editable-field [KEYWORD ARGUMENT]... [ VALUE ])
@end example
The @var{value}, if present, is used to initialize the @code{:value}
property. The value should be a string, which will be inserted in
property. The value should be a string, which will be inserted in the
field. This widget will match all string values.
The following extra properties are recognized:
@ -1349,7 +1349,7 @@ second component. There must be exactly two components.
@deffn Widget list
The value of a @code{list} widget is a list containing the value of
each of its component.
each of its components.
@end deffn
@deffn Widget vector
@ -1359,11 +1359,11 @@ each of its component.
The above suffice for specifying fixed size lists and vectors. To get
variable length lists and vectors, you can use a @code{choice},
@code{set}, or @code{repeat} widgets together with the @code{:inline}
keywords. If any component of a composite widget has the @code{:inline}
@code{set}, or @code{repeat} widget together with the @code{:inline}
keyword. If any component of a composite widget has the @code{:inline}
keyword set, its value must be a list which will then be spliced into
the composite. For example, to specify a list whose first element must
be a file name, and whose remaining arguments should either by the
be a file name, and whose remaining arguments should either be the
symbol @code{t} or two files, you can use the following widget
specification:
@ -1390,7 +1390,7 @@ and has a similar syntax.
@deffn Widget set
Allows you to specify a type which must be a list whose elements all
belong to given set. The elements of the list are not significant.
belong to the given set. The elements of the list are not significant.
This is implemented on top of the @code{checklist} basic widget, and has
a similar syntax.
@end deffn

4
nt/INSTALL
View file

@ -103,7 +103,7 @@
If you use the MinGW port of GCC and GNU Make to build Emacs, there
are some compatibility issues wrt Make and the shell that is run by
Make, either the standard COMMAND.COM/CMD.EXE supplied with Windows
or sh.exe., a port of a Unixy shell. For reference, here is a list
or sh.exe., a port of a Unixy shell. For reference, below is a list
of which builds of GNU Make are known to work or not, and whether
they work in the presence and/or absence of sh.exe, the Cygwin port
of Bash. Note that any version of Make that is compiled with Cygwin
@ -129,6 +129,8 @@
cygwin compiled gmake 3.77: fails[1, 5] fails[2, 5]
cygwin compiled make 3.78.1: fails[5] fails[2, 5]
cygwin compiled make 3.79.1: fails[3, 5] fails[2?, 5]
cygwin compiled make 3.80: fails?[6] fails?[6]
cygwin compiled make 3.81: fails fails?[6]
mingw32 compiled make 3.79.1: okay okay
mingw32 compiled make 3.80: okay unknown[6]
mingw32 compiled make 3.81: okay okay[7]

97
src/ChangeLog
View file

@ -1,3 +1,91 @@
2006-10-14 Richard Stallman <rms@gnu.org>
* sysdep.c (init_sys_modes): Delete DEFVAR_LISP in the wrong place.
2006-10-13 Chong Yidong <cyd@stupidchicken.com>
* xdisp.c (decode_mode_spec): Ignore %c and %l constructs in frame
title.
2006-10-12 Chong Yidong <cyd@stupidchicken.com>
* keymap.c (Fkey_binding): Check Lisp_Object types before doing
XCAR and XINT.
2006-10-12 Romain Francoise <romain@orebokech.com>
* image.c (xbm_read_bitmap_data): Delete extra semicolon.
2006-10-10 Stefan Monnier <monnier@iro.umontreal.ca>
* eval.c: Include xterm.h for x_fully_uncatch_errors and friends.
* dispextern.h: Declare x_create_bitmap_from_xpm_data.
* xterm.c (x_check_expected_move): Remove unused var `count'.
* xmenu.c (syms_of_xmenu): Use Ffset rather than Fdefalias, since
Fdefalias is not declared in any *.h file.
2006-10-09 Chong Yidong <cyd@stupidchicken.com>
* dispnew.c (sit_for): Sit forever if TIMEOUT is t.
* keyboard.c (command_loop_1): Handle non-number values of
`minibuffer-message-timeout'.
(Fexecute_extended_command): Fix typo.
* minibuf.c (temp_echo_area_glyphs): Sit for
`minibuffer-message-timeout' seconds.
2006-10-08 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
* macterm.c (mac_draw_image_string, mac_draw_image_string_16):
Add argument OVERSTRIKE_P.
(mac_draw_string_common, mac_draw_image_string_cg): Likewise.
Support overstrike.
(mac_draw_string, mac_draw_string_16): Remove functions.
(x_draw_glyph_string_foreground): Use overstrike when needed.
(x_draw_composite_glyph_string_foreground): Likewise.
Use mac_draw_image_string_16 instead of mac_draw_string_16.
(mac_load_query_font): Rename from XLoadQueryFont. Take argument F
instead of DPY. All uses changed. Don't save/restore font.
2006-10-07 Ralf Angeli <angeli@caeruleus.net>
* w32fns.c (w32_createwindow): Honour left and top positions if
supplied explicitly.
2006-10-06 Kim F. Storm <storm@cua.dk>
* xdisp.c (pos_visible_p): Fix value when EOB is visible.
2006-10-05 Chong Yidong <cyd@stupidchicken.com>
* frame.c (Qinhibit_face_set_after_frame_default): New var.
(syms_of_frame): Initialize it.
(x_set_frame_parameters): Avoid resetting :font attributes to the
new-frame defaults.
2006-10-03 Stefan Monnier <monnier@iro.umontreal.ca>
* lisp.h (clear_regexp_cache): Declare.
* search.c (compile_pattern): Only check `cp->syntax_table' if needed.
(compile_pattern_1): Remember `used_syntax' in `cp->syntax_table'.
(clear_regexp_cache): Only flush those regexps which depend on
a syntax-table.
* regex.c (regex_compile): Set the new `used_syntax' bit.
* regex.h: Remove file local variables.
(struct re_pattern_buffer): New field `used_syntax'.
2006-10-03 Kim F. Storm <storm@cua.dk>
* process.c (list_processes_1): Run sentinels before removing dead
processes. Also remove `closed' network connections.
2006-10-01 Stefan Monnier <monnier@iro.umontreal.ca>
* xdisp.c (handle_fontified_prop): Don't fontify at EOB.
@ -52,8 +140,8 @@
2006-09-24 Eli Zaretskii <eliz@gnu.org>
* makefile.w32-in ($(BLD)/fns.$(O), $(BLD)/w32proc.$(O)): Depend
on nt/inc/langinfo.h and nt/inc/nl_types.h.
* makefile.w32-in ($(BLD)/fns.$(O), $(BLD)/w32proc.$(O)):
Depend on nt/inc/langinfo.h and nt/inc/nl_types.h.
* w32proc.c (nl_langinfo): New function.
@ -235,8 +323,7 @@
2006-09-15 David Kastrup <dak@gnu.org>
* Makefile.in (keymap.o): Add "keymap.h" and "window.h"
dependencies.
* Makefile.in (keymap.o): Add "keymap.h" and "window.h" dependencies.
* keymap.c: include "window.h".
(Fcommand_remapping): New optional POSITION argument.
@ -1477,7 +1564,7 @@
(x_set_offset, x_check_fullscreen): Extensive changes to make
frame positioning deterministic under X.
* xterm.h (x_output): Added members left_before_move and
* xterm.h (x_output): Add members left_before_move and
top_before_move. Removed members expected_left and expected_top.
2006-06-16 Kim F. Storm <storm@cua.dk>

3
src/dispextern.h
View file

@ -2794,6 +2794,9 @@ extern void x_reference_bitmap P_ ((struct frame *, int));
extern int x_create_bitmap_from_data P_ ((struct frame *, char *,
unsigned int, unsigned int));
extern int x_create_bitmap_from_file P_ ((struct frame *, Lisp_Object));
#if defined (HAVE_XPM) && defined (HAVE_X_WINDOWS)
extern int x_create_bitmap_from_xpm_data P_ ((struct frame *f, char **bits));
#endif
#ifndef x_destroy_bitmap
extern void x_destroy_bitmap P_ ((struct frame *, int));
#endif

10
src/dispnew.c
View file

@ -6488,7 +6488,8 @@ Emacs was built without floating point support.
/* This is just like wait_reading_process_output, except that
it does redisplay.
TIMEOUT is number of seconds to wait (float or integer).
TIMEOUT is number of seconds to wait (float or integer),
or t to wait forever.
READING is 1 if reading input.
If DO_DISPLAY is >0 display process output while waiting.
If DO_DISPLAY is >1 perform an initial redisplay before waiting.
@ -6521,10 +6522,15 @@ sit_for (timeout, reading, do_display)
sec = (int) seconds;
usec = (int) ((seconds - sec) * 1000000);
}
else if (EQ (timeout, Qt))
{
sec = 0;
usec = 0;
}
else
wrong_type_argument (Qnumberp, timeout);
if (sec == 0 && usec == 0)
if (sec == 0 && usec == 0 && !EQ (timeout, Qt))
return Qt;
#ifdef SIGIO

4
src/eval.c
View file

@ -28,6 +28,10 @@ Boston, MA 02110-1301, USA. */
#include "dispextern.h"
#include <setjmp.h>
#if HAVE_X_WINDOWS
#include "xterm.h"
#endif
/* This definition is duplicated in alloc.c and keyboard.c */
/* Putting it in lisp.h makes cc bomb out! */

15
src/frame.c
View file

@ -116,6 +116,7 @@ Lisp_Object Qfullscreen, Qfullwidth, Qfullheight, Qfullboth;
Lisp_Object Qfont_backend;
#endif /* USE_FONT_BACKEND */
Lisp_Object Qinhibit_face_set_after_frame_default;
Lisp_Object Qface_set_after_frame_default;
@ -2742,12 +2743,20 @@ x_set_frame_parameters (f, alist)
|| EQ (prop, Qfullscreen))
{
register Lisp_Object param_index, old_value;
int count = SPECPDL_INDEX ();
old_value = get_frame_param (f, prop);
fullscreen_is_being_set |= EQ (prop, Qfullscreen);
if (NILP (Fequal (val, old_value)))
{
/* For :font attributes, the frame_parm_handler
x_set_font calls `face-set-after-frame-default'.
Unless we bind inhibit-face-set-after-frame-default
here, this would reset the :font attribute that we
just applied to the default value for new faces. */
specbind (Qinhibit_face_set_after_frame_default, Qt);
store_frame_param (f, prop, val);
param_index = Fget (prop, Qx_frame_parameter);
@ -2756,6 +2765,8 @@ x_set_frame_parameters (f, alist)
< sizeof (frame_parms)/sizeof (frame_parms[0]))
&& rif->frame_parm_handlers[XINT (param_index)])
(*(rif->frame_parm_handlers[XINT (param_index)])) (f, val, old_value);
unbind_to (count, Qnil);
}
}
}
@ -4112,6 +4123,10 @@ syms_of_frame ()
Qface_set_after_frame_default = intern ("face-set-after-frame-default");
staticpro (&Qface_set_after_frame_default);
Qinhibit_face_set_after_frame_default
= intern ("inhibit-face-set-after-frame-default");
staticpro (&Qinhibit_face_set_after_frame_default);
Qfullwidth = intern ("fullwidth");
staticpro (&Qfullwidth);
Qfullheight = intern ("fullheight");

2
src/image.c
View file

@ -3151,7 +3151,7 @@ xbm_read_bitmap_data (f, contents, end, width, height, data)
expect_ident ("define");
expect (XBM_TK_IDENT);
if (LA1 == XBM_TK_NUMBER);
if (LA1 == XBM_TK_NUMBER)
{
char *p = strrchr (buffer, '_');
p = p ? p + 1 : buffer;

10
src/keyboard.c
View file

@ -1546,15 +1546,17 @@ command_loop_1 ()
if (minibuf_level
&& !NILP (echo_area_buffer[0])
&& EQ (minibuf_window, echo_area_window)
&& NUMBERP (Vminibuffer_message_timeout))
&& EQ (minibuf_window, echo_area_window))
{
/* Bind inhibit-quit to t so that C-g gets read in
rather than quitting back to the minibuffer. */
int count = SPECPDL_INDEX ();
specbind (Qinhibit_quit, Qt);
sit_for (Vminibuffer_message_timeout, 0, 2);
if (NUMBERP (Vminibuffer_message_timeout))
sit_for (Vminibuffer_message_timeout, 0, 2);
else
sit_for (Qt, 0, 2);
/* Clear the echo area. */
message2 (0, 0, 0);
@ -9981,7 +9983,7 @@ give to the command you invoke, if it asks for an argument. */)
if (NILP (echo_area_buffer[0]))
waited = sit_for (make_number (0), 0, 2);
else if (NUMBERP (Vsuggest_key_bindings))
waited = sit_for (Vminibuffer_message_timeout, 0, 2);
waited = sit_for (Vsuggest_key_bindings, 0, 2);
else
waited = sit_for (make_number (2), 0, 2);

16
src/keymap.c
View file

@ -1643,13 +1643,12 @@ specified buffer position instead of point are used.
/* We are not interested in locations without event data */
if (EVENT_HAS_PARAMETERS (event)) {
Lisp_Object kind;
kind = EVENT_HEAD_KIND (EVENT_HEAD (event));
if (EQ (kind, Qmouse_click))
position = EVENT_START (event);
}
if (EVENT_HAS_PARAMETERS (event))
{
Lisp_Object kind = EVENT_HEAD_KIND (EVENT_HEAD (event));
if (CONSP (XCDR (event)) && EQ (kind, Qmouse_click))
position = EVENT_START (event);
}
}
/* Key sequences beginning with mouse clicks
@ -1742,7 +1741,8 @@ specified buffer position instead of point are used.
pos = XCDR (string);
string = XCAR (string);
if (XINT (pos) >= 0
if (INTEGERP (pos)
&& XINT (pos) >= 0
&& XINT (pos) < SCHARS (string))
{
map = Fget_text_property (pos, Qlocal_map, string);

1
src/lisp.h
View file

@ -2957,6 +2957,7 @@ extern int find_next_newline P_ ((int, int));
extern int find_next_newline_no_quit P_ ((int, int));
extern int find_before_next_newline P_ ((int, int, int));
extern void syms_of_search P_ ((void));
extern void clear_regexp_cache P_ ((void));
/* defined in minibuf.c */

134
src/macterm.c
View file

@ -893,12 +893,13 @@ mac_invert_rectangle (f, x, y, width, height)
static void
mac_draw_string_common (f, gc, x, y, buf, nchars, bg_width, bytes_per_char)
mac_draw_string_common (f, gc, x, y, buf, nchars, bg_width,
overstrike_p, bytes_per_char)
struct frame *f;
GC gc;
int x, y;
char *buf;
int nchars, bg_width, bytes_per_char;
int nchars, bg_width, overstrike_p, bytes_per_char;
{
SetPortWindowPort (FRAME_MAC_WINDOW (f));
@ -948,6 +949,13 @@ mac_draw_string_common (f, gc, x, y, buf, nchars, bg_width, bytes_per_char)
ATSUDrawText (text_layout,
kATSUFromTextBeginning, kATSUToTextEnd,
kATSUUseGrafPortPenLoc, kATSUUseGrafPortPenLoc);
if (overstrike_p)
{
MoveTo (x + 1, y);
ATSUDrawText (text_layout,
kATSUFromTextBeginning, kATSUToTextEnd,
kATSUUseGrafPortPenLoc, kATSUUseGrafPortPenLoc);
}
mac_end_clip (gc);
#ifdef MAC_OSX
}
@ -991,9 +999,15 @@ mac_draw_string_common (f, gc, x, y, buf, nchars, bg_width, bytes_per_char)
sizeof (tags) / sizeof (tags[0]),
tags, sizes, values);
if (err == noErr)
ATSUDrawText (text_layout,
kATSUFromTextBeginning, kATSUToTextEnd,
Long2Fix (x), Long2Fix (port_height - y));
{
ATSUDrawText (text_layout,
kATSUFromTextBeginning, kATSUToTextEnd,
Long2Fix (x), Long2Fix (port_height - y));
if (overstrike_p)
ATSUDrawText (text_layout,
kATSUFromTextBeginning, kATSUToTextEnd,
Long2Fix (x + 1), Long2Fix (port_height - y));
}
#if USE_CG_DRAWING
mac_end_cg_clip (f);
context = NULL;
@ -1059,6 +1073,12 @@ mac_draw_string_common (f, gc, x, y, buf, nchars, bg_width, bytes_per_char)
TextFace (GC_FONT (gc)->mac_fontface);
MoveTo (x, y);
DrawText (buf, 0, nchars * bytes_per_char);
if (overstrike_p)
{
TextMode (srcOr);
MoveTo (x + 1, y);
DrawText (buf, 0, nchars * bytes_per_char);
}
if (bg_width)
RGBBackColor (GC_BACK_COLOR (FRAME_NORMAL_GC (f)));
mac_end_clip (gc);
@ -1071,59 +1091,33 @@ mac_draw_string_common (f, gc, x, y, buf, nchars, bg_width, bytes_per_char)
}
/* Mac replacement for XDrawString. */
static void
mac_draw_string (f, gc, x, y, buf, nchars)
struct frame *f;
GC gc;
int x, y;
char *buf;
int nchars;
{
mac_draw_string_common (f, gc, x, y, buf, nchars, 0, 1);
}
/* Mac replacement for XDrawString16. */
static void
mac_draw_string_16 (f, gc, x, y, buf, nchars)
struct frame *f;
GC gc;
int x, y;
XChar2b *buf;
int nchars;
{
mac_draw_string_common (f, gc, x, y, (char *) buf, nchars, 0, 2);
}
/* Mac replacement for XDrawImageString. */
static void
mac_draw_image_string (f, gc, x, y, buf, nchars, bg_width)
mac_draw_image_string (f, gc, x, y, buf, nchars, bg_width, overstrike_p)
struct frame *f;
GC gc;
int x, y;
char *buf;
int nchars, bg_width;
int nchars, bg_width, overstrike_p;
{
mac_draw_string_common (f, gc, x, y, buf, nchars, bg_width, 1);
mac_draw_string_common (f, gc, x, y, buf, nchars, bg_width,
overstrike_p, 1);
}
/* Mac replacement for XDrawString16. */
/* Mac replacement for XDrawImageString16. */
static void
mac_draw_image_string_16 (f, gc, x, y, buf, nchars, bg_width)
mac_draw_image_string_16 (f, gc, x, y, buf, nchars, bg_width, overstrike_p)
struct frame *f;
GC gc;
int x, y;
XChar2b *buf;
int nchars, bg_width;
int nchars, bg_width, overstrike_p;
{
mac_draw_string_common (f, gc, x, y, (char *) buf, nchars, bg_width, 2);
mac_draw_string_common (f, gc, x, y, (char *) buf, nchars, bg_width,
overstrike_p, 2);
}
@ -1297,12 +1291,12 @@ init_cg_text_anti_aliasing_threshold ()
}
static int
mac_draw_image_string_cg (f, gc, x, y, buf, nchars, bg_width)
mac_draw_image_string_cg (f, gc, x, y, buf, nchars, bg_width, overstrike_p)
struct frame *f;
GC gc;
int x, y;
XChar2b *buf;
int nchars, bg_width;
int nchars, bg_width, overstrike_p;
{
CGrafPtr port;
float port_height, gx, gy;
@ -1364,10 +1358,17 @@ mac_draw_image_string_cg (f, gc, x, y, buf, nchars, bg_width)
#if MAC_OS_X_VERSION_MAX_ALLOWED >= 1030
CGContextSetTextPosition (context, gx, gy);
CGContextShowGlyphsWithAdvances (context, glyphs, advances, nchars);
if (overstrike_p)
{
CGContextSetTextPosition (context, gx + 1.0f, gy);
CGContextShowGlyphsWithAdvances (context, glyphs, advances, nchars);
}
#else
for (i = 0; i < nchars; i++)
{
CGContextShowGlyphsAtPoint (context, gx, gy, glyphs + i, 1);
if (overstrike_p)
CGContextShowGlyphsAtPoint (context, gx + 1.0f, gy, glyphs + i, 1);
gx += advances[i].width;
}
#endif
@ -2773,15 +2774,18 @@ x_draw_glyph_string_foreground (s)
#if USE_CG_TEXT_DRAWING
if (!s->two_byte_p
&& mac_draw_image_string_cg (s->f, s->gc, x, s->ybase - boff,
s->char2b, s->nchars, bg_width))
s->char2b, s->nchars, bg_width,
s->face->overstrike))
;
else
#endif
mac_draw_image_string_16 (s->f, s->gc, x, s->ybase - boff,
s->char2b, s->nchars, bg_width);
s->char2b, s->nchars, bg_width,
s->face->overstrike);
else
mac_draw_image_string (s->f, s->gc, x, s->ybase - boff,
char1b, s->nchars, bg_width);
char1b, s->nchars, bg_width,
s->face->overstrike);
}
}
@ -2817,10 +2821,10 @@ x_draw_composite_glyph_string_foreground (s)
else
{
for (i = 0; i < s->nchars; i++, ++s->gidx)
mac_draw_string_16 (s->f, s->gc,
x + s->cmp->offsets[s->gidx * 2],
s->ybase - s->cmp->offsets[s->gidx * 2 + 1],
s->char2b + i, 1);
mac_draw_image_string_16 (s->f, s->gc,
x + s->cmp->offsets[s->gidx * 2],
s->ybase - s->cmp->offsets[s->gidx * 2 + 1],
s->char2b + i, 1, 0, s->face->overstrike);
}
}
@ -7801,14 +7805,16 @@ is_fully_specified_xlfd (char *p)
}
/* XLoadQueryFont creates and returns an internal representation for a
font in a MacFontStruct struct. There is really no concept
/* mac_load_query_font creates and returns an internal representation
for a font in a MacFontStruct struct. There is really no concept
corresponding to "loading" a font on the Mac. But we check its
existence and find the font number and all other information for it
and store them in the returned MacFontStruct. */
static MacFontStruct *
XLoadQueryFont (Display *dpy, char *fontname)
mac_load_query_font (f, fontname)
struct frame *f;
char *fontname;
{
int size;
char *name;
@ -8019,26 +8025,13 @@ XLoadQueryFont (Display *dpy, char *fontname)
else
#endif
{
GrafPtr port;
SInt16 old_fontnum, old_fontsize;
Style old_fontface;
FontInfo the_fontinfo;
int is_two_byte_font;
#if USE_CG_DRAWING
mac_prepare_for_quickdraw (NULL);
#endif
/* Save the current font number used. */
GetPort (&port);
#if TARGET_API_MAC_CARBON
old_fontnum = GetPortTextFont (port);
old_fontsize = GetPortTextSize (port);
old_fontface = GetPortTextFace (port);
#else
old_fontnum = port->txFont;
old_fontsize = port->txSize;
old_fontface = port->txFace;
mac_prepare_for_quickdraw (f);
#endif
SetPortWindowPort (FRAME_MAC_WINDOW (f));
TextFont (fontnum);
TextSize (size);
@ -8120,11 +8113,6 @@ XLoadQueryFont (Display *dpy, char *fontname)
for (c = 0x21, pcm = space_bounds + 1; c <= 0xff; c++, pcm++)
mac_query_char_extents (NULL, c, NULL, NULL, pcm, NULL);
}
/* Restore previous font number, size and face. */
TextFont (old_fontnum);
TextSize (old_fontsize);
TextFace (old_fontface);
}
if (space_bounds)
@ -8264,7 +8252,7 @@ x_load_font (f, fontname, size)
fontname = (char *) SDATA (XCAR (font_names));
BLOCK_INPUT;
font = (MacFontStruct *) XLoadQueryFont (FRAME_MAC_DISPLAY (f), fontname);
font = mac_load_query_font (f, fontname);
UNBLOCK_INPUT;
if (!font)
return NULL;

9
src/minibuf.c
View file

@ -2683,6 +2683,8 @@ If no minibuffer is active, return nil. */)
that has no possible completions, and other quick, unobtrusive
messages. */
extern Lisp_Object Vminibuffer_message_timeout;
void
temp_echo_area_glyphs (string)
Lisp_Object string;
@ -2701,7 +2703,12 @@ temp_echo_area_glyphs (string)
insert_from_string (string, 0, 0, SCHARS (string), SBYTES (string), 0);
SET_PT_BOTH (opoint, opoint_byte);
Vinhibit_quit = Qt;
sit_for (make_number (2), 0, 2);
if (NUMBERP (Vminibuffer_message_timeout))
sit_for (Vminibuffer_message_timeout, 0, 2);
else
sit_for (Qt, 0, 2);
del_range_both (osize, osize_byte, ZV, ZV_BYTE, 1);
SET_PT_BOTH (opoint, opoint_byte);
if (!NILP (Vquit_flag))

7
src/process.c
View file

@ -1313,6 +1313,7 @@ list_processes_1 (query_only)
register struct Lisp_Process *p;
char tembuf[300];
int w_proc, w_buffer, w_tty;
int exited = 0;
Lisp_Object i_status, i_buffer, i_tty, i_command;
w_proc = 4; /* Proc */
@ -1439,8 +1440,8 @@ list_processes_1 (query_only)
}
}
if (EQ (symbol, Qsignal) || EQ (symbol, Qexit))
remove_process (proc);
if (EQ (symbol, Qsignal) || EQ (symbol, Qexit) || EQ (symbol, Qclosed))
exited++;
Findent_to (i_buffer, minspace);
if (NILP (p->buffer))
@ -1504,6 +1505,8 @@ list_processes_1 (query_only)
insert_string ("\n");
}
}
if (exited)
status_notify (NULL);
return Qnil;
}

9
src/regex.c
View file

@ -2589,6 +2589,7 @@ regex_compile (pattern, size, syntax, bufp)
bufp->syntax = syntax;
bufp->fastmap_accurate = 0;
bufp->not_bol = bufp->not_eol = 0;
bufp->used_syntax = 0;
/* Set `used' to zero, so that if we return an error, the pattern
printer (for debugging) will think there's no pattern. We reset it
@ -3014,6 +3015,14 @@ regex_compile (pattern, size, syntax, bufp)
}
}
/* In most cases the matching rule for char classes
only uses the syntax table for multibyte chars,
so that the content of the syntax-table it is not
hardcoded in the range_table. SPACE and WORD are
the two exceptions. */
if ((1 << cc) & ((1 << RECC_SPACE) | (1 << RECC_WORD)))
bufp->used_syntax = 1;
/* Repeat the loop. */
continue;
}

12
src/regex.h
View file

@ -392,6 +392,10 @@ struct re_pattern_buffer
/* Similarly for an end-of-line anchor. */
unsigned not_eol : 1;
/* If true, the compilation of the pattern had to look up the syntax table,
so the compiled pattern is only valid for the current syntax table. */
unsigned used_syntax : 1;
#ifdef emacs
/* If true, multi-byte form in the regexp pattern should be
recognized as a multibyte character. When the pattern is
@ -620,13 +624,5 @@ extern void re_set_whitespace_regexp (const char *regexp);
#endif /* regex.h */
/*
Local variables:
make-backup-files: t
version-control: t
trim-versions-without-asking: nil
End:
*/
/* arch-tag: bda6e3ec-3c02-4237-a55a-01ad2e120083
(do not change this comment) */

23
src/search.c
View file

@ -43,7 +43,8 @@ struct regexp_cache
struct regexp_cache *next;
Lisp_Object regexp, whitespace_regexp;
/* Syntax table for which the regexp applies. We need this because
of character classes. */
of character classes. If this is t, then the compiled pattern is valid
for any syntax-table. */
Lisp_Object syntax_table;
struct re_pattern_buffer buf;
char fastmap[0400];
@ -137,7 +138,6 @@ compile_pattern_1 (cp, pattern, translate, regp, posix, multibyte)
cp->buf.multibyte = STRING_MULTIBYTE (pattern);
cp->buf.target_multibyte = multibyte;
cp->whitespace_regexp = Vsearch_spaces_regexp;
cp->syntax_table = current_buffer->syntax_table;
/* rms: I think BLOCK_INPUT is not needed here any more,
because regex.c defines malloc to call xmalloc.
Using BLOCK_INPUT here means the debugger won't run if an error occurs.
@ -151,6 +151,10 @@ compile_pattern_1 (cp, pattern, translate, regp, posix, multibyte)
val = (char *) re_compile_pattern ((char *) SDATA (pattern),
SBYTES (pattern), &cp->buf);
/* If the compiled pattern hard codes some of the contents of the
syntax-table, it can only be reused with *this* syntax table. */
cp->syntax_table = cp->buf.used_syntax ? current_buffer->syntax_table : Qt;
re_set_whitespace_regexp (NULL);
re_set_syntax (old);
@ -178,7 +182,8 @@ shrink_regexp_cache ()
}
}
/* Clear the regexp cache.
/* Clear the regexp cache w.r.t. a particular syntax table,
because it was changed.
There is no danger of memory leak here because re_compile_pattern
automagically manages the memory in each re_pattern_buffer struct,
based on its `allocated' and `buffer' values. */
@ -188,7 +193,11 @@ clear_regexp_cache ()
int i;
for (i = 0; i < REGEXP_CACHE_SIZE; ++i)
searchbufs[i].regexp = Qnil;
/* It's tempting to compare with the syntax-table we've actually changd,
but it's not sufficient because char-table inheritance mewans that
modifying one syntax-table can change others at the same time. */
if (!EQ (searchbufs[i].syntax_table, Qt))
searchbufs[i].regexp = Qnil;
}
/* Compile a regexp if necessary, but first check to see if there's one in
@ -227,10 +236,8 @@ compile_pattern (pattern, regp, translate, posix, multibyte)
&& EQ (cp->buf.translate, (! NILP (translate) ? translate : make_number (0)))
&& cp->posix == posix
&& cp->buf.target_multibyte == multibyte
/* TODO: Strictly speaking, we only need to match syntax
tables when a character class like [[:space:]] occurs in
the pattern. -- cyd*/
&& EQ (cp->syntax_table, current_buffer->syntax_table)
&& (EQ (cp->syntax_table, Qt)
|| EQ (cp->syntax_table, current_buffer->syntax_table))
&& !NILP (Fequal (cp->whitespace_regexp, Vsearch_spaces_regexp)))
break;

10
src/sysdep.c
View file

@ -1373,16 +1373,6 @@ init_sys_modes ()
{
struct emacs_tty tty;
#ifdef MAC_OS8
/* cus-start.el complains if delete-exited-processes is not defined */
#ifndef subprocesses
DEFVAR_BOOL ("delete-exited-processes", &delete_exited_processes,
doc: /* *Non-nil means delete processes immediately when they exit.
nil means don't delete them until `list-processes' is run. */);
delete_exited_processes = 0;
#endif
#endif /* MAC_OS8 */
#ifdef VMS
#if 0
static int oob_chars[2] = {0, 1 << 7}; /* catch C-g's */

7
src/w32fns.c
View file

@ -2109,7 +2109,12 @@ w32_createwindow (f)
}
}
if (EQ (left, Qunbound) && EQ (top, Qunbound))
if (f->size_hint_flags & USPosition || f->size_hint_flags & PPosition)
{
XSETINT (left, f->left_pos);
XSETINT (top, f->top_pos);
}
else if (EQ (left, Qunbound) && EQ (top, Qunbound))
{
/* When called with RES_TYPE_NUMBER, w32_get_arg will return zero
for anything that is not a number and is not Qunbound. */

45
src/xdisp.c
View file

@ -1355,7 +1355,8 @@ pos_visible_p (w, charpos, x, y, rtop, rbot, rowh, vpos)
it2 = it;
if (IT_CHARPOS (it) < ZV && FETCH_BYTE (IT_BYTEPOS (it)) != '\n')
move_it_by_lines (&it, 1, 0);
if (charpos < IT_CHARPOS (it))
if (charpos < IT_CHARPOS (it)
|| (it.what == IT_EOB && charpos == IT_CHARPOS (it)))
{
visible_p = 1;
move_it_to (&it2, charpos, -1, -1, -1, MOVE_TO_POS);
@ -17823,12 +17824,20 @@ decode_mode_spec (w, c, field_width, precision, multibyte)
break;
case 'c':
{
int col = (int) current_column (); /* iftc */
w->column_number_displayed = make_number (col);
pint2str (decode_mode_spec_buf, field_width, col);
return decode_mode_spec_buf;
}
/* %c and %l are ignored in `frame-title-format'.
(In redisplay_internal, the frame title is drawn _before_ the
windows are updated, so the stuff which depends on actual
window contents (such as %l) may fail to render properly, or
even crash emacs.) */
if (mode_line_target == MODE_LINE_TITLE)
return "";
else
{
int col = (int) current_column (); /* iftc */
w->column_number_displayed = make_number (col);
pint2str (decode_mode_spec_buf, field_width, col);
return decode_mode_spec_buf;
}
case 'e':
#ifndef SYSTEM_MALLOC
@ -17870,11 +17879,16 @@ decode_mode_spec (w, c, field_width, precision, multibyte)
case 'l':
{
int startpos = XMARKER (w->start)->charpos;
int startpos_byte = marker_byte_position (w->start);
int line, linepos, linepos_byte, topline;
int nlines, junk;
int height = WINDOW_TOTAL_LINES (w);
int startpos, startpos_byte, line, linepos, linepos_byte;
int topline, nlines, junk, height;
/* %c and %l are ignored in `frame-title-format'. */
if (mode_line_target == MODE_LINE_TITLE)
return "";
startpos = XMARKER (w->start)->charpos;
startpos_byte = marker_byte_position (w->start);
height = WINDOW_TOTAL_LINES (w);
/* If we decided that this buffer isn't suitable for line numbers,
don't forget that too fast. */
@ -24319,9 +24333,10 @@ This variable is not guaranteed to be accurate except while processing
DEFVAR_LISP ("frame-title-format", &Vframe_title_format,
doc: /* Template for displaying the title bar of visible frames.
\(Assuming the window manager supports this feature.)
This variable has the same structure as `mode-line-format' (which see),
and is used only on frames for which no explicit name has been set
\(see `modify-frame-parameters'). */);
This variable has the same structure as `mode-line-format', except that
the %c and %l constructs are ignored. It is used only on frames for
which no explicit name has been set \(see `modify-frame-parameters'). */);
DEFVAR_LISP ("icon-title-format", &Vicon_title_format,
doc: /* Template for displaying the title bar of an iconified frame.

3
src/xmenu.c
View file

@ -3776,8 +3776,7 @@ syms_of_xmenu ()
#if defined (USE_GTK) || defined (USE_X_TOOLKIT)
defsubr (&Smenu_bar_open);
Fdefalias (intern ("accelerate-menu"), intern (Smenu_bar_open.symbol_name),
Qnil);
Ffset (intern ("accelerate-menu"), intern (Smenu_bar_open.symbol_name));
#endif
#ifdef HAVE_MENUS

2
src/xterm.c
View file

@ -8638,7 +8638,7 @@ x_check_expected_move (f, expected_left, expected_top)
int expected_left;
int expected_top;
{
int count = 0, current_left = 0, current_top = 0;
int current_left = 0, current_top = 0;
/* x_real_positions returns the left and top offsets of the outermost
window manager window around the frame. */