aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJoakim Verona2011-08-19 10:05:18 +0200
committerJoakim Verona2011-08-19 10:05:18 +0200
commita6df1daab828f67f244af22a24bd19cf7d0f1c1b (patch)
tree943656e1eb310ee2143016738b7e1048b0cc84d6
parentde4d3934cb9838ac138718a4236ad631863c681d (diff)
parent5226c7c0169c61977d8914a5feb385bde36077ee (diff)
downloademacs-a6df1daab828f67f244af22a24bd19cf7d0f1c1b.tar.gz
emacs-a6df1daab828f67f244af22a24bd19cf7d0f1c1b.zip
upstream
-rw-r--r--doc/lispref/ChangeLog13
-rw-r--r--doc/lispref/display.texi104
-rw-r--r--doc/lispref/nonascii.texi7
-rw-r--r--doc/misc/org.texi3
-rw-r--r--etc/ChangeLog8
-rw-r--r--etc/NEWS17
-rw-r--r--etc/refcards/orgcard.tex4
-rw-r--r--etc/themes/dichromacy-theme.el6
-rw-r--r--etc/themes/tango-dark-theme.el4
-rw-r--r--etc/themes/tango-theme.el4
-rw-r--r--etc/themes/wheatgrass-theme.el4
-rw-r--r--lisp/ChangeLog38
-rw-r--r--lisp/buff-menu.el4
-rw-r--r--lisp/dired.el4
-rw-r--r--lisp/emacs-lisp/tabulated-list.el2
-rw-r--r--lisp/faces.el33
-rw-r--r--lisp/font-lock.el7
-rw-r--r--lisp/gnus/ChangeLog33
-rw-r--r--lisp/gnus/auth-source.el2
-rw-r--r--lisp/gnus/gnus-ems.el5
-rw-r--r--lisp/gnus/gnus-spec.el21
-rw-r--r--lisp/gnus/gnus-sum.el4
-rw-r--r--lisp/gnus/message.el8
-rw-r--r--lisp/gnus/nnmairix.el23
-rw-r--r--lisp/international/characters.el20
-rw-r--r--lisp/mail/smtpmail.el5
-rw-r--r--lisp/net/network-stream.el10
-rw-r--r--lisp/org/ob-C.el2
-rw-r--r--lisp/org/ob-R.el5
-rw-r--r--lisp/org/ob-asymptote.el2
-rw-r--r--lisp/org/ob-calc.el2
-rw-r--r--lisp/org/ob-clojure.el5
-rw-r--r--lisp/org/ob-comint.el2
-rw-r--r--lisp/org/ob-css.el2
-rw-r--r--lisp/org/ob-ditaa.el2
-rw-r--r--lisp/org/ob-dot.el2
-rw-r--r--lisp/org/ob-emacs-lisp.el2
-rw-r--r--lisp/org/ob-eval.el2
-rw-r--r--lisp/org/ob-exp.el5
-rw-r--r--lisp/org/ob-gnuplot.el2
-rw-r--r--lisp/org/ob-haskell.el2
-rw-r--r--lisp/org/ob-js.el22
-rw-r--r--lisp/org/ob-keys.el2
-rw-r--r--lisp/org/ob-latex.el2
-rw-r--r--lisp/org/ob-ledger.el2
-rw-r--r--lisp/org/ob-lisp.el6
-rw-r--r--lisp/org/ob-lob.el5
-rw-r--r--lisp/org/ob-matlab.el2
-rw-r--r--lisp/org/ob-mscgen.el2
-rw-r--r--lisp/org/ob-ocaml.el2
-rw-r--r--lisp/org/ob-octave.el2
-rw-r--r--lisp/org/ob-org.el2
-rw-r--r--lisp/org/ob-perl.el5
-rw-r--r--lisp/org/ob-plantuml.el2
-rw-r--r--lisp/org/ob-python.el5
-rw-r--r--lisp/org/ob-ref.el5
-rw-r--r--lisp/org/ob-ruby.el2
-rw-r--r--lisp/org/ob-sass.el2
-rw-r--r--lisp/org/ob-scheme.el22
-rw-r--r--lisp/org/ob-screen.el2
-rw-r--r--lisp/org/ob-sh.el2
-rw-r--r--lisp/org/ob-sql.el2
-rw-r--r--lisp/org/ob-sqlite.el2
-rw-r--r--lisp/org/ob-table.el2
-rw-r--r--lisp/org/ob-tangle.el2
-rw-r--r--lisp/org/ob.el5
-rw-r--r--lisp/org/org-agenda.el3
-rw-r--r--lisp/org/org-archive.el3
-rw-r--r--lisp/org/org-ascii.el3
-rw-r--r--lisp/org/org-attach.el2
-rw-r--r--lisp/org/org-bbdb.el3
-rw-r--r--lisp/org/org-beamer.el2
-rw-r--r--lisp/org/org-bibtex.el2
-rw-r--r--lisp/org/org-capture.el2
-rw-r--r--lisp/org/org-clock.el3
-rw-r--r--lisp/org/org-colview.el3
-rw-r--r--lisp/org/org-compat.el3
-rw-r--r--lisp/org/org-crypt.el2
-rw-r--r--lisp/org/org-ctags.el2
-rw-r--r--lisp/org/org-datetree.el2
-rw-r--r--lisp/org/org-docbook.el2
-rw-r--r--lisp/org/org-docview.el2
-rw-r--r--lisp/org/org-entities.el2
-rw-r--r--lisp/org/org-exp-blocks.el3
-rw-r--r--lisp/org/org-exp.el3
-rw-r--r--lisp/org/org-faces.el3
-rw-r--r--lisp/org/org-feed.el2
-rw-r--r--lisp/org/org-footnote.el2
-rw-r--r--lisp/org/org-freemind.el22
-rw-r--r--lisp/org/org-gnus.el3
-rw-r--r--lisp/org/org-habit.el2
-rw-r--r--lisp/org/org-html.el3
-rw-r--r--lisp/org/org-icalendar.el3
-rw-r--r--lisp/org/org-id.el2
-rw-r--r--lisp/org/org-indent.el2
-rw-r--r--lisp/org/org-info.el3
-rw-r--r--lisp/org/org-inlinetask.el2
-rw-r--r--lisp/org/org-irc.el2
-rw-r--r--lisp/org/org-jsinfo.el3
-rw-r--r--lisp/org/org-latex.el2
-rw-r--r--lisp/org/org-list.el3
-rw-r--r--lisp/org/org-mac-message.el2
-rw-r--r--lisp/org/org-macs.el3
-rw-r--r--lisp/org/org-mew.el2
-rw-r--r--lisp/org/org-mhe.el3
-rw-r--r--lisp/org/org-mks.el2
-rw-r--r--lisp/org/org-mobile.el2
-rw-r--r--lisp/org/org-mouse.el2
-rw-r--r--lisp/org/org-plot.el2
-rw-r--r--lisp/org/org-protocol.el3
-rw-r--r--lisp/org/org-publish.el3
-rw-r--r--lisp/org/org-remember.el3
-rw-r--r--lisp/org/org-rmail.el3
-rw-r--r--lisp/org/org-src.el3
-rw-r--r--lisp/org/org-table.el3
-rw-r--r--lisp/org/org-taskjuggler.el2
-rw-r--r--lisp/org/org-timer.el2
-rw-r--r--lisp/org/org-vm.el3
-rw-r--r--lisp/org/org-w3m.el2
-rw-r--r--lisp/org/org-wl.el3
-rw-r--r--lisp/org/org-xoxo.el3
-rw-r--r--lisp/org/org.el3
-rw-r--r--lisp/progmodes/compile.el6
-rw-r--r--lisp/progmodes/grep.el4
-rw-r--r--lisp/subr.el31
-rw-r--r--src/ChangeLog24
-rw-r--r--src/bidi.c2
-rw-r--r--src/dispextern.h6
-rw-r--r--src/eval.c28
-rw-r--r--src/process.c63
130 files changed, 536 insertions, 327 deletions
diff --git a/doc/lispref/ChangeLog b/doc/lispref/ChangeLog
index 56175a34eee..4cb4d0a6f50 100644
--- a/doc/lispref/ChangeLog
+++ b/doc/lispref/ChangeLog
@@ -1,3 +1,16 @@
12011-08-18 Eli Zaretskii <eliz@gnu.org>
2
3 * nonascii.texi (Character Properties): Document use of
4 `bidi-class' and `mirroring' properties as part of reordering.
5 Provide cross-references to "Bidirectional Display".
6
7 * display.texi (Bidirectional Display): Document the pitfalls of
8 concatenating strings with bidirectional content, with possible
9 solutions. Document bidi-string-mark-left-to-right. Mention
10 paragraph direction in modes that inherit from prog-mode.
11 Document use of `bidi-class' and `mirroring' properties as part of
12 reordering.
13
12011-08-16 Eli Zaretskii <eliz@gnu.org> 142011-08-16 Eli Zaretskii <eliz@gnu.org>
2 15
3 * modes.texi (Major Mode Conventions): Improve the documentation 16 * modes.texi (Major Mode Conventions): Improve the documentation
diff --git a/doc/lispref/display.texi b/doc/lispref/display.texi
index 64a9054f596..8f7f4003411 100644
--- a/doc/lispref/display.texi
+++ b/doc/lispref/display.texi
@@ -5992,6 +5992,7 @@ left-to-right and right-to-left characters.
5992for editing and displaying bidirectional text. 5992for editing and displaying bidirectional text.
5993 5993
5994@cindex logical order 5994@cindex logical order
5995@cindex reading order
5995@cindex visual order 5996@cindex visual order
5996@cindex unicode bidirectional algorithm 5997@cindex unicode bidirectional algorithm
5997 Emacs stores right-to-left and bidirectional text in the so-called 5998 Emacs stores right-to-left and bidirectional text in the so-called
@@ -6006,17 +6007,16 @@ for display. Reordering of bidirectional text for display in Emacs is
6006a ``Full bidirectionality'' class implementation of the @acronym{UBA}. 6007a ``Full bidirectionality'' class implementation of the @acronym{UBA}.
6007 6008
6008@defvar bidi-display-reordering 6009@defvar bidi-display-reordering
6009 The buffer-local variable @code{bidi-display-reordering} controls 6010 This buffer-local variable controls whether text in the buffer is
6010whether text in the buffer is reordered for display. If its value is 6011reordered for display. If its value is non-@code{nil}, Emacs reorders
6011non-@code{nil}, Emacs reorders characters that have right-to-left 6012characters that have right-to-left directionality when they are
6012directionality when they are displayed. The default value is 6013displayed. The default value is @code{t}. Text in overlay strings
6013@code{t}. Text in overlay strings (@pxref{Overlay 6014(@pxref{Overlay Properties,,before-string}), display strings
6014Properties,,before-string}), display strings (@pxref{Overlay 6015(@pxref{Overlay Properties,,display}), and @code{display} text
6015Properties,,display}), and @code{display} text properties 6016properties (@pxref{Display Property}) is also reordered for display if
6016(@pxref{Display Property}) is also reordered if the buffer whose text 6017the buffer whose text includes these strings is reordered. Turning
6017includes these strings is reordered for display. Turning off 6018off @code{bidi-display-reordering} for a buffer turns off reordering
6018@code{bidi-display-reordering} for a buffer turns off reordering of 6019of all the overlay and display strings in that buffer.
6019all the overlay and display strings in that buffer.
6020 6020
6021 Reordering of strings that are unrelated to any buffer, such as text 6021 Reordering of strings that are unrelated to any buffer, such as text
6022displayed on the mode line (@pxref{Mode Line Format}) or header line 6022displayed on the mode line (@pxref{Mode Line Format}) or header line
@@ -6056,7 +6056,7 @@ it is reordered for display. That is, the entire chunk of text
6056covered by these properties is reordered together. Moreover, the 6056covered by these properties is reordered together. Moreover, the
6057bidirectional properties of the characters in this chunk of text are 6057bidirectional properties of the characters in this chunk of text are
6058ignored, and Emacs reorders them as if they were replaced with a 6058ignored, and Emacs reorders them as if they were replaced with a
6059single character @code{u+FFFC}, known as the @dfn{Object Replacement 6059single character @code{U+FFFC}, known as the @dfn{Object Replacement
6060Character}. This means that placing a display property over a portion 6060Character}. This means that placing a display property over a portion
6061of text may change the way that the surrounding text is reordered for 6061of text may change the way that the surrounding text is reordered for
6062display. To prevent this unexpected effect, always place such 6062display. To prevent this unexpected effect, always place such
@@ -6073,9 +6073,9 @@ begins at the right margin and is continued or truncated at the left
6073margin. 6073margin.
6074 6074
6075@defvar bidi-paragraph-direction 6075@defvar bidi-paragraph-direction
6076 Emacs determines the base direction of each paragraph dynamically, 6076 By default, Emacs determines the base direction of each paragraph
6077based on the text at the beginning of the paragraph. The precise 6077dynamically, based on the text at the beginning of the paragraph. The
6078method of determining the base direction is specified by the 6078precise method of determining the base direction is specified by the
6079@acronym{UBA}; in a nutshell, the first character in a paragraph that 6079@acronym{UBA}; in a nutshell, the first character in a paragraph that
6080has an explicit directionality determines the base direction of the 6080has an explicit directionality determines the base direction of the
6081paragraph. However, sometimes a buffer may need to force a certain 6081paragraph. However, sometimes a buffer may need to force a certain
@@ -6087,6 +6087,13 @@ dynamic determination of the base direction, and instead forces all
6087paragraphs in the buffer to have the direction specified by its 6087paragraphs in the buffer to have the direction specified by its
6088buffer-local value. The value can be either @code{right-to-left} or 6088buffer-local value. The value can be either @code{right-to-left} or
6089@code{left-to-right}. Any other value is interpreted as @code{nil}. 6089@code{left-to-right}. Any other value is interpreted as @code{nil}.
6090The default is @code{nil}.
6091
6092@cindex @code{prog-mode}, and @code{bidi-paragraph-direction}
6093Modes that are meant to display program source code should force a
6094@code{left-to-right} paragraph direction. The easiest way of doing so
6095is to derive the mode from Prog Mode, which already sets
6096@code{bidi-paragraph-direction} to that value.
6090@end defvar 6097@end defvar
6091 6098
6092@defun current-bidi-paragraph-direction &optional buffer 6099@defun current-bidi-paragraph-direction &optional buffer
@@ -6099,3 +6106,70 @@ non-@code{nil}, the returned value will be identical to that value;
6099otherwise, the returned value reflects the paragraph direction 6106otherwise, the returned value reflects the paragraph direction
6100determined dynamically by Emacs. 6107determined dynamically by Emacs.
6101@end defun 6108@end defun
6109
6110@cindex layout on display, and bidirectional text
6111@cindex jumbled display of bidirectional text
6112@cindex concatenating bidirectional strings
6113 Reordering of bidirectional text for display can have surprising and
6114unpleasant effects when two strings with bidirectional content are
6115juxtaposed in a buffer, or otherwise programmatically concatenated
6116into a string of text. A typical example is a buffer whose lines are
6117actually sequences of items, or fields, separated by whitespace or
6118punctuation characters. This is used in specialized modes such as
6119Buffer-menu Mode or various email summary modes, like Rmail Summary
6120Mode. Because these separator characters are @dfn{weak}, i.e.@: have
6121no strong directionality, they take on the directionality of
6122surrounding text. As result, a numeric field that follows a field
6123with bidirectional content can be displayed @emph{to the left} of the
6124preceding field, producing a jumbled display and messing up the
6125expected layout.
6126
6127 To countermand this, you can use one of the following techniques for
6128forcing correct order of fields on display:
6129
6130@itemize @minus
6131@item
6132Append the special character @code{U+200E}, LEFT-TO-RIGHT MARK, or
6133@acronym{LRM}, to the end of each field that may have bidirectional
6134content, or prepend it to the beginning of the following field. The
6135function @code{bidi-string-mark-left-to-right}, described below, comes
6136in handy for this purpose. (In a right-to-left paragraph, use
6137@code{U+200F}, RIGHT-TO-LEFT MARK, or @acronym{RLM}, instead.) This
6138is one of the solutions recommended by
6139@uref{http://www.unicode.org/reports/tr9/#Separators, the
6140@acronym{UBA}}.
6141
6142@item
6143Include the tab character in the field separator. The tab character
6144plays the role of @dfn{segment separator} in the @acronym{UBA}
6145reordering, whose effect is to make each field a separate segment, and
6146thus reorder them separately.
6147@end itemize
6148
6149@defun bidi-string-mark-left-to-right string
6150This subroutine returns its argument @var{string}, possibly modified,
6151such that the result can be safely concatenated with another string,
6152or juxtaposed with another string in a buffer, without disrupting the
6153relative layout of this string and the next one on display. If the
6154string returned by this function is displayed as part of a
6155left-to-right paragraph, it will always appear on display to the left
6156of the text that follows it. The function works by examining the
6157characters of its argument, and if any of those characters could cause
6158reordering on display, the function appends the @acronym{LRM}
6159character to the string. The appended @acronym{LRM} character is made
6160@emph{invisible} (@pxref{Invisible Text}), to hide it on display.
6161@end defun
6162
6163 The reordering algorithm uses the bidirectional properties of the
6164characters stored as their @code{bidi-class} property
6165(@pxref{Character Properties}). Lisp programs can change these
6166properties by calling the @code{put-char-code-property} function.
6167However, doing this requires a thorough understanding of the
6168@acronym{UBA}, and is therefore not recommended. Any changes to the
6169bidirectional properties of a character have global effect: they
6170affect all Emacs frames and windows.
6171
6172 Similarly, the @code{mirroring} property is used to display the
6173appropriate mirrored character in the reordered text. Lisp programs
6174can affect the mirrored display by changing this property. Again, any
6175such changes affect all of Emacs display.
diff --git a/doc/lispref/nonascii.texi b/doc/lispref/nonascii.texi
index 83f9f424834..7b6d665b2ac 100644
--- a/doc/lispref/nonascii.texi
+++ b/doc/lispref/nonascii.texi
@@ -392,7 +392,8 @@ The value is an integer number.
392@item bidi-class 392@item bidi-class
393Corresponds to the Unicode @code{Bidi_Class} property. The value is a 393Corresponds to the Unicode @code{Bidi_Class} property. The value is a
394symbol whose name is the Unicode @dfn{directional type} of the 394symbol whose name is the Unicode @dfn{directional type} of the
395character. 395character. Emacs uses this property when it reorders bidirectional
396text for display (@pxref{Bidirectional Display}).
396 397
397@item decomposition 398@item decomposition
398Corresponds to the Unicode @code{Decomposition_Type} and 399Corresponds to the Unicode @code{Decomposition_Type} and
@@ -440,7 +441,9 @@ defined mirroring glyph. All the characters whose @code{mirrored}
440property is @code{N} have @code{nil} as their @code{mirroring} 441property is @code{N} have @code{nil} as their @code{mirroring}
441property; however, some characters whose @code{mirrored} property is 442property; however, some characters whose @code{mirrored} property is
442@code{Y} also have @code{nil} for @code{mirroring}, because no 443@code{Y} also have @code{nil} for @code{mirroring}, because no
443appropriate characters exist with mirrored glyphs. 444appropriate characters exist with mirrored glyphs. Emacs uses this
445property to display mirror images of characters when appropriate
446(@pxref{Bidirectional Display}).
444 447
445@item old-name 448@item old-name
446Corresponds to the Unicode @code{Unicode_1_Name} property. The value 449Corresponds to the Unicode @code{Unicode_1_Name} property. The value
diff --git a/doc/misc/org.texi b/doc/misc/org.texi
index f905d42c808..2a3d99ca7f4 100644
--- a/doc/misc/org.texi
+++ b/doc/misc/org.texi
@@ -265,8 +265,7 @@
265@copying 265@copying
266This manual is for Org version @value{VERSION}. 266This manual is for Org version @value{VERSION}.
267 267
268Copyright @copyright{} 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011 268Copyright @copyright{} 2004-2011 Free Software Foundation, Inc.
269Free Software Foundation, Inc.
270 269
271@quotation 270@quotation
272Permission is granted to copy, distribute and/or modify this document 271Permission is granted to copy, distribute and/or modify this document
diff --git a/etc/ChangeLog b/etc/ChangeLog
index 0e31638a9af..c2f7e3cb0d2 100644
--- a/etc/ChangeLog
+++ b/etc/ChangeLog
@@ -1,3 +1,11 @@
12011-08-19 Chong Yidong <cyd@stupidchicken.com>
2
3 * themes/dichromacy-theme.el:
4 * themes/wheatgrass-theme.el:
5 * themes/tango-theme.el:
6 * themes/tango-dark-theme.el: Add error, warning, and success
7 faces.
8
12011-08-15 Carsten Dominik <carsten.dominik@gmail.com> 92011-08-15 Carsten Dominik <carsten.dominik@gmail.com>
2 10
3 * refcards/orgcard.tex: Document `org-copy-visible'. 11 * refcards/orgcard.tex: Document `org-copy-visible'.
diff --git a/etc/NEWS b/etc/NEWS
index 8707a8b0adc..ec863dacef8 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -234,6 +234,9 @@ these image types, minus those listed in `imagemagick-types-inhibit'.
234 234
235See the Emacs Lisp Reference Manual for more information. 235See the Emacs Lisp Reference Manual for more information.
236 236
237** New basic faces `error', `warning', `success' are available to
238highlight strings that indicate failure, caution or successful operation.
239
237** The colors for selected text (the region face) are taken from the GTK 240** The colors for selected text (the region face) are taken from the GTK
238theme when Emacs is built with GTK. 241theme when Emacs is built with GTK.
239 242
@@ -1043,15 +1046,17 @@ of function value which looks like (closure ENV ARGS &rest BODY).
1043*** New function `special-variable-p' to check whether a variable is 1046*** New function `special-variable-p' to check whether a variable is
1044declared as dynamically bound. 1047declared as dynamically bound.
1045 1048
1046** New function `string-mark-left-to-right'. 1049+++
1050** New function `bidi-string-mark-left-to-right'.
1047Given a string containing right-to-left (RTL) script, this function 1051Given a string containing right-to-left (RTL) script, this function
1048returns another string with a terminating LRM (left-to-right mark) 1052returns another string which can be safely inserted into a buffer as a
1049character. If this string is inserted into a buffer, Emacs treats the 1053distinct RTL "segment", without causing any following text to be
1050LRM as the end of an RTL segment and displays following text as LTR. 1054displayed as RTL. (This is done by appending a Unicode "left-to-right
1055mark" character.)
1051 1056
1052This is useful when the buffer has overall left-to-right (LTR) 1057This is useful when the buffer has overall left-to-right (LTR)
1053paragraph direction and you need to insert a string whose contents 1058paragraph direction and you need to insert a string whose contents and
1054(and hence directionality) are not known in advance. 1059directionality are not known in advance.
1055 1060
1056** pre/post-command-hook are not reset to nil upon error. 1061** pre/post-command-hook are not reset to nil upon error.
1057Instead, the offending function is removed. 1062Instead, the offending function is removed.
diff --git a/etc/refcards/orgcard.tex b/etc/refcards/orgcard.tex
index 09042786456..1579a31b8d5 100644
--- a/etc/refcards/orgcard.tex
+++ b/etc/refcards/orgcard.tex
@@ -17,8 +17,8 @@
17\pdflayout=(0l) 17\pdflayout=(0l)
18 18
19% Nothing else needs to be changed below this line. 19% Nothing else needs to be changed below this line.
20% Copyright (C) 1987, 1993, 1996, 1997, 2001, 2002, 2003, 2004, 2005, 20% Copyright (C) 1987, 1993, 1996-1997, 2001-2011
21% 2006, 2007, 2008, 2009 Free Software Foundation, Inc. 21% Free Software Foundation, Inc.
22 22
23% This file is part of GNU Emacs. 23% This file is part of GNU Emacs.
24 24
diff --git a/etc/themes/dichromacy-theme.el b/etc/themes/dichromacy-theme.el
index 31f27d9fb8a..3c260118b26 100644
--- a/etc/themes/dichromacy-theme.el
+++ b/etc/themes/dichromacy-theme.el
@@ -60,6 +60,10 @@ Ansi-Color faces are included.")
60 ;; Escape and prompt faces 60 ;; Escape and prompt faces
61 `(minibuffer-prompt ((,class (:weight bold :foreground ,blue)))) 61 `(minibuffer-prompt ((,class (:weight bold :foreground ,blue))))
62 `(escape-glyph ((,class (:foreground ,vermillion)))) 62 `(escape-glyph ((,class (:foreground ,vermillion))))
63 `(error ((,class (:weight bold :slant italic
64 :foreground ,vermillion))))
65 `(warning ((,class (:foreground ,orange))))
66 `(success ((,class (:foreground ,bluegreen))))
63 ;; Font lock faces 67 ;; Font lock faces
64 `(font-lock-builtin-face ((,class (:foreground ,blue)))) 68 `(font-lock-builtin-face ((,class (:foreground ,blue))))
65 `(font-lock-comment-face ((,class (:slant italic :foreground ,bluegreen)))) 69 `(font-lock-comment-face ((,class (:slant italic :foreground ,bluegreen))))
@@ -69,8 +73,6 @@ Ansi-Color faces are included.")
69 `(font-lock-string-face ((,class (:foreground ,bluegray)))) 73 `(font-lock-string-face ((,class (:foreground ,bluegray))))
70 `(font-lock-type-face ((,class (:weight bold :foreground ,blue)))) 74 `(font-lock-type-face ((,class (:weight bold :foreground ,blue))))
71 `(font-lock-variable-name-face ((,class (:weight bold :foreground ,orange)))) 75 `(font-lock-variable-name-face ((,class (:weight bold :foreground ,orange))))
72 `(font-lock-warning-face ((,class (:weight bold :slant italic
73 :foreground ,vermillion))))
74 ;; Button and link faces 76 ;; Button and link faces
75 `(link ((,class (:underline t :foreground ,blue)))) 77 `(link ((,class (:underline t :foreground ,blue))))
76 `(link-visited ((,class (:underline t :foreground ,redpurple)))) 78 `(link-visited ((,class (:underline t :foreground ,redpurple))))
diff --git a/etc/themes/tango-dark-theme.el b/etc/themes/tango-dark-theme.el
index 403370c90cb..8f91d35e6a1 100644
--- a/etc/themes/tango-dark-theme.el
+++ b/etc/themes/tango-dark-theme.el
@@ -75,6 +75,9 @@ Semantic, and Ansi-Color faces are included.")
75 ;; Escape and prompt faces 75 ;; Escape and prompt faces
76 `(minibuffer-prompt ((,class (:foreground ,cham-0)))) 76 `(minibuffer-prompt ((,class (:foreground ,cham-0))))
77 `(escape-glyph ((,class (:foreground ,butter-3)))) 77 `(escape-glyph ((,class (:foreground ,butter-3))))
78 `(error ((,class (:foreground ,red-0))))
79 `(warning ((,class (:foreground ,orange-1))))
80 `(success ((,class (:foreground ,cham-1))))
78 ;; Font lock faces 81 ;; Font lock faces
79 `(font-lock-builtin-face ((,class (:foreground ,plum-1)))) 82 `(font-lock-builtin-face ((,class (:foreground ,plum-1))))
80 `(font-lock-comment-face ((,class (:foreground ,cham-2)))) 83 `(font-lock-comment-face ((,class (:foreground ,cham-2))))
@@ -84,7 +87,6 @@ Semantic, and Ansi-Color faces are included.")
84 `(font-lock-string-face ((,class (:foreground ,choc-1)))) 87 `(font-lock-string-face ((,class (:foreground ,choc-1))))
85 `(font-lock-type-face ((,class (:foreground ,blue-0)))) 88 `(font-lock-type-face ((,class (:foreground ,blue-0))))
86 `(font-lock-variable-name-face ((,class (:foreground ,orange-1)))) 89 `(font-lock-variable-name-face ((,class (:foreground ,orange-1))))
87 `(font-lock-warning-face ((,class (:foreground ,red-0))))
88 ;; Button and link faces 90 ;; Button and link faces
89 `(link ((,class (:underline t :foreground ,blue-1)))) 91 `(link ((,class (:underline t :foreground ,blue-1))))
90 `(link-visited ((,class (:underline t :foreground ,blue-2)))) 92 `(link-visited ((,class (:underline t :foreground ,blue-2))))
diff --git a/etc/themes/tango-theme.el b/etc/themes/tango-theme.el
index 9d0f0aca94a..f504d764277 100644
--- a/etc/themes/tango-theme.el
+++ b/etc/themes/tango-theme.el
@@ -66,6 +66,9 @@ Semantic, and Ansi-Color faces are included.")
66 ;; Escape and prompt faces 66 ;; Escape and prompt faces
67 `(minibuffer-prompt ((,class (:weight bold :foreground ,blue-3)))) 67 `(minibuffer-prompt ((,class (:weight bold :foreground ,blue-3))))
68 `(escape-glyph ((,class (:foreground ,red-3)))) 68 `(escape-glyph ((,class (:foreground ,red-3))))
69 `(error ((,class (:foreground ,red-3))))
70 `(warning ((,class (:foreground ,orange-3))))
71 `(success ((,class (:foreground ,cham-3))))
69 ;; Font lock faces 72 ;; Font lock faces
70 `(font-lock-builtin-face ((,class (:foreground ,plum-2)))) 73 `(font-lock-builtin-face ((,class (:foreground ,plum-2))))
71 `(font-lock-comment-face ((,class (:slant italic :foreground ,alum-5)))) 74 `(font-lock-comment-face ((,class (:slant italic :foreground ,alum-5))))
@@ -75,7 +78,6 @@ Semantic, and Ansi-Color faces are included.")
75 `(font-lock-string-face ((,class (:foreground ,plum-3)))) 78 `(font-lock-string-face ((,class (:foreground ,plum-3))))
76 `(font-lock-type-face ((,class (:foreground ,blue-3)))) 79 `(font-lock-type-face ((,class (:foreground ,blue-3))))
77 `(font-lock-variable-name-face ((,class (:foreground ,orange-4)))) 80 `(font-lock-variable-name-face ((,class (:foreground ,orange-4))))
78 `(font-lock-warning-face ((,class (:foreground ,red-2))))
79 ;; Button and link faces 81 ;; Button and link faces
80 `(link ((,class (:underline t :foreground ,blue-3)))) 82 `(link ((,class (:underline t :foreground ,blue-3))))
81 `(link-visited ((,class (:underline t :foreground ,blue-2)))) 83 `(link-visited ((,class (:underline t :foreground ,blue-2))))
diff --git a/etc/themes/wheatgrass-theme.el b/etc/themes/wheatgrass-theme.el
index 9f8772c4d6e..63ebc247b9d 100644
--- a/etc/themes/wheatgrass-theme.el
+++ b/etc/themes/wheatgrass-theme.el
@@ -30,6 +30,9 @@ of green, brown, and blue.")
30 'wheatgrass 30 'wheatgrass
31 `(default ((,class (:foreground "wheat" :background "black")))) 31 `(default ((,class (:foreground "wheat" :background "black"))))
32 `(cursor ((,class (:foreground "black" :background "thistle")))) 32 `(cursor ((,class (:foreground "black" :background "thistle"))))
33 `(error ((,class (:foreground "salmon1"))))
34 `(warning ((,class (:foreground "orange"))))
35 `(success ((,class (:foreground "yellow green"))))
33 ;; Highlighting faces 36 ;; Highlighting faces
34 `(highlight ((,class (:foreground "white" :background "dark green")))) 37 `(highlight ((,class (:foreground "white" :background "dark green"))))
35 `(region ((,class (:foreground "white" :background "dark green")))) 38 `(region ((,class (:foreground "white" :background "dark green"))))
@@ -45,7 +48,6 @@ of green, brown, and blue.")
45 `(font-lock-string-face ((,class (:foreground "dark khaki")))) 48 `(font-lock-string-face ((,class (:foreground "dark khaki"))))
46 `(font-lock-type-face ((,class (:foreground "aquamarine")))) 49 `(font-lock-type-face ((,class (:foreground "aquamarine"))))
47 `(font-lock-variable-name-face ((,class (:foreground "yellow green")))) 50 `(font-lock-variable-name-face ((,class (:foreground "yellow green"))))
48 `(font-lock-warning-face ((,class (:foreground "salmon1"))))
49 ;; Button and link faces 51 ;; Button and link faces
50 `(link ((,class (:underline t :foreground "cyan")))) 52 `(link ((,class (:underline t :foreground "cyan"))))
51 `(link-visited ((,class (:underline t :foreground "dark cyan")))) 53 `(link-visited ((,class (:underline t :foreground "dark cyan"))))
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f3d37a77b24..38c536af62c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,41 @@
12011-08-18 Chong Yidong <cyd@stupidchicken.com>
2
3 * international/characters.el: Add L and R categories.
4
5 * subr.el (bidi-string-mark-left-to-right): Rename from
6 string-mark-left-to-right. Use category search.
7
8 * buff-menu.el (Buffer-menu-buffer+size): Callers changed.
9
102011-08-18 Juri Linkov <juri@jurta.org>
11
12 * faces.el (error, warning, success): New faces with definitions
13 copied from old default values of `font-lock-warning-face',
14 `compilation-warning', `compilation-info' (bug#6117).
15
16 * font-lock.el (font-lock-warning-face): Inherit from `error'.
17
18 * progmodes/compile.el (compilation-error): Inherit from `error'.
19 (compilation-warning): Inherit from `warning'.
20 (compilation-info): Inherit from `success'.
21
22 * dired.el (dired-marked): Inherit from `warning'.
23 (dired-flagged): Inherit from `error'.
24
252011-08-17 Lars Magne Ingebrigtsen <larsi@gnus.org>
26
27 * mail/smtpmail.el (auth-source): Require to avoid problems with
28 binding variables (bug#9298). Also clean up some unused
29 autoloads.
30
31 * net/network-stream.el (network-stream-open-starttls): Support
32 using starttls.el without using gnutls-cli.
33
342011-08-17 Juri Linkov <juri@jurta.org>
35
36 * progmodes/grep.el (rgrep): Handle the case when
37 `grep-find-command' is a cons cell (bug#9278).
38
12011-08-17 Martin Rudalics <rudalics@gmx.at> 392011-08-17 Martin Rudalics <rudalics@gmx.at>
2 40
3 * window.el (display-buffer-pop-up-frame): Run frame creation 41 * window.el (display-buffer-pop-up-frame): Run frame creation
diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el
index a5b45921d28..2eac33d8157 100644
--- a/lisp/buff-menu.el
+++ b/lisp/buff-menu.el
@@ -681,9 +681,9 @@ For more information, see the function `buffer-menu'."
681 (string-width tail) 681 (string-width tail)
682 2)) 682 2))
683 Buffer-menu-short-ellipsis 683 Buffer-menu-short-ellipsis
684 (string-mark-left-to-right tail)))) 684 (bidi-string-mark-left-to-right tail))))
685 ;; Don't put properties on (buffer-name). 685 ;; Don't put properties on (buffer-name).
686 (setq name (string-mark-left-to-right name))) 686 (setq name (bidi-string-mark-left-to-right name)))
687 (add-text-properties 0 (length name) name-props name) 687 (add-text-properties 0 (length name) name-props name)
688 (add-text-properties 0 (length size) size-props size) 688 (add-text-properties 0 (length size) size-props size)
689 (let ((name+space-width (- Buffer-menu-buffer+size-width 689 (let ((name+space-width (- Buffer-menu-buffer+size-width
diff --git a/lisp/dired.el b/lisp/dired.el
index 746c16ff148..ecb626a275e 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -342,7 +342,7 @@ Subexpression 2 must end right before the \\n or \\r.")
342 "Face name used for dired marks.") 342 "Face name used for dired marks.")
343 343
344(defface dired-marked 344(defface dired-marked
345 '((t (:inherit font-lock-warning-face))) 345 '((t (:inherit warning)))
346 "Face used for marked files." 346 "Face used for marked files."
347 :group 'dired-faces 347 :group 'dired-faces
348 :version "22.1") 348 :version "22.1")
@@ -350,7 +350,7 @@ Subexpression 2 must end right before the \\n or \\r.")
350 "Face name used for marked files.") 350 "Face name used for marked files.")
351 351
352(defface dired-flagged 352(defface dired-flagged
353 '((t (:inherit font-lock-variable-name-face))) 353 '((t (:inherit error)))
354 "Face used for files flagged for deletion." 354 "Face used for files flagged for deletion."
355 :group 'dired-faces 355 :group 'dired-faces
356 :version "22.1") 356 :version "22.1")
diff --git a/lisp/emacs-lisp/tabulated-list.el b/lisp/emacs-lisp/tabulated-list.el
index 9b485b58608..75c9a01323d 100644
--- a/lisp/emacs-lisp/tabulated-list.el
+++ b/lisp/emacs-lisp/tabulated-list.el
@@ -283,7 +283,7 @@ of column descriptors."
283 (> (length label) width) 283 (> (length label) width)
284 (setq label (concat (substring label 0 (- width 3)) 284 (setq label (concat (substring label 0 (- width 3))
285 "..."))) 285 "...")))
286 (setq label (string-mark-left-to-right label)) 286 (setq label (bidi-string-mark-left-to-right label))
287 (if (stringp desc) 287 (if (stringp desc)
288 (insert (propertize label 'help-echo help-echo)) 288 (insert (propertize label 'help-echo help-echo))
289 (apply 'insert-text-button label (cdr desc))) 289 (apply 'insert-text-button label (cdr desc)))
diff --git a/lisp/faces.el b/lisp/faces.el
index 9a78ab69caa..404bd7b6609 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -2413,6 +2413,39 @@ Note: Other faces cannot inherit from the cursor face."
2413It is used for characters of no fonts too." 2413It is used for characters of no fonts too."
2414 :version "24.1" 2414 :version "24.1"
2415 :group 'basic-faces) 2415 :group 'basic-faces)
2416
2417(defface error
2418 '((((class color) (min-colors 88) (background light)) (:foreground "Red1" :weight bold))
2419 (((class color) (min-colors 88) (background dark)) (:foreground "Pink" :weight bold))
2420 (((class color) (min-colors 16) (background light)) (:foreground "Red1" :weight bold))
2421 (((class color) (min-colors 16) (background dark)) (:foreground "Pink" :weight bold))
2422 (((class color) (min-colors 8)) (:foreground "red"))
2423 (t (:inverse-video t :weight bold)))
2424 "Basic face used to highlight errors and to denote failure."
2425 :version "24.1"
2426 :group 'basic-faces)
2427
2428(defface warning
2429 '((((class color) (min-colors 16)) (:foreground "DarkOrange" :weight bold))
2430 (((class color)) (:foreground "yellow" :weight bold))
2431 (t (:weight bold)))
2432 "Basic face used to highlight warnings."
2433 :version "24.1"
2434 :group 'basic-faces)
2435
2436(defface success
2437 '((((class color) (min-colors 16) (background light))
2438 (:foreground "Green3" :weight bold))
2439 (((class color) (min-colors 88) (background dark))
2440 (:foreground "Green1" :weight bold))
2441 (((class color) (min-colors 16) (background dark))
2442 (:foreground "Green" :weight bold))
2443 (((class color)) (:foreground "green" :weight bold))
2444 (t (:weight bold)))
2445 "Basic face used to indicate successful operation."
2446 :version "24.1"
2447 :group 'basic-faces)
2448
2416 2449
2417;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 2450;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2418;;; Manipulating font names. 2451;;; Manipulating font names.
diff --git a/lisp/font-lock.el b/lisp/font-lock.el
index 6902ce98ab1..9cf889e1aec 100644
--- a/lisp/font-lock.el
+++ b/lisp/font-lock.el
@@ -1959,12 +1959,7 @@ Sets various variables using `font-lock-defaults' and
1959 :group 'font-lock-faces) 1959 :group 'font-lock-faces)
1960 1960
1961(defface font-lock-warning-face 1961(defface font-lock-warning-face
1962 '((((class color) (min-colors 88) (background light)) (:foreground "Red1" :weight bold)) 1962 '((t :inherit error))
1963 (((class color) (min-colors 88) (background dark)) (:foreground "Pink" :weight bold))
1964 (((class color) (min-colors 16) (background light)) (:foreground "Red1" :weight bold))
1965 (((class color) (min-colors 16) (background dark)) (:foreground "Pink" :weight bold))
1966 (((class color) (min-colors 8)) (:foreground "red"))
1967 (t (:inverse-video t :weight bold)))
1968 "Font Lock mode face used to highlight warnings." 1963 "Font Lock mode face used to highlight warnings."
1969 :group 'font-lock-faces) 1964 :group 'font-lock-faces)
1970 1965
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 04ba929e392..230bd8a6508 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,36 @@
12011-08-18 David Engster <dengste@eml.cc>
2
3 * nnmairix.el (nnmairix-request-set-mark)
4 (nnmairix-goto-original-article): Remove adding of article to registry,
5 since `gnus-registry-add-group' isn't available anymore.
6 (nnmairix-determine-original-group-from-registry): Use
7 `gnus-registry-get-id-key' since `gnus-registry-fetch-groups' isn't
8 available anymore.
9
102011-08-17 Lars Magne Ingebrigtsen <larsi@gnus.org>
11
12 * gnus-spec.el (gnus-lrm-string): Use 8206 instead of ?\x200e to make
13 things work in Emacs 22 and XEmacs, too.
14
15 * gnus-sum.el (gnus-summary-from-or-to-or-newsgroups): LRM-ify the
16 default From.
17
18 * gnus-spec.el (gnus-lrm-string-p): New macro.
19 (gnus-lrm-string): New constant.
20 (gnus-summary-line-format-spec): LRM-ify the from.
21 (gnus-tilde-max-form): LRM-ify string chopping.
22
23 * gnus-ems.el (gnus-string-mark-left-to-right): New function.
24
25 * message.el (message-is-yours-p): Allow disabling canlock checking
26 (bug#9295).
27 (message-shoot-gnksa-feet): Add `canlock-verify'.
28 (message-auto-save-directory): Use ~/ as the auto-save directory if the
29 message directory isn't writable (bug#9304).
30
31 * auth-source.el (auth-source-netrc-saver): Make the .authinfo file
32 non-world-readable.
33
12011-08-17 Katsumi Yamaoka <yamaoka@jpl.org> 342011-08-17 Katsumi Yamaoka <yamaoka@jpl.org>
2 35
3 * nndraft.el (nndraft-update-unread-articles): Don't send delayed 36 * nndraft.el (nndraft-update-unread-articles): Don't send delayed
diff --git a/lisp/gnus/auth-source.el b/lisp/gnus/auth-source.el
index e249e97e826..4bd13cdc05e 100644
--- a/lisp/gnus/auth-source.el
+++ b/lisp/gnus/auth-source.el
@@ -1377,6 +1377,8 @@ Respects `auth-source-save-behavior'. Uses
1377 (insert "\n")) 1377 (insert "\n"))
1378 (insert add "\n") 1378 (insert add "\n")
1379 (write-region (point-min) (point-max) file nil 'silent) 1379 (write-region (point-min) (point-max) file nil 'silent)
1380 ;; Make the .authinfo file non-world-readable.
1381 (set-file-modes file #o600)
1380 (auth-source-do-debug 1382 (auth-source-do-debug
1381 "auth-source-netrc-create: wrote 1 new line to %s" 1383 "auth-source-netrc-create: wrote 1 new line to %s"
1382 file) 1384 file)
diff --git a/lisp/gnus/gnus-ems.el b/lisp/gnus/gnus-ems.el
index bc85e4960d4..aed471c38f4 100644
--- a/lisp/gnus/gnus-ems.el
+++ b/lisp/gnus/gnus-ems.el
@@ -209,6 +209,11 @@
209 (setq start end 209 (setq start end
210 end nil)))))) 210 end nil))))))
211 211
212(defmacro gnus-string-mark-left-to-right (string)
213 (if (fboundp 'string-mark-left-to-right)
214 `(string-mark-left-to-right ,string)
215 string))
216
212(eval-and-compile 217(eval-and-compile
213 ;; XEmacs does not have window-inside-pixel-edges 218 ;; XEmacs does not have window-inside-pixel-edges
214 (defalias 'gnus-window-inside-pixel-edges 219 (defalias 'gnus-window-inside-pixel-edges
diff --git a/lisp/gnus/gnus-spec.el b/lisp/gnus/gnus-spec.el
index 4682f512476..0fa64a84b75 100644
--- a/lisp/gnus/gnus-spec.el
+++ b/lisp/gnus/gnus-spec.el
@@ -90,6 +90,15 @@ text properties. This is only needed on XEmacs, as Emacs does this anyway."
90(declare-function gnus-summary-from-or-to-or-newsgroups "gnus-sum" 90(declare-function gnus-summary-from-or-to-or-newsgroups "gnus-sum"
91 (header gnus-tmp-from)) 91 (header gnus-tmp-from))
92 92
93(defmacro gnus-lrm-string-p (string)
94 (if (fboundp 'string-mark-left-to-rigth)
95 `(eq (aref ,string (1- (length ,string))) 8206)
96 nil))
97
98(defvar gnus-lrm-string (if (ignore-errors (string 8206))
99 (propertize (string 8206) 'invisible t)
100 ""))
101
93(defun gnus-summary-line-format-spec () 102(defun gnus-summary-line-format-spec ()
94 (insert gnus-tmp-unread gnus-tmp-replied 103 (insert gnus-tmp-unread gnus-tmp-replied
95 gnus-tmp-score-char gnus-tmp-indentation) 104 gnus-tmp-score-char gnus-tmp-indentation)
@@ -103,7 +112,9 @@ text properties. This is only needed on XEmacs, as Emacs does this anyway."
103 (gnus-summary-from-or-to-or-newsgroups 112 (gnus-summary-from-or-to-or-newsgroups
104 gnus-tmp-header gnus-tmp-from)))) 113 gnus-tmp-header gnus-tmp-from))))
105 (if (> (length val) 23) 114 (if (> (length val) 23)
106 (substring val 0 23) 115 (if (gnus-lrm-string-p val)
116 (concat (substring val 0 23) gnus-lrm-string)
117 (substring val 0 23))
107 val)) 118 val))
108 gnus-tmp-closing-bracket)) 119 gnus-tmp-closing-bracket))
109 (point)) 120 (point))
@@ -351,13 +362,17 @@ Return a list of updated types."
351 `(if (> (,length-fun ,el) ,max) 362 `(if (> (,length-fun ,el) ,max)
352 ,(if (< max-width 0) 363 ,(if (< max-width 0)
353 `(,substring-fun ,el (- (,length-fun ,el) ,max)) 364 `(,substring-fun ,el (- (,length-fun ,el) ,max))
354 `(,substring-fun ,el 0 ,max)) 365 `(if (gnus-lrm-string-p ,el)
366 (concat (,substring-fun ,el 0 ,max) ,gnus-lrm-string)
367 (,substring-fun ,el 0 ,max)))
355 ,el) 368 ,el)
356 `(let ((val (eval ,el))) 369 `(let ((val (eval ,el)))
357 (if (> (,length-fun val) ,max) 370 (if (> (,length-fun val) ,max)
358 ,(if (< max-width 0) 371 ,(if (< max-width 0)
359 `(,substring-fun val (- (,length-fun val) ,max)) 372 `(,substring-fun val (- (,length-fun val) ,max))
360 `(,substring-fun val 0 ,max)) 373 `(if (gnus-lrm-string-p val)
374 (concat (,substring-fun val 0 ,max) ,gnus-lrm-string)
375 (,substring-fun val 0 ,max)))
361 val))))) 376 val)))))
362 377
363(defun gnus-tilde-cut-form (el cut-width) 378(defun gnus-tilde-cut-form (el cut-width)
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index dda9cb3fbf6..cd4699e6107 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -3709,7 +3709,9 @@ buffer that was in action when the last article was fetched."
3709 gnus-newsgroup-name)) 'nntp) 3709 gnus-newsgroup-name)) 'nntp)
3710 (gnus-group-real-name gnus-newsgroup-name)))) 3710 (gnus-group-real-name gnus-newsgroup-name))))
3711 (concat gnus-summary-newsgroup-prefix newsgroups))))) 3711 (concat gnus-summary-newsgroup-prefix newsgroups)))))
3712 (inline (gnus-summary-extract-address-component gnus-tmp-from))))) 3712 (gnus-string-mark-left-to-right
3713 (inline
3714 (gnus-summary-extract-address-component gnus-tmp-from))))))
3713 3715
3714(defun gnus-summary-insert-line (gnus-tmp-header 3716(defun gnus-summary-insert-line (gnus-tmp-header
3715 gnus-tmp-level gnus-tmp-current 3717 gnus-tmp-level gnus-tmp-current
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 47c4de0aedc..a157afe2ce6 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -1310,7 +1310,7 @@ text and it replaces `self-insert-command' with the other command, e.g.
1310 :type '(repeat function)) 1310 :type '(repeat function))
1311 1311
1312(defcustom message-auto-save-directory 1312(defcustom message-auto-save-directory
1313 (if (file-exists-p message-directory) 1313 (if (file-writable-p message-directory)
1314 (file-name-as-directory (expand-file-name "drafts" message-directory)) 1314 (file-name-as-directory (expand-file-name "drafts" message-directory))
1315 "~/") 1315 "~/")
1316 "*Directory where Message auto-saves buffers if Gnus isn't running. 1316 "*Directory where Message auto-saves buffers if Gnus isn't running.
@@ -1353,7 +1353,8 @@ candidates:
1353`quoted-text-only' Allow you to post quoted text only; 1353`quoted-text-only' Allow you to post quoted text only;
1354`multiple-copies' Allow you to post multiple copies; 1354`multiple-copies' Allow you to post multiple copies;
1355`cancel-messages' Allow you to cancel or supersede messages from 1355`cancel-messages' Allow you to cancel or supersede messages from
1356 your other email addresses.") 1356 your other email addresses;
1357`canlock-verify' Allow you to cancel messages without verifying canlock.")
1357 1358
1358(defsubst message-gnksa-enable-p (feature) 1359(defsubst message-gnksa-enable-p (feature)
1359 (or (not (listp message-shoot-gnksa-feet)) 1360 (or (not (listp message-shoot-gnksa-feet))
@@ -7037,7 +7038,8 @@ regexp to match all of yours addresses."
7037 (save-excursion 7038 (save-excursion
7038 (save-restriction 7039 (save-restriction
7039 (message-narrow-to-head-1) 7040 (message-narrow-to-head-1)
7040 (if (message-fetch-field "Cancel-Lock") 7041 (if (and (message-fetch-field "Cancel-Lock")
7042 (message-gnksa-enable-p 'canlock-verify))
7041 (if (null (canlock-verify)) 7043 (if (null (canlock-verify))
7042 t 7044 t
7043 (error "Failed to verify Cancel-lock: This article is not yours")) 7045 (error "Failed to verify Cancel-lock: This article is not yours"))
diff --git a/lisp/gnus/nnmairix.el b/lisp/gnus/nnmairix.el
index b82d6c2ee7b..3d1ac02b6aa 100644
--- a/lisp/gnus/nnmairix.el
+++ b/lisp/gnus/nnmairix.el
@@ -604,9 +604,7 @@ Other back ends might or might not work.")
604 604
605;; Silence byte-compiler. 605;; Silence byte-compiler.
606(defvar gnus-registry-install) 606(defvar gnus-registry-install)
607(autoload 'gnus-registry-fetch-group "gnus-registry") 607(autoload 'gnus-registry-get-id-key "gnus-registry")
608(autoload 'gnus-registry-fetch-groups "gnus-registry")
609(autoload 'gnus-registry-add-group "gnus-registry")
610 608
611(deffoo nnmairix-request-set-mark (group actions &optional server) 609(deffoo nnmairix-request-set-mark (group actions &optional server)
612 (when server 610 (when server
@@ -660,13 +658,7 @@ Other back ends might or might not work.")
660 nnmairix-only-use-registry) 658 nnmairix-only-use-registry)
661 (setq ogroup 659 (setq ogroup
662 (nnmairix-determine-original-group-from-path 660 (nnmairix-determine-original-group-from-path
663 mid nnmairix-current-server)) 661 mid nnmairix-current-server)))
664 ;; if available and allowed, add this entry to the registry
665 (when (and (boundp 'gnus-registry-install)
666 gnus-registry-install)
667 (dolist (cur ogroup)
668 (unless (gnus-parameter-registry-ignore cur)
669 (gnus-registry-add-group mid cur)))))
670 (unless ogroup 662 (unless ogroup
671 (nnheader-message 663 (nnheader-message
672 3 "Unable to set mark: couldn't find original group for %s" mid) 664 3 "Unable to set mark: couldn't find original group for %s" mid)
@@ -1630,14 +1622,7 @@ search in raw mode."
1630 ;; registry was not available or did not find article 1622 ;; registry was not available or did not find article
1631 ;; so we search again with mairix in raw mode to get filename 1623 ;; so we search again with mairix in raw mode to get filename
1632 (setq allgroups 1624 (setq allgroups
1633 (nnmairix-determine-original-group-from-path mid server)) 1625 (nnmairix-determine-original-group-from-path mid server)))
1634 ;; if available and allowed, add this entry to the registry
1635 (when (and (not no-registry)
1636 (boundp 'gnus-registry-install)
1637 gnus-registry-install)
1638 (dolist (cur allgroups)
1639 (unless (gnus-parameter-registry-ignore cur)
1640 (gnus-registry-add-group mid cur)))))
1641 (if (> (length allgroups) 1) 1626 (if (> (length allgroups) 1)
1642 (setq group 1627 (setq group
1643 (gnus-completing-read 1628 (gnus-completing-read
@@ -1657,7 +1642,7 @@ search in raw mode."
1657 (set mid (concat "<" mid))) 1642 (set mid (concat "<" mid)))
1658 (unless (string-match ">$" mid) 1643 (unless (string-match ">$" mid)
1659 (set mid (concat mid ">"))) 1644 (set mid (concat mid ">")))
1660 (gnus-registry-fetch-groups mid))) 1645 (gnus-registry-get-id-key mid 'group)))
1661 1646
1662(defun nnmairix-determine-original-group-from-path (mid server) 1647(defun nnmairix-determine-original-group-from-path (mid server)
1663 "Determine original group(s) for message-id MID from the file path. 1648 "Determine original group(s) for message-id MID from the file path.
diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index a9657c17b9f..47426784e51 100644
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -114,6 +114,16 @@ A character which can't be placed at end of line.")
114Base characters (Unicode General Category L,N,P,S,Zs)") 114Base characters (Unicode General Category L,N,P,S,Zs)")
115(define-category ?^ "Combining 115(define-category ?^ "Combining
116Combining diacritic or mark (Unicode General Category M)") 116Combining diacritic or mark (Unicode General Category M)")
117
118;; bidi types
119(define-category ?R "Right-to-left (strong)
120Characters with \"strong\" right-to-left directionality, i.e.
121with R, AL, RLE, or RLO Unicode bidi character type.")
122
123(define-category ?L "Left-to-right (strong)
124Characters with \"strong\" left-to-right directionality, i.e.
125with L, LRE, or LRO Unicode bidi character type.")
126
117 127
118;;; Setting syntax and category. 128;;; Setting syntax and category.
119 129
@@ -478,6 +488,16 @@ Combining diacritic or mark (Unicode General Category M)")
478 (modify-category-entry x category)) 488 (modify-category-entry x category))
479 chars))))) 489 chars)))))
480 490
491;; Bidi categories
492
493(map-char-table (lambda (key val)
494 (cond
495 ((memq val '(R AL RLO RLE))
496 (modify-category-entry key ?R))
497 ((memq val '(L LRE LRO))
498 (modify-category-entry key ?L))))
499 (unicode-property-table-internal 'bidi-class))
500
481;; Latin 501;; Latin
482 502
483(modify-category-entry '(#x80 . #x024F) ?l) 503(modify-category-entry '(#x80 . #x024F) ?l)
diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el
index 3b406fa9331..637d10135fa 100644
--- a/lisp/mail/smtpmail.el
+++ b/lisp/mail/smtpmail.el
@@ -55,15 +55,12 @@
55;;; Code: 55;;; Code:
56 56
57(require 'sendmail) 57(require 'sendmail)
58(require 'auth-source)
58(autoload 'mail-strip-quoted-names "mail-utils") 59(autoload 'mail-strip-quoted-names "mail-utils")
59(autoload 'message-make-date "message") 60(autoload 'message-make-date "message")
60(autoload 'message-make-message-id "message") 61(autoload 'message-make-message-id "message")
61(autoload 'rfc2104-hash "rfc2104") 62(autoload 'rfc2104-hash "rfc2104")
62(autoload 'netrc-parse "netrc")
63(autoload 'netrc-machine "netrc")
64(autoload 'netrc-get "netrc")
65(autoload 'password-read "password-cache") 63(autoload 'password-read "password-cache")
66(autoload 'auth-source-search "auth-source")
67 64
68;;; 65;;;
69(defgroup smtpmail nil 66(defgroup smtpmail nil
diff --git a/lisp/net/network-stream.el b/lisp/net/network-stream.el
index ceb094cded7..0c3d0285f91 100644
--- a/lisp/net/network-stream.el
+++ b/lisp/net/network-stream.el
@@ -237,13 +237,13 @@ functionality.
237 (unless builtin-starttls 237 (unless builtin-starttls
238 (delete-process stream) 238 (delete-process stream)
239 (setq start (with-current-buffer buffer (point-max))) 239 (setq start (with-current-buffer buffer (point-max)))
240 (let* ((starttls-use-gnutls t) 240 (let* ((starttls-extra-arguments
241 (starttls-extra-arguments
242 (if require-tls 241 (if require-tls
243 starttls-extra-arguments 242 starttls-extra-arguments
244 ;; For opportunistic TLS upgrades, we don't really 243 ;; For opportunistic TLS upgrades, we don't really
245 ;; care about the identity of the peer. 244 ;; care about the identity of the peer.
246 (cons "--insecure" starttls-extra-arguments))) 245 (cons "--insecure" starttls-extra-arguments)))
246 (starttls-extra-args starttls-extra-args)
247 (cert (network-stream-certificate host service parameters))) 247 (cert (network-stream-certificate host service parameters)))
248 ;; There are client certificates requested, so add them to 248 ;; There are client certificates requested, so add them to
249 ;; the command line. 249 ;; the command line.
@@ -251,7 +251,11 @@ functionality.
251 (setq starttls-extra-arguments 251 (setq starttls-extra-arguments
252 (nconc (list "--x509keyfile" (expand-file-name (nth 0 cert)) 252 (nconc (list "--x509keyfile" (expand-file-name (nth 0 cert))
253 "--x509certfile" (expand-file-name (nth 1 cert))) 253 "--x509certfile" (expand-file-name (nth 1 cert)))
254 starttls-extra-arguments))) 254 starttls-extra-arguments)
255 starttls-extra-args
256 (nconc (list "--key-file" (expand-file-name (nth 0 cert))
257 "--cert-file" (expand-file-name (nth 1 cert)))
258 starttls-extra-args)))
255 (setq stream (starttls-open-stream name buffer host service))) 259 (setq stream (starttls-open-stream name buffer host service)))
256 (network-stream-get-response stream start eoc) 260 (network-stream-get-response stream start eoc)
257 ;; Requery capabilities for protocols that require it; i.e., 261 ;; Requery capabilities for protocols that require it; i.e.,
diff --git a/lisp/org/ob-C.el b/lisp/org/ob-C.el
index ba7142b342c..4f8106cd66f 100644
--- a/lisp/org/ob-C.el
+++ b/lisp/org/ob-C.el
@@ -1,6 +1,6 @@
1;;; ob-C.el --- org-babel functions for C and similar languages 1;;; ob-C.el --- org-babel functions for C and similar languages
2 2
3;; Copyright (C) 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-R.el b/lisp/org/ob-R.el
index 83de72e98f6..2b0e6d5e16a 100644
--- a/lisp/org/ob-R.el
+++ b/lisp/org/ob-R.el
@@ -1,8 +1,9 @@
1;;; ob-R.el --- org-babel functions for R code evaluation 1;;; ob-R.el --- org-babel functions for R code evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte, Dan Davison 5;; Author: Eric Schulte
6;; Dan Davison
6;; Keywords: literate programming, reproducible research, R, statistics 7;; Keywords: literate programming, reproducible research, R, statistics
7;; Homepage: http://orgmode.org 8;; Homepage: http://orgmode.org
8;; Version: 7.7 9;; Version: 7.7
diff --git a/lisp/org/ob-asymptote.el b/lisp/org/ob-asymptote.el
index b61c6db406d..6bae3581cf4 100644
--- a/lisp/org/ob-asymptote.el
+++ b/lisp/org/ob-asymptote.el
@@ -1,6 +1,6 @@
1;;; ob-asymptote.el --- org-babel functions for asymptote evaluation 1;;; ob-asymptote.el --- org-babel functions for asymptote evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-calc.el b/lisp/org/ob-calc.el
index 48c8cf69b14..68694786729 100644
--- a/lisp/org/ob-calc.el
+++ b/lisp/org/ob-calc.el
@@ -1,6 +1,6 @@
1;;; ob-calc.el --- org-babel functions for calc code evaluation 1;;; ob-calc.el --- org-babel functions for calc code evaluation
2 2
3;; Copyright (C) 2010 Free Software Foundation, Inc 3;; Copyright (C) 2010-2011 Free Software Foundation, Inc
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-clojure.el b/lisp/org/ob-clojure.el
index ac0a93328bf..090b60662f8 100644
--- a/lisp/org/ob-clojure.el
+++ b/lisp/org/ob-clojure.el
@@ -1,8 +1,9 @@
1;;; ob-clojure.el --- org-babel functions for clojure evaluation 1;;; ob-clojure.el --- org-babel functions for clojure evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Joel Boehland, Eric Schulte 5;; Author: Joel Boehland
6;; Eric Schulte
6;; Keywords: literate programming, reproducible research 7;; Keywords: literate programming, reproducible research
7;; Homepage: http://orgmode.org 8;; Homepage: http://orgmode.org
8;; Version: 7.7 9;; Version: 7.7
diff --git a/lisp/org/ob-comint.el b/lisp/org/ob-comint.el
index 5182a6dc166..efdac4d3818 100644
--- a/lisp/org/ob-comint.el
+++ b/lisp/org/ob-comint.el
@@ -1,6 +1,6 @@
1;;; ob-comint.el --- org-babel functions for interaction with comint buffers 1;;; ob-comint.el --- org-babel functions for interaction with comint buffers
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research, comint 6;; Keywords: literate programming, reproducible research, comint
diff --git a/lisp/org/ob-css.el b/lisp/org/ob-css.el
index 7dbe034e141..7bc97f82909 100644
--- a/lisp/org/ob-css.el
+++ b/lisp/org/ob-css.el
@@ -1,6 +1,6 @@
1;;; ob-css.el --- org-babel functions for css evaluation 1;;; ob-css.el --- org-babel functions for css evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-ditaa.el b/lisp/org/ob-ditaa.el
index b65f476f52c..db638f6ef98 100644
--- a/lisp/org/ob-ditaa.el
+++ b/lisp/org/ob-ditaa.el
@@ -1,6 +1,6 @@
1;;; ob-ditaa.el --- org-babel functions for ditaa evaluation 1;;; ob-ditaa.el --- org-babel functions for ditaa evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-dot.el b/lisp/org/ob-dot.el
index c9f9bb74ba0..cc78ac5bf95 100644
--- a/lisp/org/ob-dot.el
+++ b/lisp/org/ob-dot.el
@@ -1,6 +1,6 @@
1;;; ob-dot.el --- org-babel functions for dot evaluation 1;;; ob-dot.el --- org-babel functions for dot evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-emacs-lisp.el b/lisp/org/ob-emacs-lisp.el
index e709600ee8b..2eccf19b6d1 100644
--- a/lisp/org/ob-emacs-lisp.el
+++ b/lisp/org/ob-emacs-lisp.el
@@ -1,6 +1,6 @@
1;;; ob-emacs-lisp.el --- org-babel functions for emacs-lisp code evaluation 1;;; ob-emacs-lisp.el --- org-babel functions for emacs-lisp code evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-eval.el b/lisp/org/ob-eval.el
index 08fe830e5d7..e74be0b6e02 100644
--- a/lisp/org/ob-eval.el
+++ b/lisp/org/ob-eval.el
@@ -1,6 +1,6 @@
1;;; ob-eval.el --- org-babel functions for external code evaluation 1;;; ob-eval.el --- org-babel functions for external code evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research, comint 6;; Keywords: literate programming, reproducible research, comint
diff --git a/lisp/org/ob-exp.el b/lisp/org/ob-exp.el
index 39a8a89fe65..0fceb184c5e 100644
--- a/lisp/org/ob-exp.el
+++ b/lisp/org/ob-exp.el
@@ -1,8 +1,9 @@
1;;; ob-exp.el --- Exportation of org-babel source blocks 1;;; ob-exp.el --- Exportation of org-babel source blocks
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte, Dan Davison 5;; Author: Eric Schulte
6;; Dan Davison
6;; Keywords: literate programming, reproducible research 7;; Keywords: literate programming, reproducible research
7;; Homepage: http://orgmode.org 8;; Homepage: http://orgmode.org
8;; Version: 7.7 9;; Version: 7.7
diff --git a/lisp/org/ob-gnuplot.el b/lisp/org/ob-gnuplot.el
index 86003a48c8a..9bf0433f9fc 100644
--- a/lisp/org/ob-gnuplot.el
+++ b/lisp/org/ob-gnuplot.el
@@ -1,6 +1,6 @@
1;;; ob-gnuplot.el --- org-babel functions for gnuplot evaluation 1;;; ob-gnuplot.el --- org-babel functions for gnuplot evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-haskell.el b/lisp/org/ob-haskell.el
index ab372dc383d..cae07036c57 100644
--- a/lisp/org/ob-haskell.el
+++ b/lisp/org/ob-haskell.el
@@ -1,6 +1,6 @@
1;;; ob-haskell.el --- org-babel functions for haskell evaluation 1;;; ob-haskell.el --- org-babel functions for haskell evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-js.el b/lisp/org/ob-js.el
index 797b2038f16..9e6751c9525 100644
--- a/lisp/org/ob-js.el
+++ b/lisp/org/ob-js.el
@@ -1,28 +1,26 @@
1;;; ob-js.el --- org-babel functions for Javascript 1;;; ob-js.el --- org-babel functions for Javascript
2 2
3;; Copyright (C) 2010 Free Software Foundation 3;; Copyright (C) 2010-2011 Free Software Foundation
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research, js 6;; Keywords: literate programming, reproducible research, js
7;; Homepage: http://orgmode.org 7;; Homepage: http://orgmode.org
8;; Version: 7.7 8;; Version: 7.7
9 9
10;;; License: 10;; This file is part of GNU Emacs.
11 11
12;; This program is free software; you can redistribute it and/or modify 12;; GNU Emacs is free software: you can redistribute it and/or modify
13;; it under the terms of the GNU General Public License as published by 13;; it under the terms of the GNU General Public License as published by
14;; the Free Software Foundation; either version 3, or (at your option) 14;; the Free Software Foundation, either version 3 of the License, or
15;; any later version. 15;; (at your option) any later version.
16;; 16
17;; This program is distributed in the hope that it will be useful, 17;; GNU Emacs is distributed in the hope that it will be useful,
18;; but WITHOUT ANY WARRANTY; without even the implied warranty of 18;; but WITHOUT ANY WARRANTY; without even the implied warranty of
19;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 19;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20;; GNU General Public License for more details. 20;; GNU General Public License for more details.
21;; 21
22;; You should have received a copy of the GNU General Public License 22;; You should have received a copy of the GNU General Public License
23;; along with GNU Emacs; see the file COPYING. If not, write to the 23;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
24;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
25;; Boston, MA 02110-1301, USA.
26 24
27;;; Commentary: 25;;; Commentary:
28 26
@@ -35,7 +33,7 @@
35 33
36;; - a non-browser javascript engine such as node.js http://nodejs.org/ 34;; - a non-browser javascript engine such as node.js http://nodejs.org/
37;; or mozrepl http://wiki.github.com/bard/mozrepl/ 35;; or mozrepl http://wiki.github.com/bard/mozrepl/
38;; 36;;
39;; - for session based evaluation mozrepl and moz.el are required see 37;; - for session based evaluation mozrepl and moz.el are required see
40;; http://wiki.github.com/bard/mozrepl/emacs-integration for 38;; http://wiki.github.com/bard/mozrepl/emacs-integration for
41;; configuration instructions 39;; configuration instructions
diff --git a/lisp/org/ob-keys.el b/lisp/org/ob-keys.el
index 246b5be24b5..b56ba5cf01a 100644
--- a/lisp/org/ob-keys.el
+++ b/lisp/org/ob-keys.el
@@ -1,6 +1,6 @@
1;;; ob-keys.el --- key bindings for org-babel 1;;; ob-keys.el --- key bindings for org-babel
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-latex.el b/lisp/org/ob-latex.el
index 915dfb4cc96..c27ca33080a 100644
--- a/lisp/org/ob-latex.el
+++ b/lisp/org/ob-latex.el
@@ -1,6 +1,6 @@
1;;; ob-latex.el --- org-babel functions for latex "evaluation" 1;;; ob-latex.el --- org-babel functions for latex "evaluation"
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-ledger.el b/lisp/org/ob-ledger.el
index ccaa1a66c8b..a5bdcbf2f73 100644
--- a/lisp/org/ob-ledger.el
+++ b/lisp/org/ob-ledger.el
@@ -1,6 +1,6 @@
1;;; ob-ledger.el --- org-babel functions for ledger evaluation 1;;; ob-ledger.el --- org-babel functions for ledger evaluation
2 2
3;; Copyright (C) 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric S Fraga 5;; Author: Eric S Fraga
6;; Keywords: literate programming, reproducible research, accounting 6;; Keywords: literate programming, reproducible research, accounting
diff --git a/lisp/org/ob-lisp.el b/lisp/org/ob-lisp.el
index 271099e2ee2..4ff9c4076ec 100644
--- a/lisp/org/ob-lisp.el
+++ b/lisp/org/ob-lisp.el
@@ -1,8 +1,10 @@
1;;; ob-lisp.el --- org-babel functions for common lisp evaluation 1;;; ob-lisp.el --- org-babel functions for common lisp evaluation
2 2
3;; Copyright (C) 2009, 2010, 2011 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Joel Boehland, Eric Schulte, David T. O'Toole <dto@gnu.org> 5;; Author: Joel Boehland
6;; Eric Schulte
7;; David T. O'Toole <dto@gnu.org>
6;; Keywords: literate programming, reproducible research 8;; Keywords: literate programming, reproducible research
7;; Homepage: http://orgmode.org 9;; Homepage: http://orgmode.org
8;; Version: 7.7 10;; Version: 7.7
diff --git a/lisp/org/ob-lob.el b/lisp/org/ob-lob.el
index 26b13680fd3..5cb40a057f3 100644
--- a/lisp/org/ob-lob.el
+++ b/lisp/org/ob-lob.el
@@ -1,8 +1,9 @@
1;;; ob-lob.el --- functions supporting the Library of Babel 1;;; ob-lob.el --- functions supporting the Library of Babel
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte, Dan Davison 5;; Author: Eric Schulte
6;; Dan Davison
6;; Keywords: literate programming, reproducible research 7;; Keywords: literate programming, reproducible research
7;; Homepage: http://orgmode.org 8;; Homepage: http://orgmode.org
8;; Version: 7.7 9;; Version: 7.7
diff --git a/lisp/org/ob-matlab.el b/lisp/org/ob-matlab.el
index 9fb41e17aca..bb32c5a29f5 100644
--- a/lisp/org/ob-matlab.el
+++ b/lisp/org/ob-matlab.el
@@ -1,6 +1,6 @@
1;;; ob-matlab.el --- org-babel support for matlab evaluation 1;;; ob-matlab.el --- org-babel support for matlab evaluation
2 2
3;; Copyright (C) 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
4 4
5;; Author: Dan Davison 5;; Author: Dan Davison
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-mscgen.el b/lisp/org/ob-mscgen.el
index 15c116cf83f..dc800a875c6 100644
--- a/lisp/org/ob-mscgen.el
+++ b/lisp/org/ob-mscgen.el
@@ -1,6 +1,6 @@
1;;; ob-msc.el --- org-babel functions for mscgen evaluation 1;;; ob-msc.el --- org-babel functions for mscgen evaluation
2 2
3;; Copyright (C) 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
4 4
5;; Author: Juan Pechiar 5;; Author: Juan Pechiar
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-ocaml.el b/lisp/org/ob-ocaml.el
index 5709c28f03e..ee7a7cc212c 100644
--- a/lisp/org/ob-ocaml.el
+++ b/lisp/org/ob-ocaml.el
@@ -1,6 +1,6 @@
1;;; ob-ocaml.el --- org-babel functions for ocaml evaluation 1;;; ob-ocaml.el --- org-babel functions for ocaml evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-octave.el b/lisp/org/ob-octave.el
index e7abd923271..2003a6f18f7 100644
--- a/lisp/org/ob-octave.el
+++ b/lisp/org/ob-octave.el
@@ -1,6 +1,6 @@
1;;; ob-octave.el --- org-babel functions for octave and matlab evaluation 1;;; ob-octave.el --- org-babel functions for octave and matlab evaluation
2 2
3;; Copyright (C) 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
4 4
5;; Author: Dan Davison 5;; Author: Dan Davison
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-org.el b/lisp/org/ob-org.el
index 35e6abcd166..37256d015c7 100644
--- a/lisp/org/ob-org.el
+++ b/lisp/org/ob-org.el
@@ -1,6 +1,6 @@
1;;; ob-org.el --- org-babel functions for org code block evaluation 1;;; ob-org.el --- org-babel functions for org code block evaluation
2 2
3;; Copyright (C) 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-perl.el b/lisp/org/ob-perl.el
index 249b86bef5d..13d71413731 100644
--- a/lisp/org/ob-perl.el
+++ b/lisp/org/ob-perl.el
@@ -1,8 +1,9 @@
1;;; ob-perl.el --- org-babel functions for perl evaluation 1;;; ob-perl.el --- org-babel functions for perl evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation 3;; Copyright (C) 2009-2011 Free Software Foundation
4 4
5;; Author: Dan Davison, Eric Schulte 5;; Author: Dan Davison
6;; Eric Schulte
6;; Keywords: literate programming, reproducible research 7;; Keywords: literate programming, reproducible research
7;; Homepage: http://orgmode.org 8;; Homepage: http://orgmode.org
8;; Version: 7.7 9;; Version: 7.7
diff --git a/lisp/org/ob-plantuml.el b/lisp/org/ob-plantuml.el
index 9bc896348af..9fa55727592 100644
--- a/lisp/org/ob-plantuml.el
+++ b/lisp/org/ob-plantuml.el
@@ -1,6 +1,6 @@
1;;; ob-plantuml.el --- org-babel functions for plantuml evaluation 1;;; ob-plantuml.el --- org-babel functions for plantuml evaluation
2 2
3;; Copyright (C) 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
4 4
5;; Author: Zhang Weize 5;; Author: Zhang Weize
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-python.el b/lisp/org/ob-python.el
index 3c1460c6740..5234d83ecee 100644
--- a/lisp/org/ob-python.el
+++ b/lisp/org/ob-python.el
@@ -1,8 +1,9 @@
1;;; ob-python.el --- org-babel functions for python evaluation 1;;; ob-python.el --- org-babel functions for python evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation 3;; Copyright (C) 2009-2011 Free Software Foundation
4 4
5;; Author: Eric Schulte, Dan Davison 5;; Author: Eric Schulte
6;; Dan Davison
6;; Keywords: literate programming, reproducible research 7;; Keywords: literate programming, reproducible research
7;; Homepage: http://orgmode.org 8;; Homepage: http://orgmode.org
8;; Version: 7.7 9;; Version: 7.7
diff --git a/lisp/org/ob-ref.el b/lisp/org/ob-ref.el
index 47a5d240409..b27bd20db40 100644
--- a/lisp/org/ob-ref.el
+++ b/lisp/org/ob-ref.el
@@ -1,8 +1,9 @@
1;;; ob-ref.el --- org-babel functions for referencing external data 1;;; ob-ref.el --- org-babel functions for referencing external data
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte, Dan Davison 5;; Author: Eric Schulte
6;; Dan Davison
6;; Keywords: literate programming, reproducible research 7;; Keywords: literate programming, reproducible research
7;; Homepage: http://orgmode.org 8;; Homepage: http://orgmode.org
8;; Version: 7.7 9;; Version: 7.7
diff --git a/lisp/org/ob-ruby.el b/lisp/org/ob-ruby.el
index 1f5e6fafab5..02089b4a214 100644
--- a/lisp/org/ob-ruby.el
+++ b/lisp/org/ob-ruby.el
@@ -1,6 +1,6 @@
1;;; ob-ruby.el --- org-babel functions for ruby evaluation 1;;; ob-ruby.el --- org-babel functions for ruby evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation 3;; Copyright (C) 2009-2011 Free Software Foundation
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-sass.el b/lisp/org/ob-sass.el
index a94458ff22d..162113ea5a8 100644
--- a/lisp/org/ob-sass.el
+++ b/lisp/org/ob-sass.el
@@ -1,6 +1,6 @@
1;;; ob-sass.el --- org-babel functions for the sass css generation language 1;;; ob-sass.el --- org-babel functions for the sass css generation language
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-scheme.el b/lisp/org/ob-scheme.el
index a4f170fff6a..3e93a3a74f7 100644
--- a/lisp/org/ob-scheme.el
+++ b/lisp/org/ob-scheme.el
@@ -1,28 +1,26 @@
1;;; ob-scheme.el --- org-babel functions for Scheme 1;;; ob-scheme.el --- org-babel functions for Scheme
2 2
3;; Copyright (C) 2010 Free Software Foundation 3;; Copyright (C) 2010-2011 Free Software Foundation
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research, scheme 6;; Keywords: literate programming, reproducible research, scheme
7;; Homepage: http://orgmode.org 7;; Homepage: http://orgmode.org
8;; Version: 7.7 8;; Version: 7.7
9 9
10;;; License: 10;; This file is part of GNU Emacs.
11 11
12;; This program is free software; you can redistribute it and/or modify 12;; GNU Emacs is free software: you can redistribute it and/or modify
13;; it under the terms of the GNU General Public License as published by 13;; it under the terms of the GNU General Public License as published by
14;; the Free Software Foundation; either version 3, or (at your option) 14;; the Free Software Foundation, either version 3 of the License, or
15;; any later version. 15;; (at your option) any later version.
16;; 16
17;; This program is distributed in the hope that it will be useful, 17;; GNU Emacs is distributed in the hope that it will be useful,
18;; but WITHOUT ANY WARRANTY; without even the implied warranty of 18;; but WITHOUT ANY WARRANTY; without even the implied warranty of
19;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 19;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20;; GNU General Public License for more details. 20;; GNU General Public License for more details.
21;; 21
22;; You should have received a copy of the GNU General Public License 22;; You should have received a copy of the GNU General Public License
23;; along with GNU Emacs; see the file COPYING. If not, write to the 23;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
24;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
25;; Boston, MA 02110-1301, USA.
26 24
27;;; Commentary: 25;;; Commentary:
28 26
@@ -35,7 +33,7 @@
35 33
36;; - a working scheme implementation 34;; - a working scheme implementation
37;; (e.g. guile http://www.gnu.org/software/guile/guile.html) 35;; (e.g. guile http://www.gnu.org/software/guile/guile.html)
38;; 36;;
39;; - for session based evaluation cmuscheme.el is required which is 37;; - for session based evaluation cmuscheme.el is required which is
40;; included in Emacs 38;; included in Emacs
41 39
diff --git a/lisp/org/ob-screen.el b/lisp/org/ob-screen.el
index 3298077cb33..084beffd229 100644
--- a/lisp/org/ob-screen.el
+++ b/lisp/org/ob-screen.el
@@ -1,6 +1,6 @@
1;;; ob-screen.el --- org-babel support for interactive terminal 1;;; ob-screen.el --- org-babel support for interactive terminal
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation 3;; Copyright (C) 2009-2011 Free Software Foundation
4 4
5;; Author: Benjamin Andresen 5;; Author: Benjamin Andresen
6;; Keywords: literate programming, interactive shell 6;; Keywords: literate programming, interactive shell
diff --git a/lisp/org/ob-sh.el b/lisp/org/ob-sh.el
index 03683b66eaf..f46ba45770a 100644
--- a/lisp/org/ob-sh.el
+++ b/lisp/org/ob-sh.el
@@ -1,6 +1,6 @@
1;;; ob-sh.el --- org-babel functions for shell evaluation 1;;; ob-sh.el --- org-babel functions for shell evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-sql.el b/lisp/org/ob-sql.el
index 552bb617266..9274438c18e 100644
--- a/lisp/org/ob-sql.el
+++ b/lisp/org/ob-sql.el
@@ -1,6 +1,6 @@
1;;; ob-sql.el --- org-babel functions for sql evaluation 1;;; ob-sql.el --- org-babel functions for sql evaluation
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-sqlite.el b/lisp/org/ob-sqlite.el
index ff4687f0095..c08c7f38e8a 100644
--- a/lisp/org/ob-sqlite.el
+++ b/lisp/org/ob-sqlite.el
@@ -1,6 +1,6 @@
1;;; ob-sqlite.el --- org-babel functions for sqlite database interaction 1;;; ob-sqlite.el --- org-babel functions for sqlite database interaction
2 2
3;; Copyright (C) 2010 Free Software Foundation 3;; Copyright (C) 2010-2011 Free Software Foundation
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-table.el b/lisp/org/ob-table.el
index 17f845eb76e..ea253b2f048 100644
--- a/lisp/org/ob-table.el
+++ b/lisp/org/ob-table.el
@@ -1,6 +1,6 @@
1;;; ob-table.el --- support for calling org-babel functions from tables 1;;; ob-table.el --- support for calling org-babel functions from tables
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob-tangle.el b/lisp/org/ob-tangle.el
index 65e189b6c29..26549126009 100644
--- a/lisp/org/ob-tangle.el
+++ b/lisp/org/ob-tangle.el
@@ -1,6 +1,6 @@
1;;; ob-tangle.el --- extract source code from org-mode files 1;;; ob-tangle.el --- extract source code from org-mode files
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte 5;; Author: Eric Schulte
6;; Keywords: literate programming, reproducible research 6;; Keywords: literate programming, reproducible research
diff --git a/lisp/org/ob.el b/lisp/org/ob.el
index 538158469c3..728c6c5cb5e 100644
--- a/lisp/org/ob.el
+++ b/lisp/org/ob.el
@@ -1,8 +1,9 @@
1;;; ob.el --- working with code blocks in org-mode 1;;; ob.el --- working with code blocks in org-mode
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Eric Schulte, Dan Davison 5;; Author: Eric Schulte
6;; Dan Davison
6;; Keywords: literate programming, reproducible research 7;; Keywords: literate programming, reproducible research
7;; Homepage: http://orgmode.org 8;; Homepage: http://orgmode.org
8;; Version: 7.7 9;; Version: 7.7
diff --git a/lisp/org/org-agenda.el b/lisp/org/org-agenda.el
index cb471202f8b..9f23c4011d1 100644
--- a/lisp/org/org-agenda.el
+++ b/lisp/org/org-agenda.el
@@ -1,7 +1,6 @@
1;;; org-agenda.el --- Dynamic task and appointment lists for Org 1;;; org-agenda.el --- Dynamic task and appointment lists for Org
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-archive.el b/lisp/org/org-archive.el
index 87637f08298..7436696433c 100644
--- a/lisp/org/org-archive.el
+++ b/lisp/org/org-archive.el
@@ -1,7 +1,6 @@
1;;; org-archive.el --- Archiving for Org-mode 1;;; org-archive.el --- Archiving for Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-ascii.el b/lisp/org/org-ascii.el
index e139773d486..d6a4e30714b 100644
--- a/lisp/org/org-ascii.el
+++ b/lisp/org/org-ascii.el
@@ -1,7 +1,6 @@
1;;; org-ascii.el --- ASCII export for Org-mode 1;;; org-ascii.el --- ASCII export for Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-attach.el b/lisp/org/org-attach.el
index c2688f2dced..aa8c476e89b 100644
--- a/lisp/org/org-attach.el
+++ b/lisp/org/org-attach.el
@@ -1,6 +1,6 @@
1;;; org-attach.el --- Manage file attachments to org-mode tasks 1;;; org-attach.el --- Manage file attachments to org-mode tasks
2 2
3;; Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2008-2011 Free Software Foundation, Inc.
4 4
5;; Author: John Wiegley <johnw@newartisans.com> 5;; Author: John Wiegley <johnw@newartisans.com>
6;; Keywords: org data task 6;; Keywords: org data task
diff --git a/lisp/org/org-bbdb.el b/lisp/org/org-bbdb.el
index 1ca5bfe44e8..a7b6efae836 100644
--- a/lisp/org/org-bbdb.el
+++ b/lisp/org/org-bbdb.el
@@ -1,7 +1,6 @@
1;;; org-bbdb.el --- Support for links to BBDB entries from within Org-mode 1;;; org-bbdb.el --- Support for links to BBDB entries from within Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org>, 5;; Author: Carsten Dominik <carsten at orgmode dot org>,
7;; Thomas Baumann <thomas dot baumann at ch dot tum dot de> 6;; Thomas Baumann <thomas dot baumann at ch dot tum dot de>
diff --git a/lisp/org/org-beamer.el b/lisp/org/org-beamer.el
index bf965e3a5c4..5cebe50efd1 100644
--- a/lisp/org/org-beamer.el
+++ b/lisp/org/org-beamer.el
@@ -1,6 +1,6 @@
1;;; org-beamer.el --- Beamer-specific LaTeX export for org-mode 1;;; org-beamer.el --- Beamer-specific LaTeX export for org-mode
2;; 2;;
3;; Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2007-2011 Free Software Foundation, Inc.
4;; 4;;
5;; Version: 7.7 5;; Version: 7.7
6;; Author: Carsten Dominik <carsten.dominik AT gmail DOT com> 6;; Author: Carsten Dominik <carsten.dominik AT gmail DOT com>
diff --git a/lisp/org/org-bibtex.el b/lisp/org/org-bibtex.el
index 084ea9674d3..5c9b37b2341 100644
--- a/lisp/org/org-bibtex.el
+++ b/lisp/org/org-bibtex.el
@@ -1,6 +1,6 @@
1;;; org-bibtex.el --- Org links to BibTeX entries 1;;; org-bibtex.el --- Org links to BibTeX entries
2;; 2;;
3;; Copyright (C) 2007, 2008, 2009, 2010, 2011 Free Software Foundation, Inc. 3;; Copyright (C) 2007-2011 Free Software Foundation, Inc.
4;; 4;;
5;; Author: Bastien Guerry <bzg at altern dot org> 5;; Author: Bastien Guerry <bzg at altern dot org>
6;; Carsten Dominik <carsten dot dominik at gmail dot com> 6;; Carsten Dominik <carsten dot dominik at gmail dot com>
diff --git a/lisp/org/org-capture.el b/lisp/org/org-capture.el
index 2fac42d56dc..133460b49ec 100644
--- a/lisp/org/org-capture.el
+++ b/lisp/org/org-capture.el
@@ -1,6 +1,6 @@
1;;; org-capture.el --- Fast note taking in Org-mode 1;;; org-capture.el --- Fast note taking in Org-mode
2 2
3;; Copyright (C) 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
4 4
5;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-clock.el b/lisp/org/org-clock.el
index aa342d2be19..4cf26e359f1 100644
--- a/lisp/org/org-clock.el
+++ b/lisp/org/org-clock.el
@@ -1,7 +1,6 @@
1;;; org-clock.el --- The time clocking code for Org-mode 1;;; org-clock.el --- The time clocking code for Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-colview.el b/lisp/org/org-colview.el
index fabe5525c69..05df6bb7524 100644
--- a/lisp/org/org-colview.el
+++ b/lisp/org/org-colview.el
@@ -1,7 +1,6 @@
1;;; org-colview.el --- Column View in Org-mode 1;;; org-colview.el --- Column View in Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-compat.el b/lisp/org/org-compat.el
index 49b07d3287a..edbfa6a1bae 100644
--- a/lisp/org/org-compat.el
+++ b/lisp/org/org-compat.el
@@ -1,7 +1,6 @@
1;;; org-compat.el --- Compatibility code for Org-mode 1;;; org-compat.el --- Compatibility code for Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-crypt.el b/lisp/org/org-crypt.el
index 9c509139706..b260391a0da 100644
--- a/lisp/org/org-crypt.el
+++ b/lisp/org/org-crypt.el
@@ -1,6 +1,6 @@
1;;; org-crypt.el --- Public key encryption for org-mode entries 1;;; org-crypt.el --- Public key encryption for org-mode entries
2 2
3;; Copyright (C) 2007, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2007, 2009-2011 Free Software Foundation, Inc.
4 4
5;; Emacs Lisp Archive Entry 5;; Emacs Lisp Archive Entry
6;; Filename: org-crypt.el 6;; Filename: org-crypt.el
diff --git a/lisp/org/org-ctags.el b/lisp/org/org-ctags.el
index cb30e400862..9ba5024d58b 100644
--- a/lisp/org/org-ctags.el
+++ b/lisp/org/org-ctags.el
@@ -1,6 +1,6 @@
1;;; org-ctags.el - Integrate Emacs "tags" facility with org mode. 1;;; org-ctags.el - Integrate Emacs "tags" facility with org mode.
2;; 2;;
3;; Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2007-2011 Free Software Foundation, Inc.
4 4
5;; Author: Paul Sexton <eeeickythump@gmail.com> 5;; Author: Paul Sexton <eeeickythump@gmail.com>
6;; Version: 7.7 6;; Version: 7.7
diff --git a/lisp/org/org-datetree.el b/lisp/org/org-datetree.el
index 6d12f6ec644..f02f3789823 100644
--- a/lisp/org/org-datetree.el
+++ b/lisp/org/org-datetree.el
@@ -1,6 +1,6 @@
1;;; org-datetree.el --- Create date entries in a tree 1;;; org-datetree.el --- Create date entries in a tree
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-docbook.el b/lisp/org/org-docbook.el
index 2ecc48c41c1..f964a93fa1c 100644
--- a/lisp/org/org-docbook.el
+++ b/lisp/org/org-docbook.el
@@ -1,6 +1,6 @@
1;;; org-docbook.el --- DocBook exporter for org-mode 1;;; org-docbook.el --- DocBook exporter for org-mode
2;; 2;;
3;; Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2007-2011 Free Software Foundation, Inc.
4;; 4;;
5;; Emacs Lisp Archive Entry 5;; Emacs Lisp Archive Entry
6;; Filename: org-docbook.el 6;; Filename: org-docbook.el
diff --git a/lisp/org/org-docview.el b/lisp/org/org-docview.el
index 2affe1f6922..201567251d7 100644
--- a/lisp/org/org-docview.el
+++ b/lisp/org/org-docview.el
@@ -1,6 +1,6 @@
1;;; org-docview.el --- support for links to doc-view-mode buffers 1;;; org-docview.el --- support for links to doc-view-mode buffers
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Jan Böcker <jan.boecker at jboecker dot de> 5;; Author: Jan Böcker <jan.boecker at jboecker dot de>
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-entities.el b/lisp/org/org-entities.el
index 9c929f2533c..1e7fd627a17 100644
--- a/lisp/org/org-entities.el
+++ b/lisp/org/org-entities.el
@@ -1,6 +1,6 @@
1;;; org-entities.el --- Support for special entities in Org-mode 1;;; org-entities.el --- Support for special entities in Org-mode
2 2
3;; Copyright (C) 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
4 4
5;; Author: Carsten Dominik <carsten at orgmode dot org>, 5;; Author: Carsten Dominik <carsten at orgmode dot org>,
6;; Ulf Stegemann <ulf at zeitform dot de> 6;; Ulf Stegemann <ulf at zeitform dot de>
diff --git a/lisp/org/org-exp-blocks.el b/lisp/org/org-exp-blocks.el
index 45eb2c9de66..398da3859d0 100644
--- a/lisp/org/org-exp-blocks.el
+++ b/lisp/org/org-exp-blocks.el
@@ -1,7 +1,6 @@
1;;; org-exp-blocks.el --- pre-process blocks when exporting org files 1;;; org-exp-blocks.el --- pre-process blocks when exporting org files
2 2
3;; Copyright (C) 2009, 2010 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Eric Schulte 5;; Author: Eric Schulte
7;; Version: 7.7 6;; Version: 7.7
diff --git a/lisp/org/org-exp.el b/lisp/org/org-exp.el
index 5499486f813..59459b0d578 100644
--- a/lisp/org/org-exp.el
+++ b/lisp/org/org-exp.el
@@ -1,7 +1,6 @@
1;;; org-exp.el --- ASCII, HTML, XOXO and iCalendar export for Org-mode 1;;; org-exp.el --- ASCII, HTML, XOXO and iCalendar export for Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-faces.el b/lisp/org/org-faces.el
index 3d989fc8065..af9632eec44 100644
--- a/lisp/org/org-faces.el
+++ b/lisp/org/org-faces.el
@@ -1,7 +1,6 @@
1;;; org-faces.el --- Face definitions for Org-mode. 1;;; org-faces.el --- Face definitions for Org-mode.
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-feed.el b/lisp/org/org-feed.el
index acc775ad5a3..a07ecc619e5 100644
--- a/lisp/org/org-feed.el
+++ b/lisp/org/org-feed.el
@@ -1,6 +1,6 @@
1;;; org-feed.el --- Add RSS feed items to Org files 1;;; org-feed.el --- Add RSS feed items to Org files
2;; 2;;
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4;; 4;;
5;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-footnote.el b/lisp/org/org-footnote.el
index 5587e3eaa94..223d2573fdb 100644
--- a/lisp/org/org-footnote.el
+++ b/lisp/org/org-footnote.el
@@ -1,6 +1,6 @@
1;;; org-footnote.el --- Footnote support in Org and elsewhere 1;;; org-footnote.el --- Footnote support in Org and elsewhere
2;; 2;;
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4;; 4;;
5;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-freemind.el b/lisp/org/org-freemind.el
index 903707071e0..91a1e5e59cb 100644
--- a/lisp/org/org-freemind.el
+++ b/lisp/org/org-freemind.el
@@ -1,6 +1,6 @@
1;;; org-freemind.el --- Export Org files to freemind 1;;; org-freemind.el --- Export Org files to freemind
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: Lennart Borgman (lennart O borgman A gmail O com) 5;; Author: Lennart Borgman (lennart O borgman A gmail O com)
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
@@ -57,26 +57,6 @@
57;; Added y/n question before showing in FreeMind. 57;; Added y/n question before showing in FreeMind.
58;; 2009-11-04: Added support for #+BEGIN_HTML. 58;; 2009-11-04: Added support for #+BEGIN_HTML.
59;; 59;;
60;;
61;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
62;;
63;; This program is free software; you can redistribute it and/or
64;; modify it under the terms of the GNU General Public License as
65;; published by the Free Software Foundation; either version 2, or
66;; (at your option) any later version.
67;;
68;; This program is distributed in the hope that it will be useful,
69;; but WITHOUT ANY WARRANTY; without even the implied warranty of
70;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
71;; General Public License for more details.
72;;
73;; You should have received a copy of the GNU General Public License
74;; along with this program; see the file COPYING. If not, write to
75;; the Free Software Foundation, Inc., 51 Franklin Street, Fifth
76;; Floor, Boston, MA 02110-1301, USA.
77;;
78;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
79;;
80;;; Code: 60;;; Code:
81 61
82(require 'xml) 62(require 'xml)
diff --git a/lisp/org/org-gnus.el b/lisp/org/org-gnus.el
index 6bf00537ea0..0ccb66ca497 100644
--- a/lisp/org/org-gnus.el
+++ b/lisp/org/org-gnus.el
@@ -1,7 +1,6 @@
1;;; org-gnus.el --- Support for links to Gnus groups and messages from within Org-mode 1;;; org-gnus.el --- Support for links to Gnus groups and messages from within Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Tassilo Horn <tassilo at member dot fsf dot org> 6;; Tassilo Horn <tassilo at member dot fsf dot org>
diff --git a/lisp/org/org-habit.el b/lisp/org/org-habit.el
index da105a2bd78..c146a5bebbd 100644
--- a/lisp/org/org-habit.el
+++ b/lisp/org/org-habit.el
@@ -1,6 +1,6 @@
1;;; org-habit.el --- The habit tracking code for Org-mode 1;;; org-habit.el --- The habit tracking code for Org-mode
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4 4
5;; Author: John Wiegley <johnw at gnu dot org> 5;; Author: John Wiegley <johnw at gnu dot org>
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-html.el b/lisp/org/org-html.el
index e91391e00a9..54f6cb44dab 100644
--- a/lisp/org/org-html.el
+++ b/lisp/org/org-html.el
@@ -1,7 +1,6 @@
1;;; org-html.el --- HTML export for Org-mode 1;;; org-html.el --- HTML export for Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-icalendar.el b/lisp/org/org-icalendar.el
index 61ce98717d5..dd64fc2f783 100644
--- a/lisp/org/org-icalendar.el
+++ b/lisp/org/org-icalendar.el
@@ -1,7 +1,6 @@
1;;; org-icalendar.el --- iCalendar export for Org-mode 1;;; org-icalendar.el --- iCalendar export for Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-id.el b/lisp/org/org-id.el
index a90753a390a..c840d5aeb75 100644
--- a/lisp/org/org-id.el
+++ b/lisp/org/org-id.el
@@ -1,6 +1,6 @@
1;;; org-id.el --- Global identifiers for Org-mode entries 1;;; org-id.el --- Global identifiers for Org-mode entries
2;; 2;;
3;; Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2008-2011 Free Software Foundation, Inc.
4;; 4;;
5;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-indent.el b/lisp/org/org-indent.el
index 398121e2880..a2099a4bde3 100644
--- a/lisp/org/org-indent.el
+++ b/lisp/org/org-indent.el
@@ -1,5 +1,5 @@
1;;; org-indent.el --- Dynamic indentation for Org-mode 1;;; org-indent.el --- Dynamic indentation for Org-mode
2;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 2;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
3;; 3;;
4;; Author: Carsten Dominik <carsten at orgmode dot org> 4;; Author: Carsten Dominik <carsten at orgmode dot org>
5;; Keywords: outlines, hypermedia, calendar, wp 5;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-info.el b/lisp/org/org-info.el
index fb73509b8c2..4f44045f9bf 100644
--- a/lisp/org/org-info.el
+++ b/lisp/org/org-info.el
@@ -1,7 +1,6 @@
1;;; org-info.el --- Support for links to Info nodes from within Org-Mode 1;;; org-info.el --- Support for links to Info nodes from within Org-Mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-inlinetask.el b/lisp/org/org-inlinetask.el
index 7a52d6b6b40..72c19062983 100644
--- a/lisp/org/org-inlinetask.el
+++ b/lisp/org/org-inlinetask.el
@@ -1,6 +1,6 @@
1;;; org-inlinetask.el --- Tasks independent of outline hierarchy 1;;; org-inlinetask.el --- Tasks independent of outline hierarchy
2 2
3;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
4;; 4;;
5;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-irc.el b/lisp/org/org-irc.el
index 0e74144973c..c604858b28c 100644
--- a/lisp/org/org-irc.el
+++ b/lisp/org/org-irc.el
@@ -1,6 +1,6 @@
1;;; org-irc.el --- Store links to IRC sessions 1;;; org-irc.el --- Store links to IRC sessions
2;; 2;;
3;; Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2008-2011 Free Software Foundation, Inc.
4;; 4;;
5;; Author: Philip Jackson <emacs@shellarchive.co.uk> 5;; Author: Philip Jackson <emacs@shellarchive.co.uk>
6;; Keywords: erc, irc, link, org 6;; Keywords: erc, irc, link, org
diff --git a/lisp/org/org-jsinfo.el b/lisp/org/org-jsinfo.el
index b41df42df51..3ef8c4c809c 100644
--- a/lisp/org/org-jsinfo.el
+++ b/lisp/org/org-jsinfo.el
@@ -1,7 +1,6 @@
1;;; org-jsinfo.el --- Support for org-info.js Javascript in Org HTML export 1;;; org-jsinfo.el --- Support for org-info.js Javascript in Org HTML export
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-latex.el b/lisp/org/org-latex.el
index e976bd5c584..0402b2da964 100644
--- a/lisp/org/org-latex.el
+++ b/lisp/org/org-latex.el
@@ -1,6 +1,6 @@
1;;; org-latex.el --- LaTeX exporter for org-mode 1;;; org-latex.el --- LaTeX exporter for org-mode
2;; 2;;
3;; Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2007-2011 Free Software Foundation, Inc.
4;; 4;;
5;; Emacs Lisp Archive Entry 5;; Emacs Lisp Archive Entry
6;; Filename: org-latex.el 6;; Filename: org-latex.el
diff --git a/lisp/org/org-list.el b/lisp/org/org-list.el
index 7f3a66dff46..d3c5dd99aa6 100644
--- a/lisp/org/org-list.el
+++ b/lisp/org/org-list.el
@@ -1,7 +1,6 @@
1;;; org-list.el --- Plain lists for Org-mode 1;;; org-list.el --- Plain lists for Org-mode
2;; 2;;
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5;; 4;;
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Bastien Guerry <bzg AT altern DOT org> 6;; Bastien Guerry <bzg AT altern DOT org>
diff --git a/lisp/org/org-mac-message.el b/lisp/org/org-mac-message.el
index 27caa10c2dc..fc52b92a21d 100644
--- a/lisp/org/org-mac-message.el
+++ b/lisp/org/org-mac-message.el
@@ -1,6 +1,6 @@
1;;; org-mac-message.el --- Links to Apple Mail.app messages from within Org-mode 1;;; org-mac-message.el --- Links to Apple Mail.app messages from within Org-mode
2 2
3;; Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2008-2011 Free Software Foundation, Inc.
4 4
5;; Author: John Wiegley <johnw@gnu.org> 5;; Author: John Wiegley <johnw@gnu.org>
6;; Christopher Suckling <suckling at gmail dot com> 6;; Christopher Suckling <suckling at gmail dot com>
diff --git a/lisp/org/org-macs.el b/lisp/org/org-macs.el
index d6a2688147c..dc413f4d993 100644
--- a/lisp/org/org-macs.el
+++ b/lisp/org/org-macs.el
@@ -1,7 +1,6 @@
1;;; org-macs.el --- Top-level definitions for Org-mode 1;;; org-macs.el --- Top-level definitions for Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-mew.el b/lisp/org/org-mew.el
index 1439c1cb544..97cad1ae316 100644
--- a/lisp/org/org-mew.el
+++ b/lisp/org/org-mew.el
@@ -1,6 +1,6 @@
1;;; org-mew.el --- Support for links to Mew messages from within Org-mode 1;;; org-mew.el --- Support for links to Mew messages from within Org-mode
2 2
3;; Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2008-2011 Free Software Foundation, Inc.
4 4
5;; Author: Tokuya Kameshima <kames at fa2 dot so-net dot ne dot jp> 5;; Author: Tokuya Kameshima <kames at fa2 dot so-net dot ne dot jp>
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-mhe.el b/lisp/org/org-mhe.el
index d02b00808e1..7075018894f 100644
--- a/lisp/org/org-mhe.el
+++ b/lisp/org/org-mhe.el
@@ -1,7 +1,6 @@
1;;; org-mhe.el --- Support for links to MH-E messages from within Org-mode 1;;; org-mhe.el --- Support for links to MH-E messages from within Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Thomas Baumann <thomas dot baumann at ch dot tum dot de> 5;; Author: Thomas Baumann <thomas dot baumann at ch dot tum dot de>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-mks.el b/lisp/org/org-mks.el
index 1a0f91e7478..5f3ebbb6c81 100644
--- a/lisp/org/org-mks.el
+++ b/lisp/org/org-mks.el
@@ -1,6 +1,6 @@
1;;; org-mks.el --- Multi-key-selection for Org-mode 1;;; org-mks.el --- Multi-key-selection for Org-mode
2 2
3;; Copyright (C) 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
4 4
5;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-mobile.el b/lisp/org/org-mobile.el
index f3c515ac519..df01ee44f7d 100644
--- a/lisp/org/org-mobile.el
+++ b/lisp/org/org-mobile.el
@@ -1,5 +1,5 @@
1;;; org-mobile.el --- Code for asymmetric sync with a mobile device 1;;; org-mobile.el --- Code for asymmetric sync with a mobile device
2;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. 2;; Copyright (C) 2009-2011 Free Software Foundation, Inc.
3;; 3;;
4;; Author: Carsten Dominik <carsten at orgmode dot org> 4;; Author: Carsten Dominik <carsten at orgmode dot org>
5;; Keywords: outlines, hypermedia, calendar, wp 5;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-mouse.el b/lisp/org/org-mouse.el
index e5947281cc8..8f1e7735693 100644
--- a/lisp/org/org-mouse.el
+++ b/lisp/org/org-mouse.el
@@ -1,6 +1,6 @@
1;;; org-mouse.el --- Better mouse support for org-mode 1;;; org-mouse.el --- Better mouse support for org-mode
2 2
3;; Copyright (C) 2006, 2007, 2008, 2009, 2010 Free Software Foundation 3;; Copyright (C) 2006-2011 Free Software Foundation
4;; 4;;
5;; Author: Piotr Zielinski <piotr dot zielinski at gmail dot com> 5;; Author: Piotr Zielinski <piotr dot zielinski at gmail dot com>
6;; Maintainer: Carsten Dominik <carsten at orgmode dot org> 6;; Maintainer: Carsten Dominik <carsten at orgmode dot org>
diff --git a/lisp/org/org-plot.el b/lisp/org/org-plot.el
index b65de575648..b90c248eb6d 100644
--- a/lisp/org/org-plot.el
+++ b/lisp/org/org-plot.el
@@ -1,6 +1,6 @@
1;;; org-plot.el --- Support for plotting from Org-mode 1;;; org-plot.el --- Support for plotting from Org-mode
2 2
3;; Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2008-2011 Free Software Foundation, Inc.
4;; 4;;
5;; Author: Eric Schulte <schulte dot eric at gmail dot com> 5;; Author: Eric Schulte <schulte dot eric at gmail dot com>
6;; Keywords: tables, plotting 6;; Keywords: tables, plotting
diff --git a/lisp/org/org-protocol.el b/lisp/org/org-protocol.el
index 42da94220b4..655123cafa9 100644
--- a/lisp/org/org-protocol.el
+++ b/lisp/org/org-protocol.el
@@ -1,7 +1,6 @@
1;;; org-protocol.el --- Intercept calls from emacsclient to trigger custom actions. 1;;; org-protocol.el --- Intercept calls from emacsclient to trigger custom actions.
2;; 2;;
3;; Copyright (C) 2008, 2009, 2010 3;; Copyright (C) 2008-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5;; 4;;
6;; Author: Bastien Guerry <bzg AT altern DOT org> 5;; Author: Bastien Guerry <bzg AT altern DOT org>
7;; Author: Daniel M German <dmg AT uvic DOT org> 6;; Author: Daniel M German <dmg AT uvic DOT org>
diff --git a/lisp/org/org-publish.el b/lisp/org/org-publish.el
index d7e64c8859b..05f82c154e5 100644
--- a/lisp/org/org-publish.el
+++ b/lisp/org/org-publish.el
@@ -1,6 +1,5 @@
1;;; org-publish.el --- publish related org-mode files as a website 1;;; org-publish.el --- publish related org-mode files as a website
2;; Copyright (C) 2006, 2007, 2008, 2009, 2010 2;; Copyright (C) 2006-2011 Free Software Foundation, Inc.
3;; Free Software Foundation, Inc.
4 3
5;; Author: David O'Toole <dto@gnu.org> 4;; Author: David O'Toole <dto@gnu.org>
6;; Maintainer: Carsten Dominik <carsten DOT dominik AT gmail DOT com> 5;; Maintainer: Carsten Dominik <carsten DOT dominik AT gmail DOT com>
diff --git a/lisp/org/org-remember.el b/lisp/org/org-remember.el
index ee8af35231a..0eb4f899e14 100644
--- a/lisp/org/org-remember.el
+++ b/lisp/org/org-remember.el
@@ -1,7 +1,6 @@
1;;; org-remember.el --- Fast note taking in Org-mode 1;;; org-remember.el --- Fast note taking in Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-rmail.el b/lisp/org/org-rmail.el
index 064577e3499..1169c206981 100644
--- a/lisp/org/org-rmail.el
+++ b/lisp/org/org-rmail.el
@@ -1,7 +1,6 @@
1;;; org-rmail.el --- Support for links to Rmail messages from within Org-mode 1;;; org-rmail.el --- Support for links to Rmail messages from within Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-src.el b/lisp/org/org-src.el
index d963339126b..dd56b120219 100644
--- a/lisp/org/org-src.el
+++ b/lisp/org/org-src.el
@@ -1,7 +1,6 @@
1;;; org-src.el --- Source code examples in Org 1;;; org-src.el --- Source code examples in Org
2;; 2;;
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5;; 4;;
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Bastien Guerry <bzg AT altern DOT org> 6;; Bastien Guerry <bzg AT altern DOT org>
diff --git a/lisp/org/org-table.el b/lisp/org/org-table.el
index 097505598fe..7f49b3236ee 100644
--- a/lisp/org/org-table.el
+++ b/lisp/org/org-table.el
@@ -1,7 +1,6 @@
1;;; org-table.el --- The table editor for Org-mode 1;;; org-table.el --- The table editor for Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-taskjuggler.el b/lisp/org/org-taskjuggler.el
index 8a2ccc8dd83..0d9516a389e 100644
--- a/lisp/org/org-taskjuggler.el
+++ b/lisp/org/org-taskjuggler.el
@@ -1,6 +1,6 @@
1;;; org-taskjuggler.el --- TaskJuggler exporter for org-mode 1;;; org-taskjuggler.el --- TaskJuggler exporter for org-mode
2;; 2;;
3;; Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2007-2011 Free Software Foundation, Inc.
4;; 4;;
5;; Emacs Lisp Archive Entry 5;; Emacs Lisp Archive Entry
6;; Filename: org-taskjuggler.el 6;; Filename: org-taskjuggler.el
diff --git a/lisp/org/org-timer.el b/lisp/org/org-timer.el
index acb5cdb4001..b8fbc4ff388 100644
--- a/lisp/org/org-timer.el
+++ b/lisp/org/org-timer.el
@@ -1,6 +1,6 @@
1;;; org-timer.el --- The relative timer code for Org-mode 1;;; org-timer.el --- The relative timer code for Org-mode
2 2
3;; Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2008-2011 Free Software Foundation, Inc.
4 4
5;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-vm.el b/lisp/org/org-vm.el
index 981e6aa3fe2..d0991b81116 100644
--- a/lisp/org/org-vm.el
+++ b/lisp/org/org-vm.el
@@ -1,7 +1,6 @@
1;;; org-vm.el --- Support for links to VM messages from within Org-mode 1;;; org-vm.el --- Support for links to VM messages from within Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-w3m.el b/lisp/org/org-w3m.el
index 8071a1d3066..bce90092e6e 100644
--- a/lisp/org/org-w3m.el
+++ b/lisp/org/org-w3m.el
@@ -1,6 +1,6 @@
1;;; org-w3m.el --- Support from copy and paste from w3m to Org-mode 1;;; org-w3m.el --- Support from copy and paste from w3m to Org-mode
2 2
3;; Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc. 3;; Copyright (C) 2008-2011 Free Software Foundation, Inc.
4 4
5;; Author: Andy Stewart <lazycat dot manatee at gmail dot com> 5;; Author: Andy Stewart <lazycat dot manatee at gmail dot com>
6;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org-wl.el b/lisp/org/org-wl.el
index ebb8decd59f..9bc49c8b91a 100644
--- a/lisp/org/org-wl.el
+++ b/lisp/org/org-wl.el
@@ -1,7 +1,6 @@
1;;; org-wl.el --- Support for links to Wanderlust messages from within Org-mode 1;;; org-wl.el --- Support for links to Wanderlust messages from within Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Tokuya Kameshima <kames at fa2 dot so-net dot ne dot jp> 5;; Author: Tokuya Kameshima <kames at fa2 dot so-net dot ne dot jp>
7;; David Maus <dmaus at ictsoc dot de> 6;; David Maus <dmaus at ictsoc dot de>
diff --git a/lisp/org/org-xoxo.el b/lisp/org/org-xoxo.el
index fcad14985c0..02f351fe724 100644
--- a/lisp/org/org-xoxo.el
+++ b/lisp/org/org-xoxo.el
@@ -1,7 +1,6 @@
1;;; org-xoxo.el --- XOXO export for Org-mode 1;;; org-xoxo.el --- XOXO export for Org-mode
2 2
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/org/org.el b/lisp/org/org.el
index fb8821550a8..341525537bb 100644
--- a/lisp/org/org.el
+++ b/lisp/org/org.el
@@ -1,7 +1,6 @@
1;;; org.el --- Outline-based notes management and organizer 1;;; org.el --- Outline-based notes management and organizer
2;; Carstens outline-mode for keeping track of everything. 2;; Carstens outline-mode for keeping track of everything.
3;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011 3;; Copyright (C) 2004-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5;; 4;;
6;; Author: Carsten Dominik <carsten at orgmode dot org> 5;; Author: Carsten Dominik <carsten at orgmode dot org>
7;; Keywords: outlines, hypermedia, calendar, wp 6;; Keywords: outlines, hypermedia, calendar, wp
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 503698f0f7b..f3b873c8b1e 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -647,19 +647,19 @@ starting the compilation process.")
647(defvar compile-history nil) 647(defvar compile-history nil)
648 648
649(defface compilation-error 649(defface compilation-error
650 '((t :inherit font-lock-warning-face)) 650 '((t :inherit error))
651 "Face used to highlight compiler errors." 651 "Face used to highlight compiler errors."
652 :group 'compilation 652 :group 'compilation
653 :version "22.1") 653 :version "22.1")
654 654
655(defface compilation-warning 655(defface compilation-warning
656 '((t :inherit font-lock-variable-name-face)) 656 '((t :inherit warning))
657 "Face used to highlight compiler warnings." 657 "Face used to highlight compiler warnings."
658 :group 'compilation 658 :group 'compilation
659 :version "22.1") 659 :version "22.1")
660 660
661(defface compilation-info 661(defface compilation-info
662 '((t :inherit font-lock-type-face)) 662 '((t :inherit success))
663 "Face used to highlight compiler information." 663 "Face used to highlight compiler information."
664 :group 'compilation 664 :group 'compilation
665 :version "22.1") 665 :version "22.1")
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el
index db8e82193b3..31100f3fac2 100644
--- a/lisp/progmodes/grep.el
+++ b/lisp/progmodes/grep.el
@@ -965,7 +965,9 @@ This command shares argument histories with \\[lgrep] and \\[grep-find]."
965 (unless (and dir (file-directory-p dir) (file-readable-p dir)) 965 (unless (and dir (file-directory-p dir) (file-readable-p dir))
966 (setq dir default-directory)) 966 (setq dir default-directory))
967 (if (null files) 967 (if (null files)
968 (if (not (string= regexp grep-find-command)) 968 (if (not (string= regexp (if (consp grep-find-command)
969 (car grep-find-command)
970 grep-find-command)))
969 (compilation-start regexp 'grep-mode)) 971 (compilation-start regexp 'grep-mode))
970 (setq dir (file-name-as-directory (expand-file-name dir))) 972 (setq dir (file-name-as-directory (expand-file-name dir)))
971 (require 'find-dired) ; for `find-name-arg' 973 (require 'find-dired) ; for `find-name-arg'
diff --git a/lisp/subr.el b/lisp/subr.el
index a4251b6fee6..9aa895b0e94 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -3539,30 +3539,23 @@ to case differences."
3539 (eq t (compare-strings str1 nil nil 3539 (eq t (compare-strings str1 nil nil
3540 str2 0 (length str1) ignore-case))) 3540 str2 0 (length str1) ignore-case)))
3541 3541
3542(defun string-mark-left-to-right (str) 3542(defun bidi-string-mark-left-to-right (str)
3543 "Return a string that can be safely inserted in left-to-right text. 3543 "Return a string that can be safely inserted in left-to-right text.
3544If STR contains right-to-left (RTL) script, return a string
3545consisting of STR followed by a terminating invisible
3546left-to-right mark (LRM) character.
3547 3544
3548The LRM character marks the end of an RTL segment, and resets the 3545Normally, inserting a string with right-to-left (RTL) script into
3549display direction of any subsequent text to left-to-right. 3546a buffer may cause some subsequent text to be displayed as part
3550\(Otherwise, some of that text might be displayed as part of the 3547of the RTL segment (usually this affects punctuation characters).
3551RTL segment, based on the bidirectional display algorithm.) 3548This function returns a string which displays as STR but forces
3549subsequent text to be displayed as left-to-right.
3552 3550
3553If STR contains no RTL characters, return STR." 3551If STR contains any RTL character, this function returns a string
3552consisting of STR followed by an invisible left-to-right mark
3553\(LRM) character. Otherwise, it returns STR."
3554 (unless (stringp str) 3554 (unless (stringp str)
3555 (signal 'wrong-type-argument (list 'stringp str))) 3555 (signal 'wrong-type-argument (list 'stringp str)))
3556 (let ((len (length str)) 3556 (if (string-match "\\cR" str)
3557 (n 0) 3557 (concat str (propertize (string ?\x200e) 'invisible t))
3558 rtl-found) 3558 str))
3559 (while (and (not rtl-found) (< n len))
3560 (setq rtl-found (memq (get-char-code-property
3561 (aref str n) 'bidi-class) '(R AL RLO))
3562 n (1+ n)))
3563 (if rtl-found
3564 (concat str (propertize (string ?\x200e) 'invisible t))
3565 str)))
3566 3559
3567;;;; invisibility specs 3560;;;; invisibility specs
3568 3561
diff --git a/src/ChangeLog b/src/ChangeLog
index 2aa0e157afe..2b5b6fd0602 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,25 @@
12011-08-18 Eli Zaretskii <eliz@gnu.org>
2
3 * bidi.c (bidi_get_type): If bidi_type_table reports zero as the
4 character bidirectional type, use STRONG_L instead. Fixes crashes
5 in a buffer produced by `describe-categories'.
6
7 * dispextern.h (struct bidi_it): Move disp_pos and disp_prop_p
8 members before the level stack, so they would be saved and
9 restored when copying iterator state. Fixes incorrect reordering
10 around TABs covered by display properties.
11
122011-08-18 Andreas Schwab <schwab@linux-m68k.org>
13
14 * process.c (Fnetwork_interface_list): Correctly determine buffer
15 size.
16
172011-08-17 Chong Yidong <cyd@stupidchicken.com>
18
19 * eval.c (internal_condition_case, internal_condition_case_1)
20 (internal_condition_case_2, internal_condition_case_n): Remove
21 unnecessary aborts (Bug#9081).
22
12011-08-17 Eli Zaretskii <eliz@gnu.org> 232011-08-17 Eli Zaretskii <eliz@gnu.org>
2 24
3 * lread.c (Fload) [DOS_NT]: If `openp' returns -2, but the file 25 * lread.c (Fload) [DOS_NT]: If `openp' returns -2, but the file
@@ -61,7 +83,7 @@
612011-08-14 Kenichi Handa <handa@m17n.org> 832011-08-14 Kenichi Handa <handa@m17n.org>
62 84
63 * process.c (create_process): Call setup_process_coding_systems 85 * process.c (create_process): Call setup_process_coding_systems
64 after the pid of the process is set to -1. 86 after the pid of the process is set to -1 (Bug#8162).
65 87
662011-08-14 Eli Zaretskii <eliz@gnu.org> 882011-08-14 Eli Zaretskii <eliz@gnu.org>
67 89
diff --git a/src/bidi.c b/src/bidi.c
index c0eee33ab3f..7517eca5aed 100644
--- a/src/bidi.c
+++ b/src/bidi.c
@@ -108,6 +108,8 @@ bidi_get_type (int ch, bidi_dir_t override)
108 abort (); 108 abort ();
109 109
110 default_type = (bidi_type_t) XINT (CHAR_TABLE_REF (bidi_type_table, ch)); 110 default_type = (bidi_type_t) XINT (CHAR_TABLE_REF (bidi_type_table, ch));
111 if (default_type == 0)
112 default_type = STRONG_L;
111 113
112 if (override == NEUTRAL_DIR) 114 if (override == NEUTRAL_DIR)
113 return default_type; 115 return default_type;
diff --git a/src/dispextern.h b/src/dispextern.h
index 3927ddf82bb..4d890fe6a37 100644
--- a/src/dispextern.h
+++ b/src/dispextern.h
@@ -1869,6 +1869,9 @@ struct bidi_it {
1869 EMACS_INT ignore_bn_limit; /* position until which to ignore BNs */ 1869 EMACS_INT ignore_bn_limit; /* position until which to ignore BNs */
1870 bidi_dir_t sor; /* direction of start-of-run in effect */ 1870 bidi_dir_t sor; /* direction of start-of-run in effect */
1871 int scan_dir; /* direction of text scan, 1: forw, -1: back */ 1871 int scan_dir; /* direction of text scan, 1: forw, -1: back */
1872 EMACS_INT disp_pos; /* position of display string after ch */
1873 int disp_prop_p; /* if non-zero, there really is a
1874 `display' property/string at disp_pos */
1872 int stack_idx; /* index of current data on the stack */ 1875 int stack_idx; /* index of current data on the stack */
1873 /* Note: Everything from here on is not copied/saved when the bidi 1876 /* Note: Everything from here on is not copied/saved when the bidi
1874 iterator state is saved, pushed, or popped. So only put here 1877 iterator state is saved, pushed, or popped. So only put here
@@ -1877,9 +1880,6 @@ struct bidi_it {
1877 struct bidi_string_data string; /* string to reorder */ 1880 struct bidi_string_data string; /* string to reorder */
1878 bidi_dir_t paragraph_dir; /* current paragraph direction */ 1881 bidi_dir_t paragraph_dir; /* current paragraph direction */
1879 EMACS_INT separator_limit; /* where paragraph separator should end */ 1882 EMACS_INT separator_limit; /* where paragraph separator should end */
1880 EMACS_INT disp_pos; /* position of display string after ch */
1881 int disp_prop_p; /* if non-zero, there really is a
1882 `display' property/string at disp_pos */
1883 unsigned first_elt : 1; /* if non-zero, examine current char first */ 1883 unsigned first_elt : 1; /* if non-zero, examine current char first */
1884 unsigned new_paragraph : 1; /* if non-zero, we expect a new paragraph */ 1884 unsigned new_paragraph : 1; /* if non-zero, we expect a new paragraph */
1885 unsigned frame_window_p : 1; /* non-zero if displaying on a GUI frame */ 1885 unsigned frame_window_p : 1; /* non-zero if displaying on a GUI frame */
diff --git a/src/eval.c b/src/eval.c
index ef169e80e27..e37425020c9 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -1461,13 +1461,6 @@ internal_condition_case (Lisp_Object (*bfun) (void), Lisp_Object handlers,
1461 struct catchtag c; 1461 struct catchtag c;
1462 struct handler h; 1462 struct handler h;
1463 1463
1464 /* Since Fsignal will close off all calls to x_catch_errors,
1465 we will get the wrong results if some are not closed now. */
1466#if HAVE_X_WINDOWS
1467 if (x_catching_errors ())
1468 abort ();
1469#endif
1470
1471 c.tag = Qnil; 1464 c.tag = Qnil;
1472 c.val = Qnil; 1465 c.val = Qnil;
1473 c.backlist = backtrace_list; 1466 c.backlist = backtrace_list;
@@ -1506,13 +1499,6 @@ internal_condition_case_1 (Lisp_Object (*bfun) (Lisp_Object), Lisp_Object arg,
1506 struct catchtag c; 1499 struct catchtag c;
1507 struct handler h; 1500 struct handler h;
1508 1501
1509 /* Since Fsignal will close off all calls to x_catch_errors,
1510 we will get the wrong results if some are not closed now. */
1511#if HAVE_X_WINDOWS
1512 if (x_catching_errors ())
1513 abort ();
1514#endif
1515
1516 c.tag = Qnil; 1502 c.tag = Qnil;
1517 c.val = Qnil; 1503 c.val = Qnil;
1518 c.backlist = backtrace_list; 1504 c.backlist = backtrace_list;
@@ -1555,13 +1541,6 @@ internal_condition_case_2 (Lisp_Object (*bfun) (Lisp_Object, Lisp_Object),
1555 struct catchtag c; 1541 struct catchtag c;
1556 struct handler h; 1542 struct handler h;
1557 1543
1558 /* Since Fsignal will close off all calls to x_catch_errors,
1559 we will get the wrong results if some are not closed now. */
1560#if HAVE_X_WINDOWS
1561 if (x_catching_errors ())
1562 abort ();
1563#endif
1564
1565 c.tag = Qnil; 1544 c.tag = Qnil;
1566 c.val = Qnil; 1545 c.val = Qnil;
1567 c.backlist = backtrace_list; 1546 c.backlist = backtrace_list;
@@ -1604,13 +1583,6 @@ internal_condition_case_n (Lisp_Object (*bfun) (ptrdiff_t, Lisp_Object *),
1604 struct catchtag c; 1583 struct catchtag c;
1605 struct handler h; 1584 struct handler h;
1606 1585
1607 /* Since Fsignal will close off all calls to x_catch_errors,
1608 we will get the wrong results if some are not closed now. */
1609#if HAVE_X_WINDOWS
1610 if (x_catching_errors ())
1611 abort ();
1612#endif
1613
1614 c.tag = Qnil; 1586 c.tag = Qnil;
1615 c.val = Qnil; 1587 c.val = Qnil;
1616 c.backlist = backtrace_list; 1588 c.backlist = backtrace_list;
diff --git a/src/process.c b/src/process.c
index 71a6f91a7bb..2125478907f 100644
--- a/src/process.c
+++ b/src/process.c
@@ -3580,38 +3580,57 @@ format; see the description of ADDRESS in `make-network-process'. */)
3580 if (s < 0) 3580 if (s < 0)
3581 return Qnil; 3581 return Qnil;
3582 3582
3583 again: 3583 ifconf.ifc_buf = 0;
3584 buf_size *= 2; 3584 ifconf.ifc_len = 0;
3585 buf = xrealloc(buf, buf_size); 3585 if (ioctl (s, SIOCGIFCONF, &ifconf) == 0 && ifconf.ifc_len > 0)
3586 if (!buf)
3587 { 3586 {
3588 close (s); 3587 ifconf.ifc_buf = xmalloc (ifconf.ifc_len);
3589 return Qnil; 3588 if (ifconf.ifc_buf == NULL)
3589 {
3590 close (s);
3591 return Qnil;
3592 }
3593 if (ioctl (s, SIOCGIFCONF, &ifconf))
3594 {
3595 close (s);
3596 xfree (ifconf.ifc_buf);
3597 return Qnil;
3598 }
3590 } 3599 }
3600 else
3601 do
3602 {
3603 buf_size *= 2;
3604 buf = xrealloc (buf, buf_size);
3605 if (!buf)
3606 {
3607 close (s);
3608 return Qnil;
3609 }
3591 3610
3592 ifconf.ifc_buf = buf; 3611 ifconf.ifc_buf = buf;
3593 if (ioctl (s, SIOCGIFCONF, &ifconf)) 3612 ifconf.ifc_len = buf_size;
3594 { 3613 if (ioctl (s, SIOCGIFCONF, &ifconf))
3595 close (s); 3614 {
3596 xfree (buf); 3615 close (s);
3597 return Qnil; 3616 xfree (buf);
3598 } 3617 return Qnil;
3618 }
3599 3619
3600 if (ifconf.ifc_len == buf_size) 3620 }
3601 goto again; 3621 while (ifconf.ifc_len == buf_size);
3602 3622
3603 close (s); 3623 close (s);
3604 3624
3605 res = Qnil; 3625 res = Qnil;
3606 for (ifreq = ifconf.ifc_req; 3626 ifreq = ifconf.ifc_req;
3607 (char *) ifreq < (char *) (ifconf.ifc_req) + ifconf.ifc_len; 3627 while ((char *) ifreq < (char *) ifconf.ifc_req + ifconf.ifc_len)
3608 )
3609 { 3628 {
3610 struct ifreq *ifq = ifreq; 3629 struct ifreq *ifq = ifreq;
3611#ifdef HAVE_STRUCT_IFREQ_IFR_ADDR_SA_LEN 3630#ifdef HAVE_STRUCT_IFREQ_IFR_ADDR_SA_LEN
3612#define SIZEOF_IFREQ(sif) \ 3631#define SIZEOF_IFREQ(sif) \
3613 ((sif)->ifr_addr.sa_len < sizeof(struct sockaddr) ? \ 3632 ((sif)->ifr_addr.sa_len < sizeof (struct sockaddr) \
3614 sizeof((*sif)) : sizeof ((sif)->ifr_name) + sif->ifr_addr.sa_len) 3633 ? sizeof (*(sif)) : sizeof ((sif)->ifr_name) + (sif)->ifr_addr.sa_len)
3615 3634
3616 int len = SIZEOF_IFREQ (ifq); 3635 int len = SIZEOF_IFREQ (ifq);
3617#else 3636#else
@@ -3619,7 +3638,7 @@ format; see the description of ADDRESS in `make-network-process'. */)
3619#endif 3638#endif
3620 char namebuf[sizeof (ifq->ifr_name) + 1]; 3639 char namebuf[sizeof (ifq->ifr_name) + 1];
3621 i += len; 3640 i += len;
3622 ifreq = (struct ifreq*) ((char*) ifreq + len); 3641 ifreq = (struct ifreq *) ((char *) ifreq + len);
3623 3642
3624 if (ifq->ifr_addr.sa_family != AF_INET) 3643 if (ifq->ifr_addr.sa_family != AF_INET)
3625 continue; 3644 continue;