diff options
| author | Glenn Morris | 2013-01-19 12:38:13 -0800 |
|---|---|---|
| committer | Glenn Morris | 2013-01-19 12:38:13 -0800 |
| commit | 795e7a5b3202851a89a042578ee572962a723d65 (patch) | |
| tree | 5e6525000b592b55f3b5d32415ccc05cedf969d4 | |
| parent | 59ac2d1316937bb013ef437885dcdc0225c71de9 (diff) | |
| parent | 2fc71e3c45e521a062ea2ab17a4cfe19c3c6f941 (diff) | |
| download | emacs-795e7a5b3202851a89a042578ee572962a723d65.tar.gz emacs-795e7a5b3202851a89a042578ee572962a723d65.zip | |
Merge from emacs-24; up to 2012-12-11T09:51:12Z!dmantipov@yandex.ru
| -rw-r--r-- | ChangeLog | 5 | ||||
| -rw-r--r-- | Makefile.in | 5 | ||||
| -rw-r--r-- | doc/emacs/ChangeLog | 8 | ||||
| -rw-r--r-- | doc/emacs/custom.texi | 4 | ||||
| -rw-r--r-- | doc/emacs/trouble.texi | 6 | ||||
| -rw-r--r-- | doc/lispref/ChangeLog | 5 | ||||
| -rw-r--r-- | doc/lispref/macros.texi | 4 | ||||
| -rw-r--r-- | etc/NEWS | 6 | ||||
| -rw-r--r-- | lisp/ChangeLog | 12 | ||||
| -rw-r--r-- | lisp/dired.el | 14 | ||||
| -rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 2 | ||||
| -rw-r--r-- | lisp/progmodes/etags.el | 16 | ||||
| -rw-r--r-- | src/ChangeLog | 4 | ||||
| -rw-r--r-- | src/fns.c | 5 |
14 files changed, 72 insertions, 24 deletions
| @@ -1,3 +1,8 @@ | |||
| 1 | 2013-01-19 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * Makefile.in (install-arch-indep): Put back a chmod that was | ||
| 4 | removed 2012-05-19. (Bug#13430) | ||
| 5 | |||
| 1 | 2013-01-16 Paul Eggert <eggert@cs.ucla.edu> | 6 | 2013-01-16 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 7 | ||
| 3 | Merge from gnulib, incorporating: | 8 | Merge from gnulib, incorporating: |
diff --git a/Makefile.in b/Makefile.in index f0342e9bf4c..a2de4f3b164 100644 --- a/Makefile.in +++ b/Makefile.in | |||
| @@ -534,6 +534,7 @@ install-arch-indep: lisp leim install-info install-man ${INSTALL_ARCH_INDEP_EXTR | |||
| 534 | tar -xvf - && cat > /dev/null) || exit 1; \ | 534 | tar -xvf - && cat > /dev/null) || exit 1; \ |
| 535 | [ "$${dir}" != "${srcdir}/etc" ] || rm -f $${dest}/DOC* ; \ | 535 | [ "$${dir}" != "${srcdir}/etc" ] || rm -f $${dest}/DOC* ; \ |
| 536 | for subdir in `find $${dest} -type d -print` ; do \ | 536 | for subdir in `find $${dest} -type d -print` ; do \ |
| 537 | chmod a+rx $${subdir} ; \ | ||
| 537 | rm -f $${subdir}/.gitignore ; \ | 538 | rm -f $${subdir}/.gitignore ; \ |
| 538 | rm -f $${subdir}/.arch-inventory ; \ | 539 | rm -f $${subdir}/.arch-inventory ; \ |
| 539 | rm -f $${subdir}/.DS_Store ; \ | 540 | rm -f $${subdir}/.DS_Store ; \ |
| @@ -568,7 +569,9 @@ install-arch-indep: lisp leim install-info install-man ${INSTALL_ARCH_INDEP_EXTR | |||
| 568 | done ) | 569 | done ) |
| 569 | -chmod -R a+r $(DESTDIR)${datadir}/emacs/${version} ${COPYDESTS} | 570 | -chmod -R a+r $(DESTDIR)${datadir}/emacs/${version} ${COPYDESTS} |
| 570 | 571 | ||
| 571 | # The last chmod isn't needed at present. | 572 | ## The above chmods are needed because "umask 022; tar ..." is not |
| 573 | ## guaranteed to do the right thing; eg if we are root and tar is | ||
| 574 | ## preserving source permissions. | ||
| 572 | 575 | ||
| 573 | ## We install only the relevant DOC file if possible | 576 | ## We install only the relevant DOC file if possible |
| 574 | ## (ie DOC-${version}.buildnumber), otherwise DOC-${version}*. | 577 | ## (ie DOC-${version}.buildnumber), otherwise DOC-${version}*. |
diff --git a/doc/emacs/ChangeLog b/doc/emacs/ChangeLog index 1b5bdc8fb53..6e4c9fbc65b 100644 --- a/doc/emacs/ChangeLog +++ b/doc/emacs/ChangeLog | |||
| @@ -1,3 +1,11 @@ | |||
| 1 | 2013-01-19 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * custom.texi (Directory Variables): Fix paren typo. | ||
| 4 | |||
| 5 | * trouble.texi (Crashing): Not all addr2line have -p. (Bug#13445) | ||
| 6 | |||
| 7 | * custom.texi (Custom Themes): Fix typo. | ||
| 8 | |||
| 1 | 2013-01-07 Bastien Guerry <bzg@gnu.org> | 9 | 2013-01-07 Bastien Guerry <bzg@gnu.org> |
| 2 | 10 | ||
| 3 | * help.texi (Apropos): Document `apropos-user-option' and update | 11 | * help.texi (Apropos): Document `apropos-user-option' and update |
diff --git a/doc/emacs/custom.texi b/doc/emacs/custom.texi index 6878af14252..fae61252724 100644 --- a/doc/emacs/custom.texi +++ b/doc/emacs/custom.texi | |||
| @@ -555,7 +555,7 @@ or disabled as a unit. You can use Custom themes to switch easily | |||
| 555 | between various collections of settings, and to transfer such | 555 | between various collections of settings, and to transfer such |
| 556 | collections from one computer to another. | 556 | collections from one computer to another. |
| 557 | 557 | ||
| 558 | A Custom theme is stored an Emacs Lisp source file. If the name of | 558 | A Custom theme is stored as an Emacs Lisp source file. If the name of |
| 559 | the Custom theme is @var{name}, the theme file is named | 559 | the Custom theme is @var{name}, the theme file is named |
| 560 | @file{@var{name}-theme.el}. @xref{Creating Custom Themes}, for the | 560 | @file{@var{name}-theme.el}. @xref{Creating Custom Themes}, for the |
| 561 | format of a theme file and how to make one. | 561 | format of a theme file and how to make one. |
| @@ -1305,7 +1305,7 @@ files in that subdirectory. | |||
| 1305 | @example | 1305 | @example |
| 1306 | ((nil . ((indent-tabs-mode . t) | 1306 | ((nil . ((indent-tabs-mode . t) |
| 1307 | (fill-column . 80))) | 1307 | (fill-column . 80))) |
| 1308 | (c-mode . ((c-file-style . "BSD"))) | 1308 | (c-mode . ((c-file-style . "BSD") |
| 1309 | (subdirs . nil))) | 1309 | (subdirs . nil))) |
| 1310 | ("src/imported" | 1310 | ("src/imported" |
| 1311 | . ((nil . ((change-log-default-name | 1311 | . ((nil . ((change-log-default-name |
diff --git a/doc/emacs/trouble.texi b/doc/emacs/trouble.texi index de5ed493e63..21ac6af28da 100644 --- a/doc/emacs/trouble.texi +++ b/doc/emacs/trouble.texi | |||
| @@ -325,7 +325,7 @@ backtrace with source-code line numbers: | |||
| 325 | 325 | ||
| 326 | @example | 326 | @example |
| 327 | sed -n 's/.*\[\(.*\)]$/\1/p' @var{backtrace} | | 327 | sed -n 's/.*\[\(.*\)]$/\1/p' @var{backtrace} | |
| 328 | addr2line -Cfip -e @var{bindir}/@var{emacs-binary} | 328 | addr2line -C -f -i -e @var{bindir}/@var{emacs-binary} |
| 329 | @end example | 329 | @end example |
| 330 | 330 | ||
| 331 | @noindent | 331 | @noindent |
| @@ -333,7 +333,9 @@ Here, @var{backtrace} is the name of a text file containing a copy of | |||
| 333 | the backtrace, @var{bindir} is the name of the directory that | 333 | the backtrace, @var{bindir} is the name of the directory that |
| 334 | contains the Emacs executable, and @var{emacs-binary} is the name of | 334 | contains the Emacs executable, and @var{emacs-binary} is the name of |
| 335 | the Emacs executable file, normally @file{emacs} on GNU and Unix | 335 | the Emacs executable file, normally @file{emacs} on GNU and Unix |
| 336 | systems and @file{emacs.exe} on MS-Windows and MS-DOS. | 336 | systems and @file{emacs.exe} on MS-Windows and MS-DOS.@footnote{You |
| 337 | may wish to add the @option{-p} option, if your version of | ||
| 338 | @command{addr2line} supports it.} | ||
| 337 | 339 | ||
| 338 | @cindex core dump | 340 | @cindex core dump |
| 339 | Optionally, Emacs can generate a @dfn{core dump} when it crashes, on | 341 | Optionally, Emacs can generate a @dfn{core dump} when it crashes, on |
diff --git a/doc/lispref/ChangeLog b/doc/lispref/ChangeLog index 851f727621e..111a1594512 100644 --- a/doc/lispref/ChangeLog +++ b/doc/lispref/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2013-01-19 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * macros.texi (Indenting Macros): Fix order of an indent | ||
| 4 | symbol's arguments. (Bug#13450) | ||
| 5 | |||
| 1 | 2013-01-19 Paul Eggert <eggert@cs.ucla.edu> | 6 | 2013-01-19 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 7 | ||
| 3 | Allow floating-point file offsets. | 8 | Allow floating-point file offsets. |
diff --git a/doc/lispref/macros.texi b/doc/lispref/macros.texi index 9ad00ca0260..5520bbbd1df 100644 --- a/doc/lispref/macros.texi +++ b/doc/lispref/macros.texi | |||
| @@ -606,12 +606,12 @@ calculate the indentation of a line within this expression. The | |||
| 606 | function receives two arguments: | 606 | function receives two arguments: |
| 607 | 607 | ||
| 608 | @table @asis | 608 | @table @asis |
| 609 | @item @var{pos} | ||
| 610 | The position at which the line being indented begins. | ||
| 609 | @item @var{state} | 611 | @item @var{state} |
| 610 | The value returned by @code{parse-partial-sexp} (a Lisp primitive for | 612 | The value returned by @code{parse-partial-sexp} (a Lisp primitive for |
| 611 | indentation and nesting computation) when it parses up to the | 613 | indentation and nesting computation) when it parses up to the |
| 612 | beginning of this line. | 614 | beginning of this line. |
| 613 | @item @var{pos} | ||
| 614 | The position at which the line being indented begins. | ||
| 615 | @end table | 615 | @end table |
| 616 | 616 | ||
| 617 | @noindent | 617 | @noindent |
| @@ -275,9 +275,9 @@ features (image support, etc.) that are normally enabled by default. | |||
| 275 | 275 | ||
| 276 | ** New configure option `--enable-gcc-warnings' (for developing/debugging | 276 | ** New configure option `--enable-gcc-warnings' (for developing/debugging |
| 277 | Emacs). If building with GCC, this enables compile-time checks that | 277 | Emacs). If building with GCC, this enables compile-time checks that |
| 278 | warn about possibly-questionable C code. On a recent GNU system there | 278 | warn/give errors about possibly-questionable C code. On a recent GNU |
| 279 | should be no warnings; on older and on non-GNU systems the generated | 279 | system there should be no warnings; on older and on non-GNU systems |
| 280 | warnings may be useful. | 280 | the results may be useful to developers. |
| 281 | 281 | ||
| 282 | ** The configure option `--enable-use-lisp-union-type' has been | 282 | ** The configure option `--enable-use-lisp-union-type' has been |
| 283 | renamed to `--enable-check-lisp-object-type', as the resulting | 283 | renamed to `--enable-check-lisp-object-type', as the resulting |
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 8d0a61525d9..34dbe74f23f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,15 @@ | |||
| 1 | 2013-01-19 Leo Liu <sdl.web@gmail.com> | ||
| 2 | |||
| 3 | * dired.el (dired-get-marked-files): Prune erroneous values due to | ||
| 4 | last change. (Bug#13152) | ||
| 5 | |||
| 6 | 2013-01-19 Glenn Morris <rgm@gnu.org> | ||
| 7 | |||
| 8 | * progmodes/etags.el (tags-table-check-computed-list): | ||
| 9 | Preserve point in tags buffer. (Bug#13412) | ||
| 10 | |||
| 11 | * emacs-lisp/lisp-mode.el (lisp-indent-function): Doc fix. | ||
| 12 | |||
| 1 | 2013-01-19 Christian Wittern <cwittern@gmail.com> (tiny change) | 13 | 2013-01-19 Christian Wittern <cwittern@gmail.com> (tiny change) |
| 2 | Chong Yidong <cyd@gnu.org> | 14 | Chong Yidong <cyd@gnu.org> |
| 3 | 15 | ||
diff --git a/lisp/dired.el b/lisp/dired.el index b8b8a7f877c..30069488586 100644 --- a/lisp/dired.el +++ b/lisp/dired.el | |||
| @@ -620,12 +620,14 @@ Optional third argument FILTER, if non-nil, is a function to select | |||
| 620 | If DISTINGUISH-ONE-MARKED is non-nil, then if we find just one marked file, | 620 | If DISTINGUISH-ONE-MARKED is non-nil, then if we find just one marked file, |
| 621 | return (t FILENAME) instead of (FILENAME). | 621 | return (t FILENAME) instead of (FILENAME). |
| 622 | Don't use that together with FILTER." | 622 | Don't use that together with FILTER." |
| 623 | (let* ((all-of-them | 623 | (let ((all-of-them |
| 624 | (save-excursion | 624 | (save-excursion |
| 625 | (dired-map-over-marks | 625 | (delq nil (dired-map-over-marks |
| 626 | (dired-get-filename localp 'no-error-if-not-filep) | 626 | (dired-get-filename localp 'no-error-if-not-filep) |
| 627 | arg nil distinguish-one-marked))) | 627 | arg nil distinguish-one-marked)))) |
| 628 | result) | 628 | result) |
| 629 | (when (equal all-of-them '(t)) | ||
| 630 | (setq all-of-them nil)) | ||
| 629 | (if (not filter) | 631 | (if (not filter) |
| 630 | (if (and distinguish-one-marked (eq (car all-of-them) t)) | 632 | (if (and distinguish-one-marked (eq (car all-of-them) t)) |
| 631 | all-of-them | 633 | all-of-them |
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 72794c304ea..9c2bd1a29bd 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el | |||
| @@ -1156,7 +1156,7 @@ is the buffer position of the start of the containing expression." | |||
| 1156 | The function `calculate-lisp-indent' calls this to determine | 1156 | The function `calculate-lisp-indent' calls this to determine |
| 1157 | if the arguments of a Lisp function call should be indented specially. | 1157 | if the arguments of a Lisp function call should be indented specially. |
| 1158 | 1158 | ||
| 1159 | INDENT-POINT is the position where the user typed TAB, or equivalent. | 1159 | INDENT-POINT is the position at which the line being indented begins. |
| 1160 | Point is located at the point to indent under (for default indentation); | 1160 | Point is located at the point to indent under (for default indentation); |
| 1161 | STATE is the `parse-partial-sexp' state for that position. | 1161 | STATE is the `parse-partial-sexp' state for that position. |
| 1162 | 1162 | ||
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index 92f9447652e..ff6321d74c3 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el | |||
| @@ -336,12 +336,15 @@ file the tag was in." | |||
| 336 | (save-excursion | 336 | (save-excursion |
| 337 | (tags-verify-table (buffer-file-name table-buffer)))) | 337 | (tags-verify-table (buffer-file-name table-buffer)))) |
| 338 | (with-current-buffer table-buffer | 338 | (with-current-buffer table-buffer |
| 339 | (if (tags-included-tables) | 339 | ;; Needed so long as etags-tags-included-tables |
| 340 | ;; Insert the included tables into the list we | 340 | ;; does not save-excursion. |
| 341 | ;; are processing. | 341 | (save-excursion |
| 342 | (setcdr tables (nconc (mapcar 'tags-expand-table-name | 342 | (if (tags-included-tables) |
| 343 | (tags-included-tables)) | 343 | ;; Insert the included tables into the list we |
| 344 | (cdr tables))))) | 344 | ;; are processing. |
| 345 | (setcdr tables (nconc (mapcar 'tags-expand-table-name | ||
| 346 | (tags-included-tables)) | ||
| 347 | (cdr tables)))))) | ||
| 345 | ;; This table is not in core yet. Insert a placeholder | 348 | ;; This table is not in core yet. Insert a placeholder |
| 346 | ;; saying we must read it into core to check for included | 349 | ;; saying we must read it into core to check for included |
| 347 | ;; tables before searching the next table in the list. | 350 | ;; tables before searching the next table in the list. |
| @@ -1550,6 +1553,7 @@ hits the start of file." | |||
| 1550 | files))) | 1553 | files))) |
| 1551 | (nreverse files))) | 1554 | (nreverse files))) |
| 1552 | 1555 | ||
| 1556 | ;; FIXME? Should this save-excursion? | ||
| 1553 | (defun etags-tags-included-tables () ; Doc string? | 1557 | (defun etags-tags-included-tables () ; Doc string? |
| 1554 | (let ((files nil) | 1558 | (let ((files nil) |
| 1555 | beg) | 1559 | beg) |
diff --git a/src/ChangeLog b/src/ChangeLog index 2564e57a825..eb393c93c4a 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2013-01-19 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * fns.c (Frandom): Doc fix. | ||
| 4 | |||
| 1 | 2013-01-19 Eli Zaretskii <eliz@gnu.org> | 5 | 2013-01-19 Eli Zaretskii <eliz@gnu.org> |
| 2 | 6 | ||
| 3 | * editfns.c (get_pos_property): Use SAFE_ALLOCA_LISP, to avoid | 7 | * editfns.c (get_pos_property): Use SAFE_ALLOCA_LISP, to avoid |
| @@ -66,7 +66,10 @@ and `most-positive-fixnum', inclusive, are equally likely. | |||
| 66 | 66 | ||
| 67 | With positive integer LIMIT, return random number in interval [0,LIMIT). | 67 | With positive integer LIMIT, return random number in interval [0,LIMIT). |
| 68 | With argument t, set the random number seed from the current time and pid. | 68 | With argument t, set the random number seed from the current time and pid. |
| 69 | Other values of LIMIT are ignored. */) | 69 | With a string argument, set the seed based on the string's contents. |
| 70 | Other values of LIMIT are ignored. | ||
| 71 | |||
| 72 | See Info node `(elisp)Random Numbers' for more details. */) | ||
| 70 | (Lisp_Object limit) | 73 | (Lisp_Object limit) |
| 71 | { | 74 | { |
| 72 | EMACS_INT val; | 75 | EMACS_INT val; |