makefile
!etc/refcards/Makefile
!modules/mod-test/Makefile
-!test/automated/data/flymake/Makefile
-!test/indent/Makefile
-!test/etags/Makefile
-!test/etags/make-src/Makefile
+!test/lisp/progmodes/flymake-resources/Makefile
+!test/manual/indent/Makefile
+!test/manual/etags/Makefile
+!test/manual/etags/make-src/Makefile
/*.cache
/confdefs.h
/config.status
lisp/leim/quail/quick-cns.el
lisp/leim/quail/tsang-b5.el
lisp/leim/quail/tsang-cns.el
+lisp/mh-e/mh-autoloads.el
lisp/subdirs.el
# Dependencies.
# Tests.
test/indent/*.new
-test/biditest.txt
-test/etags/srclist
-test/etags/regexfile
-test/etags/ETAGS
-test/etags/CTAGS
+test/manual/biditest.txt
+test/manual/etags/srclist
+test/manual/etags/regexfile
+test/manual/etags/ETAGS
+test/manual/etags/CTAGS
+# Generated by test/make-test-deps.emacs-lisp
+test/make-test-deps.mk
# ctags, etags.
TAGS
GNU ELPA has a 'debbugs' package that allows accessing the tracker
database from Emacs.
+Bugs needs regular attention. A large backlog of bugs is
+disheartening to the developers, and a culture of ignoring bugs is
+harmful to users, who expect software that works. Bugs have to be
+regularly looked at and acted upon. Not all bugs are critical, but at
+the least, each bug needs to be regularly re-reviewed to make sure it
+is still reproducible.
+
+The process of going through old or new bugs and acting on them is
+called bug triage. This process is described in the file
+admin/notes/bug-triage.
+
** Document your changes.
Any change that matters to end-users should have an entry in etc/NEWS.
To run tests on the entire Emacs tree, run "make check" from the
top-level directory. Most tests are in the directory
-"test/automated". From the "test/automated" directory, run "make
+"test/". From the "test/" directory, run "make
<filename>" to run the tests for <filename>.el(c). See
-"test/automated/Makefile" for more information.
+"test/Makefile" for more information.
Tests which are tagged ":expensive-test" are enabled additionally, if
you run "make check-expensive" from the top-level directory. "make
-2016-02-07 Artur Malabarba <bruce.connor.am@gmail.com>
+2016-02-09 Eli Zaretskii <eliz@gnu.org>
- * lisp/comint.el (comint-prompt-read-only): Clean tabs in docstring
+ Fix network-stream-tests on MS-Windows
- While tabs in code are mostly fine because the Emacs sources have a
- .dir-locals file specifying tab-width, the same is not true of tabs in
- code examples inside docstrings. The docstring is printed on a *Help*
- buffer, which can be created on any directory and won't necessarily have
- the same tab-width set.
+ * test/lisp/net/network-stream-tests.el (make-local-unix-server):
+ Skip if local sockets are not supported.
+
+2016-02-09 Michael Albinus <michael.albinus@gmx.de>
+
+ * admin/notes/bug-triage: Fix bug priorities. Explain colors in debbugs-gnu.
+
+2016-02-09 Eli Zaretskii <eliz@gnu.org>
+
+ Disable 'timer-list'
+
+ * lisp/emacs-lisp/timer-list.el: Make 'timer-list' a disabled
+ command.
+
+2016-02-09 Paul Eggert <eggert@cs.ucla.edu>
+
+ Avoid aligned_alloc static/extern collision
+
+ * src/alloc.c (aligned_alloc): Define to private name when a
+ static function, to avoid collision with lisp.h extern decl.
+ Reported by John Yates in:
+ http://lists.gnu.org/archive/html/emacs-devel/2016-02/msg00439.html
+
+2016-02-08 Michal Nazarewicz <mina86@mina86.com>
+
+ Make `message-beginning-of-line' aware of folded headers
+
+ * lisp/gnus/message.pl (message-beginning-of-header): New function which
+ moves point to the beginning of a mail header. The function is aware of
+ folded headers and with non-nil argument looks for the true beginning of
+ a header while with nil argument moves to the indented text of header's
+ value.
+ (message-beginning-of-line): Function is now aware of folded headers and
+ either moves point to the indention of a header or, in visual-line-mode,
+ searches for the beginning of the header.
+
+2016-02-08 Michal Nazarewicz <mina86@mina86.com>
+
+ Optimise ‘point in message header’ check
+
+ * lisp/gnus/message.el (message-point-in-header-p): Replace two unbound
+ regular expression matches with a single bound string match thus
+ reducing amount of work the function is doing.
+
+2016-02-08 Lars Ingebrigtsen <larsi@gnus.org>
+
+ Make the `R' command get the correct relative <img>s
+
+ * lisp/net/eww.el (eww-readable): Preserve the base URL so
+ that image expansions are fetched from the right place (bug#22605).
+
+2016-02-08 Lars Ingebrigtsen <larsi@gnus.org>
+
+ Add a mode to list and cancel timers
+
+ * doc/lispref/os.texi (Timers): Menton `timer-list'.
+
+ * lisp/emacs-lisp/timer-list.el: New file.
+
+2016-02-08 Lars Ingebrigtsen <larsi@gnus.org>
+
+ Add new commands to allow changing the size of images
+
+ * lisp/image.el (image-increase-size, image-decrease-size):
+ New commands.
+ (image-change-size): New function.
+
+2016-02-08 Lars Ingebrigtsen <larsi@gnus.org>
+
+ Allow the image scale to be a floating point number
+
+ * src/image.c (compute_image_size): The scale can be a
+ floating point number.
+
+2016-02-08 Lars Ingebrigtsen <larsi@gnus.org>
+
+ Add an IPv6 test
+
+ * test/lisp/net/network-stream-tests.el
+ (connect-to-tls-ipv6-nowait): Add an ipv6 test, too.
+
+2016-02-08 Lars Ingebrigtsen <larsi@gnus.org>
+
+ Use gnutls-serv instead of openssh
+
+ * test/lisp/net/network-stream-tests.el (make-tls-server): Use
+ gnutls-serv instead of openssh.
+
+2016-02-08 Daniel Colascione <dancol@dancol.org>
+
+ Performance improvements for vc-hg
+
+ Teach vc-hg how to read some Mercurial internal data structures,
+ allowing us to avoid the need to run hg status -A, which is very slow
+ for large repositories. Fall back to running hg if anything looks
+ funny. vc-hg now puts the _working directory_ revision in the
+ modeline instead of the file revision, which greatly improves
+ performance and which allows us to again skip running hg in the case
+ that we have an active bookmark.
+
+ * lisp/vc/vc-hg.el (vc-hg-state): Try calling `vc-hg-statefast'
+ (vc-hg-symbolic-revision-styles)
+ (vc-hg-use-file-version-for-mode-line-version)
+ (vc-hg-parse-hg-data-structures): New user preferences
+ (vc-hg--active-bookmark-internal, vc-hg--run-log)
+ (vc-hg--symbolic-revision, vc-hg-mode-line-string)
+ (vc-hg--read-u8, vc-hg--read-u32-be)
+ (vc-hg--raw-dirstate-search, vc-hg--cached-dirstate-search)
+ (vc-hg--parts-to-string, vc-hg--pcre-to-elisp-re)
+ (vc-hg--glob-to-pcre, vc-hg--hgignore-add-pcre)
+ (vc-hg--hgignore-add-glob, vc-hg--hgignore-add-path)
+ (vc-hg--slurp-hgignore-1, vc-hg--slurp-hgignore)
+ (vc-hg--ignore-patterns-valid-p)
+ (vc-hg--ignore-patterns-ignored-p, vc-hg--time-to-fixnum)
+ (vc-hg--file-ignored-p, vc-hg--read-repo-requirements)
+ (vc-hg--requirements-understood-p, vc-hg--dirstate-scan-cache)
+ (vc-hg-state-fast): New functions.
+ (vc-hg--hgignore-patterns, vc-hg--hgignore-filenames)
+ (vc-hg--cached-ignore-patterns, vc-hg--dirstate-scan-cache)
+ (vc-hg--dirstate-scan-cache): New internal variables.
+ * lisp/vc/vc-hooks.el (vc-refresh-state): Invoke vc find-file-hook
+ before updating modeline.
2016-02-07 Lars Ingebrigtsen <larsi@gnus.org>
- Don't inloop gnus-uu-mark-thread on the last thread
+ Skip TLS tests if we don't have openssl
- * lisp/gnus/gnus-uu.el (gnus-uu-mark-thread): Don't infloop on the
- final thread in the summary buffer (bug#16666).
+ * test/lisp/net/network-stream-tests.el (connect-to-tls): Skip
+ TLS tests if we don't have openssl and GnuTLS.
-2016-02-06 Lars Ingebrigtsen <larsi@gnus.org>
+2016-02-07 Lars Ingebrigtsen <larsi@gnus.org>
- Display non-ASCII group names better in prompts
+ Automatically scale images up on high-density screens
- * lisp/gnus/gnus-sum.el (gnus-articles-to-read): To decode the
- group name, we have to do that before we remove the prefix.
+ * doc/lispref/display.texi (ImageMagick Images): Mention :scale.
+ (Defining Images): Mention image-scaling-factor.
-2016-02-06 Lars Ingebrigtsen <larsi@gnus.org>
+ * lisp/image.el (image-compute-scaling-factor): New function
+ (bug#22172).
+ (create-image): Use it.
+ (image-scaling-factor): New variable.
- Default to gpg2 instead of gpg
+ * src/image.c (compute_image_size): Take :scale into account.
- * lisp/epg-config.el (epg-gpg-program): Prefer gpg2 over gpg, if
- it exists. This fixes many problems with using the GPG
- authentication agent.
+2016-02-07 Lars Ingebrigtsen <larsi@gnus.org>
-2016-02-06 David Edmondson <dme@dme.org>
+ Ensure progress when fetching from the queue
- src/process.c Correctly convert AF_INET6 addresses
+ * lisp/url/url-queue.el (url-queue-check-progress): Ensure
+ that we have progress when fetching queued requests (bug#22576).
- * src/process.c (conv_lisp_to_sockaddr): AF_INET6 addresses are
- converted to a list of 16 bit quantities by
- conv_sockaddr_to_lisp(). conv_lisp_to_sockaddr() should follow the
- same scheme rather than expecting a (longer) list of 8 bit
- quantities.
+2016-02-07 Lars Ingebrigtsen <larsi@gnus.org>
- Backport:
+ Make mail-extract-address-components return the user name more
- (cherry picked from commit 55ce3c30d617c38eb086d5ad4ffbd881c20c559c)
+ * lisp/mail/mail-extr.el (mail-extract-address-components):
+ Return the name even if it's the same as the mailbox name (if
+ `mail-extr-ignore-single-names' isn't set) (bug#22594).
-2016-02-06 Artur Malabarba <bruce.connor.am@gmail.com>
+2016-02-07 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/isearch.el (isearch-define-mode-toggle): Improve logic
+ Message no longer warns about unknown top level domains
-2016-02-06 Artur Malabarba <bruce.connor.am@gmail.com>
+2016-02-07 Jarno Malmari <jarno@malmari.fi>
- * lisp/menu-bar.el (menu-bar-options-menu): New search submenu
+ Add tests for url-auth
- (menu-bar-search-options-menu): New variable
+ * test/lisp/url/url-auth-tests.el: New file.
-2016-02-06 Artur Malabarba <bruce.connor.am@gmail.com>
+2016-02-07 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/isearch.el (search-default-mode)
+ Add a TLS connection test
- (isearch-regexp-function): Improve docstrings.
+ * test/lisp/net/network-stream-tests.el (connect-to-tls): Add
+ a TLS connection test.
-2016-02-06 Artur Malabarba <bruce.connor.am@gmail.com>
+2016-02-07 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/isearch.el: Rename search-default-regexp-mode to search-default-mode
+ Add more network tests
- (search-default-mode): New variable.
- (isearch-mode, isearch-define-mode-toggle)
- (isearch--describe-regexp-mode): Update accordingly.
- * lisp/menu-bar.el (nonincremental-search-forward): Update accordingly.
- * etc/NEWS: Update accordingly.
- * doc/emacs/search.texi: Update accordingly.
+ * test/lisp/net/network-stream-tests.el (echo-server-nowait):
+ New test.
-2016-02-06 Oscar Fuentes <ofv@wanadoo.es>
+2016-02-07 Lars Ingebrigtsen <larsi@gnus.org>
- Use monitor's resolution for positioning tooltips
+ Add network tests
- * src/xfns.c (compute_tip_xy): Use the resolution of the monitor where
- the mouse pointer is to avoid placing the tooltip over the border of
- the monitor on multi-head displays. Fixes bug#22549.
+ * test/lisp/net/network-stream-tests.el: New suite of network tests.
-2016-02-06 Eli Zaretskii <eliz@gnu.org>
+2016-02-07 Foo <rasmus@gmx.us>
- Fix file-notify-test on MS-Windows
+ Allow various Gnus and Message address variables to be functions
- * test/automated/file-notify-tests.el (file-notify--test-timeout):
- Reduce w32notify timeout to 10 sec.
- (file-notify-test06-many-events): Call read-event after each
- rename, to keep the w32notify backend happy in batch mode.
- (Bug#22534)
+ * doc/misc/gnus.texi (To From Newsgroups):
+ gnus-ignored-from-addresses can be a function.
-2016-02-06 Eli Zaretskii <eliz@gnu.org>
+ * doc/misc/message.texi (Wide Reply):
+ message-dont-reply-to-names can be a function.
- Fix issues found by auditing w32notify code
+ * lisp/gnus/gnus-icalendar.el (gnus-icalendar-identities):
+ message-alternative-emails can be a function.
- * src/w32inevt.c (handle_file_notifications): Count the number of
- events to be returned.
- * src/w32notify.c (send_notifications): Don't copy to the file
- notification buffer more than it can hold. (Bug#22534)
+ * lisp/gnus/gnus-notifications.el (gnus-notifications):
+ message-alternative-emails can be a function (bug#22315).
-2016-02-06 Eli Zaretskii <eliz@gnu.org>
+ * lisp/gnus/gnus-sum.el
+ (gnus-summary-from-or-to-or-newsgroups):
+ gnus-ignored-from-addresses can be a function (bug#22315).
- Extend etags Ruby support for accessors
+2016-02-07 Lars Ingebrigtsen <larsi@gnus.org>
- * lib-src/etags.c (Ruby_functions): Support accessors defined with
- parentheses. (Bug#22563)
+ Fix typo in Gnus regexp
- * test/etags/ruby-src/test1.ru (A::B): Add tests for accessors
- defined with parentheses.
- * test/etags/ETAGS.good_1:
- * test/etags/ETAGS.good_2:
- * test/etags/ETAGS.good_3:
- * test/etags/ETAGS.good_4:
- * test/etags/ETAGS.good_5:
- * test/etags/ETAGS.good_6:
- * test/etags/CTAGS.good: Adapt to changes in Ruby tests.
+ * lisp/gnus/gnus-art.el (gnus-button-valid-fqdn-regexp): Fix
+ typo in last change to this regexp (bug#22592).
-2016-02-06 Lars Ingebrigtsen <larsi@gnus.org>
+2016-02-07 Paul Eggert <eggert@cs.ucla.edu>
+
+ Port to FreeBSD x86
+
+ Reported by Herbert J. Skuhra in:
+ http://lists.gnu.org/archive/html/emacs-devel/2016-02/msg00336.html
+ * src/lisp.h (NONPOINTER_BITS) [__FreeBSD__]: Zero in this case too,
+ since malloc always returns a multiple of 8 in FreeBSD.
+
+2016-02-07 Alan Mackenzie <acm@muc.de>
+
+ On leaving CC Mode, clean up by removing character properties.
+
+ * lisp/progmodes/cc-mode.el (c-leave-cc-mode-mode): Remove from the buffer
+ all instances of the text properties/extents category, syntax-table,
+ c-is-sws, c-in-sws, c-type, and c-awk-NL-prop.
- Update publicsuffix.txt.
+2016-02-06 Lars Ingebrigtsen <larsi@gnus.org>
- * etc/publicsuffix.txt: Updated from
- https://publicsuffix.org/list/public_suffix_list.dat.
+ * lisp/gnus/gnus-art.el (gnus-button-valid-fqdn-regexp): Don't use
+ the no-longer-existing message-valid-fqdn-regexp variable.
2016-02-06 Lars Ingebrigtsen <larsi@gnus.org>
- Ensure that Gnus dribble handling allows removing entries
+ Remove message-valid-fqdn-regexp, since it changes too much now
+ * lisp/gnus/message.el (message-valid-fqdn-regexp): Remove.
+ (message-bogus-recipient-p): Don't use it any more.
+ (message-make-fqdn): Ditto. Suggested by Lars-Johan Liman.
+
+2016-02-06 Paul van der Walt <paul@denknerd.org> (tiny change)
+
+ * lisp/gnus/message.el (message-subject-re-regexp): Also match
+ "Re :" as a "Re:" prefix (commonly used in France).
+
+2016-02-06 Adam Sjøgren <asjo@koldfront.dk>
+
+ * lisp/net/shr.el (shr-tag-del, shr-tag-ins): New functions.
+
+2016-02-06 David Edmondson <dme@dme.org>
+
+ src/process.c Correctly convert AF_INET6 addresses
+ * src/process.c (conv_lisp_to_sockaddr): AF_INET6 addresses are
+ converted to a list of 16 bit quantities by
+ conv_sockaddr_to_lisp(). conv_lisp_to_sockaddr() should follow the
+ same scheme rather than expecting a (longer) list of 8 bit
+ quantities.
+
+2016-02-06 Martin Jesper Low Madsen <martin@martinjlowm.dk> (tiny change)
- * lisp/gnus/gnus-start.el (gnus-dribble-enter): Ensure that each
- entry is on a single line.
+ * lisp/gnus/auth-source.el (auth-source-macos-keychain-search):
+ Search for all host/port (or protocol) combinations for a match in
+ the OS X keychain.
-2016-02-05 OGAWA Hirofumi <hirofumi@mail.parknet.co.jp> (tiny change)
+2016-02-06 Lars Ingebrigtsen <larsi@gnus.org>
- Be consistent when using encoded strings in nnimap data
+ Remove nonsensical setting of gnus-newsgroup-unseen
- * lisp/gnus/nnimap.el (nnimap-encode-gnus-group): New function
- (nnimap-request-list): Use it.
- (nnimap-request-newgroups): Ditto.
+ * lisp/gnus/gnus-sum.el (gnus-update-marks): Remove nonsensical
+ setting of gnus-newsgroup-unseen.
-2016-02-05 OGAWA Hirofumi <hirofumi@mail.parknet.co.jp> (tiny change)
+2016-02-05 Lars Ingebrigtsen <larsi@gnus.org>
- Display the decoded Gnus group name
+ Use underline on all terminals that support it
- * lisp/gnus/gnus-sum.el (gnus-summary-read-group-1): Use the
- decoded group name in the message.
+ * lisp/subr.el (read-multiple-choice): Use
+ display-supports-face-attributes-p instead of
+ display-graphic-p to determine whether we can use underlining.
2016-02-05 Lars Ingebrigtsen <larsi@gnus.org>
- Use completion-ignore-case instead of defining command
+ Make the nsm query say what it did after the user interaction
- * lisp/erc/erc.el (erc-mode): Set completion-ignore-case so
- that we get case-insensitive completion.
- (erc-completion-at-point): Remove.
+ * lisp/net/nsm.el (nsm-query): Issue a message about
+ aborting/accepting messages (suggested by N. Jackson)
+ (bug#22531).
-2016-02-05 Eli Zaretskii <eliz@gnu.org>
+2016-02-05 Paul Eggert <eggert@cs.ucla.edu>
- Merge branch 'emacs-25' of git.savannah.gnu.org:/srv/git/emacs into emacs-25
+ Omit XLI (init) == 0 optimization in make-vector
+
+ * src/alloc.c (Fmake_vector): Simplify by omitting the (XLI (init)
+ == 0) case, as this optimization is probably not worth the hassle.
+ Just for the record, the test for that case could have been
+ (XLI (init) % ((EMACS_UINT) -1 / UCHAR_MAX) == 0) (!),
+ assuming the typical platform with no padding bits and where
+ conversion to int omits the most significant bits.
+
+2016-02-05 Paul Eggert <eggert@cs.ucla.edu>
+
+ * autogen.sh: Port to dash (Bug#22556).
2016-02-05 Michael Albinus <michael.albinus@gmx.de>
- * test/automated/file-notify-tests.el (file-notify-test06-many-events):
+ Minor cleanup for Tramp "doas".
- Reduce the number of iterations to 250 in case of w32notify.
+ * doc/misc/tramp.texi (Inline methods): Add "doas" method.
-2016-02-05 Eli Zaretskii <eliz@gnu.org>
+ * etc/NEWS: Add Tramp connection method "doas".
- Fix problems caused by new implementation of sub-word mode
+ * lisp/net/tramp-sh.el (tramp-methods) <doas>:
+ Add `tramp-remote-shell-args'.
- * lisp/subr.el (forward-word-strictly, backward-word-strictly):
- New functions.
- (word-move-empty-char-table): New variable.
-
- * etc/NEWS: Mention 'forward-word-strictly' and
- 'backward-word-strictly'.
-
- * doc/lispref/positions.texi (Word Motion): Document
- 'find-word-boundary-function-table', 'forward-word-strictly', and
- 'backward-word-strictly'. (Bug#22560)
-
- * src/syntax.c (syms_of_syntax)
- <find-word-boundary-function-table>: Doc fix.
-
- * lisp/wdired.el (wdired-xcase-word):
- * lisp/textmodes/texnfo-upd.el (texinfo-copy-node-name)
- (texinfo-copy-section-title, texinfo-start-menu-description)
- (texinfo-copy-menu-title, texinfo-specific-section-type)
- (texinfo-insert-node-lines, texinfo-copy-next-section-title):
- * lisp/textmodes/texinfo.el (texinfo-clone-environment)
- (texinfo-insert-@end):
- * lisp/textmodes/texinfmt.el (texinfo-format-scan)
- (texinfo-anchor, texinfo-multitable-widths)
- (texinfo-multitable-item):
- * lisp/textmodes/tex-mode.el (latex-env-before-change):
- * lisp/textmodes/flyspell.el (texinfo-mode-flyspell-verify):
- * lisp/skeleton.el (skeleton-insert):
- * lisp/simple.el (count-words):
- * lisp/progmodes/vhdl-mode.el (vhdl-beginning-of-libunit)
- (vhdl-beginning-of-defun, vhdl-beginning-of-statement-1)
- (vhdl-update-sensitivity-list, vhdl-template-block)
- (vhdl-template-break, vhdl-template-case, vhdl-template-default)
- (vhdl-template-default-indent, vhdl-template-for-loop)
- (vhdl-template-if-then-use, vhdl-template-bare-loop)
- (vhdl-template-nature, vhdl-template-procedural)
- (vhdl-template-process, vhdl-template-selected-signal-asst)
- (vhdl-template-type, vhdl-template-variable)
- (vhdl-template-while-loop, vhdl-beginning-of-block)
- (vhdl-hooked-abbrev, vhdl-port-copy, vhdl-hs-forward-sexp-func):
- * lisp/progmodes/verilog-mode.el (verilog-backward-sexp)
- (verilog-forward-sexp, verilog-beg-of-statement)
- (verilog-set-auto-endcomments, verilog-backward-token)
- (verilog-do-indent):
- * lisp/progmodes/vera-mode.el (vera-guess-basic-syntax)
- (vera-indent-block-closing):
- * lisp/progmodes/simula.el (simula-context)
- (simula-backward-up-level, simula-forward-down-level)
- (simula-previous-statement, simula-next-statement)
- (simula-skip-comment-backward, simula-calculate-indent)
- (simula-find-if, simula-electric-keyword):
- * lisp/progmodes/sh-script.el (sh-smie--rc-newline-semi-p):
- * lisp/progmodes/ruby-mode.el (ruby-smie--redundant-do-p)
- (ruby-smie--forward-token, ruby-smie--backward-token)
- (ruby-singleton-class-p, ruby-calculate-indent)
- (ruby-forward-sexp, ruby-backward-sexp):
- * lisp/progmodes/ps-mode.el (ps-run-goto-error):
- * lisp/progmodes/perl-mode.el (perl-syntax-propertize-function)
- (perl-syntax-propertize-special-constructs)
- (perl-backward-to-start-of-continued-exp):
- * lisp/progmodes/pascal.el (pascal-indent-declaration):
- * lisp/progmodes/octave.el (octave-function-file-p):
- * lisp/progmodes/mantemp.el (mantemp-insert-cxx-syntax):
- * lisp/progmodes/js.el (js--forward-function-decl):
- * lisp/progmodes/idlwave.el (idlwave-show-begin-check)
- (idlwave-beginning-of-block, idlwave-end-of-block)
- (idlwave-block-jump-out, idlwave-determine-class):
- * lisp/progmodes/icon.el (icon-is-continuation-line)
- (icon-backward-to-start-of-continued-exp, end-of-icon-defun):
- * lisp/progmodes/hideif.el (hide-ifdef-define):
- * lisp/progmodes/f90.el (f90-change-keywords):
- * lisp/progmodes/cperl-mode.el (cperl-electric-pod)
- (cperl-linefeed, cperl-electric-terminator)
- (cperl-find-pods-heres, cperl-fix-line-spacing)
- (cperl-invert-if-unless):
- * lisp/progmodes/cc-engine.el (c-forward-<>-arglist-recur):
- * lisp/progmodes/cc-align.el (c-lineup-java-inher):
- * lisp/progmodes/ada-mode.el (ada-compile-goto-error)
- (ada-adjust-case-skeleton, ada-create-case-exception)
- (ada-create-case-exception-substring)
- (ada-case-read-exceptions-from-file, ada-after-keyword-p)
- (ada-scan-paramlist, ada-get-current-indent, ada-get-indent-end)
- (ada-get-indent-if, ada-get-indent-block-start)
- (ada-get-indent-loop, ada-get-indent-type)
- (ada-search-prev-end-stmt, ada-check-defun-name)
- (ada-goto-decl-start, ada-goto-matching-start)
- (ada-goto-matching-end, ada-looking-at-semi-or)
- (ada-looking-at-semi-private, ada-in-paramlist-p)
- (ada-search-ignore-complex-boolean, ada-move-to-start)
- (ada-move-to-end, ada-which-function, ada-gen-treat-proc):
- * lisp/net/quickurl.el (quickurl-grab-url):
- * lisp/mail/sendmail.el (mail-do-fcc):
- * lisp/mail/rmail.el (rmail-resend):
- * lisp/mail/mailabbrev.el (mail-abbrev-complete-alias):
- * lisp/mail/mail-extr.el (mail-extract-address-components):
- * lisp/json.el (json-read-keyword):
- * lisp/files.el (insert-directory):
- * lisp/emacs-lisp/checkdoc.el (checkdoc-this-string-valid-engine):
- * lisp/completion.el (symbol-under-point, symbol-before-point)
- (symbol-before-point-for-complete, next-cdabbrev)
- (add-completions-from-c-buffer):
- * lisp/cedet/semantic/texi.el (semantic-up-context)
- (semantic-beginning-of-context):
- * lisp/cedet/semantic/bovine/el.el (semantic-get-local-variables):
- use 'forward-word-strictly' and 'backward-word-strictly' instead
- of 'forward-word' and 'backward-word'.
+2016-02-05 Xi Lu <lx@shellcodes.org>
+
+ * lisp/net/tramp-sh.el (tramp-methods) <doas>: Add. (Bug#22542)
+
+ (tramp-default-user-alist): Add rule for "doas".
+ (top): Completion function for "doas" is
+ `tramp-completion-function-alist-su'.
2016-02-05 Lars Ingebrigtsen <larsi@gnus.org>
- Fix doc string of tls-program
+ Restore the window configuration
- * lisp/net/tls.el (tls-program): Document the %t parameter (bug#22559).
+ * lisp/net/nsm.el (nsm-query-user): Restore the window
+ configuration (bug#22532).
-2016-02-05 Lars Ingebrigtsen <larsi@gnus.org>
+2016-02-04 Lars Ingebrigtsen <larsi@gnus.org>
- Restore window conf in nsm
+ Use an X popup in read-multiple-choice if running from a mouse command
- * lisp/net/nsm.el (nsm-query-user): Restore the window configuration.
+ * lisp/subr.el (read-multiple-choice): Use an X popup if
+ called from a mouse action (bug#19368).
- Backport:
+2016-02-04 Lars Ingebrigtsen <larsi@gnus.org>
+
+ Display cursor in echo area when prompting
+
+ * lisp/subr.el (read-multiple-choice): Display the cursor in
+ the echo area when prompting (bug#19368).
-2016-02-05 Mark Oteiza <mvoteiza@udel.edu>
+2016-02-04 Lars Ingebrigtsen <larsi@gnus.org>
- * etc/NEWS: Document new mpc.el features
+ Make NSM prompting clearer
-2016-02-04 Leo Liu <sdl.web@gmail.com>
+ * lisp/net/nsm.el (nsm-query-user): Use read-multiple-choice
+ to prompt in a nicer way (bug#19368).
- * lisp/custom.el (defface): Revert indentation change. (Bug#22524)
+2016-02-04 Lars Ingebrigtsen <larsi@gnus.org>
-2016-02-04 Alan Mackenzie <acm@muc.de>
+ Underline read-multiple-choice-face
- Correctly fontify C++ initializations which "look like" functions.
+ * lisp/faces.el (read-multiple-choice-face): Also underline
+ the choice.
- Fixes bug#7579.
+2016-02-04 Lars Ingebrigtsen <larsi@gnus.org>
- lisp/progmodes/cc-engine.el (c-forward-declarator): Add extra optional
- parameter to enable handling of "anonymous" declarators in declarations.
+ Make the read-multiple-choice prompt a bit prettier
- lisp/progmodes/cc-fonts.el (c-font-lock-declarators): Check more rigorously
- whether a "(" opens a parameter list of a function, or an initialization of a
- variable.
+ * doc/lispref/commands.texi (Reading One Event): Mention
+ read-multiple-choice-face.
-2016-02-04 Ulf Jasper <ulf.jasper@web.de>
+ * lisp/subr.el (read-multiple-choice): Make the prompting a bit
+ prettier.
- Improve newsticker-treeview-selection-face
+2016-02-04 Paul Eggert <eggert@cs.ucla.edu>
- * newst-treeview.el (newsticker-treeview-selection-face): Improve
- readability for dark background.
+ Prefer memcpy and memset to doing it by hand
-2016-02-04 Eli Zaretskii <eliz@gnu.org>
+ * src/alloc.c (Fmake_vector):
+ * src/ccl.c (setup_ccl_program):
+ Use memset to clear array.
+ * src/alloc.c (Fvector, Fmake_byte_code):
+ * src/charset.c (Fdefine_charset_internal):
+ Use memcpy to copy array.
+
+2016-02-04 Nicolas Petton <nicolas@petton.fr>
+
+ Do not ignore redirections of 301, 302 and 307 status codes
- Minor fix in tagging Ruby accessors by etags
+ The current version of HTTP/1.1 (RFC 7231) no longer requires
+ confirmation on 301, 302 or 307 status codes, therefore we do not have
+ to ignore redirects for other requests than GET and HEAD.
- * lib-src/etags.c (Ruby_functions): Don't tag accessors whose
- names are not literal symbols. (Bug#22241)
+ * lisp/url/url-http.el (url-http-parse-headers): Do not ignore 301, 302
+ and 307 redirects for other requests than GET and HEAD.
+
+2016-02-04 Mark Oteiza <mvoteiza@udel.edu>
+
+ * lisp/net/eww.el (eww-switch-to-buffer): Use pop-to-buffer-same-window instead.
2016-02-04 Paul Eggert <eggert@cs.ucla.edu>
- Spelling fixes
+ Simplify USE_ALIGNED_ALLOC
-2016-02-04 Dmitry Gutov <dgutov@yandex.ru>
+ * src/alloc.c (USE_ALIGNED_ALLOC): Simplify, now that we’ve merged
+ in the emacs-25 changes. Omit no-longer-needed decl for aligned_alloc.
- Remove 'def X' from the example
+2016-02-04 Eric Abrahamsen <eric@ericabrahamsen.net>
- * test/etags/ruby-src/test1.ru (A::B): Remove 'def X'
- (http://lists.gnu.org/archive/html/emacs-devel/2016-02/msg00167.html).
- * test/etags/CTAGS.good:
- * test/etags/ETAGS.good_1:
- * test/etags/ETAGS.good_2:
- * test/etags/ETAGS.good_3:
- * test/etags/ETAGS.good_4:
- * test/etags/ETAGS.good_5:
- * test/etags/ETAGS.good_6: Adjust accordingly.
+ Honor docstring of gnus-group-get-new-news
+
+ * lisp/gnus/gnus-start.el (gnus-get-unread-articles): If the prefix arg
+ is t, but non-numeric, unconditionally consider all groups to need
+ updating.
+
+2016-02-04 Lars Ingebrigtsen <larsi@gnus.org>
+
+ New function read-multiple-choice
+
+ * doc/lispref/commands.texi (Reading One Event): Document
+ read-multiple-choice.
+
+ * lisp/faces.el (read-multiple-choice-face): New face.
+
+ * lisp/subr.el (read-multiple-choice): New function.
+
+2016-02-04 John Wiegley <johnw@newartisans.com>
+
+ Merge from origin/emacs-25
+
+ ee73997 Make erc work better when encountering unknown prefix chars
+ b99141d Make erc completion case-insensitive again
+ 66c4620 Make complection in erc use consistent casing
+ 8c562b2 Make /QUIT in erc more robust
+ d93d2c5 Make tracking faces in Emacs work more reliably
+ af6ab7e Make shr not bug out on images on non-graphical displays
+ 3311f40 Fix bookmark display widths
+ d90ab1e Fix typo in eww-make-unique-file-name
+ 7f81825 Make it possible to TAB to input fields
+ a43a1dc Insert complete alt texts when images are disabled
+ 56ed4e1 Allow eww text fields to grow
+ 66b315c Make erc work when subword-mode is switched on
+ 255b68f Fix IMAP doc example
+ 91557f5 Quoting fixes in doc strings and diagnostics
+ 2c0dc9f Fix warning message in hack-local-variables
+ 504696d Etags: yet another improvement in Ruby tags
+ 8784ebf Fix x-popup-menu on TTYs without a mouse
+ 8b87ecb * lisp/emacs-lisp/map.el: Improvements to the docstring of the
+ pcase macro
+ 6191003 Use pop-to-buffer-same-window in eww
+ fe321fd * autogen.sh: Revert all recent changes.
+ 74ebd4a * make-dist: Updates related to nt/.
+ 737193a * make-dist: Add modules/.
+ 3696bf2 * make-dist: Update for super-special file that can't live in etc/.
+ a4278e2 Fix failure to compile ns-win.el in parallel builds
+ 860da4d Fix names of tags generated for Ruby accessors
+ f6213ce Fix file-name recognition in 'etags'
+ e42e662 Change Ruby file names and extensions recognized by 'etags'
+ 58bfb6a More improvements for Ruby support in 'etags'
+ c04e911 Add --git-config option to autogen.sh
+ 5713466 Fix editing undo changes in eww fields
+ 51362d6 Allow the user more control of popping up the eww window
+ ee0fbd8 Make eww-browse-url with new-window parameter work again
+ 9c3142d Clean up eww code slightly
+ cb035f3 Don't insert nil faces in shr
+ 4c3fae3 ; * lisp/progmodes/prolog.el: Remove some obsolete commentary.
+ 93f2153 Improve the custom type of some user options.
+ 9f60d7e Mark some risky calendar variables.
+ 1d07dcd Highlight two additional SCSS keywords
+ ee8b466 Recommend enabling integrity-checking in git
+ e639e10 Some corrections in Elisp manual
+ d766ca8 Chatter when autogen.sh changes Git configuration
+ 3b734e1 * org/org-compat.el (org-font-lock-ensure): Fix bogus test (bug#22399)
+ 43cb9f8 Omit unnecessary history from Lisp intro
+ 2fbd1da * etc/HISTORY: Add some more history, plus git tags.
+ c90e1b4 Improve elisp “Security Considerations” doc
+ cedd7ca autogen.sh now arranges for git to check hashes
+ 86ce76b ; Fix ChangeLog.2 commit ID.
+ 7b1d2b1 Fix (c & 040) typo in emergency escapes
+ a8273da Fix display of overlay strings with 'display' and 'box' property
+ fc48106 Fix imap-starttls-open
+ cdecbed Fix return value of imap-starttls-open
+ 20c7e34 ; * etc/NEWS: Fix renamed command name
+ 98bdbdb Correct reference to DARWIN_OS preprocessor symbol
+ b250d29 Spelling fix
+ b920a0e Spelling fixes
+ 93b144b Pacify GCC on C library without glibc API
+
+2016-02-04 John Wiegley <johnw@newartisans.com>
+
+ Merge from origin/emacs-25
+
+ ea26c8a * lisp/net/browse-url.el (browse-url-default-browser): Lower
+ priority of non-free Chrome.
+ 0fac75f Improve the custom type of some user options.
+ 2df0e04 Highlight CSS variables with variable name face
+ 3cf5e81 * lisp/gnus/gnus-kill.el (gnus-winconf-kill-file): Not
+ user-serviceable.
+ 2a5233c Mark some user options that can get evalled as risky.
+ 39b166f Disable DebPrint in sys_read on MS-Windows
+ 9fd0189 ;Fix ChangeLog entry
+ 4bb7233 Fix typos in Introduction to Emacs Lisp manual
2016-02-04 Vasilij Schneidermann <v.schneidermann@gmail.com> (tiny change)
* lisp/erc/erc.el (erc-channel-receive-names): Output a warning
instead of erroring out on unknown prefix chars (bug#22380).
+2016-02-04 Mark Oteiza <mvoteiza@udel.edu>
+
+ Add a new command to switch between erc buffers
+
+ * doc/misc/eww.texi: Document eww-switch-to-buffer and its keybinding
+ * etc/NEWS: Mention new command
+ * lisp/net/eww.el (eww-mode-map): Bind eww-switch-to-buffer to "s"
+ (eww-mode-map): Add menu item
+ (eww-switch-to-buffer): New command
+
+2016-02-04 David Edmondson <dme@dme.org>
+
+ Make erc work better when encountering unknown prefix chars
+
+ * lisp/erc/erc.el (erc-channel-receive-names): Output a warning
+ instead of erroring out on unknown prefix chars (bug#22380).
+
+2016-02-04 Vasilij Schneidermann <v.schneidermann@gmail.com> (tiny change)
+
+ Allow sending empty hidden values in eww
+
+ * lisp/net/eww.el (eww-tag-input): Allow sending empty hidden
+ values (bug#22388).
+
2016-02-04 Lars Ingebrigtsen <larsi@gnus.org>
Make erc completion case-insensitive again
* lisp/net/shr.el (shr-put-image): Don't bug out on alt-less
images on non-graphical displays (bug#22327).
+2016-02-04 Andrew Hyatt <ahyatt@gmail.com>
+
+ Remove packages obsoleted before Emacs 24.
+
+ In accordance with the policy discussed in the emacs-devel list,
+ packages that have been obsoleted for a full major release cycle are up
+ for deletion.
+
+ This removes almost all packages that are now eligible for deletion,
+ with the exception of "cl-compat", which seems it is likely to still be
+ used, and "optional", which offers some functionality that doesn't have
+ a replacement yet.
+
2016-02-04 Lars Ingebrigtsen <larsi@gnus.org>
Fix bookmark display widths
(mml-smime-get-ldap-cert):
Follow user style preference when quoting diagnostics.
+2016-02-03 Paul Eggert <eggert@cs.ucla.edu>
+
+ Mention context when resume from emergency escape
+
+ That way, if the user has been doing something else for a while,
+ they are reminded of the situation when restarting Emacs,
+ and are more likely to understand the two questions.
+ * doc/emacs/trouble.texi (Emergency Escape): Document this.
+ * src/keyboard.c (handle_interrupt): Implement this.
+
2016-02-03 Noam Postavsky <npostavs@gmail.com>
Fix warning message in hack-local-variables
* lisp/emacs-lisp/map.el: Improvements to the docstring of the pcase macro
+2016-02-03 Paul Eggert <eggert@cs.ucla.edu>
+
+ Port aligned_alloc decl to Cygwin.
+
+ Problem reported by Ken Brown (Bug#22522#38).
+ * configure.ac (aligned_alloc): Check for decl too.
+ * src/lisp.h (aligned_alloc): Declare if not already declared.
+
+2016-02-03 Paul Eggert <eggert@cs.ucla.edu>
+
+ autogen.sh now configures git only on request
+
+ * autogen.sh (do_autoconf, do_git): New vars.
+ Support new arguments --help, all, autoconf, git.
+ By default, just do autoconf-related configuration, not git.
+ Prefer 'echo' to 'cat <<EOF ...', as this tends to avoid temp files.
+ If GNU cp is available, use it to backup .git/config before
+ changing it. When configuring git, chatter about what is being
+ done, and configure git to check hashes. Avoid some duplicate
+ file name specification when creating git hooks.
+
+ * GNUmakefile (ALL_IF_GIT): New macro.
+ (configure): Use it.
+ * INSTALL.REPO: Suggest './autogen.sh all'.
+
2016-02-02 Lars Ingebrigtsen <larsi@gnus.org>
Use pop-to-buffer-same-window in eww
* autogen.sh: Revert all recent changes.
+2016-02-02 Paul Eggert <eggert@cs.ucla.edu>
+
+ Build with C11 if available
+
+ * admin/merge-gnulib (GNULIB_MODULES): Add std-gnu11.
+ * m4/std-gnu11.m4: New file, from gnulib.
+ * lib/gnulib.mk, m4/gnulib-comp.m4: Regenerate.
+
+2016-02-02 Paul Eggert <eggert@cs.ucla.edu>
+
+ Update gnulib copy
+
+ * doc/misc/texinfo.tex: Copy from gnulib.
+
2016-02-02 Glenn Morris <rgm@gnu.org>
* make-dist: Updates related to nt/.
* test/etags/ETAGS.good_6:
* test/etags/CTAGS.good: Adapt to changes in Ruby tags.
+2016-02-02 Glenn Morris <rgm@gnu.org>
+
+ * lisp/vc/add-log.el (change-log-directory-files, find-change-log):
+ Doc tweaks.
+
2016-02-02 Eli Zaretskii <eliz@gnu.org>
Fix file-name recognition in 'etags'
* test/etags/ruby-src/test1.ru: Renamed from test1.ruby.
(Bug#22241)
+2016-02-02 Paul Eggert <eggert@cs.ucla.edu>
+
+ Port better to platforms lacking aligned_alloc
+
+ Problem reported by Ken Brown (Bug#22522).
+ * src/lisp.h (hybrid_aligned_alloc)
+ [HYBRID_MALLOC && !HAVE_ALIGNED_ALLOC]: New decl.
+
+2016-02-02 Paul Eggert <eggert@cs.ucla.edu>
+
+ Port malloc.h hygiene fix to LTO
+
+ * src/alloc.c (__malloc_initialize_hook):
+ Make it externally visible (Bug#22522).
+
2016-02-02 Eli Zaretskii <eliz@gnu.org>
More improvements for Ruby support in 'etags'
will show up in *Messages* as "Invalid face reference: nil [32
times]".
+2016-02-01 Glenn Morris <rgm@gnu.org>
+
+ Make find-change-log prefer a VCS root, if no ChangeLog exists.
+
+ * lisp/vc/add-log.el (change-log-directory-files): New option.
+ (find-change-log): Respect change-log-directory-files.
+ * doc/emacs/maintaining.texi (Change Log Commands):
+ Mention change-log-directory-files.
+
2016-02-01 Glenn Morris <rgm@gnu.org>
Improve the custom type of some user options.
* src/buffer.c (Fbarf_if_buffer_read_only): Rename argument POS
to POSITION to keep consisteny with doc-string.
+2016-02-01 Paul Eggert <eggert@cs.ucla.edu>
+
+ Double static heap size.
+
+ * src/sheap.h (STATIC_HEAP_SIZE): Double it, since it was too
+ small on FreeBSD (Bug#22086).
+
2016-02-01 Paul Eggert <eggert@cs.ucla.edu>
Chatter when autogen.sh changes Git configuration
* org/org-compat.el (org-font-lock-ensure): Fix bogus test (bug#22399)
+2016-02-01 Michael Albinus <michael.albinus@gmx.de>
+
+ Fix Bug#20821
+
+ * lisp/net/tramp.el (tramp-file-name-handler):
+ * lisp/net/tramp-sh.el (tramp-sh-handle-expand-file-name):
+ Use `tramp-drop-volume-letter'. (Bug#20821)
+
2016-01-31 Paul Eggert <eggert@cs.ucla.edu>
Omit unnecessary history from Lisp intro
http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg01802.html
* autogen.sh: Do "git config transfer.fsckObjects true".
+2016-01-31 Dave Barker <kzar@kzar.co.uk>
+
+ Add ability to give rcirc servers an alias name
+
+ * lisp/net/rcirc.el (rcirc-server-alist): Add :server-alias
+ customization option.
+ (rcirc, rcirc-connect): Take server alias into account.
+
2016-01-31 Paul Eggert <eggert@cs.ucla.edu>
Fix (c & 040) typo in emergency escapes
auto-saves after emergency escapes. Redo comparison to avoid
similar problems.
+2016-01-31 Paul Eggert <eggert@cs.ucla.edu>
+
+ Port new hybrid malloc to FreeBSD
+
+ Problem reported by Wolfgang Jenkner in: http://bugs.gnu.org/22086#118
+ * src/gmalloc.c (__malloc_initialize_hook, __after_morecore_hook)
+ (__morecore) [HYBRID_MALLOC]: Define in this case too.
+
+2016-01-31 Wolfgang Jenkner <wjenkner@inode.at>
+
+ * configure.ac: Stop using mmap for buffers for FreeBSD.
+
2016-01-31 Eli Zaretskii <eliz@gnu.org>
Fix display of overlay strings with 'display' and 'box' property
* lisp/net/imap.el (imap-starttls-open): Log imap process
output. Call imap-parse-greeting. (Bug#22500)
+2016-01-31 Michael Albinus <michael.albinus@gmx.de>
+
+ Merge changes from Tramp repository
+
+ * doc/misc/Makefile.in (${buildinfodir}/tramp.info tramp.html):
+ No EXTRA_OPTS needed.
+
+ * doc/misc/tramp.texi: Merge changes from Emacsemacs-25
+ branch, especially for @trampfn{}.
+ (Top): Move @ifnottex down.
+ (History): XEmacs support has been removed.
+ (GVFS based methods, Remote processes): Do not use emacsgvfs flag.
+ (Auto-save and Backup): Use both syntax versions.
+ (File name Syntax): Remark on IPv6 adresses is valid for
+ unified syntax only.
+
+ * doc/misc/trampver.texi: Do not set emacsgvfs flag.
+
2016-01-31 Andreas Schwab <schwab@linux-m68k.org>
Fix return value of imap-starttls-open
2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
+ Spelling fixes
+
Spelling fix
Spelling fixes
+2016-01-30 Glenn Morris <rgm@gnu.org>
+
+ * lisp/vc/add-log.el (find-change-log): Use locate-dominating-file.
+
+2016-01-30 Matthew Carter <m@ahungry.com>
+
+ Quote table names for postgres listings (sql-mode)
+
+ * lisp/progmodes/sql.el (sql-postgres-completion-object): Avoid passing
+ unquoted table names to the completion list.
+
+2016-01-30 Glenn Morris <rgm@gnu.org>
+
+ Change Smerge "Mine" and "Other" for "Upper" and "Lower. (Bug#20878)
+
+ * lisp/vc/smerge-mode.el (smerge-diff-switches)
+ (smerge-context-menu, smerge-match-conflict, smerge-swap): Doc fixes.
+ (smerge-upper, smerge-upper-face, smerge-keep-upper)
+ (smerge-diff-base-upper): Rename from smerge-mine, smerge-mine-face,
+ smerge-keep-mine, smerge-diff-base-mine. Update all uses.
+ (smerge-mine-face, smerge-other-face): Remove obsolete face aliases.
+ (smerge-lower, smerge-lower-face, smerge-lower-re, smerge-keep-lower)
+ (smerge-diff-base-lower): Rename from smerge-other, smerge-other-face,
+ smerge-other-re, smerge-keep-other, smerge-diff-base-lower.
+ Update all uses.
+ (smerge-basic-map): Add "l" and "u" bindings.
+ (smerge-mode-menu): Update menu bindings for renaming.
+ (smerge-font-lock-keywords): Update face names.
+ (smerge-match-names): Update names.
+ (smerge-diff-upper-lower): Rename from smerge-diff-mine-other.
+ (smerge-match-conflict, smerge-ediff): Rename local variables.
+ (smerge-makeup-conflict): Relabel markers.
+ (smerge-parsep-re): Use renamed variables.
+
+2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
+
+ Port recent my_edata change to MS-Windows
+
+ * src/lastfile.c (my_edata): Also define if WINDOWSNT.
+
2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
Pacify GCC on C library without glibc API
Don’t declare if HAVE_ALIGNED_ALLOC.
Correct misspelling of HAVE_ALIGNED_ALLOC in ifdef.
-2016-01-30 Artur Malabarba <bruce.connor.am@gmail.com>
-
- Backport: * lisp/files.el: Remove support for extra .dir-locals file
+2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
- (dir-locals-file-2, dir-locals--all-files): Remove.
- (dir-locals-collect-variables, dir-locals-file, dir-locals-find-file)
- (dir-locals-read-from-file, hack-dir-local-variables): Revert changes.
+ Tell Automake the new lib/Makefile.am is OK
- * lisp/files-x.el (modify-dir-local-variable): Revert changes.
+ * lib/Makefile.am (AUTOMAKE_OPTIONS): Add -Wno-portability.
- * lisp/help-fns.el (describe-variable): Revert changes.
+2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
- * doc/emacs/custom.texi (Directory Variables): Revert changes.
+ Make it easy to override preferred-branch test
- * etc/NEWS: Revert changes.
+ * Makefile.in (preferred-branch-is-current):
+ Rename from emacs-25-branch-is-current. All uses changed.
+ (PREFERRED_BRANCH): New macro.
2016-01-30 Glenn Morris <rgm@gnu.org>
(recursive-count-words): Fix typos. Reported by Daniel Bastos
<dbastos@toledo.com>.
-2016-01-30 Nicolas Petton <nicolas@petton.fr>
-
- Bump version to 25.0.90
+2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
- * README:
- * configure.ac:
- * msdos/sed2v2.inp: Bump version to 25.0.90.
+ Shrink static heap a bit
-2016-01-30 Nicolas Petton <nicolas@petton.fr>
+ * src/sheap.h: Include lisp.h, for Lisp_Object.
+ (STATIC_HEAP_SIZE): Now an enum constant, not a macro.
+ Make it 2 MiB * sizeof (Lisp_Object), which is a bit more
+ conservative than the old value.
+ (Bug#22086)
- * etc/AUTHORS: Update the AUTHORS file
+2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
-2016-01-30 Nicolas Petton <nicolas@petton.fr>
+ Fix extern symbols defined and not used
- Bump version to 25.0.90
+ * src/alloc.c: Always include <signal.h>.
+ (malloc_warning) [!SIGDANGER && (SYSTEM_MALLOC || HYBRID_MALLOC)]:
+ Do not define; unused.
+ * src/emacs.c, src/lisp.h (might_dump) [!DOUG_LEA_MALLOC]: Now static.
+ * src/gmalloc.c (gdefault_morecore): Rename from __default_morecore,
+ to avoid collision with glibc. Now static. All uses changed.
+ * src/lastfile.c (my_edata): Define only if
+ ((!defined SYSTEM_MALLOC && !defined HYBRID_MALLOC && !defined
+ WINDOWSNT) \ || defined CYGWIN || defined DARWIN_OS).
+ (Bug#22086)
- * README:
- * configure.ac:
- * msdos/sed2v2.inp: Bump version to 25.0.90.
+2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
-2016-01-30 Nicolas Petton <nicolas@petton.fr>
+ Build lib/e-*.o only on platforms that need it
+
+ * configure.ac (hybrid malloc): Simplify configuration.
+ (SHEAP_OBJ): Remove; no longer needed.
+ (HYBRID_MALLOC): New var. Subst it.
+ (HYBRID_MALLOC_LIB): New Automake conditional.
+ * lib/Makefile.am (noinst_LIBRARIES): Add libegnu.a only if
+ HYBRID_MALLOC_LIB.
+ (libegnu_a_CPPFLAGS): Omit AM_CPPFLAGS; not needed.
+ (MOSTLYCLEANFILES): Add libegnu.a.
+ * src/Makefile.in (SHEAP_OBJ): Remove.
+ (HYBRID_MALLOC): New macro.
+ (base_obj): Use it to conditionally add sheap.o.
+ (LIBEGNU_ARCHIVE): New macro.
+ ($(LIBEGNU_ARCHIVE)): New rule, replacing $(lib)/libegnu.a.
+ All uses of the latter replaced by the former.
+ * src/alloc.c (USE_ALIGNED_ALLOC): Simplify configuration.
+ Correct misspelling ALIGNED_ALLOC to HAVE_ALIGNED_ALLOC.
+ * src/gmalloc.c: Update comment.
+ * src/lisp.h (aligned_alloc)
+ [!DOUG_LEA_MALLOC && !HYBRID_MALLOC && !SYSTEM_MALLOC]:
+ New decl.
+ (Bug#22086)
- * etc/AUTHORS: Update the AUTHORS file
+2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
-2016-01-30 Nicolas Petton <nicolas@petton.fr>
+ Include <malloc.h> when advisable
+
+ This should help insulate us better from future glibc changes.
+ It is good hygiene to include .h files for APIs that Emacs uses.
+ Fix type clashes between Emacs and GNU <malloc.h> (Bug#22086).
+ * configure.ac: Check for malloc.h.
+ * src/alloc.c: Include <malloc.h> depending on HAVE_MALLOC_H,
+ not on DOUG_LEA_MALLOC.
+ * src/emacs.c, src/gmalloc.c (malloc_enable_thread):
+ Remove decl (now in lisp.h).
+ * src/gmalloc.c: Include stddef.h earlier, for ptrdiff_t.
+ [emacs]: Include lisp.h.
+ [HAVE_MALLOC_H]: Include <malloc.h>.
+ (__MALLOC_HOOK_VOLATILE): New macro, if not already defined.
+ (__after_morecore_hook, __malloc_initialize_hook, __morecore)
+ (__default_morecore):
+ [!HAVE_MALLOC_H]: New decls near non-inclusion of <malloc.h>.
+ (calloc): Make it clear that the macro should not be used.
+ Remove unused decl.
+ (malloc_info): New macro, to avoid clash with glibc <malloc.h>.
+ (__morecore, __default_morecore, __after_morecore_hook)
+ (__malloc_extra_blocks, __malloc_initialize_hook, __free_hook)
+ (__malloc_hook, __realloc_hook, __memalign_hook, memory_warnings):
+ Remove later decls.
+ (gmalloc_hook, gfree_hook, grealloc_hook):
+ Rename from __malloc_hook, __free_hook, __realloc_hook to
+ avoid type collision with glibc <malloc.h>. All uses changed.
+ (gmalloc_hook):
+ (__malloc_extra_blocks) [DOUG_LEA_MALLOC||HYBRID_MALLOC||SYSTEM_MALLOC]:
+ Now static.
+ (gmalloc_hook, __malloc_extra_blocks): Define even if [!HYBRID_MALLOC].
+ (__malloc_initialize_hook, __after_morecore_hook):
+ Declare with types compatible with glibc.
+ (__memalign_hook, hybrid_calloc) [HYBRID_MALLOC]:
+ Remove. All uses removed.
+ * src/lisp.h (__malloc_extra_blocks, malloc_enable_thread): New decls.
+ * src/ralloc.c, src/vm-limit.c:
+ Simplify includes and include <malloc.h> if available.
- authors.el updates
+2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
- * admin/authors.el (authors-renamed-files-alist): Additions.
+ * src/alloc.c: Include "sheap.h".
-2016-01-30 Nicolas Petton <nicolas@petton.fr>
+ (alloc_unexec_pre, alloc_unexec_post) [HYBRID_MALLOC]:
+ Set and clear bss_sbrk_did_unexec, on all platforms not just Cygwin.
+ * src/lisp.h (alloc_unexec_pre, alloc_unexec_post) [!DOUG_LEA_MALLOC]:
+ Declare unconditionally.
+ * src/unexcw.c, src/unexelf.c (bss_sbrk_did_unexec): Remove decl.
+ (unexec): Don’t set or clear bss_sbrk_did_unexec;
+ the caller now does this.
+ (Bug#22086)
- Make it possible to run make change-history on emacs-25
+2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
- * Makefile.in: Check if the current branch is emacs-25 instead of
- master.
+ Pacify --enable-gcc-warnings when HYBRID_MALLOC
-2016-01-30 lu4nx <lx@shellcodes.org>
-
- Support Go language in 'etags'
-
- * lib-src/etags.c <Ruby_help>: Fix documentation of Ruby tags.
- <Go_help>: New help.
- <Go_suffixes>: New variable.
- (Go_functions): New function.
- <lang_names>: Add entry for Go. (Bug#22370)
-
- * doc/emacs/maintaining.texi (Tag Syntax): Document Go support.
- * doc/man/etags.1: Mention Go support.
-
- * etc/NEWS: Mention Go support.
-
- * test/etags/go-src/test.go:
- * test/etags/go-src/test1.go: New test files.
- * test/etags/Makefile (GOSRC): New variable.
- (SRCS): Add $(GOSRC).
- * test/etags/ETAGS.good_1:
- * test/etags/ETAGS.good_2:
- * test/etags/ETAGS.good_3:
- * test/etags/ETAGS.good_4:
- * test/etags/ETAGS.good_5:
- * test/etags/ETAGS.good_6:
- * test/etags/CTAGS.good: Adapt to addition of Go tests.
-
-2016-01-30 Eli Zaretskii <eliz@gnu.org>
-
- Improve Ruby support in 'etags'
-
- * lib-src/etags.c (Ruby_functions): Tag constants. Don't tag
- singleton classes. Remove class qualifiers from tags generated
- for method and constant names. (Bug#22241)
-
- * doc/emacs/maintaining.texi (Tag Syntax): Mention that constants
- are tagged by etags in Ruby.
-
- * etc/NEWS: Mention that constants are tagged by etags in Ruby.
-
- * test/etags/ruby-src/test1.ruby: Add more tests.
- * test/etags/ETAGS.good_1:
- * test/etags/ETAGS.good_2:
- * test/etags/ETAGS.good_3:
- * test/etags/ETAGS.good_4:
- * test/etags/ETAGS.good_5:
- * test/etags/ETAGS.good_6:
- * test/etags/CTAGS.good: Adapt to the changes in etags and in Ruby
- tests.
-
-2016-01-30 Eli Zaretskii <eliz@gnu.org>
-
- Adjust etags test results to changes in copyright years
-
- * test/etags/CTAGS.good:
- * test/etags/ETAGS.good_1:
- * test/etags/ETAGS.good_2:
- * test/etags/ETAGS.good_3:
- * test/etags/ETAGS.good_4:
- * test/etags/ETAGS.good_5:
- * test/etags/ETAGS.good_6: Adjust to shift in characters and
- in line numbers.
-
-2016-01-30 Andreas Schwab <schwab@linux-m68k.org>
-
- Revert "Re-enable checks in member, memql, delete to complain about non-lists"
-
- This reverts commit f524e8b7f12d9b5a8b92084e5385429fe7b085b9.
-
-2016-01-30 Nicolas Petton <nicolas@petton.fr>
-
- Make it possible to run make change-history on emacs-25
-
- * Makefile.in: Check if the current branch is emacs-25 instead of
- master.
-
-2016-01-30 Dmitry Gutov <dgutov@yandex.ru>
-
- Don't fiddle with DEFAULT
-
- * lisp/progmodes/project.el (project--completing-read-strict):
- Don't change DEFAULT, whether is has any matches in
- COLLECTION, or not.
-
-2016-01-30 Eli Zaretskii <eliz@gnu.org>
-
- Document xwidget commands and functions
-
- * doc/lispref/display.texi (Xwidgets): New section, describes some
- of the xwidget primitives.
- * doc/lispref/display.texi (Display): Update the chapter menu.
- * doc/emacs/misc.texi (Embedded WebKit Widgets): New section.
- * doc/emacs/emacs.texi (Top): Update the master menu to include
- the xwidget node.
-
-2016-01-30 Lars Ingebrigtsen <larsi@gnus.org>
-
- Build fix for shr.el
-
- * shr.el (seq): Require.
-
-2016-01-30 Dmitry Gutov <dgutov@yandex.ru>
+ * src/buffer.c (init_buffer):
+ * src/emacs.c (main):
+ * src/xsmfns.c (smc_save_yourself_CB, x_session_initialize):
+ Use emacs_get_current_dir_name, not get_current_dir_name.
+ * src/conf_post.h (aligned_alloc) [HYBRID_MALLOC && emacs]: New macro.
+ (HYBRID_GET_CURRENT_DIR_NAME, get_current_dir_name): Remove.
+ * src/emacs.c: Include "sheap.h".
+ (report_sheap_usage): Remove decl.
+ (Fdump_emacs) [HYBRID_MALLOC]: Report usage directly.
+ Don't assume ptrdiff_t can be printed as int.
+ * src/gmalloc.c [HYBRID_MALLOC]:
+ Include "sheap.h" rather than declaring its contents by hand.
+ (get_current_dir_name, gget_current_dir_name)
+ (hybrid_get_current_dir_name): Remove.
+ (emacs_abort): Remove duplicate decl.
+ (aligned_alloc): Undef, like malloc etc.
+ (ALLOCATED_BEFORE_DUMPING): Now a static function, not a macro.
+ Make it a bit more efficient.
+ (malloc_find_object_address): Remove unused decl.
+ (enum mcheck_status, mcheck, mprobe, mtrace, muntrace, struct mstats)
+ (mstats, memory_warnings): Declare only if GC_MCHECK.
+ * src/lisp.h (emacs_get_current_dir_name):
+ New decl, replacing get_current_dir_name.
+ * src/sheap.c: Include sheap.h first.
+ (STATIC_HEAP_SIZE): Remove; now in sheap.h.
+ (debug_sheap): Now static.
+ (bss_sbrk_buffer_end): Remove; no longer used.
+ (bss_sbrk_ptr): Now static and private.
+ (bss_sbrk_did_unexec): Now bool.
+ (BLOCKSIZE): Remove, to avoid GCC warning about its not being used.
+ (bss_sbrk): Don't treat request_size 0 as special, since the code
+ works without this being a special case.
+ Avoid overflow if request size exceeds INT_MAX.
+ (report_sheap_usage): Remove; now done in emacs.c.
+ * src/sheap.h: New file.
+ * src/sysdep.c (get_current_dir_name): Remove macro.
+ Include "sheap.h".
+ (emacs_get_current_dir_name): Rename function from
+ get_current_dir_name. Handle HYBRID_MALLOC here;
+ this is simpler.
+ (Bug#22086)
- Improve project-find-file yet again!
+2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/progmodes/project.el (project--completing-read-strict):
- New function.
- (project-find-file-in): Use it.
- (project-file-completion-table): Move the default
- implementation inside the cl-defgeneric form.
- (http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg01720.html)
+ Report static heap usage on non-Cygwin, too
-2016-01-30 Dmitry Gutov <dgutov@yandex.ru>
+ * src/emacs.c (Fdump_emacs) [HYBRID_MALLOC]: Report sheap usage here ...
+ * src/unexcw.c (unexec): ... instead of here, since sheap can be used
+ on platforms other than Cygwin (Bug#22086).
- Don't pass DIR to 'hg status'
+2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/vc/vc-hg.el (vc-hg-dir-status-files):
- Don't pass DIR to 'hg status' (bug#22481).
+ Pacify GCC on extern decls
-2016-01-30 Stephen Leake <stephen_leake@stephe-leake.org>
+ * src/unexelf.c (bss_sbrk_did_unexec): Move decl to top level
+ to pacify recent GCC (Bug#22086).
- Fix typo in previous commits
+2016-01-30 Wolfgang Jenkner <wjenkner@inode.at>
- * lisp/progmodes/project.el (project-find-file-in):
- * lisp/vc/vc-mtn.el (vc-mtn-find-ignore-file): Fix typo in previous
- commit.
+ Add musl patch to support HYBRID_MALLOC on elf systems
-2016-01-30 Stephen Leake <stephen_leake@stephe-leake.org>
+ * src/gmalloc.c: Adjust for HYBRID_MALLOC in the non CYGWIN case.
+ (__default_morecore): Here, in particular.
+ * configure.ac: Define HYBRID_MALLOC when unexelf.o is used.
+ New variable SHEAP_OBJ.
+ * src/Makefile.in: Use it.
+ (Bug#22086)
- Improve project-find-file
+2016-01-30 Rich Felker <dalias@libc.org> (tiny change)
- * lisp/progmodes/project.el (project-file-completion-table): New.
- (project-find-file, project-or-external-find-file): Default to filename
- at point.
- (project-file-completion-table): New, split out from
- project--find-file-in.
- (project-find-file-in): Renamed from project--find-file-in, use
- project-file-completion-table.
+ unexelf.c hook to support HYBRID_MALLOC on ELF
- * lisp/progmodes/xref.el (ede-minor-mode): New declaration.
- (xref--find-ignores-arguments): Add doc string.
+ * src/unexelf.c (unexec) [HYBRID_MALLOC]:
+ Define bss_sbrk_did_unexec (Bug#22086).
-2016-01-30 Stephen Leake <stephen_leake@stephe-leake.org>
+2016-01-30 Wolfgang Jenkner <wjenkner@inode.at>
- Implement vc-mtn-find-ignore-file, fix some doc strings
+ Link temacs with gnulib compiled with -Demacs
- * lisp/cedet/cedet-global.el (cedet-gnu-global-root): Improve doc string.
+ This is done to support HYBRID_MALLOC, since some static variables
+ (e.g., last_environ in putenv.c) hold pointers to memory malloced
+ before dumping (Bug#22086).
+ * lib/Makefile.am: Add incantation to install libegnu.a.
+ * src/Makefile.in ($(lib)/libgnu.a): Replace with libegnu.a
+ (temacs$(EXEEXT)): Use it.
- * lisp/cedet/ede/locate.el (initialize-instance): Improve doc string.
+2016-01-30 Wolfgang Jenkner <wjenkner@inode.at>
- * lisp/vc/vc-git.el (vc-git-find-ignore-file): Fix doc string.
+ Internal linkage for gmalloc etc. if HYBRID_MALLOC
- * lisp/vc/vc-mtn.el (vc-mtn-find-ignore-file): New function.
+ This avoids clashes with symbols if the after-dump malloc is
+ derived from Doug Lea's implementation (Bug#22086).
-2016-01-29 Vincent Belaïche <vincentb1@users.sourceforge.net>
+ * src/gmalloc.c (emacs_abort, __morecore, __default_morecore):
+ Move declarations up. For HYBRID_MALLOC, turn all `extern'
+ declarations below to `static' ones.
+ (aligned_alloc): Declare for !MSDOS as well.
+ (heapsize, _fraghead): Move resp. copy declaration downwards.
+ For HYBRID_MALLOC, conditionalize out the other definitions,
+ since the previous `static' declarations double as tentative
+ definitions, anyway.
+ (_malloc, _free, _realloc, __free_hook, _aligned_blocks)
+ (__realloc_hook, __memalign_hook): Conditionalize out.
+ (cfree, memalign, valloc): Ditto.
- Correct a whole bunch of bugs coming with renamed cell relocation.
+2016-01-30 Paul Eggert <eggert@cs.ucla.edu>
- This is the same change as commit on master branch. See
- http://git.savannah.gnu.org/cgit/emacs.git/commit/?id=badcd38aa86ed7973f2be2743c405710973a0bdd
+ Merge from origin/emacs-25
- * lisp/ses.el (ses-localvars): rename variable
- `ses--renamed-cell-symb-list' into `ses--in-killing-named-cell-list'
- and adjust the comment about it.
- (ses-plist-delq): new defun.
- (ses--ses-buffer-list): new defvar.
- (ses--unbind-cell-name): new defun.
- (ses-relocate-symbol): Do not relocate symbol when it is a named cell.
- (ses-relocate-formula): Undo change of
- 2011-12-27T19:30:39Z!vincentb1@users.sourceforge.net that was
- preventing relocation for named cell --- now doing this is delegated
- to function `ses-relocate-symbol'.
- (ses-relocate-range): In docstring, undo change of
- 2016-01-03T07:31:52Z!johnw@newartisans.com, `ses-range' must remain
- lower case as it is not a variable.
- (ses-relocate-all): Cell name relocation : 1) check that cell is a
- renamed cell by testing `ses-cell' property to :ses-named, rather than
- comparing name to corresponding standard name. Set rowcol of renamed
- cell into the hashmap --- `ses-cell' property must not be used for
- that as the same name can be used for different locations in different
- SES sheets ; 2) use `local-variable-if-set-p' rather than `boundp' and
- `local-variable-p' to check if cell name is already in use in this
- sheet or needs initialisation.
- (ses-relocate-all): Cell value relocation : 1) like for name
- relocation use the `ses-cell' property rather than comparing actual
- name to corresponding standard name. 2) Correct bug introduced in
- 2011-12-27T19:30:39Z!vincentb1@users.sourceforge.net, as the test was
- made the other way round than the intention --- ie value relocation
- was disabled for standard cell, not for renamed cell as was the
- intention.
- (ses-relocate-all): Add loop for unbinding deleted renamed cells
- names.
- (ses-killbuffer-hook): new defun.
- (ses-mode): Add the ses--ses-buffer-list maintenance mechanism ---
- kill buffer hook, plus pushing current buffer if new in list.
- (ses-delete-row, ses-delete-column): Collect deleted renamed cells
- into `ses--in-killing-named-cell-list'.
- (ses-rename-cell): Remove update of variable
- `ses--renamed-cell-symb-list', this variable is renamed to
- `ses--in-killing-named-cell-list', and its setting is done in
- functions `ses-delete-row' and , `ses-delete-column' now.
- (ses-rename-cell): Make cell new name a buffer local variable.
- (ses-rename-cell): Change correction of
- 2015-12-30T23:10:37Z!vincentb1@users.sourceforge.net concerning
- computation of the range over which `cursor-intangible' property was
- to be updated. This correction was ok for non spilling cells, but not
- for cells spilling over following blank cells. Simply use
- `next-single-property-change' rather than computing the end column
- from column widths.
+ 3f481ad Rename xref-query-replace to xref-query-replace-in-results
+ 62f4ed4 Update cl-defgeneric and cl-defmethod docstrings
+ 2111e0e Comment out next-error-function integration in xref
+ 4e11ad3 Correct a use of "which" in intro.texi
+ a1865bc Distinguish the two meanings of Java's keyword "default". Fixes bug #22358.
+ 76045f7 Don't operate on menu bar of nonexistent frame
+ c32f3bc Unbreak the GNUstep build.
-2016-01-29 Andreas Schwab <schwab@linux-m68k.org>
+2016-01-30 Andreas Schwab <schwab@linux-m68k.org>
Re-enable checks in member, memql, delete to complain about non-lists
* src/fns.c (Fmember, Fmemql, Fdelete): Revert 2007-10-16 change.
-2016-01-29 Martin Rudalics <rudalics@gmx.at>
+2016-02-04 Martin Rudalics <rudalics@gmx.at>
Minor doc(-string) tweaks
(Switching Buffers): Clarify description of
`switch-to-buffer-in-dedicated-window'.
-2016-01-29 Eli Zaretskii <eliz@gnu.org>
+2016-02-04 Eli Zaretskii <eliz@gnu.org>
- Minor improvements to 'pcase' documentation
+ Remove some useless-use-of eval.
- * doc/lispref/control.texi (Pattern matching case statement):
- Improve the documentation of 'pcase' per comments. See two
- discussion threads on emacs-devel@gnu.org for the details:
- http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg01335.html
- http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg01336.html.
+ * lisp/gnus/gnus.el (gnus-load-hook): Don't use eval.
+ * lisp/gnus/nnrss.el (xml): Simply require it.
+ (xml-rpc-method-call): Use declare-function.
-2016-01-29 Glenn Morris <rgm@gnu.org>
+2016-01-28 Glenn Morris <rgm@gnu.org>
Don't use eval to quieten prolog.el compilation.
* lisp/progmodes/prolog.el (pltrace-on, pltrace-off): Declare.
(prolog-enable-sicstus-sd, prolog-disable-sicstus-sd): Don't use eval.
-2016-01-29 Glenn Morris <rgm@gnu.org>
+2016-01-28 Glenn Morris <rgm@gnu.org>
Mark some risky prolog variables.
2016-01-28 Glenn Morris <rgm@gnu.org>
+ * lisp/emacs-lisp/bytecomp.el (byte-compile-nogroup-warn):
+ Warn if defcustom has no type. (Bug#16276)
+
* lisp/cedet/semantic/db-file.el (semanticdb-persistent-path):
Fix :type.
2016-01-27 Glenn Morris <rgm@gnu.org>
+ * test/lisp/vc/vc-hg.el: Move from test/automated/.
+
* lisp/xwidget.el (xwidget-query-on-exit-flag): Declare.
* lisp/xwidget.el (xwidget-webkit-browse-url): Give explicit error
if not compiled with xwidgets.
-2016-01-27 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-26 Paul Eggert <eggert@cs.ucla.edu>
C-u C-x = example doc fix
* doc/emacs/mule.texi (International Chars):
Adjust example to match current behavior of C-u C-x =.
-2016-01-27 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-26 Paul Eggert <eggert@cs.ucla.edu>
malloc.h hygiene
* src/keyboard.c, src/keyboard.h (handle_user_signal_hook):
Remove never-set var. All uses removed.
-2016-01-26 K. Handa <handa@gnu.org>
-
- Backport:fix previous change of src/ftfont.c (ftfont_shape_by_flt)
-
- * src/ftfont.c (ftfont_shape_by_flt): Fix previous change. Access the
- second glyph only when there are enough glyphs.
-
- (cherry picked from commit 9835757013569673854b692ccbb58bfb3c3ed1f7)
-
-2016-01-26 K. Handa <handa@gnu.org>
-
- support rendering of wider range of combinging characters by ftfont backend
-
- * lisp/language/hebrew.el (hebrew-shape-gstring): If the font backend
- supports rendering of combining characters, call
- font-shape-gstring.
-
- * src/font.c (Ffont_get): Handle `combining-capability' property.
- (syms_of_font): New symbol ":combining-capability'.
-
- * src/font.h (struct font_driver): New member combining_capability.
-
- * src/ftfont.c: Include "category.h".
- (ftfont_driver): Initialize combining_capability to
- ftfont_combining_capability.
- (ftfont_shape_by_flt): If OTF is null, try to find a suitable
- FLT in advance.
- (ftfont_combining_capability): New function.
-
- (cherry picked from commit 536f48e9a2251b9e654ea974bd90ff2f40218753)
-
2016-01-26 Anders Lindgren <andlind@gmail.com>
Fixed NextStep fullscreen issue (bug#22468)
([EmacsWindow constrainFrameRect:toScreen:]): Pass fullscreen
state to `constrain_frame_rect'.
-2016-01-26 Artur Malabarba <bruce.connor.am@gmail.com>
+2016-01-25 Artur Malabarba <bruce.connor.am@gmail.com>
* lisp/files.el: Use a fixed file name for the second dir-locals file
* doc/lispref/variables.texi (Directory Local Variables): Update
accordingly.
-2016-01-26 Artur Malabarba <bruce.connor.am@gmail.com>
+2016-01-25 Artur Malabarba <bruce.connor.am@gmail.com>
* lisp/files-x.el (modify-dir-local-variable): Small rewrite
Change a variable name to be more meaningful, and reorder some of
the code with no change in behaviour.
-2016-01-26 Artur Malabarba <bruce.connor.am@gmail.com>
+2016-01-25 Artur Malabarba <bruce.connor.am@gmail.com>
* lisp/files.el (dir-locals-find-file): Refactor return values
(hack-dir-local-variables): Simplify accordingly and rename a
variable.
-2016-01-26 Glenn Morris <rgm@gnu.org>
+2016-01-25 Glenn Morris <rgm@gnu.org>
* lisp/textmodes/flyspell.el (flyspell--prev-meta-tab-binding):
Declare.
* lisp/xwidget.el (xwidget-webkit-scroll-behavior):
Rename using American spelling. Update all uses.
-2016-01-26 Glenn Morris <rgm@gnu.org>
+2016-01-25 Glenn Morris <rgm@gnu.org>
Yet more xwidget doc fixes.
Spelling fixes
+2016-01-25 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ (rng-c-fix-escaped-newlines): Use subst-char-in-string
+
+ * lisp/nxml/rng-cmpct.el (rng-c-fix-escaped-newlines):
+ Use subst-char-in-string.
+
+2016-01-25 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * lisp/textmodes/sgml-mode.el (sgml-forward-sexp): New function
+
+ (sgml-cursor-sensor, sgml-pretty-print, sgml-parse-tag-backward)
+ (sgml-calculate-indent): Use it.
+
+2016-01-25 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * lisp/org: Fix some compiler warnings
+
+ * lisp/org/ob-core.el (org-babel-check-confirm-evaluate)
+ (org-babel-map-src-blocks): Don't emit warnings if added vars are not used.
+ (*this*): Declare as dyn-bound.
+ (org-babel-expand-src-block, org-babel-load-in-session)
+ (org-babel-switch-to-session-with-code, org-babel-get-rownames):
+ Mark unused args.
+ (org-babel-combine-header-arg-lists): Remove unused var `args'.
+ (org-babel-find-named-block): Remove unused var `msg'.
+
+ * lisp/org/org-src.el (org-inhibit-startup, org-src-fontify-natively):
+ Declare as dyn-bound.
+ (org-edit-src-code): Remove unused var `lfmt'.
+ (org-edit-fixed-width-region): Remove unused var `preserve-indentation'.
+
+2016-01-25 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * lisp/font-lock.el: Use #' to quote function symbols
+
2016-01-25 Stefan Monnier <monnier@iro.umontreal.ca>
(font-lock-ensure-function): Fix bug#22399
* lisp/emacs-lisp/ert.el (ert--results-move): Change error to user-error
-2016-01-25 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-24 Paul Eggert <eggert@cs.ucla.edu>
Port "$@" to OpenIndiana ksh93
* admin/check-doc-strings, configure.ac, lib-src/rcs2log:
Use plain "$@" rather than ${1+"$@"}.
-2016-01-25 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-24 Paul Eggert <eggert@cs.ucla.edu>
* src/xwidget.c (Fxwidget_set_adjustment): Fix doc string quoting typo.
-2016-01-25 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-24 Paul Eggert <eggert@cs.ucla.edu>
Improve wording for SMB support
* admin/authors.el (authors-ignored-files, authors-renamed-files-alist):
Additions.
-2016-01-24 Dmitry Gutov <dgutov@yandex.ru>
+2016-01-23 Dmitry Gutov <dgutov@yandex.ru>
Rename xref-query-replace to xref-query-replace-in-results
* doc/emacs/maintaining.texi (Xref Commands)
(Identifier Search, Identifier Search): Update accordingly.
-2016-01-24 Dmitry Gutov <dgutov@yandex.ru>
+2016-01-23 Dmitry Gutov <dgutov@yandex.ru>
Update cl-defgeneric and cl-defmethod docstrings
Omit unused locals, or move them to where they’re needed.
(x_clear_area1): Now ATTRIBUTE_UNUSED.
-2016-01-23 Eli Zaretskii <eliz@gnu.org>
+2016-01-22 Eli Zaretskii <eliz@gnu.org>
Update documentation for Dired search and replace
* etc/NEWS: Mention xref-related changes in Dired.
-2016-01-23 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-22 Paul Eggert <eggert@cs.ucla.edu>
Port recent xdisp.c fix to picky C compilers
Prevent spurious recognition of K&R argument declarations. Fixes bug #2203
- * lisp/progmodes/cc-engine.el (c-forward-declarator): New function.
+ * cc-engine.el (c-forward-declarator): New function.
(c-in-knr-argdecl): Before recognizing a K&R argument declaration, check it is
contained in the preceding arg list.
- * lisp/progmodes/cc-fonts.el (c-font-lock-declarators): Use the new function
+ * cc-fonts.el (c-font-lock-declarators): Use the new function
`c-forward-declarator' in place of inline code.
2016-01-22 Eli Zaretskii <eliz@gnu.org>
HAVE_XWIDGETS is defined.
(struct xwidget_type, xwidget_from_id): Remove; unused.
-2016-01-22 Michael Albinus <michael.albinus@gmx.de>
-
- Backport kqueue integration from master
-
- * configure.ac (--with-file-notification): Add kqueue.
- (top): Remove special test for "${HAVE_NS}" and
- ${with_file_notification}, this is handled inside gfilenotify
- tests. Add kqueue tests. Use NOTIFY_CFLAGS and NOTIFY_LIBS
- instead of library specific variables. Add error message for
- gfile on Nextstep.
-
- * doc/lispref/os.texi (File Notifications): Add kqueue as backend.
- Fix some glitches in the example.
-
- * etc/NEWS: Mention kqueue.
-
- * lisp/filenotify.el (file-notify--library)
- (file-notify-descriptors, file-notify-callback)
- (file-notify-add-watch, file-notify-rm-watch)
- (file-notify-valid-p): Add kqueue support.
- (file-notify--rm-descriptor): Remove WHAT arg.
-
- * src/Makefile.in: Use NOTIFY_CFLAGS and NOTIFY_LIBS.
-
- * src/emacs.c (main): Call globals_of_kqueue and syms_of_kqueue.
-
- * src/inotify.c (inotifyevent_to_event): Extract file name from
- watch_object if the event doesn't provide it.
- (Finotify_add_watch): Add file name to watch_object.
-
- * src/keyboard.c (make_lispy_event): Check also for HAVE_KQUEUE.
-
- * src/kqueue.c: New file.
-
- * src/lisp.h: Declare extern globals_of_kqueue and syms_of_kqueue.
-
- * test/automated/file-notify-tests.el
- (file-notify--test-expected-events): Remove.
- (file-notify--test-cleanup): Do not set that variable.
- (file-notify--test-timeout) Use different timeouts for
- different libraries.
- (file-notify--test-library): New defun.
- (file-notify--test-event-test): Make stronger checks.
- (file-notify--test-with-events): EVENTS can also be a list of
- lists. Flush outstanding events before running the body.
- Make timeout heuristically depend on the number of events.
- (file-notify-test01-add-watch, file-notify-test02-events)
- (file-notify-test04-file-validity, file-notify-test05-dir-validity):
- Rewrite in order to call file monitors but directory monitors.
- (file-notify-test02-events, file-notify-test04-file-validity): Do
- not skip cygwin tests. Add additional test for file creation.
- Adapt expected result for different backends.
- (file-notify-test03-autorevert): Some of the tests don't work for
- w32notify.
- (file-notify-test06-many-events): New test.
-
2016-01-22 John Wiegley <johnw@newartisans.com>
Further corrections to the pcase docstring
* doc/emacs/anti.texi (Antinews): Rewrite for Emacs 25.
-2016-01-22 Stephen Leake <stephen_leake@stephe-leake.org>
+2016-01-21 Stephen Leake <stephen_leake@stephe-leake.org>
In xref-collect-references, force backends to respect the 'dir' arg
* lisp/progmodes/xref.el (xref-collect-references): Force symref backends
to use `default-directory'.
-2016-01-22 John Wiegley <johnw@newartisans.com>
+2016-01-21 John Wiegley <johnw@newartisans.com>
Minor correction to pcase docstring
-2016-01-22 John Wiegley <johnw@newartisans.com>
+2016-01-21 John Wiegley <johnw@newartisans.com>
Write a new docstring for the pcase macro
Avoid byte-compiler warning in todo-mode (bug#21953)
- * lisp/calendar/todo-mode.el (todo-convert-legacy-files): Add limit argument
+ * todo-mode.el (todo-convert-legacy-files): Add limit argument
to looking-back to comply with advertised-calling-convention.
2016-01-21 Stephen Berman <stephen.berman@gmx.net>
* lisp/calendar/todo-mode.el (todo-modes-set-2):
* lisp/doc-view.el (doc-view-mode): Set desktop-save-buffer unconditionally.
-2016-01-21 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-20 Paul Eggert <eggert@cs.ucla.edu>
No need to configure gobject-introspection
* lisp/isearch.el (isearch-search-fun-function)
(isearch-search-string): Doc fixes. (Bug#22411)
-2016-01-20 Stefan Monnier <monnier@iro.umontreal.ca>
+2016-01-19 Stefan Monnier <monnier@iro.umontreal.ca>
* lisp/xwidget.el: Nitpicks
* lisp/xwidget.el (xwidget-log, xwidget-webkit-callback):
Use with-current-buffer rather than save-excursion + set-buffer.
-2016-01-20 Glenn Morris <rgm@gnu.org>
+2016-01-19 Glenn Morris <rgm@gnu.org>
Don't hard-code 1 as point-min.
* lisp/xwidget.el (xwidget-webkit-last-session)
(xwidget-webkit-current-session): Don't hard-code 1 as point-min.
-2016-01-20 Glenn Morris <rgm@gnu.org>
+2016-01-19 Glenn Morris <rgm@gnu.org>
* lisp/xwidget.el: Add declarations to silence non-xwidget compilation.
-2016-01-20 Glenn Morris <rgm@gnu.org>
+2016-01-19 Glenn Morris <rgm@gnu.org>
Trivial doc copyedits.
(Fxwidget_info, Fxwidget_view_lookup)
(Fset_xwidget_query_on_exit_flag): Trivial doc copyedits.
-2016-01-20 Glenn Morris <rgm@gnu.org>
+2016-01-19 Glenn Morris <rgm@gnu.org>
Avoid advising image-display-size for xwidgets.
* lisp/image-mode.el (xwidget-info, xwidget-at): Declare.
(image-display-size): Incorporate xwidget code directly.
-2016-01-20 Glenn Morris <rgm@gnu.org>
+2016-01-19 Glenn Morris <rgm@gnu.org>
Avoid breaking non-xwidget Emacs that happen to load xwidget.el.
(kill-buffer-query-functions): Only modify these hooks if
compiled with xwidget support.
-2016-01-20 Glenn Morris <rgm@gnu.org>
+2016-01-19 Glenn Morris <rgm@gnu.org>
* lisp/xwidget.el (xwidget-webkit-scroll-behaviour): Fix custom spec.
-2016-01-19 Glenn Morris <rgm@gnu.org>
-
* configure.ac (WEBKIT, GIR, CAIRO): Use EMACS_CHECK_MODULES, not PKG_.
* configure.ac (emacs_config_features): Add XWIDGETS, WEBKIT, GIR.
* configure.ac:
(HAVE_XWIDGETS, WIDGET_OBJ, EMACS_CONFIG_FEATURES):
- * src/xterm.c (x_draw_glyph_string, x_draw_bar_cursor):
- * src/xdisp.c:
+ * xterm.c (x_draw_glyph_string, x_draw_bar_cursor):
+ * xdisp.c:
(handle_display_spec, handle_single_display_spec, push_it)
(pop_it, set_iterator_to_next, dump_glyph)
(calc_pixel_width_or_height, fill_xwidget_glyph_string)
(BUILD_XWIDGET_GLYPH_STRING, BUILD_GLYPH_STRINGS)
(produce_xwidget_glyph, x_produce_glyphs)
(get_window_cursor_type):
- * src/window.c (Fdelete_window_internal):
- * src/termhooks.h (e):
- * src/print.c (print_object):
- * src/lisp.h (ptrdiff_t):
- * src/keyboard.c (kbd_buffer_get_event, make_lispy_event)
+ * window.c (Fdelete_window_internal):
+ * termhooks.h (e):
+ * print.c (print_object):
+ * lisp.h (ptrdiff_t):
+ * keyboard.c (kbd_buffer_get_event, make_lispy_event)
(syms_of_keyboard):
- * src/emacs.c (main):
- * src/dispnew.c (update_window, scrolling_window):
- * src/dispextern.h (g, i):
+ * emacs.c (main):
+ * dispnew.c (update_window, scrolling_window):
+ * dispextern.h (g, i):
* Makefile.in (XWIDGETS_OBJ, WEBKIT_CFLAGS, WEBKIT_LIBS)
(GIR_LIBS, ALL_CFLAGS, base_obj, LIBES):
- * src/keyboard.c (kbd_buffer_get_event):
- * src/emacsgtkfixed.c (emacs_fixed_gtk_widget_size_allocate)
+ * keyboard.c (kbd_buffer_get_event):
+ * emacsgtkfixed.c (emacs_fixed_gtk_widget_size_allocate)
(emacs_fixed_class_init): Add case for an xwidget view.
- * src/xwidget.c, src/xwidget.h, lisp/xwidget.el: New files for xwidgets
+ * xwidget.c, xwidget.h, xwidget.el: New files for xwidgets
Various improvements to the Xwidget feature.
- * src/xwidget.c:
- * src/emacsgtkfixed.c:
- * lisp/xwidget.el:
+ * xwidgets.c:
+ * emacsgtkfixed.c:
+ * xwidget.el:
2016-01-19 Eli Zaretskii <eliz@gnu.org>
(hfy-face-resolve-face): Handle font specification as well as font
name. Documentation update. (Bug#21990)
-2016-01-19 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-18 Paul Eggert <eggert@cs.ucla.edu>
Fix spurious escapes in describe-input-method
* lisp/international/quail.el (quail-help):
Apply substitute-command-keys to doc strings before displaying them.
-2016-01-19 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-30 Nicolas Petton <nicolas@petton.fr>
- Minor improvements to (random t) documentation
+ Bump version to 25.0.90
- * doc/lispref/numbers.texi (Random Numbers):
- * src/fns.c (Frandom):
- Omit unnecessary details about randomness fallback.
- Say that it is a fallback.
+ * README:
+ * configure.ac:
+ * msdos/sed2v2.inp: Bump version to 25.0.90.
-2016-01-19 Dmitry Gutov <dgutov@yandex.ru>
+2016-01-30 Nicolas Petton <nicolas@petton.fr>
- Rename methods in Ruby etags example file
+ * etc/AUTHORS: Update the AUTHORS file
- * test/etags/ruby-src/test.rb: Rename the example methods to
- correspond to the common terminology used in Ruby.
- * test/etags/CTAGS.good:
- * test/etags/ETAGS.good_1:
- * test/etags/ETAGS.good_2:
- * test/etags/ETAGS.good_3:
- * test/etags/ETAGS.good_4:
- * test/etags/ETAGS.good_5:
- * test/etags/ETAGS.good_6: Adjust accordingly.
+2016-01-30 Nicolas Petton <nicolas@petton.fr>
-2016-01-19 Dmitry Gutov <dgutov@yandex.ru>
+ authors.el updates
- Propertize backtick in 'def `(abc)' as symbol constituent
+ * admin/authors.el (authors-renamed-files-alist): Additions.
- * lisp/progmodes/ruby-mode.el (ruby-syntax-propertize):
- Propertize backtick in 'def `(abc)' as symbol constituent.
- (ruby-syntax-propertize-function):
- Rename to ruby-syntax-propertize.
+2016-01-30 Nicolas Petton <nicolas@petton.fr>
-2016-01-18 Eli Zaretskii <eliz@gnu.org>
+ Make it possible to run make change-history on emacs-25
- Fix scrolling under scroll-preserve-screen-position on TTY
+ * Makefile.in: Check if the current branch is emacs-25 instead of
+ master.
- * src/window.c (window_scroll_line_based): When setting point to
- preserve screen coordinates, don't let cursor enter either of the
- two scroll margins. (Bug#22395)
+2016-01-30 lu4nx <lx@shellcodes.org>
-2016-01-18 Lars Magne Ingebrigtsen <larsi@gnus.org>
+ Support Go language in 'etags'
- Fix shr table rendering of nested tables
+ * lib-src/etags.c <Ruby_help>: Fix documentation of Ruby tags.
+ <Go_help>: New help.
+ <Go_suffixes>: New variable.
+ (Go_functions): New function.
+ <lang_names>: Add entry for Go. (Bug#22370)
- * shr.el (shr-table-body): Don't include all tbodies in nested
- tables in the levels above.
+ * doc/emacs/maintaining.texi (Tag Syntax): Document Go support.
+ * doc/man/etags.1: Mention Go support.
-2016-01-18 Dmitry Gutov <dgutov@yandex.ru>
+ * etc/NEWS: Mention Go support.
- * lisp/progmodes/project.el (project--read-regexp): Quote the identifier.
+ * test/etags/go-src/test.go:
+ * test/etags/go-src/test1.go: New test files.
+ * test/etags/Makefile (GOSRC): New variable.
+ (SRCS): Add $(GOSRC).
+ * test/etags/ETAGS.good_1:
+ * test/etags/ETAGS.good_2:
+ * test/etags/ETAGS.good_3:
+ * test/etags/ETAGS.good_4:
+ * test/etags/ETAGS.good_5:
+ * test/etags/ETAGS.good_6:
+ * test/etags/CTAGS.good: Adapt to addition of Go tests.
-2016-01-18 Dmitry Gutov <dgutov@yandex.ru>
+2016-01-30 Eli Zaretskii <eliz@gnu.org>
- Add xref-based replacements for Dired search commands
+ Improve Ruby support in 'etags'
- * lisp/dired-aux.el (dired-do-find-regexp)
- (dired-do-find-regexp-and-replace): New commands.
- http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00864.html
+ * lib-src/etags.c (Ruby_functions): Tag constants. Don't tag
+ singleton classes. Remove class qualifiers from tags generated
+ for method and constant names. (Bug#22241)
- * lisp/dired.el (dired-mode-map): Change bindings for `A' and
- `Q' to the new commands.
+ * doc/emacs/maintaining.texi (Tag Syntax): Mention that constants
+ are tagged by etags in Ruby.
- * lisp/progmodes/xref.el (xref-query-replace)
- (xref-collect-matches): Add progress reporters.
- (xref--find-ignores-arguments): Return nil for zero ignores.
- (xref--show-xrefs): Add an optional argument.
- (xref-collect-matches): Drop the assert. 'find' accepts a
- regular file in place of directory argument, too.
+ * etc/NEWS: Mention that constants are tagged by etags in Ruby.
-2016-01-18 Alan Mackenzie <acm@muc.de>
+ * test/etags/ruby-src/test1.ruby: Add more tests.
+ * test/etags/ETAGS.good_1:
+ * test/etags/ETAGS.good_2:
+ * test/etags/ETAGS.good_3:
+ * test/etags/ETAGS.good_4:
+ * test/etags/ETAGS.good_5:
+ * test/etags/ETAGS.good_6:
+ * test/etags/CTAGS.good: Adapt to the changes in etags and in Ruby
+ tests.
- * doc/lispref/frames.texi (Position Parameters): Say they don't exist on TTYs.
+2016-01-30 Eli Zaretskii <eliz@gnu.org>
-2016-01-18 Eli Zaretskii <eliz@gnu.org>
+ Adjust etags test results to changes in copyright years
- Improve user documentation of Xref
+ * test/etags/CTAGS.good:
+ * test/etags/ETAGS.good_1:
+ * test/etags/ETAGS.good_2:
+ * test/etags/ETAGS.good_3:
+ * test/etags/ETAGS.good_4:
+ * test/etags/ETAGS.good_5:
+ * test/etags/ETAGS.good_6: Adjust to shift in characters and
+ in line numbers.
- * doc/emacs/maintaining.texi (Xref, Find Identifiers)
- (Looking Up Identifiers, Identifier Search, List Identifiers):
- Adjudicate comments by Dmitry Gutov <dgutov@yandex.ru>. See
- http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00650.html
- for the details.
+2016-01-30 Andreas Schwab <schwab@linux-m68k.org>
-2016-01-18 Eli Zaretskii <eliz@gnu.org>
+ Revert "Re-enable checks in member, memql, delete to complain about non-lists"
- Fix scrolling under scroll-preserve-screen-position and margins
+ This reverts commit f524e8b7f12d9b5a8b92084e5385429fe7b085b9.
- * src/window.c (window_scroll_pixel_based): When setting point to
- preserve screen coordinates, don't let cursor enter either of the
- two scroll margins. Fix incorrect usage of
- WINDOW_WANTS_HEADER_LINE_P and use WINDOW_HEADER_LINE_HEIGHT
- instead of CURRENT_HEADER_LINE_HEIGHT. (Bug#22395)
+2016-01-30 Nicolas Petton <nicolas@petton.fr>
-2016-01-18 Eli Zaretskii <eliz@gnu.org>
+ Make it possible to run make change-history on emacs-25
- Unbreak the MS-Windows build
+ * Makefile.in: Check if the current branch is emacs-25 instead of
+ master.
- * src/sysdep.c (emacs_gnutls_global_init, gnutls_rnd): Disable for
- WINDOWSNT, to avoid link failure. (Bug#22202)
+2016-01-30 Dmitry Gutov <dgutov@yandex.ru>
-2016-01-18 Alan Mackenzie <acm@muc.de>
+ Don't fiddle with DEFAULT
- Desktop: protect users against inadvertant upgrading of desktop file.
+ * lisp/progmodes/project.el (project--completing-read-strict):
+ Don't change DEFAULT, whether is has any matches in
+ COLLECTION, or not.
- An upgraded (version 208) desktop file cannot be read in Emacs < 25.
+2016-01-30 Eli Zaretskii <eliz@gnu.org>
- * etc/NEWS: Add an entry about upgrading a desktop file.
+ Document xwidget commands and functions
- * lisp/desktop.el (desktop-file-version): Amend doc string.
- (desktop-native-file-version, desktop-io-file-version): new variables.
- (desktop-clear): Set desktop-io-file-version to nil.
- (desktop-buffer-info): make the presence of the last item on the list
- conditional on (>= desktop-io-file-version 208).
- (desktop-save): Add extra parameter VERSION to take user's C-u or C-u C-u.
- Amend the doc string. Add code to determine the output file version.
- (desktop-create-buffer): Set desktop-io-file-version to the input file's
- version.
+ * doc/lispref/display.texi (Xwidgets): New section, describes some
+ of the xwidget primitives.
+ * doc/lispref/display.texi (Display): Update the chapter menu.
+ * doc/emacs/misc.texi (Embedded WebKit Widgets): New section.
+ * doc/emacs/emacs.texi (Top): Update the master menu to include
+ the xwidget node.
-2016-01-18 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-30 Lars Ingebrigtsen <larsi@gnus.org>
- Initialize GnuTLS before calling gnutls_rnd
+ Build fix for shr.el
- * src/gnutls.c (emacs_gnutls_global_init): Now extern.
- Don’t set gnutls_global_initialized if gnutls_global_init fails.
- * src/sysdep.c: Include "gnutls.h", and <gnutls/crypto.h>
- if 2.12 or later, which has gnutls_rnd.
- (emacs_gnutls_global_init, gnutls_rnd): New fallback
- placeholder macros if before 2.12.
- (init_random): Initialize gnutls globals before trying to
- use gnutls_rnd.
+ * shr.el (seq): Require.
-2016-01-18 Andreas Schwab <schwab@linux-m68k.org>
+2016-01-30 Dmitry Gutov <dgutov@yandex.ru>
- Don't use GnuTLS before it is initialized
+ Improve project-find-file yet again!
- * src/sysdep.c (init_random): Don't use gnutls_rnd.
+ * lisp/progmodes/project.el (project--completing-read-strict):
+ New function.
+ (project-find-file-in): Use it.
+ (project-file-completion-table): Move the default
+ implementation inside the cl-defgeneric form.
+ (http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg01720.html)
-2016-01-17 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-30 Dmitry Gutov <dgutov@yandex.ru>
- Port cleanup attribute to OpenBSD
+ Don't pass DIR to 'hg status'
- The OpenBSD C compiler issues false alarms about strcpy, strcat, and
- sprintf, and this messes up 'configure' when it tests for the cleanup
- attribute. Work around the problem by using __has_attribute directly.
- Problem reported by Joakim Jalap (Bug#22385).
- * configure.ac: Don’t use AX_GCC_VAR_ATTRIBUTE.
- * m4/ax_gcc_var_attribute.m4: Remove.
- * src/conf_post.h (__has_attribute): Provide a substitute, for
- non-GCC or older GCC compilers. All uses changed to assume
- the substitute. Check for the cleanup attribute.
- * src/emacs-module.c (module_has_cleanup): Just use __has_attribute.
-
-2016-01-17 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/vc/vc-hg.el (vc-hg-dir-status-files):
+ Don't pass DIR to 'hg status' (bug#22481).
- Prefer GnuTLS when acquiring random seed
+2016-01-30 Stephen Leake <stephen_leake@stephe-leake.org>
- This attempts to improve on the fix for Bug#22202.
- * configure.ac (HAVE_DEV_URANDOM): Remove.
- Check /dev/urandom existence at run time, not at build time,
- since the device could exist in the former but not the latter.
- * src/sysdep.c [HAVE_GNUTLS]: Include gnutls/gnutls.h.
- (gnutls_rnd) [GNUTLS_VERSION_NUMBER < 0x020c00]: New fallback macro.
- (random_seed): New typedef.
- (set_random_seed): New static function.
- (seed_random): Use them.
- (init_random): Use random_seed instead of uintmax_t, so as to
- not consume more entropy than needed. Prefer gnutls_rnd if it
- works; this avoids a redundant open of /dev/urandom on
- GNU/Linux with modern GnuTLS.
+ Fix typo in previous commits
-2016-01-16 Eli Zaretskii <eliz@gnu.org>
+ * lisp/progmodes/project.el (project-find-file-in):
+ * lisp/vc/vc-mtn.el (vc-mtn-find-ignore-file): Fix typo in previous
+ commit.
- Improve documentation of dynamic modules
+2016-01-30 Stephen Leake <stephen_leake@stephe-leake.org>
- * doc/lispref/loading.texi (How Programs Do Loading): Update the
- description of searching for files in 'load' when Emacs was built
- with support for dynamic modules.
+ Improve project-find-file
-2016-01-16 Eli Zaretskii <eliz@gnu.org>
+ * lisp/progmodes/project.el (project-file-completion-table): New.
+ (project-find-file, project-or-external-find-file): Default to filename
+ at point.
+ (project-file-completion-table): New, split out from
+ project--find-file-in.
+ (project-find-file-in): Renamed from project--find-file-in, use
+ project-file-completion-table.
- * INSTALL: Document --with-modules.
+ * lisp/progmodes/xref.el (ede-minor-mode): New declaration.
+ (xref--find-ignores-arguments): Add doc string.
-2016-01-16 Eli Zaretskii <eliz@gnu.org>
+2016-01-30 Stephen Leake <stephen_leake@stephe-leake.org>
- Document 'function-put'
+ Implement vc-mtn-find-ignore-file, fix some doc strings
- * doc/lispref/symbols.texi (Symbol Plists): Document
- 'function-put'. Update documentation of 'function-get'.
+ * lisp/cedet/cedet-global.el (cedet-gnu-global-root): Improve doc string.
-2016-01-16 Eli Zaretskii <eliz@gnu.org>
+ * lisp/cedet/ede/locate.el (initialize-instance): Improve doc string.
- Document 'funcall-interactively'
+ * lisp/vc/vc-git.el (vc-git-find-ignore-file): Fix doc string.
- * doc/lispref/commands.texi (Interactive Call): Document
- 'funcall-interactively'.
- * doc/lispref/functions.texi (Calling Functions): Mention
- 'funcall-interactively' and provide a cross-reference.
+ * lisp/vc/vc-mtn.el (vc-mtn-find-ignore-file): New function.
-2016-01-16 Eli Zaretskii <eliz@gnu.org>
+2016-01-23 Michael Albinus <michael.albinus@gmx.de>
- * doc/lispref/lists.texi (Association Lists): Document 'alist-get'.
+ Improve user name completion in Tramp
- * doc/lispref/strings.texi (Text Comparison): Document 'string-greaterp'.
+ * lisp/net/tramp.el (tramp-parse-passwd, tramp-parse-etc-group):
+ Call also "getent passwd" or "getent group", if possible.
+ (tramp-parse-putty): Cache the result.
-2016-01-16 Eli Zaretskii <eliz@gnu.org>
+2016-01-22 Michael Albinus <michael.albinus@gmx.de>
- Document renaming of selection-related functions
+ * etc/NEWS: Move kqueue entries to Emacs 25.1 sections.
- * doc/lispref/frames.texi (Window System Selections): Rename "x-*"
- functions into the corresponding "gui-*" functions. Make the
- description slightly less X-centric.
+2016-01-20 Glenn Morris <rgm@gnu.org>
-2016-01-16 Eli Zaretskii <eliz@gnu.org>
+ Remove handling of non-string time-stamp formats, obsolete for 20 years.
- * doc/lispref/macros.texi (Expansion): Document 'macroexpand-1'.
+ * lisp/time-stamp.el (time-stamp-format): Doc fix.
+ (time-stamp-old-format-warn, time-stamp-fconcat): Remove.
+ (time-stamp-string): Ignore non-string formats.
-2016-01-16 Eli Zaretskii <eliz@gnu.org>
+2016-01-20 Eli Zaretskii <eliz@gnu.org>
- Document 'define-inline'
+ Anoter fix for problematic merge from emacs-25
- * doc/lispref/functions.texi (Defining Functions): Document
- 'define-inline' and related macros.
+ * src/w32fns.c (globals_of_w32fns): Move initialization of
+ resetstkoflw to a non-Cygwin part.
- * lisp/emacs-lisp/inline.el (inline-letevals): Doc fix.
+2016-01-20 Michael Albinus <michael.albinus@gmx.de>
-2016-01-16 Artur Malabarba <bruce.connor.am@gmail.com>
+ * test/Makefile.in (mostlyclean): Use ${LOGFILES}.
- * lisp/files.el (dir-locals--all-files): Respect absolute file-names
+2016-01-20 Eli Zaretskii <eliz@gnu.org>
- * lisp/help-fns.el (describe-variable): Fix a left-over parenthesis
+ Fix MS-Windows build broken by a botched merge from emacs-25
-2016-01-16 Artur Malabarba <bruce.connor.am@gmail.com>
+ * src/w32.c (w32_crypto_hprov): New static variable.
+ (globals_of_w32): Initialize w32_crypto_hprov.
+ (w32_init_crypt_random, w32_init_random): New functions.
+ Include wincrypt.h.
+ * src/w32.h (w32_init_random): Add prototype.
- * lisp/dired-x.el (dired-omit-here-always): Use add-dir-local-variable
+2016-01-20 Vincent Belaïche <vincentb1@users.sourceforge.net>
- instead of manually writing a dir-locals file.
+ Correct a whole bunch of bugs coming with renamed cell relocation.
-2016-01-16 Artur Malabarba <bruce.connor.am@gmail.com>
+ * lisp/ses.el (ses-localvars): rename variable
+ `ses--renamed-cell-symb-list' into `ses--in-killing-named-cell-list'
+ and adjust the comment about it.
+ (ses-plist-delq): new defun.
+ (ses--ses-buffer-list): new defvar.
+ (ses--unbind-cell-name): new defun.
+ (ses-relocate-symbol): Do not relocate symbol when it is a named cell.
+ (ses-relocate-formula): Undo change of
+ 2011-12-27T19:30:39Z!vincentb1@users.sourceforge.net that was
+ preventing relocation for named cell --- now doing this is delegated
+ to function `ses-relocate-symbol'.
+ (ses-relocate-range): In docstring, undo change of
+ 2016-01-03T07:31:52Z!johnw@newartisans.com, `ses-range' must remain
+ lower case as it is not a variable.
+ (ses-relocate-all): Cell name relocation : 1) check that cell is a
+ renamed cell by testing `ses-cell' property to :ses-named, rather than
+ comparing name to corresponding standard name. Set rowcol of renamed
+ cell into the hashmap --- `ses-cell' property must not be used for
+ that as the same name can be used for different locations in different
+ SES sheets ; 2) use `local-variable-if-set-p' rather than `boundp' and
+ `local-variable-p' to check if cell name is already in use in this
+ sheet or needs initialisation.
+ (ses-relocate-all): Cell value relocation : 1) like for name
+ relocation use the `ses-cell' property rather than comparing actual
+ name to corresponding standard name. 2) Correct bug introduced in
+ 2011-12-27T19:30:39Z!vincentb1@users.sourceforge.net, as the test was
+ made the other way round than the intention --- ie value relocation
+ was disabled for standard cell, not for renamed cell as was the
+ intention.
+ (ses-relocate-all): Add loop for unbinding deleted renamed cells
+ names.
+ (ses-killbuffer-hook): new defun.
+ (ses-mode): Add the ses--ses-buffer-list maintenance mechanism ---
+ kill buffer hook, plus pushing current buffer if new in list.
+ (ses-delete-row, ses-delete-column): Collect deleted renamed cells
+ into `ses--in-killing-named-cell-list'.
+ (ses-rename-cell): Remove update of variable
+ `ses--renamed-cell-symb-list', this variable is renamed to
+ `ses--in-killing-named-cell-list', and its setting is done in
+ functions `ses-delete-row' and , `ses-delete-column' now.
+ (ses-rename-cell): Make cell new name a buffer local variable.
+ (ses-rename-cell): Change correction of
+ 2015-12-30T23:10:37Z!vincentb1@users.sourceforge.net concerning
+ computation of the range over which `cursor-intangible' property was
+ to be updated. This correction was ok for non spilling cells, but not
+ for cells spilling over following blank cells. Simply use
+ `next-single-property-change' rather than computing the end column
+ from column widths.
- * lisp/files.el (dir-locals--all-files): Use completion instead of wildcards
+2016-01-19 John Wiegley <johnw@newartisans.com>
- (dir-locals-file)
- * lisp/files-x.el (modify-dir-local-variable)
- * lisp/dos-fns.el (dosified-file-name)
- * lisp/help-fns.el (describe-variable): Change accordingly.
+ Merge from origin/emacs-25
-2016-01-16 Jussi Lahdenniemi <jussi@aprikoodi.fi> (tiny change)
+ 3ae7934 ; * etc/NEWS: Mark entries that don't need further treatment.
+ 6165c36 * lisp/files.el (dir-locals--all-files): Respect absolute file-names
+ 2ffdf15 * lisp/help-fns.el (describe-variable): Fix a left-over parenthesis
+ 71ecd62 * lisp/dired-x.el (dired-omit-here-always): Use add-dir-local-variable
+ f0b82b3 * lisp/files.el (dir-locals--all-files): Use completion instead of wildcards
+ 86e4513 Fix incompatbilities with MS-Windows 2000 and older
+ 4e96521 Mention in PROBLEMS an issue with MS-Windows NT4
+ 15c23aa Ensure 8-byte aligned memory allocation on MS-Windows 9X
+ 39afa42 Fix tests for active region in hideif.el
+ 05df666 Fix interactive specs in some hideif.el commands
- Fix incompatbilities with MS-Windows 2000 and older
+2016-01-19 John Wiegley <johnw@newartisans.com>
- * src/w32.c <multiByteToWideCharFlags>: New global variable.
- (filename_to_utf16, filename_from_ansi, check_windows_init_file):
- Use it instead of the literal MB_ERR_INVALID_CHARS.
- (maybe_load_unicows_dll): Initialize multiByteToWideCharFlags as
- appropriate for the underlying OS version. For details, see
- http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00835.html.
- * src/w32.h: Declare multiByteToWideCharFlags.
- * src/w32fns.c (Fx_file_dialog, Fw32_shell_execute)
- (add_tray_notification): Use multiByteToWideCharFlags instead of
- the literal MB_ERR_INVALID_CHARS.
- (_resetstkoflw_proc): New typedef.
- (w32_reset_stack_overflow_guard): Call _resetstkoflw via a
- pointer, as this function is absent in msvcrt.dll shipped with W2K
- and older systems.
+ -
-2016-01-16 Eli Zaretskii <eliz@gnu.org>
+2016-01-19 Paul Eggert <eggert@cs.ucla.edu>
- Mention in PROBLEMS an issue with MS-Windows NT4
+ Avoid stdio in SIGINT handler
- * etc/PROBLEMS (MS-Windows): Mention the problem with Shell32.dll
- on Windows NT4. For the details, see
- http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00835.html.
+ * admin/merge-gnulib (GNULIB_MODULES): Add ignore-value.
+ * lib/gnulib.mk, m4/gnulib-comp.m4: Regenerate.
+ * lib/ignore-value.h: New file, from gnulib.
+ * src/keyboard.c: Include it.
+ (write_stdout, read_stdin): New functions.
+ (handle_interrupt): Use them instead of printf and getchar,
+ and avoid fflush when handling signals.
-2016-01-16 Jussi Lahdenniemi <jussi@aprikoodi.fi> (tiny change)
+2016-01-19 Jens Lechtenboerger <jens.lechtenboerger@fsfe.org>
- Ensure 8-byte aligned memory allocation on MS-Windows 9X
+ Refactor mml-smime.el, mml1991.el, mml2015.el
- * src/w32heap.c (init_heap): Redirect malloc, realloc, and free to
- special functions on Windows 9X. Refuse to dump Emacs on Windows 9X.
- (malloc_after_dump_9x, realloc_after_dump_9x)
- (free_after_dump_9x): New functions. (Bug#22379) See also
- http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00852.html
- for more details about the original problem.
+ (Maybe this is the last merge from Gnus git to Emacs git)
- * nt/inc/ms-w32.h (malloc_after_dump_9x, realloc_after_dump_9x)
- (free_after_dump_9x): Add prototypes.
+ Cf. discussion on ding mailing list, messages in
+ <http://thread.gmane.org/gmane.emacs.gnus.general/86228>.
+ Common code from the three files mml-smime.el, mml1991.el, and
+ mml2015.el is moved to mml-sec.el. Auxiliary functions are added
+ to gnus-util.el.
-2016-01-16 Eli Zaretskii <eliz@gnu.org>
+ The code is supported by test cases with necessary test keys.
- Fix tests for active region in hideif.el
+ Documentation in message.texi is updated.
- * lisp/progmodes/hideif.el (hif-evaluate-macro, hide-ifdef-block): Use
- 'use-region-p' to test whether to operate on region, instead of
- testing 'mark-active'.
+ * doc/misc/message.texi (Security, Using S/MIME):
+ Update for refactoring mml-smime.el, mml1991.el, mml2015.el.
+ (Using OpenPGP): Rename from "Using PGP/MIME"; update contents.
+ (Passphrase caching, Encrypt-to-self, Bcc Warning): New sections.
-2016-01-16 Eli Zaretskii <eliz@gnu.org>
+ * lisp/gnus/gnus-util.el (gnus-test-list, gnus-subsetp, gnus-setdiff):
+ New functions.
- Fix interactive specs in some hideif.el commands
+ * lisp/gnus/mml-sec.el: Require gnus-util and epg.
+ (epa--select-keys): Autoload.
+ (mml-signencrypt-style-alist, mml-secure-cache-passphrase): Doc fix.
+ (mml-secure-openpgp-signers): New user option;
+ make mml1991-signers and mml2015-signers obsolete aliases to it.
+ (mml-secure-smime-signers): New user option;
+ make mml-smime-signers an obsolete alias to it.
+ (mml-secure-openpgp-encrypt-to-self): New user option;
+ make mml1991-encrypt-to-self and mml2015-encrypt-to-self obsolete
+ aliases to it.
+ (mml-secure-smime-encrypt-to-self): New user option;
+ make mml-smime-encrypt-to-self an obsolete alias to it.
+ (mml-secure-openpgp-sign-with-sender): New user option;
+ make mml2015-sign-with-sender an obsolete alias to it.
+ (mml-secure-smime-sign-with-sender): New user option;
+ make mml-smime-sign-with-sender an obsolete alias to it.
+ (mml-secure-openpgp-always-trust): New user option;
+ make mml2015-always-trust an obsolete alias to it.
+ (mml-secure-fail-when-key-problem, mml-secure-key-preferences):
+ New user options.
+ (mml-secure-cust-usage-lookup, mml-secure-cust-fpr-lookup)
+ (mml-secure-cust-record-keys, mml-secure-cust-remove-keys)
+ (mml-secure-add-secret-key-id, mml-secure-clear-secret-key-id-list)
+ (mml-secure-cache-passphrase-p, mml-secure-cache-expiry-interval)
+ (mml-secure-passphrase-callback, mml-secure-check-user-id)
+ (mml-secure-secret-key-exists-p, mml-secure-check-sub-key)
+ (mml-secure-find-usable-keys, mml-secure-select-preferred-keys)
+ (mml-secure-fingerprint, mml-secure-filter-keys)
+ (mml-secure-normalize-cust-name, mml-secure-select-keys)
+ (mml-secure-select-keys-1, mml-secure-signer-names, mml-secure-signers)
+ (mml-secure-self-recipients, mml-secure-recipients)
+ (mml-secure-epg-encrypt, mml-secure-epg-sign): New functions.
- * lisp/progmodes/hideif.el (hif-evaluate-macro)
- (hide-ifdef-undef, show-ifdef-block): Don't use '(interactive "r")'
- in commands that should only act on the region if it's active.
+ * lisp/gnus/mml-smime.el: Require epg;
+ refactor declaration and autoloading of epg functions.
+ (mml-smime-use): Doc fix.
+ (mml-smime-cache-passphrase, mml-smime-passphrase-cache-expiry):
+ Obsolete.
+ (mml-smime-get-dns-cert, mml-smime-get-ldap-cert):
+ Use format instead of gnus-format-message.
+ (mml-smime-epg-secret-key-id-list): Remove variable.
+ (mml-smime-epg-passphrase-callback, mml-smime-epg-find-usable-key)
+ (mml-smime-epg-find-usable-secret-key): Remove functions.
+ (mml-smime-epg-sign, mml-smime-epg-encrypt): Refactor.
-2016-01-15 Phillip Lord <phillip.lord@russet.org.uk>
+ * lisp/gnus/mml1991.el (mml1991-cache-passphrase)
+ (mml1991-passphrase-cache-expiry): Obsolete.
+ (mml1991-epg-secret-key-id-list): Remove variable.
+ (mml1991-epg-passphrase-callback, mml1991-epg-find-usable-key)
+ (mml1991-epg-find-usable-secret-key): Remove functions.
+ (mml1991-epg-sign, mml1991-epg-encrypt): Refactor.
- Merge branch 'emacs-25' of git.sv.gnu.org:/srv/git/emacs into emacs-25
+ * lisp/gnus/mml2015.el (mml2015-cache-passphrase)
+ (mml2015-passphrase-cache-expiry): Obsolete.
+ (mml2015-epg-secret-key-id-list): Remove variable.
+ (mml2015-epg-passphrase-callback, mml2015-epg-check-user-id)
+ (mml2015-epg-check-sub-key, mml2015-epg-find-usable-key)
+ (mml2015-epg-find-usable-secret-key): Remove functions.
+ (mml2015-epg-decrypt, mml2015-epg-clear-decrypt, mml2015-epg-sign)
+ (mml2015-epg-encrypt): Refactor.
-2016-01-15 Phillip Lord <phillip.lord@russet.org.uk>
+2016-01-19 Paul Eggert <eggert@cs.ucla.edu>
- Enable test selector from command line
+ Merge from gnulib
- * test/automated/Makefile.in: Change variable manipulation to avoid
- over-writing selector.
+ This mostly just updates copyright dates of gnulib files.
+ It also updates to the latest version of texinfo.tex.
-2016-01-15 Alan Mackenzie <acm@muc.de>
+2016-01-19 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
- Don't confuse "::" with ":" when trying to parse member initializers.
+ Move variables to inner loop, preparing for Mac port merge
- * lisp/progmodes/cc-engine.el (c-back-over-member-initializers): Check
- more robustly for ":" token when searching backwards for it.
+ * src/keyboard.c (command_loop_1): Move variables `cmd',
+ `keybuf', and `i' to inner loop.
- * lisp/progmodes/cc-langs.el (c-:$-multichar-token-regexp): New language
- variable.
+2016-01-19 Paul Eggert <eggert@cs.ucla.edu>
-2016-01-15 Eli Zaretskii <eliz@gnu.org>
+ Minor improvements to (random t) documentation
- Ensure positive number of glyphs for margins of positive width
+ * doc/lispref/numbers.texi (Random Numbers):
+ * src/fns.c (Frandom):
+ Omit unnecessary details about randomness fallback.
+ Say that it is a fallback.
- * src/dispnew.c (margin_glyphs_to_reserve): Always return a
- positive value when a non-zero width of the marginal area was
- requested. (Bug#22356)
+2016-01-19 Dmitry Gutov <dgutov@yandex.ru>
-2016-01-15 Eli Zaretskii <eliz@gnu.org>
+ Rename methods in Ruby etags example file
- Fix crashes when mini-window has non-zero margins
+ * test/etags/ruby-src/test.rb: Rename the example methods to
+ correspond to the common terminology used in Ruby.
+ * test/etags/CTAGS.good:
+ * test/etags/ETAGS.good_1:
+ * test/etags/ETAGS.good_2:
+ * test/etags/ETAGS.good_3:
+ * test/etags/ETAGS.good_4:
+ * test/etags/ETAGS.good_5:
+ * test/etags/ETAGS.good_6: Adjust accordingly.
- * src/window.c (resize_frame_windows): Use 'new_size' to set
- minibuffer window's 'total_cols' value, as 'size' might be in
- pixels. (Bug#22356)
+2016-01-18 Dmitry Gutov <dgutov@yandex.ru>
-2016-01-15 Alan Mackenzie <acm@muc.de>
+ Propertize backtick in 'def `(abc)' as symbol constituent
- In comment-dwim with style `extra-line', respect indent-tabs-mode.
+ * lisp/progmodes/ruby-mode.el (ruby-syntax-propertize):
+ Propertize backtick in 'def `(abc)' as symbol constituent.
+ (ruby-syntax-propertize-function):
+ Rename to ruby-syntax-propertize.
- This fixes bug #22369.
+2016-01-18 Eli Zaretskii <eliz@gnu.org>
- * lisp/newcomment.el (comment-make-bol-ws): New function.
- (comment-make-extra-lines): Use new function instead of a crude `make-string'.
+ Fix scrolling under scroll-preserve-screen-position on TTY
-2016-01-15 Eli Zaretskii <eliz@gnu.org>
+ * src/window.c (window_scroll_line_based): When setting point to
+ preserve screen coordinates, don't let cursor enter either of the
+ two scroll margins. (Bug#22395)
- Make 'random' seeds cryptographically secure if possible
+2016-01-18 Lars Magne Ingebrigtsen <larsi@gnus.org>
- * configure.ac: Check for "/dev/urandom".
+ Fix shr table rendering of nested tables
- * src/sysdep.c (init_random) [HAVE_DEV_URANDOM]: Read the stream
- for the seed from "/dev/urandom".
- [WINDOWSNT]: Obtain the stream for the seed from w32 APIs.
- * src/fns.c (Frandom): Update the doc string to indicate that
- system entropy is used when available.
- * src/w32.c: Include wincrypt.h.
- (w32_init_crypt_random, w32_init_random): New functions, use the
- CryptGenRandom API.
- (globals_of_w32): Initialize w32_crypto_hprov handle to zero.
- * src/w32.h (w32_init_random): Add prototype.
+ * shr.el (shr-table-body): Don't include all tbodies in nested
+ tables in the levels above.
- * doc/lispref/numbers.texi (Random Numbers): Document more details
- about 't' as the argument to 'random'.
+2016-01-18 Dmitry Gutov <dgutov@yandex.ru>
- * etc/NEWS: Mention that '(random t)' now uses a cryptographically
- strong seed if possible.
+ * lisp/progmodes/project.el (project--read-regexp): Quote the identifier.
- (Bug#22202)
+2016-01-18 Dmitry Gutov <dgutov@yandex.ru>
-2016-01-15 Eli Zaretskii <eliz@gnu.org>
+ Add xref-based replacements for Dired search commands
- Unhide the --no-line-directive option to 'etags'
+ * lisp/dired-aux.el (dired-do-find-regexp)
+ (dired-do-find-regexp-and-replace): New commands.
+ http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00864.html
- * lib-src/etags.c (print_help): Un-undocument the --no-line-directive
- option. (Bug#22306)
+ * lisp/dired.el (dired-mode-map): Change bindings for `A' and
+ `Q' to the new commands.
- * doc/man/etags.1: Document the --no-line-directive option.
+ * lisp/progmodes/xref.el (xref-query-replace)
+ (xref-collect-matches): Add progress reporters.
+ (xref--find-ignores-arguments): Return nil for zero ignores.
+ (xref--show-xrefs): Add an optional argument.
+ (xref-collect-matches): Drop the assert. 'find' accepts a
+ regular file in place of directory argument, too.
-2016-01-15 Alan J Third <alan@idiocy.org> (tiny change)
+2016-01-18 Alan Mackenzie <acm@muc.de>
- Fix picture-mode wrt double-width characters
+ * doc/lispref/frames.texi (Position Parameters): Say they don't exist on TTYs.
- * lisp/textmodes/picture.el (picture-insert): Check the width of
- the character being replaced, not just that of the replacement.
- (Bug#1808)
+2016-01-18 Eli Zaretskii <eliz@gnu.org>
-2016-01-15 Eric Abrahamsen <eric@ericabrahamsen.net>
+ Improve user documentation of Xref
- Honor docstring of gnus-group-get-new-news
+ * doc/emacs/maintaining.texi (Xref, Find Identifiers)
+ (Looking Up Identifiers, Identifier Search, List Identifiers):
+ Adjudicate comments by Dmitry Gutov <dgutov@yandex.ru>. See
+ http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00650.html
+ for the details.
- * lisp/gnus/gnus-start.el (gnus-get-unread-articles): If the prefix arg is t,
- but non-numeric, unconditionally consider all groups to need updating.
+2016-01-18 Eli Zaretskii <eliz@gnu.org>
-2016-01-14 Simen Heggestøyl <simenheg@gmail.com>
+ Fix scrolling under scroll-preserve-screen-position and margins
- Disallow parenthesis in non-pseudo CSS selectors
+ * src/window.c (window_scroll_pixel_based): When setting point to
+ preserve screen coordinates, don't let cursor enter either of the
+ two scroll margins. Fix incorrect usage of
+ WINDOW_WANTS_HEADER_LINE_P and use WINDOW_HEADER_LINE_HEIGHT
+ instead of CURRENT_HEADER_LINE_HEIGHT. (Bug#22395)
- * lisp/textmodes/css-mode.el (css--font-lock-keywords): Disallow
- parenthesis in selectors except for in the function notation that
- might appear right after a pseudo-class.
- * test/indent/scss-mode.scss: Add a test for it.
+2016-01-18 Eli Zaretskii <eliz@gnu.org>
-2016-01-14 Katsumi Yamaoka <yamaoka@jpl.org>
+ Unbreak the MS-Windows build
- * lisp/gnus/nntp.el (nntp-request-newgroups): Simplify
+ * src/sysdep.c (emacs_gnutls_global_init, gnutls_rnd): Disable for
+ WINDOWSNT, to avoid link failure. (Bug#22202)
-2016-01-14 Michael Albinus <michael.albinus@gmx.de>
+2016-01-18 Alan Mackenzie <acm@muc.de>
- check-maybe shall run only default tests
+ Desktop: protect users against inadvertant upgrading of desktop file.
- * test/automated/Makefile.in (check, check-expensive): Depend on
- mostlyclean.
- (check-maybe): Re-run only default tests.
- (check-doit): Use code of check-maybe.
- (mostlyclean): Move *.log files away.
+ An upgraded (version 208) desktop file cannot be read in Emacs < 25.
-2016-01-14 Mark Oteiza <mvoteiza@udel.edu>
+ * etc/NEWS: Add an entry about upgrading a desktop file.
- * lisp/thingatpt.el (thing-at-point-uri-schemes): Add "magnet:"
+ * lisp/desktop.el (desktop-file-version): Amend doc string.
+ (desktop-native-file-version, desktop-io-file-version): new variables.
+ (desktop-clear): Set desktop-io-file-version to nil.
+ (desktop-buffer-info): make the presence of the last item on the list
+ conditional on (>= desktop-io-file-version 208).
+ (desktop-save): Add extra parameter VERSION to take user's C-u or C-u C-u.
+ Amend the doc string. Add code to determine the output file version.
+ (desktop-create-buffer): Set desktop-io-file-version to the input file's
+ version.
-2016-01-14 Dmitry Gutov <dgutov@yandex.ru>
+2016-01-17 Paul Eggert <eggert@cs.ucla.edu>
- Un-obsolete tags-loop-continue
+ Initialize GnuTLS before calling gnutls_rnd
- * lisp/progmodes/etags.el (tags-loop-continue): Un-obsolete.
- http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00682.html
+ * src/gnutls.c (emacs_gnutls_global_init): Now extern.
+ Don’t set gnutls_global_initialized if gnutls_global_init fails.
+ * src/sysdep.c: Include "gnutls.h", and <gnutls/crypto.h>
+ if 2.12 or later, which has gnutls_rnd.
+ (emacs_gnutls_global_init, gnutls_rnd): New fallback
+ placeholder macros if before 2.12.
+ (init_random): Initialize gnutls globals before trying to
+ use gnutls_rnd.
-2016-01-13 Eli Zaretskii <eliz@gnu.org>
+2016-01-17 Andreas Schwab <schwab@linux-m68k.org>
- Document obsoletion of 'intangible' and 'point-entered/left'
+ Don't use GnuTLS before it is initialized
- * doc/lispref/text.texi (Special Properties): Document the new
- properties 'cursor-intangible' and 'cursor-sensor-functions'.
- Document the obsolete status of 'intangible', 'pointer-left',
- and 'point-entered' properties, and of 'inhibit-point-motion-hooks'.
- * doc/lispref/display.texi (Overlay Properties): Document that
- 'intangible' overlay property is obsolete.
+ * src/sysdep.c (init_random): Don't use gnutls_rnd.
- * lisp/emacs-lisp/cursor-sensor.el (cursor-sensor-mode): Doc fix.
+2016-01-17 Bill Wohler <wohler@newt.com>
-2016-01-13 Eli Zaretskii <eliz@gnu.org>
+ * mh-e.el (mh-version): Add +git to version.
- Updater documentation of 'looking-back'
+2016-01-17 Paul Eggert <eggert@cs.ucla.edu>
- * doc/lispref/searching.texi (Regexp Search): Update documentation
- of 'looking-back'. Fix markup.
+ Port cleanup attribute to OpenBSD
-2016-01-13 Eli Zaretskii <eliz@gnu.org>
+ The OpenBSD C compiler issues false alarms about strcpy, strcat, and
+ sprintf, and this messes up 'configure' when it tests for the cleanup
+ attribute. Work around the problem by using __has_attribute directly.
+ Problem reported by Joakim Jalap (Bug#22385).
+ * configure.ac: Don’t use AX_GCC_VAR_ATTRIBUTE.
+ * m4/ax_gcc_var_attribute.m4: Remove.
+ * src/conf_post.h (__has_attribute): Provide a substitute, for
+ non-GCC or older GCC compilers. All uses changed to assume
+ the substitute. Check for the cleanup attribute.
+ * src/emacs-module.c (module_has_cleanup): Just use __has_attribute.
- Document 'pre-redisplay-functions'
+2016-01-17 Paul Eggert <eggert@cs.ucla.edu>
- * doc/lispref/hooks.texi (Standard Hooks):
- * doc/lispref/display.texi (Forcing Redisplay): Document
- 'pre-redisplay-functions'.
+ Prefer GnuTLS when acquiring random seed
-2016-01-13 Eli Zaretskii <eliz@gnu.org>
+ This attempts to improve on the fix for Bug#22202.
+ * configure.ac (HAVE_DEV_URANDOM): Remove.
+ Check /dev/urandom existence at run time, not at build time,
+ since the device could exist in the former but not the latter.
+ * src/sysdep.c [HAVE_GNUTLS]: Include gnutls/gnutls.h.
+ (gnutls_rnd) [GNUTLS_VERSION_NUMBER < 0x020c00]: New fallback macro.
+ (random_seed): New typedef.
+ (set_random_seed): New static function.
+ (seed_random): Use them.
+ (init_random): Use random_seed instead of uintmax_t, so as to
+ not consume more entropy than needed. Prefer gnutls_rnd if it
+ works; this avoids a redundant open of /dev/urandom on
+ GNU/Linux with modern GnuTLS.
- Document the new deafault value of 'load-read-function'
+2016-01-16 Eli Zaretskii <eliz@gnu.org>
- * doc/lispref/loading.texi (How Programs Do Loading): Document the
- change in the default value of 'load-read-function'.
+ Improve documentation of dynamic modules
-2016-01-13 Eli Zaretskii <eliz@gnu.org>
+ * doc/lispref/loading.texi (How Programs Do Loading): Update the
+ description of searching for files in 'load' when Emacs was built
+ with support for dynamic modules.
- Document 'bufferpos-to-filepos' and 'filepos-to-bufferpos'
+2016-01-16 Eli Zaretskii <eliz@gnu.org>
- * doc/lispref/nonascii.texi (Text Representations): Document
- 'bufferpos-to-filepos' and 'filepos-to-bufferpos'.
+ * INSTALL: Document --with-modules.
-2016-01-13 Eli Zaretskii <eliz@gnu.org>
+2016-01-16 Eli Zaretskii <eliz@gnu.org>
- Document the new prefix-command hooks
+ Document 'function-put'
- * doc/lispref/hooks.texi (Standard Hooks): Document
- `prefix-command-echo-keystrokes-functions' and
- `prefix-command-preserve-state-hook'.
-
-2016-01-13 Paul Eggert <eggert@cs.ucla.edu>
+ * doc/lispref/symbols.texi (Symbol Plists): Document
+ 'function-put'. Update documentation of 'function-get'.
- Fix one more misuse of time-stamp-time-zone
+2016-01-16 Eli Zaretskii <eliz@gnu.org>
- * test/etags/html-src/softwarelibero.html: Use "UTC0" rather
- than the unportable "GMT" for time zone.
+ Document 'funcall-interactively'
-2016-01-13 Paul Eggert <eggert@cs.ucla.edu>
+ * doc/lispref/commands.texi (Interactive Call): Document
+ 'funcall-interactively'.
+ * doc/lispref/functions.texi (Calling Functions): Mention
+ 'funcall-interactively' and provide a cross-reference.
- Fix NNTP NEWGROUPS off-by-a-few-hours bug
+2016-01-16 Eli Zaretskii <eliz@gnu.org>
- * lisp/gnus/nntp.el (nntp-request-newgroups): Format string
- in Universal Time, since we’re telling the server “GMT”.
+ * doc/lispref/lists.texi (Association Lists): Document 'alist-get'.
-2016-01-13 Paul Eggert <eggert@cs.ucla.edu>
+ * doc/lispref/strings.texi (Text Comparison): Document 'string-greaterp'.
- Update publicsuffix.txt from upstream
+2016-01-16 Eli Zaretskii <eliz@gnu.org>
- * etc/publicsuffix.txt: Update from
- https://publicsuffix.org/list/effective_tld_names.dat
- dated 2016-01-12 11:52:01 UTC.
+ Document renaming of selection-related functions
-2016-01-13 Glenn Morris <rgm@gnu.org>
+ * doc/lispref/frames.texi (Window System Selections): Rename "x-*"
+ functions into the corresponding "gui-*" functions. Make the
+ description slightly less X-centric.
- Fix some declarations.
+2016-01-16 Eli Zaretskii <eliz@gnu.org>
- * lisp/descr-text.el (internal-char-font):
- * lisp/cedet/mode-local.el (xref-item-location):
- * lisp/gnus/mml-smime.el (epg-key-sub-key-list)
- (epg-sub-key-capability, epg-sub-key-validity):
- * lisp/international/mule-util.el (internal-char-font):
- Fix declarations.
+ * doc/lispref/macros.texi (Expansion): Document 'macroexpand-1'.
-2016-01-13 Glenn Morris <rgm@gnu.org>
+2016-01-16 Eli Zaretskii <eliz@gnu.org>
- Fix some custom types.
+ Document 'define-inline'
- * lisp/gnus/gnus-fun.el (gnus-x-face-omit-files, gnus-face-omit-files):
- * lisp/gnus/gnus.el (gnus-valid-select-methods):
- * lisp/mail/rmail.el (rmail-get-coding-function):
- * lisp/net/newst-treeview.el (newsticker-groups-filename):
- * lisp/progmodes/hideif.el (hide-ifdef-exclude-define-regexp):
- * lisp/textmodes/tildify.el (tildify-space-predicates):
- * lisp/url/url-tramp.el (url-tramp-protocols):
- Fix custom types.
+ * doc/lispref/functions.texi (Defining Functions): Document
+ 'define-inline' and related macros.
-2016-01-13 Glenn Morris <rgm@gnu.org>
+ * lisp/emacs-lisp/inline.el (inline-letevals): Doc fix.
- Add some missing version tags.
+2016-01-16 Artur Malabarba <bruce.connor.am@gmail.com>
- * lisp/electric.el (electric-quote-comment)
- (electric-quote-string, electric-quote-paragraph):
- * lisp/epg-config.el (epg-gpgconf-program):
- * lisp/rect.el (rectangle-preview):
- * lisp/emacs-lisp/check-declare.el (check-declare-ext-errors):
- * lisp/emacs-lisp/package.el (package-selected-packages)
- (package-hidden-regexps):
- * lisp/erc/erc.el (erc-network-hide-list, erc-channel-hide-list):
- * lisp/eshell/em-term.el (eshell-destroy-buffer-when-process-dies):
- * lisp/gnus/mml-sec.el (mml1991-signers, mml2015-signers)
- (mml-smime-signers, mml1991-encrypt-to-self, mml2015-encrypt-to-self)
- (mml-smime-encrypt-to-self, mml2015-sign-with-sender)
- (mml-smime-sign-with-sender, mml2015-always-trust)
- (mml-secure-fail-when-key-problem, mml-secure-key-preferences):
- * lisp/net/browse-url.el (browse-url-conkeror-new-window-is-buffer)
- (browse-url-conkeror-arguments):
- * lisp/net/newst-reader.el (newsticker-download-logos):
- * lisp/progmodes/gud.el (gud-guiler-command-name):
- * lisp/progmodes/prog-mode.el (prettify-symbols-unprettify-at-point):
- * lisp/progmodes/project.el (project-vc):
- * lisp/progmodes/python.el (python-indent-guess-indent-offset-verbose)
- (python-shell-remote-exec-path, python-shell-first-prompt-hook)
- (python-shell-completion-native-disabled-interpreters)
- (python-shell-completion-native-enable)
- (python-shell-completion-native-output-timeout)
- (python-shell-completion-native-try-output-timeout):
- * lisp/progmodes/xref.el (xref):
- * lisp/term/screen.el (xterm-screen-extra-capabilities):
- * lisp/term/xterm.el (xterm-max-cut-length):
- Add missing version tags.
+ * lisp/files.el (dir-locals--all-files): Respect absolute file-names
-2016-01-13 Glenn Morris <rgm@gnu.org>
+ * lisp/help-fns.el (describe-variable): Fix a left-over parenthesis
- * test/automated/core-elisp-tests.el
- (core-elisp-tests-1-defvar-in-let): Add a custom type.
+2016-01-16 Artur Malabarba <bruce.connor.am@gmail.com>
-2016-01-13 Glenn Morris <rgm@gnu.org>
+ * lisp/dired-x.el (dired-omit-here-always): Use add-dir-local-variable
- * src/buffer.c (syms_of_buffer) <major-mode>: Doc fix.
+ instead of manually writing a dir-locals file.
- Remove comments that do not apply since 2005-08-09. (Bug#22349)
+2016-01-16 Artur Malabarba <bruce.connor.am@gmail.com>
-2016-01-12 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/files.el (dir-locals--all-files): Use completion instead of wildcards
- Merge from gnulib
+ (dir-locals-file)
+ * lisp/files-x.el (modify-dir-local-variable)
+ * lisp/dos-fns.el (dosified-file-name)
+ * lisp/help-fns.el (describe-variable): Change accordingly.
- This mostly just changes "UTC" to "UTC0" for POSIX conformance.
- It also updates to the latest version of texinfo.tex.
- * build-aux/gitlog-to-changelog, build-aux/move-if-change:
- * build-aux/update-copyright, doc/misc/texinfo.tex:
- Update from gnulib.
+2016-01-16 Jussi Lahdenniemi <jussi@aprikoodi.fi> (tiny change)
-2016-01-12 Eli Zaretskii <eliz@gnu.org>
+ Fix incompatbilities with MS-Windows 2000 and older
- Update documentation of 'process-running-child-p'
+ * src/w32.c <multiByteToWideCharFlags>: New global variable.
+ (filename_to_utf16, filename_from_ansi, check_windows_init_file):
+ Use it instead of the literal MB_ERR_INVALID_CHARS.
+ (maybe_load_unicows_dll): Initialize multiByteToWideCharFlags as
+ appropriate for the underlying OS version. For details, see
+ http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00835.html.
+ * src/w32.h: Declare multiByteToWideCharFlags.
+ * src/w32fns.c (Fx_file_dialog, Fw32_shell_execute)
+ (add_tray_notification): Use multiByteToWideCharFlags instead of
+ the literal MB_ERR_INVALID_CHARS.
+ (_resetstkoflw_proc): New typedef.
+ (w32_reset_stack_overflow_guard): Call _resetstkoflw via a
+ pointer, as this function is absent in msvcrt.dll shipped with W2K
+ and older systems.
- * doc/lispref/processes.texi (Input to Processes): Document the
- changes in return value of 'process-running-child-p'.
+2016-01-16 Eli Zaretskii <eliz@gnu.org>
-2016-01-12 Eli Zaretskii <eliz@gnu.org>
+ Mention in PROBLEMS an issue with MS-Windows NT4
- Update documentation of 'deactivate-mark'.
+ * etc/PROBLEMS (MS-Windows): Mention the problem with Shell32.dll
+ on Windows NT4. For the details, see
+ http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00835.html.
- * doc/lispref/markers.texi (The Mark): Document that
- 'deactivate-mark' is now buffer-local when set.
+2016-01-16 Jussi Lahdenniemi <jussi@aprikoodi.fi> (tiny change)
-2016-01-12 Eli Zaretskii <eliz@gnu.org>
+ Ensure 8-byte aligned memory allocation on MS-Windows 9X
- Update documentation of 'completion-table-dynamic'
+ * src/w32heap.c (init_heap): Redirect malloc, realloc, and free to
+ special functions on Windows 9X. Refuse to dump Emacs on Windows 9X.
+ (malloc_after_dump_9x, realloc_after_dump_9x)
+ (free_after_dump_9x): New functions. (Bug#22379) See also
+ http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00852.html
+ for more details about the original problem.
- * doc/lispref/minibuf.texi (Programmed Completion): Document the
- new optional argument to 'completion-table-dynamic'.
+ * nt/inc/ms-w32.h (malloc_after_dump_9x, realloc_after_dump_9x)
+ (free_after_dump_9x): Add prototypes.
-2016-01-12 Eli Zaretskii <eliz@gnu.org>
+2016-01-16 Eli Zaretskii <eliz@gnu.org>
- Document changes in 'read-buffer' and 'read-buffer-function'
+ Fix tests for active region in hideif.el
- * doc/lispref/minibuf.texi (High-Level Completion): Document the
- 4th argument to 'read-buffer' and 'read-buffer-function'.
+ * lisp/progmodes/hideif.el (hif-evaluate-macro, hide-ifdef-block): Use
+ 'use-region-p' to test whether to operate on region, instead of
+ testing 'mark-active'.
-2016-01-12 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-16 Eli Zaretskii <eliz@gnu.org>
- Fix time-stamp-time-zone bugs introduced in July
+ Fix interactive specs in some hideif.el commands
- This fixes a bug introduced when the July changes to
- format-time-string installed, as the changes were not
- correctly handled in this module (Bug#22302).
- Also, document time stamp time zones.
- * lisp/time-stamp.el (time-stamp-time-zone): Document values better.
- (time-stamp--format): New private function.
- (time-stamp-string, time-stamp-string-preprocess)
- (time-stamp-do-number): Use it.
- * doc/emacs/files.texi (Time Stamps): Mention time zones.
- * doc/misc/autotype.texi (Timestamps): Document time-stamp-time-zone.
+ * lisp/progmodes/hideif.el (hif-evaluate-macro)
+ (hide-ifdef-undef, show-ifdef-block): Don't use '(interactive "r")'
+ in commands that should only act on the region if it's active.
-2016-01-12 Eli Zaretskii <eliz@gnu.org>
+2016-01-15 Phillip Lord <phillip.lord@russet.org.uk>
- Make piping to subprocesses more robust on MS-Windows
+ Enable test selector from command line
- * src/w32.c (sys_write): Don't write to a pipe more stuff than its
- buffer can hold. Don't return -1 if something has been written to
- the pipe. Zero out 'errno' before calling '_write', to avoid
- returning a stale value. (Bug#22344)
- * src/w32proc.c (syms_of_ntproc) <w32-pipe-buffer-size>: New variable.
- * src/w32.c (pipe2): Use it to request a user-defined size for the
- pipe being created.
+ * test/automated/Makefile.in: Change variable manipulation to avoid
+ over-writing selector.
- * etc/NEWS: Mention 'w32-pipe-buffer-size'.
+2016-01-15 Alan Mackenzie <acm@muc.de>
- * doc/emacs/msdos.texi (Windows Processes): Document
- 'w32-pipe-buffer-size'.
+ Don't confuse "::" with ":" when trying to parse member initializers.
-2016-01-11 Dmitry Gutov <dgutov@yandex.ru>
+ * lisp/progmodes/cc-engine.el (c-back-over-member-initializers): Check
+ more robustly for ":" token when searching backwards for it.
- test/automated/vc-hg.el: Support out-of-tree build
+ * lisp/progmodes/cc-langs (c-:$-multichar-token-regexp): New language
+ variable.
- * test/automated/vc-hg.el
- (vc-hg-annotate-extract-revision-at-line-with-filename)
- (vc-hg-annotate-extract-revision-at-line-with-both):
- Don't refer to source-directory.
- http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00755.html
+2016-01-15 Eli Zaretskii <eliz@gnu.org>
-2016-01-11 Michael Albinus <michael.albinus@gmx.de>
+ Ensure positive number of glyphs for margins of positive width
- Minor change in tramp-tests.el
+ * src/dispnew.c (margin_glyphs_to_reserve): Always return a
+ positive value when a non-zero width of the marginal area was
+ requested. (Bug#22356)
- * test/automated/tramp-tests.el (tramp-test29-vc-registered):
- Use `dired-uncache' instead of a Tramp internal function.
+2016-01-15 Eli Zaretskii <eliz@gnu.org>
-2016-01-11 Peter Feigl <peter.feigl@nexoid.at>
+ Fix crashes when mini-window has non-zero margins
- * etc/HELLO: Add Armenian and Mongolian greetings.
+ * src/window.c (resize_frame_windows): Use 'new_size' to set
+ minibuffer window's 'total_cols' value, as 'size' might be in
+ pixels. (Bug#22356)
- (Bug#22346)
+2016-01-15 Alan Mackenzie <acm@muc.de>
-2016-01-11 Alan Mackenzie <acm@muc.de>
+ In comment-dwim with style `extra-line', respect indent-tabs-mode.
- Java Mode: Fontify identifiers in the presence of annotations.
+ This fixes bug #22369.
- * lisp/progmodes/cc-engine.el (c-forward-annotation): Tidy up the coding:
- Don't move point when the defun fails.
- (c-forward-decl-or-cast-1): Correct a usage of match data.
+ * lisp/newcomment.el (comment-make-bol-ws): New function.
+ (comment-make-extra-lines): Use new function instead of a crude `make-string'.
- * lisp/progmodes/cc-fonts.el (c-font-lock-maybe-decl-faces): Remove.
- (c-font-lock-declarations): Use the new c-maybe-decl-faces in place of the
- removed variable.
+2016-01-15 Eli Zaretskii <eliz@gnu.org>
- * lisp/progmodes/cc-langs.el (c-maybe-decl-faces): New language variable.
+ Make 'random' seeds cryptographically secure if possible
-2016-01-11 Eli Zaretskii <eliz@gnu.org>
+ * configure.ac: Check for "/dev/urandom".
- Avoid an infloop when we run out of memory
+ * src/sysdep.c (init_random) [HAVE_DEV_URANDOM]: Read the stream
+ for the seed from "/dev/urandom".
+ [WINDOWSNT]: Obtain the stream for the seed from w32 APIs.
+ * src/fns.c (Frandom): Update the doc string to indicate that
+ system entropy is used when available.
+ * src/w32.c: Include wincrypt.h.
+ (w32_init_crypt_random, w32_init_random): New functions, use the
+ CryptGenRandom API.
+ (globals_of_w32): Initialize w32_crypto_hprov handle to zero.
+ * src/w32.h (w32_init_random): Add prototype.
- * src/alloc.c (garbage_collect_1): Don't bother saving and
- restoring the echo-area message if we are GC'ing after running out
- of memory. This avoids an infloop due to repeated attempts to
- allocate memory for the cons cell needed to save the message,
- which signals the memory-full error, which attempts to save the
- echo-area message, which signals memory-full again, etc.
-
-2016-01-11 Eli Zaretskii <eliz@gnu.org>
-
- Avoid unnecessary failures of auto-saving after fatal error
-
- * src/w32.c (map_w32_filename): Avoid non-trivial system calls for
- the benefit of FAT volumes if we are called as part of shutting
- down due to a fatal error, which probably means we are trying to
- auto-save the session.
- * src/lread.c (check_obarray): Don't bother making the obarray
- valid if we are shutting down due to a fatal error. This avoids
- interfering with auto-saving the crashed session.
-
-2016-01-11 Paul Eggert <eggert@cs.ucla.edu>
-
- Simplify HAVE_MODULES use in mark_maybe_pointer
-
- * src/alloc.c (HAVE_MODULES): Now a constant 0 if not defined,
- so that later code can use 'if' rather than '#ifdef'.
- (mark_maybe_pointer): Simplify based on HAVE_MODULES now
- always working.
-
-2016-01-11 Paul Eggert <eggert@cs.ucla.edu>
-
- Revert attempt to use 'noexcept' in typedef
-
- This use of 'noexcept' runs afoul of the C++11 standard.
- Problem reported by Philipp Stephani in:
- http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00706.html
- * src/emacs-module.c (emacs_finalizer_function):
- Move this typedef here ...
- * src/emacs-module.h: ... from here, and use only the C
- version of the typedef. The typedef is now private since it
- is never used in the .h file now and anyway it seemed to be
- causing more confusion than it cured.
- (make_user_ptr, get_user_finalizer, set_user_finalizer):
- Open-code the type instead.
-
-2016-01-10 Eli Zaretskii <eliz@gnu.org>
-
- Update documentation of 'indirect-function'
+ * doc/lispref/numbers.texi (Random Numbers): Document more details
+ about 't' as the argument to 'random'.
- * doc/lispref/eval.texi (Function Indirection): Update the
- documentation of 'indirect-function'.
+ * etc/NEWS: Mention that '(random t)' now uses a cryptographically
+ strong seed if possible.
-2016-01-10 Eli Zaretskii <eliz@gnu.org>
+ (Bug#22202)
- Update documentation for obsoleting 'syntax-begin-function'
+2016-01-15 Eli Zaretskii <eliz@gnu.org>
- * doc/lispref/syntax.texi (Position Parse): Undocument
- 'syntax-begin-function' that is now obsolete.
+ Unhide the --no-line-directive option to 'etags'
-2016-01-10 Eli Zaretskii <eliz@gnu.org>
+ * lib-src/etags.c (print_help): Un-undocument the --no-line-directive
+ option. (Bug#22306)
- Document new features if Eshell
+ * doc/man/etags.1: Document the --no-line-directive option.
- * doc/misc/eshell.texi (Input/Output): Document the new
- '#<bufname>' syntax.
- (Input/Output): Document 'eshell-destroy-buffer-when-process-dies'.
- Disable "Key Index" generation, as there are no @kindex entries in
- this manual.
+2016-01-15 Alan J Third <alan@idiocy.org> (tiny change)
-2016-01-10 Michael Albinus <michael.albinus@gmx.de>
+ Fix picture-mode wrt double-width characters
- Handle too long commands in Tramp
+ * lisp/textmodes/picture.el (picture-insert): Check the width of
+ the character being replaced, not just that of the replacement.
+ (Bug#1808)
- * lisp/net/tramp-sh.el (tramp-sh-handle-make-symbolic-link)
- (tramp-do-file-attributes-with-ls): Send sequence of commands, in
- order to not exceed shell command line limit.
+2016-01-15 Eric Abrahamsen <eric@ericabrahamsen.net>
- * test/automated/tramp-tests.el (tramp--test-darwin-p): Remove.
- (tramp--test-utf8): Include Arabic file name, again.
+ Honor docstring of gnus-group-get-new-news
-2016-01-10 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/gnus/gnus-start.el (gnus-get-unread-articles): If the prefix arg is t,
+ but non-numeric, unconditionally consider all groups to need updating.
- * .gitattributes: *.cur and *.pif are binary files too.
+2016-01-14 Simen Heggestøyl <simenheg@gmail.com>
-2016-01-10 Stefan Monnier <monnier@iro.umontreal.ca>
+ Disallow parenthesis in non-pseudo CSS selectors
- * src/alloc.c (mark_maybe_pointer): HAVE_MODULES may be undefined
+ * lisp/textmodes/css-mode.el (css--font-lock-keywords): Disallow
+ parenthesis in selectors except for in the function notation that
+ might appear right after a pseudo-class.
+ * test/indent/scss-mode.scss: Add a test for it.
-2016-01-10 Stefan Monnier <monnier@iro.umontreal.ca>
+2016-01-14 Katsumi Yamaoka <yamaoka@jpl.org>
- * lisp/progmodes/sh-script.el (sh-smie-sh-rules): Improve indentation inside $(...)
+ * lisp/gnus/nntp.el (nntp-request-newgroups): Simplify
- * lisp/progmodes/sh-script.el (sh-smie-sh-rules): Improve indentation
- within $(...).
- * test/indent/shell.sh: Add corresponding test.
+2016-01-14 Michael Albinus <michael.albinus@gmx.de>
-2016-01-10 Stefan Monnier <monnier@iro.umontreal.ca>
+ check-maybe shall run only default tests
- * src/alloc.c (mark_maybe_pointer): Also check wide-int's emacs_value
+ * test/automated/Makefile.in (check, check-expensive): Depend on
+ mostlyclean.
+ (check-maybe): Re-run only default tests.
+ (check-doit): Use code of check-maybe.
+ (mostlyclean): Move *.log files away.
- (mark_memory): Simplify loop. Don't assume a pointer-sized word can be
- cast to Lisp_Object.
+2016-01-13 Mark Oteiza <mvoteiza@udel.edu>
-2016-01-10 Dmitry Gutov <dgutov@yandex.ru>
+ * lisp/thingatpt.el (thing-at-point-uri-schemes): Add "magnet:"
- Use short date for 'hg annotate', and output the author
+2016-01-13 Dmitry Gutov <dgutov@yandex.ru>
- * lisp/vc/vc-hg.el (vc-hg-annotate-command):
- Change '-d' to '-dq'. (Bug#21805)
- (vc-hg-annotate-switches): Default to "-u" "--follow".
- (vc-hg-annotate-re): Update to recognize the short date format
- and the optional username.
- (vc-hg-annotate-time)
- (vc-hg-annotate-extract-revision-at-line): Update accordingly.
+ Un-obsolete tags-loop-continue
- * test/automated/vc-hg.el: New file.
+ * lisp/progmodes/etags.el (tags-loop-continue): Un-obsolete.
+ http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00682.html
-2016-01-10 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-13 Eli Zaretskii <eliz@gnu.org>
- Spelling fix
+ Document obsoletion of 'intangible' and 'point-entered/left'
-2016-01-09 Eli Zaretskii <eliz@gnu.org>
+ * doc/lispref/text.texi (Special Properties): Document the new
+ properties 'cursor-intangible' and 'cursor-sensor-functions'.
+ Document the obsolete status of 'intangible', 'pointer-left',
+ and 'point-entered' properties, and of 'inhibit-point-motion-hooks'.
+ * doc/lispref/display.texi (Overlay Properties): Document that
+ 'intangible' overlay property is obsolete.
- Document user-level functions in project.el
+ * lisp/emacs-lisp/cursor-sensor.el (cursor-sensor-mode): Doc fix.
- * lisp/progmodes/project.el (project-find-file)
- (project-or-external-find-file): Add doc strings.
+2016-01-13 Eli Zaretskii <eliz@gnu.org>
-2016-01-09 Eli Zaretskii <eliz@gnu.org>
+ Updater documentation of 'looking-back'
- Document the user-level features of the Xref package
+ * doc/lispref/searching.texi (Regexp Search): Update documentation
+ of 'looking-back'. Fix markup.
- * doc/emacs/maintaining.texi (Maintaining): Add a list of
- described features.
- (Xref): New section, made out of thoroughly rewritten "Tags"
- section.
- (Find Identifiers, Looking Up Identifiers, Xref Commands)
- (Identifier Search, List Identifiers): New subsections,
- incorporating the old tags commands and the new xref commands.
- (Tags Tables, Tag Syntax, Create Tags Table, Etags Regexps):
- Section and subsections demoted to a lower level.
- * doc/emacs/search.texi (Search):
- * doc/emacs/windows.texi (Pop Up Window):
- * doc/emacs/frames.texi (Creating Frames):
- * doc/emacs/programs.texi (Imenu, Symbol Completion):
- * doc/emacs/building.texi (Grep Searching):
- * doc/emacs/dired.texi (Operating on Files):
- * doc/emacs/glossary.texi (Glossary): All references to tags changed.
+2016-01-13 Eli Zaretskii <eliz@gnu.org>
-2016-01-09 Stefan Monnier <monnier@iro.umontreal.ca>
+ Document 'pre-redisplay-functions'
- * doc/lispref/loading.texi: Add `define-type' entry for load-history
+ * doc/lispref/hooks.texi (Standard Hooks):
+ * doc/lispref/display.texi (Forcing Redisplay): Document
+ 'pre-redisplay-functions'.
- * doc/lispref/loading.texi (Where Defined): Remove incorrect
- cl-defmethod description, and add missing define-type entry.
+2016-01-13 Eli Zaretskii <eliz@gnu.org>
-2016-01-09 Eli Zaretskii <eliz@gnu.org>
+ Document the new deafault value of 'load-read-function'
- Improve doc strings and prompts in xref.el
+ * doc/lispref/loading.texi (How Programs Do Loading): Document the
+ change in the default value of 'load-read-function'.
- * lisp/progmodes/xref.el (xref-backend-functions)
- (xref-find-definitions): Doc fixes.
- (xref-query-replace): Doc fix. Improve prompts for arguments.
+2016-01-13 Eli Zaretskii <eliz@gnu.org>
-2016-01-09 Alan Mackenzie <acm@muc.de>
+ Document 'bufferpos-to-filepos' and 'filepos-to-bufferpos'
- Allow the use of `font-lock-extend-region-multiline' in CC Mode.
+ * doc/lispref/nonascii.texi (Text Representations): Document
+ 'bufferpos-to-filepos' and 'filepos-to-bufferpos'.
- * lisp/progmodes/cc-mode.el (c-font-lock-init): Remove
- `font-lock-extend-regions-wholelines' from
- `font-lock-extend-region-functions' rather than setting the latter to
- nil.
+2016-01-13 Eli Zaretskii <eliz@gnu.org>
-2016-01-09 Michael Albinus <michael.albinus@gmx.de>
+ Document the new prefix-command hooks
- Fix coding system for Tramp on OS X.
+ * doc/lispref/hooks.texi (Standard Hooks): Document
+ `prefix-command-echo-keystrokes-functions' and
+ `prefix-command-preserve-state-hook'.
- * lisp/net/tramp-compat.el: Require ucs-normalize.
+2016-01-13 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell):
- Set coding system to `utf-8-hfs' for Mac OS X.
+ Fix one more misuse of time-stamp-time-zone
- * test/automated/tramp-tests.el (tramp-test29-vc-registered):
- Flush directory properties when needed.
- (tramp--test-utf8): Include Chinese file name, again.
+ * test/etags/html-src/softwarelibero.html: Use "UTC0" rather
+ than the unportable "GMT" for time zone.
-2016-01-09 Eli Zaretskii <eliz@gnu.org>
+2016-01-13 Paul Eggert <eggert@cs.ucla.edu>
- Update 'load-history' docs
+ Fix NNTP NEWGROUPS off-by-a-few-hours bug
- * doc/lispref/loading.texi (Where Defined): Update the list of
- forms in 'load-history' by adding the forms created for the
- 'cl-generic' generics. (Bug#21422)
+ * lisp/gnus/nntp.el (nntp-request-newgroups): Format string
+ in Universal Time, since we’re telling the server “GMT”.
-2016-01-09 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-12 Paul Eggert <eggert@cs.ucla.edu>
- Fix (error ...) error
+ Update publicsuffix.txt from upstream
- Problem reported by Glenn Morris in:
- http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00561.html
- * lisp/vc/add-log.el (change-log-goto-source): Fix typos
- introduced in my Aug 28 change, where I got confused by the
- two meanings of (error ...).
+ * etc/publicsuffix.txt: Update from
+ https://publicsuffix.org/list/effective_tld_names.dat
+ dated 2016-01-12 11:52:01 UTC.
-2016-01-08 Alan Mackenzie <acm@muc.de>
+2016-01-12 Glenn Morris <rgm@gnu.org>
- Correctly analyze brace arguments in templated C++ function declarations.
+ Fix some declarations.
- * lisp/progmodes/cc-defs.el (c-go-list-forward, c-go-list-backward): add
- POS and LIMIT parameters, like the other c-go-list-* functions have.
+ * lisp/descr-text.el (internal-char-font):
+ * lisp/cedet/mode-local.el (xref-item-location):
+ * lisp/gnus/mml-smime.el (epg-key-sub-key-list)
+ (epg-sub-key-capability, epg-sub-key-validity):
+ * lisp/international/mule-util.el (internal-char-font):
+ Fix declarations.
- * lisp/progmodes/cc-engine.el (c-restore-<>-properties): Check backwards
- for a ?\( rather than a ?<. (c-looking-at-inexpr-block): Handle names
- followed by template specifiers.
+2016-01-12 Glenn Morris <rgm@gnu.org>
-2016-01-08 Glenn Morris <rgm@gnu.org>
+ Fix some custom types.
- * lisp/cedet/mode-local.el (describe-function-orig-buffer): Declare.
+ * lisp/gnus/gnus-fun.el (gnus-x-face-omit-files, gnus-face-omit-files):
+ * lisp/gnus/gnus.el (gnus-valid-select-methods):
+ * lisp/mail/rmail.el (rmail-get-coding-function):
+ * lisp/net/newst-treeview.el (newsticker-groups-filename):
+ * lisp/progmodes/hideif.el (hide-ifdef-exclude-define-regexp):
+ * lisp/textmodes/tildify.el (tildify-space-predicates):
+ * lisp/url/url-tramp.el (url-tramp-protocols):
+ Fix custom types.
- * lisp/ffap.el (ffap-latex-mode): Avoid free variable.
+2016-01-12 Glenn Morris <rgm@gnu.org>
-2016-01-08 Mark Oteiza <mvoteiza@udel.edu>
+ Add some missing version tags.
- * lisp/play/dunnet.el (dun-fix-screen): Avoid `end-of-buffer`.
+ * lisp/electric.el (electric-quote-comment)
+ (electric-quote-string, electric-quote-paragraph):
+ * lisp/epg-config.el (epg-gpgconf-program):
+ * lisp/rect.el (rectangle-preview):
+ * lisp/emacs-lisp/check-declare.el (check-declare-ext-errors):
+ * lisp/emacs-lisp/package.el (package-selected-packages)
+ (package-hidden-regexps):
+ * lisp/erc/erc.el (erc-network-hide-list, erc-channel-hide-list):
+ * lisp/eshell/em-term.el (eshell-destroy-buffer-when-process-dies):
+ * lisp/gnus/mml-sec.el (mml1991-signers, mml2015-signers)
+ (mml-smime-signers, mml1991-encrypt-to-self, mml2015-encrypt-to-self)
+ (mml-smime-encrypt-to-self, mml2015-sign-with-sender)
+ (mml-smime-sign-with-sender, mml2015-always-trust)
+ (mml-secure-fail-when-key-problem, mml-secure-key-preferences):
+ * lisp/net/browse-url.el (browse-url-conkeror-new-window-is-buffer)
+ (browse-url-conkeror-arguments):
+ * lisp/net/newst-reader.el (newsticker-download-logos):
+ * lisp/progmodes/gud.el (gud-guiler-command-name):
+ * lisp/progmodes/prog-mode.el (prettify-symbols-unprettify-at-point):
+ * lisp/progmodes/project.el (project-vc):
+ * lisp/progmodes/python.el (python-indent-guess-indent-offset-verbose)
+ (python-shell-remote-exec-path, python-shell-first-prompt-hook)
+ (python-shell-completion-native-disabled-interpreters)
+ (python-shell-completion-native-enable)
+ (python-shell-completion-native-output-timeout)
+ (python-shell-completion-native-try-output-timeout):
+ * lisp/progmodes/xref.el (xref):
+ * lisp/term/screen.el (xterm-screen-extra-capabilities):
+ * lisp/term/xterm.el (xterm-max-cut-length):
+ Add missing version tags.
-2016-01-08 Alan Mackenzie <acm@muc.de>
+2016-01-12 Glenn Morris <rgm@gnu.org>
- Respect fontification region calculated by major mode. Fixes bug #22316.
+ * test/automated/core-elisp-tests.el
+ (core-elisp-tests-1-defvar-in-let): Add a custom type.
- * lisp/font-lock.el (font-lock-extend-jit-lock-region-after-change): when a
- fontification region has been calculated by a function on
- font-lock-extend-after-change-region-function use this region rather than
- changing the end position to somewhere else.
+2016-01-12 Glenn Morris <rgm@gnu.org>
-2016-01-08 Eli Zaretskii <eliz@gnu.org>
+ * src/buffer.c (syms_of_buffer) <major-mode>: Doc fix.
- Improve documentation of Delete Selection mode
+ Remove comments that do not apply since 2005-08-09. (Bug#22349)
- * lisp/delsel.el (delete-selection-mode)
- (delete-selection-helper): Update and expand the doc strings.
- (Bug#22296)
+2016-01-12 Paul Eggert <eggert@cs.ucla.edu>
- * doc/emacs/mark.texi (Using Region): Document the behavior of
- delete commands in Delete Selection mode. (Bug#22296)
+ Merge from gnulib
- * doc/lispref/markers.texi (The Mark): Document how to add the
- support for Delete Selection mode to Lisp programs. (Bug#22296)
+ This mostly just changes "UTC" to "UTC0" for POSIX conformance.
+ It also updates to the latest version of texinfo.tex.
+ * build-aux/gitlog-to-changelog, build-aux/move-if-change:
+ * build-aux/update-copyright, doc/misc/texinfo.tex:
+ Update from gnulib.
-2016-01-08 Dmitry Gutov <dgutov@yandex.ru>
+2016-01-12 Eli Zaretskii <eliz@gnu.org>
- Fix two project-find-file issues
+ Update documentation of 'process-running-child-p'
- * lisp/progmodes/project.el (project--value-in-dir):
- Temporarily set enable-local-variables to :all.
- (project-find-file, project-or-external-find-file):
- All autoloads.
- (project--find-file-in): Require xref.
+ * doc/lispref/processes.texi (Input to Processes): Document the
+ changes in return value of 'process-running-child-p'.
-2016-01-08 Eli Zaretskii <eliz@gnu.org>
+2016-01-12 Eli Zaretskii <eliz@gnu.org>
- Clarify doc string of 'dired-current-directory'
+ Update documentation of 'deactivate-mark'.
- * lisp/dired.el (dired-current-directory): Doc fix: clarify that
- the return value might not end in a slash when called with the
- optional argument non-nil. (Bug#6273)
+ * doc/lispref/markers.texi (The Mark): Document that
+ 'deactivate-mark' is now buffer-local when set.
-2016-01-08 Eli Zaretskii <eliz@gnu.org>
+2016-01-12 Eli Zaretskii <eliz@gnu.org>
- Use the face of preceding text for displaying the ellipsis
+ Update documentation of 'completion-table-dynamic'
- * src/xdisp.c (setup_for_ellipsis): Use the face of the preceding
- text in it->saved_face_id for displaying the ellipsis, and ignore
- the face, if any, of the invisible text. (Bug#22320)
+ * doc/lispref/minibuf.texi (Programmed Completion): Document the
+ new optional argument to 'completion-table-dynamic'.
-2016-01-08 Michael Albinus <michael.albinus@gmx.de>
+2016-01-12 Eli Zaretskii <eliz@gnu.org>
- Suppress Chinese file name test for OSX in tramp-tests.el
+ Document changes in 'read-buffer' and 'read-buffer-function'
- * test/automated/tramp-tests.el (tramp--test-utf8):
- Remove instrumentation. Suppress Chinese file name test for OSX.
+ * doc/lispref/minibuf.texi (High-Level Completion): Document the
+ 4th argument to 'read-buffer' and 'read-buffer-function'.
-2016-01-08 Glenn Morris <rgm@gnu.org>
+2016-01-12 Paul Eggert <eggert@cs.ucla.edu>
- * admin/admin.el (set-version): Also handle the NEWS file.
+ Fix time-stamp-time-zone bugs introduced in July
-2016-01-08 Dmitry Gutov <dgutov@yandex.ru>
+ This fixes a bug introduced when the July changes to
+ format-time-string installed, as the changes were not
+ correctly handled in this module (Bug#22302).
+ Also, document time stamp time zones.
+ * lisp/time-stamp.el (time-stamp-time-zone): Document values better.
+ (time-stamp--format): New private function.
+ (time-stamp-string, time-stamp-string-preprocess)
+ (time-stamp-do-number): Use it.
+ * doc/emacs/files.texi (Time Stamps): Mention time zones.
+ * doc/misc/autotype.texi (Timestamps): Document time-stamp-time-zone.
- apropos-library: Skip obvious duplicates; don't error on generics
+2016-01-12 Eli Zaretskii <eliz@gnu.org>
- * lisp/apropos.el (apropos-library): Skip "was an autoload"
- entries, to avoid obvious duplicates. For each cl-defmethod
- entry, take just its function symbol (bug#21422).
+ Make piping to subprocesses more robust on MS-Windows
-2016-01-07 Dmitry Gutov <dgutov@yandex.ru>
+ * src/w32.c (sys_write): Don't write to a pipe more stuff than its
+ buffer can hold. Don't return -1 if something has been written to
+ the pipe. Zero out 'errno' before calling '_write', to avoid
+ returning a stale value. (Bug#22344)
+ * src/w32proc.c (syms_of_ntproc) <w32-pipe-buffer-size>: New variable.
+ * src/w32.c (pipe2): Use it to request a user-defined size for the
+ pipe being created.
- Add project-find-file and project-or-external-find-file
+ * etc/NEWS: Mention 'w32-pipe-buffer-size'.
- * lisp/minibuffer.el (completion-category-defaults):
- Add `project-file' category.
+ * doc/emacs/msdos.texi (Windows Processes): Document
+ 'w32-pipe-buffer-size'.
- * lisp/progmodes/project.el (project-find-file)
- (project-or-external-find-file): New commands.
- (project--find-file-in): New private function.
+2016-01-16 Stefan Monnier <monnier@iro.umontreal.ca>
- * lisp/progmodes/xref.el (xref-collect-matches): Use
- `expand-file-name' on DIR, to expand the tildes.
- (xref--find-ignores-arguments): Extract from
- `xref--rgrep-command'.
+ * lisp/emacs-lisp/syntax.el (syntax-ppss-table): New var
-2016-01-07 Leo Liu <sdl.web@gmail.com>
+ (syntax-ppss):
+ * lisp/font-lock.el (font-lock-fontify-syntactically-region): Use it.
- Add defvar-local to lisp-imenu-generic-expression
+2016-01-16 Stefan Monnier <monnier@iro.umontreal.ca>
- * lisp/emacs-lisp/lisp-mode.el (lisp-imenu-generic-expression): Add
- defvar-local.
+ lisp/nxml: Use syntax-tables for comments
-2016-01-07 Leo Liu <sdl.web@gmail.com>
+ * lisp/nxml/nxml-mode.el (nxml-set-face): Prepend.
+ (nxml-mode): Set syntax-ppss-table.
+ Use sgml-syntax-propertize-function for syntax-propertize-function.
+ Let font-lock highlight strings and comments.
+ (nxml-degrade): Don't touch "nxml-inside" property any more.
+ (nxml-after-change, nxml-after-change1): Remove functions.
+ (comment): Don't set fontify rule any more.
+ (nxml-fontify-attribute): Don't highlight the value any more.
+ (nxml-namespace-attribute-value-delimiter, nxml-namespace-attribute-value)
+ (nxml-comment-delimiter, nxml-comment-content): Remove faces.
- Revert commit b1e3d14845517bfa9fa5d6d3840f3ab3160306fd
+ * lisp/nxml/nxml-rap.el (nxml-scan-end): Remove.
+ (nxml-get-inside, nxml-inside-start, nxml-inside-end): Use syntax-ppss.
+ (nxml-clear-inside, nxml-set-inside): Remove.
+ (nxml-scan-after-change): Remove function.
+ (nxml-scan-prolog, nxml-tokenize-forward): Simplify.
+ (nxml-ensure-scan-up-to-date): Use syntax-propertize.
+ (nxml-move-outside-backwards):
+ * lisp/nxml/nxml-outln.el (nxml-section-tag-backward): Adjust to new
+ nxml-inside-start behavior.
- * lisp/emacs-lisp/easy-mmode.el (define-minor-mode):
- Don't declare (indent 1).
+ * lisp/nxml/nxml-util.el (nxml-debug-set-inside)
+ (nxml-debug-clear-inside): Remove macros.
-2016-01-07 Glenn Morris <rgm@gnu.org>
+ * lisp/nxml/xmltok.el (xmltok-forward-special): Remove function.
+ (xmltok-scan-after-comment-open): Simplify.
- * lisp/emacs-lisp/autoload.el (autoload-find-destination): Doc fix.
+2016-01-16 Stefan Monnier <monnier@iro.umontreal.ca>
-2016-01-07 Glenn Morris <rgm@gnu.org>
+ * elisp-mode.el (elisp--font-lock-flush-elisp-buffers): Fix comment
- * lisp/emacs-lisp/autoload.el (autoload-find-destination):
+2016-01-16 Stefan Monnier <monnier@iro.umontreal.ca>
- Avoid specifying the length of a time object (it has not been "2"
- for some time).
+ * lisp/nxml: Use standard completion; it also works for company-mode
-2016-01-06 Andreas Schwab <schwab@linux-m68k.org>
+ * lisp/nxml/nxml-mode.el (nxml-complete): Obsolete.
+ (nxml-completion-at-point-function): Remove.
+ (nxml-mode): Don't set completion-at-point-functions.
+ * lisp/nxml/rng-nxml.el (rng-nxml-mode-init): Set it here instead.
+ (rng-completion-at-point): Rename from rng-complete and mark it
+ non-interactive. It is now to be used as completion-at-point-function.
+ (rng-complete-tag, rng-complete-end-tag, rng-complete-attribute-name)
+ (rng-complete-attribute-value): Don't perform completion, but return
+ completion data instead.
+ (rng-complete-qname-function, rng-generate-qname-list): Add a few
+ arguments, previously passed via dynamic coping.
+ (rng-strings-to-completion-table): Rename from
+ rng-strings-to-completion-alist. Don't return an alist. Don't both
+ sorting and uniquifying.
- Properly encode/decode base64Binary data in SOAP
+ * lisp/nxml/rng-util.el (rng-complete-before-point): Delete function.
+ (rng-completion-exact-p, rng-quote-string): Delete functions.
- * lisp/net/soap-client.el (soap-encode-xs-basic-type): Encode
- base64Binary value as utf-8.
- (soap-decode-xs-basic-type): Decode base64Binary value as utf-8.
+ * lisp/nxml/rng-valid.el (rng-recover-start-tag-open)
+ (rng-missing-attributes-message, rng-missing-element-message)
+ (rng-mark-missing-end-tags): Use explicit ".." in formats rather than
+ calling rng-quote-string everywhere.
-2016-01-06 Eli Zaretskii <eliz@gnu.org>
+2016-01-16 Stefan Monnier <monnier@iro.umontreal.ca>
- Obey coding-system-for-write when writing stdout/stderr in batch
+ Use sgml-electric-tag-pair-mode also in nxml-mode
- * src/print.c (printchar_to_stream):
- * src/xdisp.c (message_to_stderr): If coding-system-for-write has
- a non-nil value, use it to encode output in preference to
- locale-coding-system. See the discussions in
- http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00048.html
- for the details.
+ * lisp/nxml/rng-nxml.el: Require sgml-mode.
+ (rng-nxml-easy-menu): Add entry for sgml-electric-tag-pair-mode.
+ (rng-complete-qname-function): Use complete-with-action.
- * doc/lispref/os.texi (Terminal Output): Document how to send
- non-ASCII text via 'send-string-to-terminal'.
- (Batch Mode): Document how text written to standard streams is
- encoded. Fix inaccuracy regarding which output streams are used
- by output functions in batch mode.
+ * lisp/textmodes/sgml-mode.el (sgml-electric-tag-pair-before-change-function):
+ Let-bind forward-sexp-function, since nxml-mode binds it to
+ something incompatible.
-2016-01-06 Xue Fuqiao <xfq.free@gmail.com>
+ * lisp/nxml/nxml-mode.el: Use setq-local and defvar-local.
- * doc/misc/efaq.texi (Packages that do not come with Emacs):
- Update the URI of MELPA and marmalade-repo. Reported by CHENG Gao
- <chenggao@royau.me> in
- https://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00390.html.
+2016-01-15 Stefan Monnier <monnier@iro.umontreal.ca>
-2016-01-06 Maksim Golubev <maksim.golubev72@gmail.com> (tiny change)
+ * xmltok.el: Mark the "sole --" rather than the comment opener
- * lisp/progmodes/opascal.el (opascal-mode-syntax-table):
+ * lisp/nxml/xmltok.el (xmltok-scan-after-comment-open): Put the error
+ marker on the "sole --" rather than on the comment opener.
- Fix backslash. (Bug#22224)
+2016-01-15 Sam Steingold <sds@gnu.org>
-2016-01-06 Federico Beffa <beffa@ieee.org> (tiny change)
+ replace `tramp-compat-split-string' (removed) with `split-string'
- * lisp/progmodes/xscheme.el (xscheme-prompt-for-expression-exit):
+ (python-shell-tramp-refresh-process-environment)
+ (python-shell-calculate-pythonpath): use `split-string'
+ instead of defunct `tramp-compat-split-string'
- Make it actually work. (Bug#22265)
+2016-01-15 Stefan Monnier <monnier@iro.umontreal.ca>
-2016-01-05 Alan Mackenzie <acm@muc.de>
+ Update nXML to use Emacs's Unicode support, and lexical-binding
- Remove function wrongly on AWK Mode value of context fontification hook.
+ * etc/nxml/*.el: Remove obsolete char-name files.
+ * lisp/nxml/xsd-regexp.el (xsdre-range-list-difference): Remove unused
+ var `next'.
+ * lisp/nxml/rng-nxml.el (rng-set-state-after): Don't assume point-min==1.
+ * lisp/nxml/rng-match.el (rng-update-match-state): Simplify.
+ * lisp/nxml/nxml-outln.el (nxml-outline-state-transform-exceptions)
+ (nxml-target-section-pos, nxml-depth-in-target-section)
+ (nxml-outline-state-transform-alist)
+ (nxml-outline-display-section-tag-function): Move decl before first use.
+ * lisp/nxml/nxml-mode.el (nxml-char-name-ignore-case)
+ (nxml-char-name-alist, nxml-char-name-table)
+ (nxml-autoload-char-name-set-list, nxml-named-char-history): Remove vars.
+ (nxml-enable-char-name-set, nxml-disable-char-name-set)
+ (nxml-char-name-set-enabled-p, nxml-autoload-char-name-set)
+ (nxml-define-char-name-set, nxml-get-char-name): Remove functions.
+ (nxml-insert-named-char): Use read-char-by-name instead.
+ (nxml-char-ref-display-extra): Use get-char-code-property.
+ * lisp/nxml/nxml-maint.el (nxml-create-unicode-char-name-sets):
+ Remove function.
+ * lisp/nxml/nxml-glyph.el, lisp/nxml/nxml-uchnm.el: Remove files.
- * lisp/progmodes/cc-langs.el (c-before-context-fontification-functions):
- swap order of entries so that awk's entry isn't superseded by the default.
+2016-01-15 Michael Albinus <michael.albinus@gmx.de>
- * lisp/progmodes/cc-mode.el (c-before-context-fl-expand-region): Correct
- to handle nil value of c-before-context-fontification-functions.
+ Add "sg" method to Tramp
-2016-01-05 Paul Eggert <eggert@cs.ucla.edu>
+ * doc/misc/tramp.texi (Inline methods): Add "sg" method.
+ (Customizing Completion): Add function `tramp-parse-etc-group'.
- * src/buffer.c: Stick with ASCII in doc string.
+ * lisp/net/tramp-sh.el (tramp-methods) <sg>: Add. (Bug#22329)
+ (tramp-completion-function-alist-sg): New defconst.
+ (top): Completion function for "sg" is
+ `tramp-completion-function-alist-sg'.
-2016-01-05 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/net/tramp.el (tramp-completion-function-alist): Adapt docstring.
+ (tramp-parse-etc-group, tramp-parse-etc-group-group): New defuns.
- Reword transient-mark-mode doc string
+2016-01-14 Michael Albinus <michael.albinus@gmx.de>
- * src/buffer.c (syms_of_buffer): Reword doc string to avoid confusion.
- The value 'lambda (literally) can be interpreted as (quote lambda),
- which is not intended here; we want just the lambda symbol.
+ Remove XEmacs compatibility in Tramp
+
+ * doc/misc/tramp.texi: Replace flags by their hard coded name.
+ Remove unused flags and the enclosed alternative text for XEmacs.
+
+ * doc/misc/trampver.texi: Use "Tramp" CamelCase. Rename "emacs"
+ and "xemacs" flags to "unified" and "separate". Remove flags
+ "emacsgw", "emacsname", "emacsdir", "ftppackagename",
+ "emacsothername", "emacsotherdir" and "emacsotherfilename".
+ (trampver):
+ * lisp/net/trampver.el (tramp-version): Set to "2.3.0-pre".
+
+ * lisp/net/tramp.el (bkup-backup-directory-info)
+ (directory-sep-char, ls-lisp-use-insert-directory-program)
+ (outline-regexp, tramp-backup-directory-alist)
+ (tramp-default-method, tramp-shell-prompt-pattern, tramp-syntax)
+ (tramp-file-name-regexp-unified)
+ (tramp-file-name-regexp-separate)
+ (tramp-completion-file-name-regexp-unified)
+ (tramp-completion-file-name-regexp-separate, tramp-chunksize)
+ (tramp-get-method-parameter, tramp-find-method, tramp-find-user)
+ (tramp-debug-message, tramp-progress-reporter-update)
+ (with-tramp-progress-reporter)
+ (tramp-rfn-eshadow-setup-minibuffer)
+ (rfn-eshadow-setup-minibuffer-hook, tramp-unload-hook)
+ (tramp-rfn-eshadow-update-overlay)
+ (rfn-eshadow-update-overlay-hook, tramp-default-file-modes)
+ (tramp-file-name-for-operation)
+ (tramp-completion-file-name-handler)
+ (tramp-autoload-file-name-handler, tramp-completion-mode-p)
+ (tramp-handle-directory-files)
+ (tramp-handle-directory-files-and-attributes)
+ (tramp-handle-dired-uncache, tramp-handle-find-backup-file-name)
+ (tramp-handle-insert-file-contents, tramp-handle-load)
+ (tramp-handle-shell-command)
+ (tramp-handle-verify-visited-file-modtime)
+ (tramp-handle-file-notify-valid-p, tramp-accept-process-output)
+ (tramp-check-for-regexp, tramp-wait-for-regexp)
+ (tramp-send-string, tramp-mode-string-to-int)
+ (tramp-get-local-gid, tramp-check-cached-permissions)
+ (tramp-get-remote-tmpdir, tramp-make-tramp-temp-file)
+ (auto-save-file-name-transforms)
+ (tramp-handle-make-auto-save-file-name, tramp-read-passwd)
+ (tramp-clear-passwd, tramp-time-diff):
+ * lisp/net/tramp-adb.el (directory-listing-before-filename-regexp)
+ (directory-sep-char, tramp-adb-file-name-handler-alist)
+ (tramp-adb-parse-device-names)
+ (tramp-adb-handle-expand-file-name)
+ (tramp-adb-handle-file-truename, tramp-adb--gnu-switches-to-ash)
+ (tramp-adb-handle-file-local-copy)
+ (tramp-adb-handle-write-region, tramp-adb-handle-set-file-modes)
+ (tramp-adb-handle-rename-file, tramp-adb-handle-process-file)
+ (tramp-adb-handle-shell-command)
+ (tramp-adb-handle-start-file-process, tramp-adb-get-device)
+ (tramp-adb-maybe-open-connection):
+ * lisp/net/tramp-cache.el (tramp-persistency-file-name)
+ (tramp-cache-print):
+ * lisp/net/tramp-cmds.el (tramp-cleanup-all-connections)
+ (tramp-bug, tramp-reporter-dump-variable)
+ (tramp-load-report-modules, tramp-append-tramp-buffers):
+ * lisp/net/tramp-compat.el (tramp-compat-funcall)
+ (tramp-advice-file-expand-wildcards)
+ (tramp-compat-temporary-file-directory)
+ (tramp-compat-make-temp-file, tramp-compat-copy-file)
+ (tramp-compat-delete-directory, )
+ (tramp-compat-process-running-p):
+ * lisp/net/tramp-ftp.el (tramp-methods) <ftp>:
+ (tramp-default-method-alist, tramp-foreign-file-name-handler-alist):
+ * lisp/net/tramp-gvfs.el (tramp-gvfs-file-name-handler-alist)
+ (tramp-gvfs-do-copy-or-rename-file, tramp-gvfs-handle-copy-file)
+ (tramp-gvfs-handle-file-local-copy)
+ (tramp-gvfs-handle-file-name-all-completions)
+ (tramp-gvfs-handle-file-notify-add-watch)
+ (tramp-gvfs-monitor-file-process-filter)
+ (tramp-gvfs-handle-file-readable-p)
+ (tramp-gvfs-handle-rename-file, tramp-gvfs-handle-write-region)
+ (tramp-gvfs-file-name, tramp-gvfs-handler-askquestion)
+ (tramp-gvfs-maybe-open-connection)
+ (tramp-gvfs-parse-device-names):
+ * lisp/net/tramp-gw.el (tramp-gw-aux-proc-sentinel)
+ (tramp-gw-open-connection, tramp-gw-open-network-stream):
+ * lisp/net/tramp-sh.el (directory-sep-char)
+ (tramp-sh-file-name-handler-alist)
+ (tramp-sh-handle-file-truename)
+ (tramp-sh-handle-set-visited-file-modtime)
+ (tramp-sh-handle-verify-visited-file-modtime)
+ (tramp-sh-handle-set-file-modes, tramp-sh-handle-set-file-times)
+ (tramp-sh-handle-file-acl)
+ (tramp-sh-handle-file-name-all-completions)
+ (tramp-sh-handle-copy-file, tramp-sh-handle-rename-file)
+ (tramp-do-copy-or-rename-file-directly)
+ (tramp-do-copy-or-rename-file-out-of-band)
+ (dired-compress-file-suffixes, dired-remove-file)
+ (tramp-sh-handle-dired-compress-file)
+ (tramp-sh-handle-insert-directory)
+ (tramp-sh-handle-expand-file-name)
+ (tramp-sh-handle-start-file-process)
+ (tramp-sh-handle-process-file, tramp-sh-handle-file-local-copy)
+ (tramp-sh-handle-write-region, tramp-sh-handle-vc-registered)
+ (tramp-sh-handle-file-notify-add-watch)
+ (tramp-sh-gvfs-monitor-dir-process-filter)
+ (tramp-sh-inotifywait-process-filter, tramp-maybe-send-script)
+ (tramp-find-executable)
+ (tramp-open-connection-setup-interactive-shell)
+ (tramp-find-inline-encoding, tramp-compute-multi-hops)
+ (tramp-maybe-open-connection, tramp-convert-file-attributes)
+ (tramp-get-remote-path, tramp-get-remote-touch):
+ * lisp/net/tramp-smb.el (tramp-smb-file-name-handler-alist)
+ (tramp-smb-handle-copy-directory, tramp-smb-handle-copy-file)
+ (tramp-smb-handle-delete-directory)
+ (tramp-smb-handle-directory-files, tramp-smb-handle-file-acl)
+ (tramp-smb-handle-make-directory-internal)
+ (tramp-smb-handle-process-file, tramp-smb-handle-rename-file)
+ (tramp-smb-handle-set-file-acl, tramp-smb-handle-set-file-modes)
+ (tramp-smb-handle-write-region, tramp-smb-get-file-entries)
+ (tramp-smb-get-cifs-capabilities)
+ (tramp-smb-maybe-open-connection):
+ * lisp/net/trampver.el (tramp-repository-get-version):
+ Remove XEmacs compat code.
+
+ * lisp/net/tramp-cmds.el (mml-mode, mml-insert-empty-tag)
+ (reporter-dump-variable): Declare functions.
+
+ * lisp/net/tramp.el (tramp-bkup-backup-directory-info)
+ (tramp-advice-minibuffer-electric-separator)
+ (tramp-advice-minibuffer-electric-tilde)
+ (tramp-handle-unhandled-file-name-directory):
+ * lisp/net/tramp-compat.el (tramp-compat-with-temp-message)
+ (tramp-compat-font-lock-add-keywords)
+ (tramp-compat-load, tramp-compat-number-sequence)
+ (tramp-compat-split-string, tramp-compat-delete-dups):
+ * lisp/net/tramp-sh.el (tramp-sh-handle-insert-file-contents-literally):
+ Remove.
-2016-01-05 Eli Zaretskii <eliz@gnu.org>
+ * lisp/net/tramp-sh.el (tramp-methods) <psftp>: This does not work
+ recursively.
- Update doc string of 'selective-display'
+2016-01-14 K. Handa <handa@gnu.org>
- * src/buffer.c (syms_of_buffer) <selective-display>: Say that
- using it with the value of 't' is obsolete. (Bug#1092)
+ fix previous change of src/ftfont.c (ftfont_shape_by_flt)
-2016-01-05 Alan Mackenzie <acm@muc.de>
+ * src/ftfont.c (ftfont_shape_by_flt): Fix previous change. Access the
+ second glyph only when there are enough glyphs.
- Make C++ buffers writeable when writing their initial text properties.
+2016-01-13 Glenn Morris <rgm@gnu.org>
- This is a correction to yesterday's CC Mode patch.
+ * src/buffer.c (Fset_buffer_major_mode): Allow default major-mode,
- * lisp/progmodes/cc-engine.el (c-before-change-check-<>-operators): Put
- c-save-buffer-state around the function rather than a mere `let'.
+ or its hook, to move point. (Bug#22348)
-2016-01-05 Michael Albinus <michael.albinus@gmx.de>
+2016-01-12 Michael Albinus <michael.albinus@gmx.de>
- Additional changes for "make check-expensive"
+ Merge missing commit from emacs-25 branch
- * CONTRIBUTE : Encourage use of ":tags '(:expensive-test)".
- Explain make target `check-expensive'.
+ * test/Makefile.in (SELECTOR_DEFAULT, SELECTOR_EXPENSIVE, SELECTOR):
+ New variables.
+ (check-expensive, check-doit): New targets.
- * etc/NEWS: Mention new make target `check-expensive'.
+ * Makefile.in (check-expensive): New target.
- * test/automated/Makefile.in (check-doit): New target.
- (check, check-expensive): Use it.
+ * test/lisp/autorevert-tests.el
+ (auto-revert-test01-auto-revert-several-files):
+ * test/lisp/filenotify-tests.el (file-notify--deftest-remote)
+ (file-notify-test06-many-events):
+ * test/lisp/net/tramp-tests.el (tramp-test26-process-file)
+ (tramp-test27-start-file-process, tramp-test28-shell-command)
+ (tramp-test29-vc-registered)
+ (tramp-test31-special-characters-with-stat)
+ (tramp-test31-special-characters-with-perl)
+ (tramp-test31-special-characters-with-ls)
+ (tramp-test32-utf8-with-stat, tramp-test32-utf8-with-perl)
+ (tramp-test32-utf8-with-ls, tramp-test33-asynchronous-requests)
+ (tramp-test35-unload): Tag the tests as :expensive-test.
-2016-01-04 Alan Mackenzie <acm@muc.de>
+2016-01-12 John Wiegley <johnw@newartisans.com>
+
+ Merge from origin/emacs-25
+
+ 1f6898d test/automated/vc-hg.el: Support out-of-tree build
+ 3adb56e Minor change in tramp-tests.el
+ 2b535ba ; * etc/NEWS: Update the js.el entry.
+ 76b518c * etc/HELLO: Add Armenian and Mongolian greetings.
+ b51f1ef Java Mode: Fontify identifiers in the presence of annotations.
+ 36b9539 Avoid an infloop when we run out of memory
+ 2006752 Avoid unnecessary failures of auto-saving after fatal error
+ eef6784 Simplify HAVE_MODULES use in mark_maybe_pointer
+ 552694a Revert attempt to use 'noexcept' in typedef
+ 6ad0d39 Update documentation of 'indirect-function'
+ c6a5314 ; * etc/NEWS: Move entry of 'inhibit-point-motion-hooks'.
+ 303141a Update documentation for obsoleting 'syntax-begin-function'
+ 4e6f61c ; * etc/NEWS: Mark documented and not-to-be-documented entries.
+ e667bbb Document new features if Eshell
+ 9c4e4e0 ; * etc/NEWS: Update EUDC entries.
+ 1089dc9 Handle too long commands in Tramp
+ 684eb58 * .gitattributes: *.cur and *.pif are binary files too.
+ d2c7fda * src/alloc.c (mark_maybe_pointer): HAVE_MODULES may be undefined
+ bd3f53d * sh-script.el (sh-smie-sh-rules): Improve indentation inside $(...)
+ 09b2b8a * src/alloc.c (mark_maybe_pointer): Also check wide-int's emacs_value
+ cca0f93 ; Account for spaces before the filename
+ c71e1e8 Use short date for 'hg annotate', and output the author
+ f50027b Spelling fix
+ c7dff67 ; * etc/NEWS: Fix the Xref entries that got separated.
+ cc140bc Document user-level functions in project.el
+ f8208b6 Document the user-level features of the Xref package
+ b131fb8 * loading.texi: Add `define-type' entry for load-history
+ db3c2a8 Improve doc strings and prompts in xref.el
+ f6117ef Allow the use of `font-lock-extend-region-multiline' in CC Mode.
+ 90fd798 Fix coding system for Tramp on OS X.
+ e985a0e ; * etc/NEWS: Mark the 'check-expensive' entry not to be documented.
+ 9dfcbf0 Update 'load-history' docs
+ 207e191 Fix (error ...) error
+ 457738f Correctly analyze brace arguments in templated C++ function declarations.
+ d57724a * lisp/cedet/mode-local.el (describe-function-orig-buffer): Declare.
+ 2a9532d * lisp/ffap.el (ffap-latex-mode): Avoid free variable.
+ 1a6b084 * lisp/play/dunnet.el (dun-fix-screen): Avoid `end-of-buffer`.
+ 8be046f Respect fontification region calculated by major mode. Fixes bug #22316.
+ 4b37cba Improve documentation of Delete Selection mode
+ a034dd3 Fix two project-find-file issues
+ 30abf29 Clarify doc string of 'dired-current-directory'
+ e990bb2 Use the face of preceding text for displaying the ellipsis
+ 5810ac3 Suppress Chinese file name test for OSX in tramp-tests.el
+ eeb710a ; * lisp/startup.el: Sentences end with two spaces.
+ 428b3de * admin/admin.el (set-version): Also handle the NEWS file.
+ 648de81 ; Add NEWS entry for project.el
+ 671862f apropos-library: Skip obvious duplicates; don't error on generics
+ 51668a5 ; Grammar fix
+ ed41d11 Add project-find-file and project-or-external-find-file
+ 056da45 ; Improve commentary in 'setup_for_ellipsis'
+ 269d008 ; Improve docstring for `inhibit-startup-echo-area-message'
+
+2016-01-12 John Wiegley <johnw@newartisans.com>
+
+ Merge from origin/emacs-25
+
+ ce4a052 Add defvar-local to lisp-imenu-generic-expression
+ a0121bc Revert commit b1e3d14845517bfa9fa5d6d3840f3ab3160306fd
+ 76fe2d5 * lisp/emacs-lisp/autoload.el (autoload-find-destination): Doc fix.
+ 1ae088f * lisp/emacs-lisp/autoload.el (autoload-find-destination):
+ b6b47af Properly encode/decode base64Binary data in SOAP
+ c632466 Obey coding-system-for-write when writing stdout/stderr in batch
+ 2f32cb5 * doc/misc/efaq.texi (Packages that do not come with Emacs):
+ Update the URI of MELPA and marmalade-repo.
+ Reported by CHENG Goa <chenggao@royau.me> in
+ https://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00390.html.
+ d2937aa * lisp/progmodes/opascal.el (opascal-mode-syntax-table):
+ 5330c25 * lisp/progmodes/xscheme.el (xscheme-prompt-for-expression-exit):
+ 7380990 Remove function wrongly on AWK Mode value of context
+ fontification hook.
+ d400753 * src/buffer.c: Stick with ASCII in doc string.
+ 221240c Reword transient-mark-mode doc string
+ 977d3ea Update doc string of 'selective-display'
+ 229c3fa Make C++ buffers writeable when writing their initial text
+ properties.
+ f5c762c Additional changes for "make check-expensive"
+ 1729cf3 ; * admin/MAINTAINERS: Remove myself.
+ 33219d3 Apply text properties for <, > in new after-change function
+ (C++ Java Modes).
+
+2016-01-12 John Wiegley <johnw@newartisans.com>
+
+ Merge from origin/emacs-25
+
+ 9fb185a shr-tag-video bug fix
+ 6300655 Minor fixes in tramp-tests.el
+ 50575b1 Ensure redisplay when 'truncate-lines' is set
+ 0d9e80d Fix a doc string of 'transient-mark-mode'
+ 0000ae5 MS-Windows followup to latest gnulib update
+ 4bc5e02 Spelling fix
+ f1093f7 Do secure signed Bcc handling
+
+2016-01-12 John Wiegley <johnw@newartisans.com>
+
+ Merge from origin/emacs-25
+
+ 861022f * doc/misc/texinfo.tex: Revert unwanted copyright change.
+ 46e47a5 ; * etc/refcards/ru-refcard.tex (cyear): Update via M-x set-copyright.
+ 71ea138 * lisp/align.el (align): Simplify a lambda
+ 5618a50 * lisp/align.el (align): Fix arg order in call to `align-region'
+ 1f680db Fix compilation next-error in buffers with selective-display
+ d20a948 * nsm.el (nsm-check-protocol): Fix typo in the message.
+ 1da116f Add SHA1 warnings for high network security settings
+ e48bacd ; * etc/NEWS: Typo fix.
+
+2016-01-12 John Wiegley <johnw@newartisans.com>
+
+ Merge from origin/emacs-25
+
+ 43662a2 ; Clarify that xref is still experimental
+ 0a6e6ca ; * admin/release-process: Remove some obsolete records.
+ c2e9e3d * lisp/progmodes/fortran.el (fortran-make-syntax-propertize-function):
+ 8637f3d (semantic-symref-derive-find-filepatterns): Return a list
+ 0a7ad07 ; Re-arrange xref-related entries in NEWS.
+ fe903ef Fix xref-find-references on MS-Windows
+ 55a28d8 ; Fixed visual bell artifact problem on NextStep.
+ d064034 Document new features of tildify-mode
+ 964bea7 Document new features of Whitespace mode
+ cd68f47 Improve documentation of new Hide-IfDef features
+ 723b8bf Fix regression in font-locking cl-assert and cl-check-type
+
+2016-01-12 John Wiegley <johnw@newartisans.com>
+
+ Merge from origin/emacs-25
+
+ ef33bc7 Spelling and grammar fixes
+ 9c3dbab Fix copyright years by hand
+ 0e96320 Update copyright year to 2016
+
+2016-01-12 John Wiegley <johnw@newartisans.com>
+
+ Merge from origin/emacs-25
+
+ 9ee6ecb lisp/emacs-lisp/chart.el (chart-new-buffer): Move to silence byte compiler.
+ 526d80c Port chart.el methods to cl-generic.
+ 410bb69 Add nt/INSTALL.W64 build instructions
+ 8f5b524 Add new input method 'programmer-dvorak'
+ 6d11f6e Allow to invoke original M-TAB binding in 'flyspell-prog-mode'
+ bb83bb1 Fix EWW rendering of long RTL lines
+ b1a8509 fix bug#21054
+ ce5ad12 Clean up cairo printing code
+
+2016-01-12 John Wiegley <johnw@newartisans.com>
+
+ Merge from origin/emacs-25
+
+ 6ee327d Add handle_user_signal_hook
+ 47580e0 Avoid writing to purespace
+ 0588be7 Remove unused variable
+ 89e7483 * configure.ac: Find libxml2 headers in Xcode SDK dir on Darwin.
+ 3b95e9c Use posix_openpt instead of openpty on Darwin
+ 86312ff Document support for ':documentation' in Lisp mode
+ c930e75b Document new features of TeX mode
+ 7c83d84 Clarify docs of hscroll in RTL text
+ 4c8f8db Fix rendering of HTML pages that use character composition
+ a8d37ca Avoid some compiler warnings in w32.c
+ ce106f3de Undo ill-advised change
+ be0bba4 Unbreak completion in python-mode buffers
- Apply text properties for <, > in new after-change function (C++ Java Modes).
+2016-01-11 Dmitry Gutov <dgutov@yandex.ru>
- These are category/syntax-table properties to give < and > paren syntax.
- Also apply certain `c-type' text properties to the insides of <..> constructs
- to ensure that identifiers contained by them get fontified. This patch fixes
- bug #681.
+ test/automated/vc-hg.el: Support out-of-tree build
- * lisp/progmodes/cc-cmds.el (c-electric-lt-gt): Reformulate due to new
- after-change action.
+ * test/automated/vc-hg.el
+ (vc-hg-annotate-extract-revision-at-line-with-filename)
+ (vc-hg-annotate-extract-revision-at-line-with-both):
+ Don't refer to source-directory.
+ http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00755.html
- * lisp/progmodes/cc-engine.el (c-before-change-check-<>-operators): Expand
- change region to include <s and >s which might not be already marked as
- parens, rather than just when paren text properties are removed.
- (c-restore-<>-properties): New after-change function, which applies text
- properties marking < and > with paren syntax.
+2016-01-11 Michael Albinus <michael.albinus@gmx.de>
- * lisp/progmodes/cc-fonts.el (c-font-lock-declarations): Ensure `c-type'
- properties are applied to the interiors of <...> constructs, to ensure
- fontification of identifiers there.
-
- * lisp/progmodes/cc-langs.el (c-before-font-lock-functions): Add
- c-restore-<>-properties to this list for C++ and Java.
+ Minor change in tramp-tests.el
- * lisp/progmodes/cc-mode.el (c-common-init): When invoking
- c-before-font-lock-functions, exclude c-restore-<>-properties from the
- functions invoked.
- (c-before-change): Initialize c-new-BEG/END here (rather than c-after-change)
- to allow modification by before-change functions.
- (c-after-change): Amend c-new-END here, rather than initializing it and
- c-new-BEG.
+ * test/automated/tramp-tests.el (tramp-test29-vc-registered):
+ Use `dired-uncache' instead of a Tramp internal function.
-2016-01-04 Michael Albinus <michael.albinus@gmx.de>
+2016-01-11 Peter Feigl <peter.feigl@nexoid.at>
- Merge branch 'emacs-25' of git.sv.gnu.org:/srv/git/emacs into emacs-25
+ * etc/HELLO: Add Armenian and Mongolian greetings.
-2016-01-04 Michael Albinus <michael.albinus@gmx.de>
+ (Bug#22346)
- Introduce check-expensive tests.
+2016-01-11 Alan Mackenzie <acm@muc.de>
- * Makefile.in (check-expensive):
- * test/automated/Makefile.in (check-expensive): New target.
+ Java Mode: Fontify identifiers in the presence of annotations.
- * test/automated/auto-revert-tests.el
- (auto-revert-test01-auto-revert-several-files):
- * test/automated/file-notify-tests.el (file-notify--deftest-remote):
- * test/automated/tramp-tests.el (tramp-test26-process-file)
- (tramp-test27-start-file-process, tramp-test28-shell-command)
- (tramp-test29-vc-registered)
- (tramp-test31-special-characters-with-stat)
- (tramp-test31-special-characters-with-perl)
- (tramp-test31-special-characters-with-ls)
- (tramp-test32-utf8-with-stat, tramp-test32-utf8-with-perl)
- (tramp-test32-utf8-with-ls, tramp-test33-asynchronous-requests)
- (tramp-test35-unload): Tag the tests as :expensive-test.
+ * lisp/progmodes/cc-engine.el (c-forward-annotation): Tidy up the coding:
+ Don't move point when the defun fails.
+ (c-forward-decl-or-cast-1): Correct a usage of match data.
-2016-01-04 Lars Magne Ingebrigtsen <larsi@gnus.org>
+ * lisp/progmodes/cc-fonts.el (c-font-lock-maybe-decl-faces): Remove.
+ (c-font-lock-declarations): Use the new c-maybe-decl-faces in place of the
+ removed variable.
- shr-tag-video bug fix
+ * lisp/progmodes/cc-langs.el (c-maybe-decl-faces): New language variable.
- * shr.el (shr-tag-video): Protect against the `poster' being
- empty.
+2016-01-11 Eli Zaretskii <eliz@gnu.org>
-2016-01-04 Michael Albinus <michael.albinus@gmx.de>
+ Avoid an infloop when we run out of memory
- Minor fixes in tramp-tests.el
+ * src/alloc.c (garbage_collect_1): Don't bother saving and
+ restoring the echo-area message if we are GC'ing after running out
+ of memory. This avoids an infloop due to repeated attempts to
+ allocate memory for the cons cell needed to save the message,
+ which signals the memory-full error, which attempts to save the
+ echo-area message, which signals memory-full again, etc.
- * test/automated/tramp-tests.el (tramp-test26-process-file):
- Move point properly.
- (tramp-test29-vc-registered): Work with relative file names.
+2016-01-11 Eli Zaretskii <eliz@gnu.org>
-2016-01-04 Eli Zaretskii <eliz@gnu.org>
+ Avoid unnecessary failures of auto-saving after fatal error
- Ensure redisplay when 'truncate-lines' is set
+ * src/w32.c (map_w32_filename): Avoid non-trivial system calls for
+ the benefit of FAT volumes if we are called as part of shutting
+ down due to a fatal error, which probably means we are trying to
+ auto-save the session.
+ * src/lread.c (check_obarray): Don't bother making the obarray
+ valid if we are shutting down due to a fatal error. This avoids
+ interfering with auto-saving the crashed session.
- * lisp/frame.el (redisplay--variables): Add 'truncate-lines'.
- (Bug#22303)
+2016-01-11 Paul Eggert <eggert@cs.ucla.edu>
-2016-01-04 Eli Zaretskii <eliz@gnu.org>
+ Simplify HAVE_MODULES use in mark_maybe_pointer
- Fix a doc string of 'transient-mark-mode'
+ * src/alloc.c (HAVE_MODULES): Now a constant 0 if not defined,
+ so that later code can use 'if' rather than '#ifdef'.
+ (mark_maybe_pointer): Simplify based on HAVE_MODULES now
+ always working.
- * src/buffer.c (syms_of_buffer) <transient-mark-mode>: Prevent
- "lambda" in doc string from becoming a link to lambda expressions.
+2016-01-11 Paul Eggert <eggert@cs.ucla.edu>
-2016-01-04 Eli Zaretskii <eliz@gnu.org>
+ Revert attempt to use 'noexcept' in typedef
- MS-Windows followup to latest gnulib update
+ This use of 'noexcept' runs afoul of the C++11 standard.
+ Problem reported by Philipp Stephani in:
+ http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00706.html
+ * src/emacs-module.c (emacs_finalizer_function):
+ Move this typedef here ...
+ * src/emacs-module.h: ... from here, and use only the C
+ version of the typedef. The typedef is now private since it
+ is never used in the .h file now and anyway it seemed to be
+ causing more confusion than it cured.
+ (make_user_ptr, get_user_finalizer, set_user_finalizer):
+ Open-code the type instead.
- * nt/gnulib.mk (EXTRA_DIST): Add ignore-value.h.
+2016-01-10 Eli Zaretskii <eliz@gnu.org>
-2016-01-04 Paul Eggert <eggert@cs.ucla.edu>
+ Update documentation of 'indirect-function'
- Spelling fix
+ * doc/lispref/eval.texi (Function Indirection): Update the
+ documentation of 'indirect-function'.
-2016-01-04 Jens Lechtenboerger <jens.lechtenboerger@fsfe.org>
+2016-01-10 Eli Zaretskii <eliz@gnu.org>
- Do secure signed Bcc handling
+ Update documentation for obsoleting 'syntax-begin-function'
- * lisp/gnus/message.el (message-send): Do secure signed Bcc handling
- (bug#18718).
+ * doc/lispref/syntax.texi (Position Parse): Undocument
+ 'syntax-begin-function' that is now obsolete.
-2016-01-04 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-10 Eli Zaretskii <eliz@gnu.org>
- Avoid stdio in SIGINT handler
+ Document new features if Eshell
- * admin/merge-gnulib (GNULIB_MODULES): Add ignore-value.
- * lib/gnulib.mk, m4/gnulib-comp.m4: Regenerate.
- * lib/ignore-value.h: New file, from gnulib.
- * src/keyboard.c: Include it.
- (write_stdout, read_stdin): New functions.
- (handle_interrupt): Use them instead of printf and getchar,
- and avoid fflush when handling signals.
+ * doc/misc/eshell.texi (Input/Output): Document the new
+ '#<bufname>' syntax.
+ (Input/Output): Document 'eshell-destroy-buffer-when-process-dies'.
+ Disable "Key Index" generation, as there are no @kindex entries in
+ this manual.
-2016-01-04 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-10 Michael Albinus <michael.albinus@gmx.de>
- * doc/misc/texinfo.tex: Revert unwanted copyright change.
+ Handle too long commands in Tramp
-2016-01-03 Artur Malabarba <bruce.connor.am@gmail.com>
+ * lisp/net/tramp-sh.el (tramp-sh-handle-make-symbolic-link)
+ (tramp-do-file-attributes-with-ls): Send sequence of commands, in
+ order to not exceed shell command line limit.
- * lisp/align.el (align): Simplify a lambda
+ * test/automated/tramp-tests.el (tramp--test-darwin-p): Remove.
+ (tramp--test-utf8): Include Arabic file name, again.
- * lisp/align.el (align): Fix arg order in call to `align-region'
+2016-01-10 Paul Eggert <eggert@cs.ucla.edu>
-2016-01-03 Eli Zaretskii <eliz@gnu.org>
+ * .gitattributes: *.cur and *.pif are binary files too.
- Fix compilation next-error in buffers with selective-display
+2016-01-10 Stefan Monnier <monnier@iro.umontreal.ca>
- * lisp/progmodes/compile.el (compilation-beginning-of-line): New
- function.
- (compilation-internal-error-properties)
- (compilation-next-error-function, compilation-set-window): Use
- it. (Bug#1092)
+ * src/alloc.c (mark_maybe_pointer): HAVE_MODULES may be undefined
-2016-01-03 Lars Magne Ingebrigtsen <larsi@gnus.org>
+2016-01-10 Stefan Monnier <monnier@iro.umontreal.ca>
- * lisp/net/nsm.el (nsm-check-protocol): Fix typo in the message.
+ * sh-script.el (sh-smie-sh-rules): Improve indentation inside $(...)
-2016-01-03 Lars Magne Ingebrigtsen <larsi@gnus.org>
+ * lisp/progmodes/sh-script.el (sh-smie-sh-rules): Improve indentation
+ within $(...).
+ * test/indent/shell.sh: Add corresponding test.
- Add SHA1 warnings for high network security settings
+2016-01-09 Stefan Monnier <monnier@iro.umontreal.ca>
- * lisp/net/nsm.el (nsm-check-protocol): When using high security, warn
- about SHA1 certificates, which are now believed to be open to
- spoofing.
+ * src/alloc.c (mark_maybe_pointer): Also check wide-int's emacs_value
-2016-01-03 Jens Lechtenboerger <jens.lechtenboerger@fsfe.org>
+ (mark_memory): Simplify loop. Don't assume a pointer-sized word can be
+ cast to Lisp_Object.
- Refactor mml-smime.el, mml1991.el, mml2015.el
+2016-01-09 Dmitry Gutov <dgutov@yandex.ru>
- (Maybe this is the last merge from Gnus git to Emacs git)
+ Use short date for 'hg annotate', and output the author
- Cf. discussion on ding mailing list, messages in
- <http://thread.gmane.org/gmane.emacs.gnus.general/86228>.
- Common code from the three files mml-smime.el, mml1991.el, and
- mml2015.el is moved to mml-sec.el. Auxiliary functions are added
- to gnus-util.el.
+ * lisp/vc/vc-hg.el (vc-hg-annotate-command):
+ Change '-d' to '-dq'. (Bug#21805)
+ (vc-hg-annotate-switches): Default to "-u" "--follow".
+ (vc-hg-annotate-re): Update to recognize the short date format
+ and the optional username.
+ (vc-hg-annotate-time)
+ (vc-hg-annotate-extract-revision-at-line): Update accordingly.
- The code is supported by test cases with necessary test keys.
+ * test/automated/vc-hg.el: New file.
- Documentation in message.texi is updated.
+2016-01-09 Paul Eggert <eggert@cs.ucla.edu>
- * doc/misc/message.texi (Security, Using S/MIME):
- Update for refactoring mml-smime.el, mml1991.el, mml2015.el.
- (Using OpenPGP): Rename from "Using PGP/MIME"; update contents.
- (Passphrase caching, Encrypt-to-self, Bcc Warning): New sections.
+ Spelling fix
- * lisp/gnus/gnus-util.el (gnus-test-list, gnus-subsetp, gnus-setdiff):
- New functions.
+2016-01-09 Eli Zaretskii <eliz@gnu.org>
- * lisp/gnus/mml-sec.el: Require gnus-util and epg.
- (epa--select-keys): Autoload.
- (mml-signencrypt-style-alist, mml-secure-cache-passphrase): Doc fix.
- (mml-secure-openpgp-signers): New user option;
- make mml1991-signers and mml2015-signers obsolete aliases to it.
- (mml-secure-smime-signers): New user option;
- make mml-smime-signers an obsolete alias to it.
- (mml-secure-openpgp-encrypt-to-self): New user option;
- make mml1991-encrypt-to-self and mml2015-encrypt-to-self obsolete
- aliases to it.
- (mml-secure-smime-encrypt-to-self): New user option;
- make mml-smime-encrypt-to-self an obsolete alias to it.
- (mml-secure-openpgp-sign-with-sender): New user option;
- make mml2015-sign-with-sender an obsolete alias to it.
- (mml-secure-smime-sign-with-sender): New user option;
- make mml-smime-sign-with-sender an obsolete alias to it.
- (mml-secure-openpgp-always-trust): New user option;
- make mml2015-always-trust an obsolete alias to it.
- (mml-secure-fail-when-key-problem, mml-secure-key-preferences):
- New user options.
- (mml-secure-cust-usage-lookup, mml-secure-cust-fpr-lookup)
- (mml-secure-cust-record-keys, mml-secure-cust-remove-keys)
- (mml-secure-add-secret-key-id, mml-secure-clear-secret-key-id-list)
- (mml-secure-cache-passphrase-p, mml-secure-cache-expiry-interval)
- (mml-secure-passphrase-callback, mml-secure-check-user-id)
- (mml-secure-secret-key-exists-p, mml-secure-check-sub-key)
- (mml-secure-find-usable-keys, mml-secure-select-preferred-keys)
- (mml-secure-fingerprint, mml-secure-filter-keys)
- (mml-secure-normalize-cust-name, mml-secure-select-keys)
- (mml-secure-select-keys-1, mml-secure-signer-names, mml-secure-signers)
- (mml-secure-self-recipients, mml-secure-recipients)
- (mml-secure-epg-encrypt, mml-secure-epg-sign): New functions.
+ Document user-level functions in project.el
- * lisp/gnus/mml-smime.el: Require epg;
- refactor declaration and autoloading of epg functions.
- (mml-smime-use): Doc fix.
- (mml-smime-cache-passphrase, mml-smime-passphrase-cache-expiry):
- Obsolete.
- (mml-smime-get-dns-cert, mml-smime-get-ldap-cert):
- Use format instead of gnus-format-message.
- (mml-smime-epg-secret-key-id-list): Remove variable.
- (mml-smime-epg-passphrase-callback, mml-smime-epg-find-usable-key)
- (mml-smime-epg-find-usable-secret-key): Remove functions.
- (mml-smime-epg-sign, mml-smime-epg-encrypt): Refactor.
+ * lisp/progmodes/project.el (project-find-file)
+ (project-or-external-find-file): Add doc strings.
- * lisp/gnus/mml1991.el (mml1991-cache-passphrase)
- (mml1991-passphrase-cache-expiry): Obsolete.
- (mml1991-epg-secret-key-id-list): Remove variable.
- (mml1991-epg-passphrase-callback, mml1991-epg-find-usable-key)
- (mml1991-epg-find-usable-secret-key): Remove functions.
- (mml1991-epg-sign, mml1991-epg-encrypt): Refactor.
+2016-01-09 Eli Zaretskii <eliz@gnu.org>
- * lisp/gnus/mml2015.el (mml2015-cache-passphrase)
- (mml2015-passphrase-cache-expiry): Obsolete.
- (mml2015-epg-secret-key-id-list): Remove variable.
- (mml2015-epg-passphrase-callback, mml2015-epg-check-user-id)
- (mml2015-epg-check-sub-key, mml2015-epg-find-usable-key)
- (mml2015-epg-find-usable-secret-key): Remove functions.
- (mml2015-epg-decrypt, mml2015-epg-clear-decrypt, mml2015-epg-sign)
- (mml2015-epg-encrypt): Refactor.
+ Document the user-level features of the Xref package
-2016-01-02 Glenn Morris <rgm@gnu.org>
-
- * lisp/progmodes/fortran.el (fortran-make-syntax-propertize-function):
-
- Explicitly ignore case. (Bug#22262)
+ * doc/emacs/maintaining.texi (Maintaining): Add a list of
+ described features.
+ (Xref): New section, made out of thoroughly rewritten "Tags"
+ section.
+ (Find Identifiers, Looking Up Identifiers, Xref Commands)
+ (Identifier Search, List Identifiers): New subsections,
+ incorporating the old tags commands and the new xref commands.
+ (Tags Tables, Tag Syntax, Create Tags Table, Etags Regexps):
+ Section and subsections demoted to a lower level.
+ * doc/emacs/search.texi (Search):
+ * doc/emacs/windows.texi (Pop Up Window):
+ * doc/emacs/frames.texi (Creating Frames):
+ * doc/emacs/programs.texi (Imenu, Symbol Completion):
+ * doc/emacs/building.texi (Grep Searching):
+ * doc/emacs/dired.texi (Operating on Files):
+ * doc/emacs/glossary.texi (Glossary): All references to tags changed.
-2016-01-02 Stefan Monnier <monnier@iro.umontreal.ca>
+2016-01-09 Stefan Monnier <monnier@iro.umontreal.ca>
- (semantic-symref-derive-find-filepatterns): Return a list
+ * loading.texi: Add `define-type' entry for load-history
- * lisp/cedet/semantic/symref/grep.el
- (semantic-symref-derive-find-filepatterns): Return a list.
- (semantic-symref-perform-search): Quote the result here once and for all.
+ * doc/lispref/loading.texi (Where Defined): Remove incorrect
+ cl-defmethod description, and add missing define-type entry.
-2016-01-02 Eli Zaretskii <eliz@gnu.org>
+2016-01-09 Eli Zaretskii <eliz@gnu.org>
- Fix xref-find-references on MS-Windows
+ Improve doc strings and prompts in xref.el
- * lisp/cedet/semantic/symref/grep.el
- (semantic-symref-derive-find-filepatterns): Use
- 'shell-quote-argument' instead of manually quoting in a way that
- only works with Posix shells. (Bug#22289)
+ * lisp/progmodes/xref.el (xref-backend-functions)
+ (xref-find-definitions): Doc fixes.
+ (xref-query-replace): Doc fix. Improve prompts for arguments.
-2016-01-02 Eli Zaretskii <eliz@gnu.org>
+2016-01-09 Alan Mackenzie <acm@muc.de>
- Document new features of tildify-mode
+ Allow the use of `font-lock-extend-region-multiline' in CC Mode.
- * lisp/textmodes/tildify.el (tildify-foreach-ignore-environments)
- (tildify-mode): Spelling fixes in doc strings.
+ * lisp/progmodes/cc-mode.el (c-font-lock-init): Remove
+ `font-lock-extend-regions-wholelines' from
+ `font-lock-extend-region-functions' rather than setting the latter to
+ nil.
- * etc/NEWS: Reformat the tildify-mode entry.
+2016-01-09 Michael Albinus <michael.albinus@gmx.de>
-2016-01-02 Eli Zaretskii <eliz@gnu.org>
+ Fix coding system for Tramp on OS X.
- Document new features of Whitespace mode
+ * lisp/net/tramp-compat.el: Require ucs-normalize.
- * doc/emacs/display.texi (Useless Whitespace): Document
- 'whitespace-toggle-options' and the new 'big-indent' style.
- Document 'whitespace-big-indent-regexp'. Document the Global
- Whitespace mode.
+ * lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell):
+ Set coding system to `utf-8-hfs' for Mac OS X.
-2016-01-02 Eli Zaretskii <eliz@gnu.org>
+ * test/automated/tramp-tests.el (tramp-test29-vc-registered):
+ Flush directory properties when needed.
+ (tramp--test-utf8): Include Chinese file name, again.
- Improve documentation of new Hide-IfDef features
+2016-01-09 Eli Zaretskii <eliz@gnu.org>
- * etc/NEWS: Expand and reword Hide-IfDef section.
+ Update 'load-history' docs
-2016-01-02 Leo Liu <sdl.web@gmail.com>
+ * doc/lispref/loading.texi (Where Defined): Update the list of
+ forms in 'load-history' by adding the forms created for the
+ 'cl-generic' generics. (Bug#21422)
- Fix regression in font-locking cl-assert and cl-check-type
+2016-01-08 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/emacs-lisp/lisp-mode.el (lisp-el-font-lock-keywords-2): Fix
- el-errs-re.
+ Fix (error ...) error
-2016-01-01 Paul Eggert <eggert@cs.ucla.edu>
+ Problem reported by Glenn Morris in:
+ http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00561.html
+ * lisp/vc/add-log.el (change-log-goto-source): Fix typos
+ introduced in my Aug 28 change, where I got confused by the
+ two meanings of (error ...).
- Spelling and grammar fixes
+2016-01-08 Alan Mackenzie <acm@muc.de>
-2016-01-01 Paul Eggert <eggert@cs.ucla.edu>
+ Correctly analyze brace arguments in templated C++ function declarations.
- Fix copyright years by hand
+ * lisp/progmodes/cc-defs.el (c-go-list-forward, c-go-list-backward): add
+ POS and LIMIT parameters, like the other c-go-list-* functions have.
- These are dates that admin/update-copyright did not update, or
- updated incorrectly.
+ * lisp/progmodes/cc-engine.el (c-restore-<>-properties): Check backwards
+ for a ?\( rather than a ?<. (c-looking-at-inexpr-block): Handle names
+ followed by template specifiers.
-2016-01-01 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-08 Glenn Morris <rgm@gnu.org>
- Update copyright year to 2016
+ * lisp/cedet/mode-local.el (describe-function-orig-buffer): Declare.
- Run admin/update-copyright.
+ * lisp/ffap.el (ffap-latex-mode): Avoid free variable.
-2016-01-01 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-08 Mark Oteiza <mvoteiza@udel.edu>
- Merge from gnulib
+ * lisp/play/dunnet.el (dun-fix-screen): Avoid `end-of-buffer`.
- This mostly just updates copyright dates of gnulib files.
- It also updates to the latest version of texinfo.tex.
+2016-01-08 Alan Mackenzie <acm@muc.de>
-2015-12-31 Mark Oteiza <mvoteiza@udel.edu>
+ Respect fontification region calculated by major mode. Fixes bug #22316.
- lisp/emacs-lisp/chart.el (chart-new-buffer): Move to silence byte compiler.
+ * lisp/font-lock.el (font-lock-extend-jit-lock-region-after-change): when a
+ fontification region has been calculated by a function on
+ font-lock-extend-after-change-region-function use this region rather than
+ changing the end position to somewhere else.
-2015-12-31 Mark Oteiza <mvoteiza@udel.edu>
+2016-01-08 Eli Zaretskii <eliz@gnu.org>
- Port chart.el methods to cl-generic.
+ Improve documentation of Delete Selection mode
- cl-call-next-method cannot be used inside EIEIO's defmethod.
- * lisp/emacs-lisp/chart.el: Require cl-generic at compile time.
- * lisp/emacs-lisp/chart.el (initialize-instance, chart-draw):
- (chart-draw-title, chart-size-in-dir, chart-draw-axis):
- (chart-axis-draw, chart-translate-xpos, chart-translate-ypos):
- (chart-translate-namezone, chart-draw-data, chart-add-sequence):
- (chart-trim, chart-sort): Use cl-defmethod instead of defmethod.
+ * lisp/delsel.el (delete-selection-mode)
+ (delete-selection-helper): Update and expand the doc strings.
+ (Bug#22296)
-2015-12-31 Brian Burns <bburns.km@gmail.com>
+ * doc/emacs/mark.texi (Using Region): Document the behavior of
+ delete commands in Delete Selection mode. (Bug#22296)
- Add nt/INSTALL.W64 build instructions
+ * doc/lispref/markers.texi (The Mark): Document how to add the
+ support for Delete Selection mode to Lisp programs. (Bug#22296)
- * nt/INSTALL.W64: New file.
- * nt/INSTALL: Point to INSTALL.W64 for 64-bit build instructions.
+2016-01-08 Dmitry Gutov <dgutov@yandex.ru>
-2015-12-31 Joakim Jalap <joakim.jalap@fastmail.com>
+ Fix two project-find-file issues
- Add new input method 'programmer-dvorak'
+ * lisp/progmodes/project.el (project--value-in-dir):
+ Temporarily set enable-local-variables to :all.
+ (project-find-file, project-or-external-find-file):
+ All autoloads.
+ (project--find-file-in): Require xref.
- * lisp/leim/quail/programmer-dvorak.el ("programmer-dvorak"): New
- input method.
+2016-01-08 Eli Zaretskii <eliz@gnu.org>
- * etc/NEWS: Mention it.
+ Clarify doc string of 'dired-current-directory'
-2015-12-31 Eli Zaretskii <eliz@gnu.org>
+ * lisp/dired.el (dired-current-directory): Doc fix: clarify that
+ the return value might not end in a slash when called with the
+ optional argument non-nil. (Bug#6273)
- Allow to invoke original M-TAB binding in 'flyspell-prog-mode'
+2016-01-08 Eli Zaretskii <eliz@gnu.org>
- * lisp/textmodes/flyspell.el (flyspell-prog-mode): Record the
- original M-TAB binding in a buffer-local variable.
- (flyspell-auto-correct-word): Invoke the original binding of M-TAB
- if that is recorded, when point is in a place where flyspell
- should not be active (e.g., because the user turned on
- 'flyspell-prog-mode'). (Bug#18533)
+ Use the face of preceding text for displaying the ellipsis
-2015-12-31 Eli Zaretskii <eliz@gnu.org>
+ * src/xdisp.c (setup_for_ellipsis): Use the face of the preceding
+ text in it->saved_face_id for displaying the ellipsis, and ignore
+ the face, if any, of the invisible text. (Bug#22320)
- Fix EWW rendering of long RTL lines
+2016-01-08 Michael Albinus <michael.albinus@gmx.de>
- * lisp/net/shr.el (shr-insert-document): Undo any previous hscroll
- of the selected window before filling its lines. (Bug#22250)
+ Suppress Chinese file name test for OSX in tramp-tests.el
-2015-12-31 Vincent Belaïche <vincentb1@users.sourceforge.net>
+ * test/automated/tramp-tests.el (tramp--test-utf8):
+ Remove instrumentation. Suppress Chinese file name test for OSX.
- fix bug#21054
+2016-01-07 Glenn Morris <rgm@gnu.org>
- * lisp/ses.el (ses-check-curcell): Call `ses-set-curcell' unconditionally
+ * admin/admin.el (set-version): Also handle the NEWS file.
-2015-12-31 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+2016-01-07 Dmitry Gutov <dgutov@yandex.ru>
- Clean up cairo printing code
+ apropos-library: Skip obvious duplicates; don't error on generics
- * src/gtkutil.c (xg_get_page_setup): Use listn.
- * src/xfns.c (Fx_export_frames, Fx_print_frames_dialog): Doc fix. Use
- decode_window_system_frame and FRAME_VISIBLE_P.
- (Fx_print_frames_dialog): Use redisplay_preserve_echo_area instead
- of Fdisplay.
- * src/xterm.c (x_cr_export_frames): Use redisplay_preserve_echo_area
- instead of Fdisplay. Temporarily unblock_input around QUIT.
+ * lisp/apropos.el (apropos-library): Skip "was an autoload"
+ entries, to avoid obvious duplicates. For each cl-defmethod
+ entry, take just its function symbol (bug#21422).
-2015-12-31 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+2016-01-07 Dmitry Gutov <dgutov@yandex.ru>
- Move variables to inner loop, preparing for Mac port merge
+ Add project-find-file and project-or-external-find-file
- * src/keyboard.c (command_loop_1): Move variables `cmd',
- `keybuf', and `i' to inner loop.
+ * lisp/minibuffer.el (completion-category-defaults):
+ Add `project-file' category.
-2015-12-31 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+ * lisp/progmodes/project.el (project-find-file)
+ (project-or-external-find-file): New commands.
+ (project--find-file-in): New private function.
- Add handle_user_signal_hook
+ * lisp/progmodes/xref.el (xref-collect-matches): Use
+ `expand-file-name' on DIR, to expand the tildes.
+ (xref--find-ignores-arguments): Extract from
+ `xref--rgrep-command'.
- * src/keyboard.h (handle_user_signal_hook): New declaration.
- * src/keyboard.c (handle_user_signal_hook): New variable.
- (handle_user_signal): Call it.
+2016-01-06 Leo Liu <sdl.web@gmail.com>
-2015-12-31 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+ Add defvar-local to lisp-imenu-generic-expression
- Avoid writing to purespace
+ * lisp/emacs-lisp/lisp-mode.el (lisp-imenu-generic-expression): Add
+ defvar-local.
- * src/alloc.c (Fmake_string): Don't write to empty string contents.
- (allocate_vector): Don't write to empty vector size.
- * src/character.h (CHECK_CHARACTER_CAR, CHECK_CHARACTER_CDR):
- Don't call unnecessary XSETCAR or XSETCDR.
- * src/lisp.h (STRING_SET_UNIBYTE, STRING_SET_MULTIBYTE): Don't
- write to empty string size_byte.
+2016-01-06 Leo Liu <sdl.web@gmail.com>
-2015-12-31 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+ Revert commit b1e3d14845517bfa9fa5d6d3840f3ab3160306fd
- Remove unused variable
+ * lisp/emacs-lisp/easy-mmode.el (define-minor-mode):
+ Don't declare (indent 1).
- * lisp/international/mule-cmds.el: Remove unused variable
- `mac-system-coding-system'.
+2016-01-06 Glenn Morris <rgm@gnu.org>
-2015-12-31 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+ * lisp/emacs-lisp/autoload.el (autoload-find-destination): Doc fix.
- * configure.ac: Find libxml2 headers in Xcode SDK dir on Darwin.
+2016-01-06 Glenn Morris <rgm@gnu.org>
-2015-12-31 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+ * lisp/emacs-lisp/autoload.el (autoload-find-destination):
- Use posix_openpt instead of openpty on Darwin
+ Avoid specifying the length of a time object (it has not been "2"
+ for some time).
- * configure.ac (PTY_ITERATION, FIRST_PTY_LETTER, PTY_OPEN)
- (PTY_NAME_SPRINTF, PTY_TTY_NAME_SPRINTF): Remove
- Darwin-specific definitions. Use posix_openpt instead.
+2016-01-06 Andreas Schwab <schwab@linux-m68k.org>
-2015-12-30 Shakthi Kannan <shakthimaan@gmail.com>
+ Properly encode/decode base64Binary data in SOAP
- Document support for ':documentation' in Lisp mode
+ * lisp/net/soap-client.el (soap-encode-xs-basic-type): Encode
+ base64Binary value as utf-8.
+ (soap-decode-xs-basic-type): Decode base64Binary value as utf-8.
- * lisp/emacs-lisp/lisp-mode.el (lisp-string-in-doc-position-p)
- (lisp-string-after-doc-keyword-p)
- (lisp-font-lock-syntactic-face-function): Add doc strings.
+2016-01-06 Eli Zaretskii <eliz@gnu.org>
-2015-12-30 Shakthi Kannan <shakthimaan@gmail.com>
+ Obey coding-system-for-write when writing stdout/stderr in batch
- Document new features of TeX mode
+ * src/print.c (printchar_to_stream):
+ * src/xdisp.c (message_to_stderr): If coding-system-for-write has
+ a non-nil value, use it to encode output in preference to
+ locale-coding-system. See the discussions in
+ http://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00048.html
+ for the details.
- * doc/emacs/text.texi (TeX Print): Document
- 'tex-print-file-extension'.
- * doc/emacs/programs.texi (Misc for Programs): Document support
- for Prettify Symbols mode in TeX mode.
+ * doc/lispref/os.texi (Terminal Output): Document how to send
+ non-ASCII text via 'send-string-to-terminal'.
+ (Batch Mode): Document how text written to standard streams is
+ encoded. Fix inaccuracy regarding which output streams are used
+ by output functions in batch mode.
-2015-12-30 Eli Zaretskii <eliz@gnu.org>
+2016-01-06 Xue Fuqiao <xfq.free@gmail.com>
- Clarify docs of hscroll in RTL text
+ * doc/misc/efaq.texi (Packages that do not come with Emacs):
+ Update the URI of MELPA and marmalade-repo. Reported by CHENG Gao
+ <chenggao@royau.me> in
+ https://lists.gnu.org/archive/html/emacs-devel/2016-01/msg00390.html.
- * doc/lispref/windows.texi (Horizontal Scrolling): Clarify the
- meaning of a window's horizontal scroll amount for RTL paragraphs.
+2016-01-05 Maksim Golubev <maksim.golubev72@gmail.com> (tiny change)
-2015-12-30 Eli Zaretskii <eliz@gnu.org>
+ * lisp/progmodes/opascal.el (opascal-mode-syntax-table):
- Fix rendering of HTML pages that use character composition
+ Fix backslash. (Bug#22224)
- * src/indent.c (Fvertical_motion): Fix the case when point starts
- in the middle of a composition, as in shr-vertical-motion.
- (Bug#22250)
+2016-01-05 Federico Beffa <beffa@ieee.org> (tiny change)
-2015-12-30 Eli Zaretskii <eliz@gnu.org>
+ * lisp/progmodes/xscheme.el (xscheme-prompt-for-expression-exit):
- Avoid some compiler warnings in w32.c
+ Make it actually work. (Bug#22265)
- * src/w32.c (codepage_for_filenames, crlf_to_lf)
- (ansi_encode_filename, socket_to_fd, sys_write)
- (check_windows_init_file): Avoid compiler warnings about
- differences in pointer signedness.
+2016-01-05 Alan Mackenzie <acm@muc.de>
-2015-12-30 Dmitry Gutov <dgutov@yandex.ru>
+ Remove function wrongly on AWK Mode value of context fontification hook.
- Undo ill-advised change
+ * lisp/progmodes/cc-langs.el (c-before-context-fontification-functions):
+ swap order of entries so that awk's entry isn't superseded by the default.
- * lisp/progmodes/xref.el (xref-collect-matches): Undo
- ill-advised change. The hits come in the order that `find'
- produces them in, which isn't alphabetical.
+ * lisp/progmodes/cc-mode.el (c-before-context-fl-expand-region): Correct
+ to handle nil value of c-before-context-fontification-functions.
-2015-12-30 Dmitry Gutov <dgutov@yandex.ru>
+2016-01-05 Paul Eggert <eggert@cs.ucla.edu>
- Unbreak completion in python-mode buffers
+ * src/buffer.c: Stick with ASCII in doc string.
- * lisp/progmodes/python.el (python-shell-completion-at-point):
- Unbreak in python-mode buffers.
+2016-01-05 Paul Eggert <eggert@cs.ucla.edu>
-2015-12-29 Eli Zaretskii <eliz@gnu.org>
+ Reword transient-mark-mode doc string
- Fix typos in CC Mode manual
+ * src/buffer.c (syms_of_buffer): Reword doc string to avoid confusion.
+ The value 'lambda (literally) can be interpreted as (quote lambda),
+ which is not intended here; we want just the lambda symbol.
- * doc/misc/cc-mode.texi (c-offsets-alist, Style Variables): Fix
- typos. (Bug#22267)
+2016-01-05 Eli Zaretskii <eliz@gnu.org>
-2015-12-29 Eli Zaretskii <eliz@gnu.org>
+ Update doc string of 'selective-display'
- Avoid assertion violations in compact_font_cache_entry
+ * src/buffer.c (syms_of_buffer) <selective-display>: Say that
+ using it with the value of 't' is obsolete. (Bug#1092)
- * src/alloc.c (compact_font_cache_entry): Don't use VECTORP to
- avoid assertion violation in ASIZE. (Bug#22263)
+2016-01-05 Alan Mackenzie <acm@muc.de>
-2015-12-29 Eli Zaretskii <eliz@gnu.org>
+ Make C++ buffers writeable when writing their initial text properties.
- Fix filling text with bidirectional characters in shr.el
+ This is a correction to yesterday's CC Mode patch.
- * lisp/net/shr.el (shr-insert-document): Bind
- bidi-display-reordering to nil while filling lines. This is
- required for when a line includes characters whose bidi
- directionality is opposite to the base paragraph direction,
- because columns are counted in the logical order. (Bug#22250)
+ * lisp/progmodes/cc-engine.el (c-before-change-check-<>-operators): Put
+ c-save-buffer-state around the function rather than a mere `let'.
-2015-12-29 Martin Rudalics <rudalics@gmx.at>
+2016-01-05 Michael Albinus <michael.albinus@gmx.de>
- * src/xfns.c (x_create_tip_frame): Process alpha parameter.
+ Additional changes for "make check-expensive"
-2015-12-29 Michael Albinus <michael.albinus@gmx.de>
+ * CONTRIBUTE : Encourage use of ":tags '(:expensive-test)".
+ Explain make target `check-expensive'.
- Sync with Tramp 2.2.13
+ * etc/NEWS: Mention new make target `check-expensive'.
- * doc/misc/trampver.texi: Change version to "2.2.13.25.1".
+ * test/automated/Makefile.in (check-doit): New target.
+ (check, check-expensive): Use it.
- * lisp/net/tramp-compat.el (tramp-compat-delete-dups):
- Use `tramp-compat-funcall'.
+2016-01-04 Alan Mackenzie <acm@muc.de>
- * lisp/net/tramp-gvfs.el (tramp-gvfs-parse-device-names):
- Make `split-string' call compatible with older Emacsen.
+ Apply text properties for <, > in new after-change function (C++ Java Modes).
- * lisp/net/trampver.el: Change version to "2.2.13.25.1".
+ These are category/syntax-table properties to give < and > paren syntax.
+ Also apply certain `c-type' text properties to the insides of <..> constructs
+ to ensure that identifiers contained by them get fontified. This patch fixes
+ bug #681.
-2015-12-29 Lambda Coder <sjLambda@gmail.com>
+ * lisp/progmodes/cc-cmds.el (c-electric-lt-gt): Reformulate due to new
+ after-change action.
- * doc/misc/tramp.texi: Editorial revisions to the Tramp manual
+ * lisp/progmodes/cc-engine.el (c-before-change-check-<>-operators): Expand
+ change region to include <s and >s which might not be already marked as
+ parens, rather than just when paren text properties are removed.
+ (c-restore-<>-properties): New after-change function, which applies text
+ properties marking < and > with paren syntax.
-2015-12-29 Lars Ingebrigtsen <larsi@gnus.org>
+ * lisp/progmodes/cc-fonts.el (c-font-lock-declarations): Ensure `c-type'
+ properties are applied to the interiors of <...> constructs, to ensure
+ fontification of identifiers there.
- Mention that tls.el is secure by default, and will fail
+ * lisp/progmodes/cc-langs.el (c-before-font-lock-functions): Add
+ c-restore-<>-properties to this list for C++ and Java.
-2015-12-29 Lars Ingebrigtsen <larsi@gnus.org>
+ * lisp/progmodes/cc-mode.el (c-common-init): When invoking
+ c-before-font-lock-functions, exclude c-restore-<>-properties from the
+ functions invoked.
+ (c-before-change): Initialize c-new-BEG/END here (rather than c-after-change)
+ to allow modification by before-change functions.
+ (c-after-change): Amend c-new-END here, rather than initializing it and
+ c-new-BEG.
- Make tls.el use trustfiles by default
+2016-01-04 Michael Albinus <michael.albinus@gmx.de>
- * lisp/net/tls.el (tls-program): Add a certfile by default (bug#21227).
- (open-tls-stream): Insert the trustfile by looking at
- `gnutls-trustfiles'.
+ Merge branch 'emacs-25' of git.sv.gnu.org:/srv/git/emacs into emacs-25
-2015-12-29 Lars Ingebrigtsen <larsi@gnus.org>
+2016-01-04 Michael Albinus <michael.albinus@gmx.de>
- Refactor out gnutls-trustfiles
+ Introduce check-expensive tests.
- * lisp/net/gnutls.el (gnutls-trustfiles): Refactor out for reuse by tls.el.
+ * Makefile.in (check-expensive):
+ * test/automated/Makefile.in (check-expensive): New target.
-2015-12-29 Lars Ingebrigtsen <larsi@gnus.org>
+ * test/automated/auto-revert-tests.el
+ (auto-revert-test01-auto-revert-several-files):
+ * test/automated/file-notify-tests.el (file-notify--deftest-remote):
+ * test/automated/tramp-tests.el (tramp-test26-process-file)
+ (tramp-test27-start-file-process, tramp-test28-shell-command)
+ (tramp-test29-vc-registered)
+ (tramp-test31-special-characters-with-stat)
+ (tramp-test31-special-characters-with-perl)
+ (tramp-test31-special-characters-with-ls)
+ (tramp-test32-utf8-with-stat, tramp-test32-utf8-with-perl)
+ (tramp-test32-utf8-with-ls, tramp-test33-asynchronous-requests)
+ (tramp-test35-unload): Tag the tests as :expensive-test.
- Remove --insecure from gnutls-cli invocation
+2016-01-04 Lars Magne Ingebrigtsen <larsi@gnus.org>
- * tls.el (tls-program): Default to using secure TLS
- connections (bug#19284).
+ shr-tag-video bug fix
-2015-12-29 Paul Eggert <eggert@cs.ucla.edu>
+ * shr.el (shr-tag-video): Protect against the `poster' being
+ empty.
- Spelling fix
+2016-01-04 Michael Albinus <michael.albinus@gmx.de>
-2015-12-29 Paul Eggert <eggert@cs.ucla.edu>
+ Minor fixes in tramp-tests.el
- Port report-emacs-bug to deterministic builds
+ * test/automated/tramp-tests.el (tramp-test26-process-file):
+ Move point properly.
+ (tramp-test29-vc-registered): Work with relative file names.
- * lisp/mail/emacsbug.el (report-emacs-bug): Future-proof the
- recent "built on" change to deterministic builds where
- emacs-build-system will be nil. See:
- http://lists.gnu.org/archive/html/emacs-devel/2015-12/msg01369.html
+2016-01-04 Eli Zaretskii <eliz@gnu.org>
-2015-12-29 Jose A. Ortega Ruiz <jao@gnu.org> (tiny change)
+ Ensure redisplay when 'truncate-lines' is set
- Fix URL auth error message
+ * lisp/frame.el (redisplay--variables): Add 'truncate-lines'.
+ (Bug#22303)
- * lisp/url/url-http.el (url-http-handle-authentication): Make the error
- message more correct (bug#20069).
+2016-01-04 Eli Zaretskii <eliz@gnu.org>
-2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
+ Fix a doc string of 'transient-mark-mode'
- shr link traversal fixup
+ * src/buffer.c (syms_of_buffer) <transient-mark-mode>: Prevent
+ "lambda" in doc string from becoming a link to lambda expressions.
- * shr.el (shr-next-link): Don't bug out on adjacent links.
+2016-01-04 Eli Zaretskii <eliz@gnu.org>
- Backport:
+ MS-Windows followup to latest gnulib update
- (cherry picked from commit 1efc5f8b09273c359683ce13be95fb5df7a84311)
+ * nt/gnulib.mk (EXTRA_DIST): Add ignore-value.h.
-2015-12-28 Tom Tromey <tom@tromey.com>
+2016-01-04 Paul Eggert <eggert@cs.ucla.edu>
- set :safe on css-indent-offset
+ Spelling fix
- * lisp/textmodes/css-mode.el (css-indent-offset): Add :safe 'integerp.
+2016-01-03 Jens Lechtenboerger <jens.lechtenboerger@fsfe.org>
-2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
+ Do secure signed Bcc handling
- * eww.el (eww-mode): Remove superfluous bidi reset.
+ * lisp/gnus/message.el (message-send): Do secure signed Bcc handling
+ (bug#18718).
-2015-12-28 James Stout <james.wolf.stout@gmail.com> (tiny change)
+2016-01-03 Paul Eggert <eggert@cs.ucla.edu>
- Make chunked encoding trailer detection more compliant
+ Avoid stdio in SIGINT handler
- * lisp/url/url-http.el
- (url-http-chunked-encoding-after-change-function): Make
- trailer detection more compliant (bug#16345).
+ * admin/merge-gnulib (GNULIB_MODULES): Add ignore-value.
+ * lib/gnulib.mk, m4/gnulib-comp.m4: Regenerate.
+ * lib/ignore-value.h: New file, from gnulib.
+ * src/keyboard.c: Include it.
+ (write_stdout, read_stdin): New functions.
+ (handle_interrupt): Use them instead of printf and getchar,
+ and avoid fflush when handling signals.
-2015-12-28 Martin Rudalics <rudalics@gmx.at>
+2016-01-03 Paul Eggert <eggert@cs.ucla.edu>
- Fix Bug#10873 in `report-emacs-bug'
+ * doc/misc/texinfo.tex: Revert unwanted copyright change.
- * lisp/mail/emacsbug.el (report-emacs-bug): If
- `report-emacs-bug-no-explanations' is nil, make sure we can show
- mail and warnings buffer on this frame (Bug#10873).
+2016-01-03 Artur Malabarba <bruce.connor.am@gmail.com>
-2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
+ * lisp/align.el (align): Simplify a lambda
- Always reset the bidi direction
+ * lisp/align.el (align): Fix arg order in call to `align-region'
- * eww.el (eww-display-html): Always reset the bidi direction
- to `left-to-right' (bug#22257).
+2016-01-03 Eli Zaretskii <eliz@gnu.org>
-2015-12-28 Alan Mackenzie <acm@muc.de>
+ Fix compilation next-error in buffers with selective-display
- Allow line comments ending with escaped NL to be continued to the next line.
+ * lisp/progmodes/compile.el (compilation-beginning-of-line): New
+ function.
+ (compilation-internal-error-properties)
+ (compilation-next-error-function, compilation-set-window): Use
+ it. (Bug#1092)
- Use this in C, C++, and Objective C Modes. Fixes bug#22246
+2016-01-03 Lars Magne Ingebrigtsen <larsi@gnus.org>
- * src/syntax.c (comment-end-can-be-escaped): New buffer local variable.
- (forw-comment, back-comment): On encountering an end of comment character,
- test whether it is escaped when `comment-end-can-be-escaped' is non-nil.
+ * nsm.el (nsm-check-protocol): Fix typo in the message.
- * doc/lispref/syntax.texi (Control Parsing): Describe
- `comment-end-can-be-escaped'.
+2016-01-03 Lars Magne Ingebrigtsen <larsi@gnus.org>
- * etc/NEWS (Lisp Changes): Describe `comment-end-can-be-escaped'.
+ Add SHA1 warnings for high network security settings
- * lisp/progmodes/cc-langs.el: New c-lang-setvar `comment-end-can-be-escaped'.
+ * nsm.el (nsm-check-protocol): When using high security, warn
+ about SHA1 certificates, which are now believed to be open to
+ spoofing.
-2015-12-28 Dmitry Gutov <dgutov@yandex.ru>
+2016-01-02 Jens Lechtenboerger <jens.lechtenboerger@fsfe.org>
- Rename project-library-roots to project-external-roots
+ Refactor mml-smime.el, mml1991.el, mml2015.el
- * lisp/progmodes/project.el (project-library-roots): Rename to
- project-external-roots.
- (project-library-roots-function): Rename to
- project-vc-external-roots-function. Only use it in the VC
- backend, for now. Update project-external-roots accordingly.
- (project-vc-library-roots): Remove.
- (project-or-libraries-find-regexp):
- Rename to project-or-external-find-regexp.
-
- * lisp/progmodes/elisp-mode.el (elisp-library-roots):
- Rename to elisp-load-path-roots.
-
- * lisp/progmodes/etags.el (etags-library-roots): Remove. Use
- an anonymous function for the default value of
- project-vc-external-roots-function.
+ (Maybe this is the last merge from Gnus git to Emacs git)
-2015-12-27 Deniz Dogan <deniz@dogan.se>
+ Cf. discussion on ding mailing list, messages in
+ <http://thread.gmane.org/gmane.emacs.gnus.general/86228>.
+ Common code from the three files mml-smime.el, mml1991.el, and
+ mml2015.el is moved to mml-sec.el. Auxiliary functions are added
+ to gnus-util.el.
- Clear erc user list upon disconnection
+ The code is supported by test cases with necessary test keys.
- * lisp/erc/erc-backend.el (erc-process-sentinel): Clear channel user
- lists upon disconnection. This prevents invalid channel
- user lists when reconnecting (bug#10947).
+ Documentation in message.texi is updated.
-2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
+ * doc/misc/message.texi (Security, Using S/MIME):
+ Update for refactoring mml-smime.el, mml1991.el, mml2015.el.
+ (Using OpenPGP): Rename from "Using PGP/MIME"; update contents.
+ (Passphrase caching, Encrypt-to-self, Bcc Warning): New sections.
- Don't bug out in erc after waking from sleep
+ * lisp/gnus/gnus-util.el (gnus-test-list, gnus-subsetp, gnus-setdiff):
+ New functions.
- * lisp/erc/erc-backend.el (erc-server-send-ping): If the server has
- closed connection, this may already have been detected and
- `erc-server-last-received-time' has been set to nil (bug#13608).
+ * lisp/gnus/mml-sec.el: Require gnus-util and epg.
+ (epa--select-keys): Autoload.
+ (mml-signencrypt-style-alist, mml-secure-cache-passphrase): Doc fix.
+ (mml-secure-openpgp-signers): New user option;
+ make mml1991-signers and mml2015-signers obsolete aliases to it.
+ (mml-secure-smime-signers): New user option;
+ make mml-smime-signers an obsolete alias to it.
+ (mml-secure-openpgp-encrypt-to-self): New user option;
+ make mml1991-encrypt-to-self and mml2015-encrypt-to-self obsolete
+ aliases to it.
+ (mml-secure-smime-encrypt-to-self): New user option;
+ make mml-smime-encrypt-to-self an obsolete alias to it.
+ (mml-secure-openpgp-sign-with-sender): New user option;
+ make mml2015-sign-with-sender an obsolete alias to it.
+ (mml-secure-smime-sign-with-sender): New user option;
+ make mml-smime-sign-with-sender an obsolete alias to it.
+ (mml-secure-openpgp-always-trust): New user option;
+ make mml2015-always-trust an obsolete alias to it.
+ (mml-secure-fail-when-key-problem, mml-secure-key-preferences):
+ New user options.
+ (mml-secure-cust-usage-lookup, mml-secure-cust-fpr-lookup)
+ (mml-secure-cust-record-keys, mml-secure-cust-remove-keys)
+ (mml-secure-add-secret-key-id, mml-secure-clear-secret-key-id-list)
+ (mml-secure-cache-passphrase-p, mml-secure-cache-expiry-interval)
+ (mml-secure-passphrase-callback, mml-secure-check-user-id)
+ (mml-secure-secret-key-exists-p, mml-secure-check-sub-key)
+ (mml-secure-find-usable-keys, mml-secure-select-preferred-keys)
+ (mml-secure-fingerprint, mml-secure-filter-keys)
+ (mml-secure-normalize-cust-name, mml-secure-select-keys)
+ (mml-secure-select-keys-1, mml-secure-signer-names, mml-secure-signers)
+ (mml-secure-self-recipients, mml-secure-recipients)
+ (mml-secure-epg-encrypt, mml-secure-epg-sign): New functions.
-2015-12-27 David Edmondson <dme@dme.org>
+ * lisp/gnus/mml-smime.el: Require epg;
+ refactor declaration and autoloading of epg functions.
+ (mml-smime-use): Doc fix.
+ (mml-smime-cache-passphrase, mml-smime-passphrase-cache-expiry):
+ Obsolete.
+ (mml-smime-get-dns-cert, mml-smime-get-ldap-cert):
+ Use format instead of gnus-format-message.
+ (mml-smime-epg-secret-key-id-list): Remove variable.
+ (mml-smime-epg-passphrase-callback, mml-smime-epg-find-usable-key)
+ (mml-smime-epg-find-usable-secret-key): Remove functions.
+ (mml-smime-epg-sign, mml-smime-epg-encrypt): Refactor.
- Proxy error in erc with multiple clients
+ * lisp/gnus/mml1991.el (mml1991-cache-passphrase)
+ (mml1991-passphrase-cache-expiry): Obsolete.
+ (mml1991-epg-secret-key-id-list): Remove variable.
+ (mml1991-epg-passphrase-callback, mml1991-epg-find-usable-key)
+ (mml1991-epg-find-usable-secret-key): Remove functions.
+ (mml1991-epg-sign, mml1991-epg-encrypt): Refactor.
- * lisp/erc/erc.el (erc-channel-receive-names): Fix errors
- generated when multiple IRC clients talk to a single IRC proxy
- (bug#19034).
+ * lisp/gnus/mml2015.el (mml2015-cache-passphrase)
+ (mml2015-passphrase-cache-expiry): Obsolete.
+ (mml2015-epg-secret-key-id-list): Remove variable.
+ (mml2015-epg-passphrase-callback, mml2015-epg-check-user-id)
+ (mml2015-epg-check-sub-key, mml2015-epg-find-usable-key)
+ (mml2015-epg-find-usable-secret-key): Remove functions.
+ (mml2015-epg-decrypt, mml2015-epg-clear-decrypt, mml2015-epg-sign)
+ (mml2015-epg-encrypt): Refactor.
- Backport:
+2016-01-02 Glenn Morris <rgm@gnu.org>
- (cherry picked from commit 507e98a54d1aa37823c64993d6b59257a82fe8f4)
+ * lisp/progmodes/fortran.el (fortran-make-syntax-propertize-function):
-2015-12-27 Dima Kogan <dima@secretsauce.net>
+ Explicitly ignore case. (Bug#22262)
- Ensure that we don't have several timers in erc
+2016-01-02 Stefan Monnier <monnier@iro.umontreal.ca>
- * lisp/erc/erc-backend.el (erc-server-setup-periodical-ping): Checks
- for existing timers in the alist before adding new ones. If a
- timer already exists, it is cancelled and
- overwritten. (bug#19292).
+ (semantic-symref-derive-find-filepatterns): Return a list
-2015-12-27 Jens Lechtenboerger <jens.lechtenboerger@fsfe.org>
+ * lisp/cedet/semantic/symref/grep.el
+ (semantic-symref-derive-find-filepatterns): Return a list.
+ (semantic-symref-perform-search): Quote the result here once and for all.
- Fix mml-sec build warnings
+2016-01-02 Eli Zaretskii <eliz@gnu.org>
- * lisp/gnus/mml-sec.el: Fix warnings by adding autoloads
- (bug#18718).
+ Fix xref-find-references on MS-Windows
- Backport:
+ * lisp/cedet/semantic/symref/grep.el
+ (semantic-symref-derive-find-filepatterns): Use
+ 'shell-quote-argument' instead of manually quoting in a way that
+ only works with Posix shells. (Bug#22289)
- (cherry picked from commit 3603097f62f5f4aa5451716e9ac380161f6829e2)
+2016-01-02 Eli Zaretskii <eliz@gnu.org>
-2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
+ Document new features of tildify-mode
- Don't insert erc logs at the end
+ * lisp/textmodes/tildify.el (tildify-foreach-ignore-environments)
+ (tildify-mode): Spelling fixes in doc strings.
- * lisp/erc/erc-log.el (erc-log-setup-logging): Insert the previous log
- at the start of the buffer, not at the end (bug#20496).
+ * etc/NEWS: Reformat the tildify-mode entry.
-2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
+2016-01-02 Eli Zaretskii <eliz@gnu.org>
- (eww-setup-buffer): Restore left-to-right defaults
+ Document new features of Whitespace mode
- * eww.el (eww-setup-buffer): Restore left-to-right defaults.
+ * doc/emacs/display.texi (Useless Whitespace): Document
+ 'whitespace-toggle-options' and the new 'big-indent' style.
+ Document 'whitespace-big-indent-regexp'. Document the Global
+ Whitespace mode.
- Backport:
+2016-01-02 Eli Zaretskii <eliz@gnu.org>
- (cherry picked from commit 96c874b96b617c124d500a94de761a61f2a08685)
+ Improve documentation of new Hide-IfDef features
-2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
+ * etc/NEWS: Expand and reword Hide-IfDef section.
- Don't join erc channels doubly
+2016-01-02 Leo Liu <sdl.web@gmail.com>
- * lisp/erc/erc-join.el (erc-autojoin-channels): Don't join channels
- more than once (if you have several nicks) (bug#20695).
+ Fix regression in font-locking cl-assert and cl-check-type
-2015-12-27 Eli Zaretskii <eliz@gnu.org>
+ * lisp/emacs-lisp/lisp-mode.el (lisp-el-font-lock-keywords-2): Fix
+ el-errs-re.
- Avoid leaving "ghost" of mouse pointer on MS-Windows
+2016-01-01 Paul Eggert <eggert@cs.ucla.edu>
- * src/w32term.c (frame_set_mouse_pixel_position):
- * src/w32fns.c (Fw32_mouse_absolute_pixel_position): Momentarily
- disable "mouse trails" when moving the mouse pointer. (Bug#22247)
- * src/w32term.c (frame_set_mouse_pixel_position): Include
- w32common.h.
+ Spelling and grammar fixes
-2015-12-27 Krzysztof Jurewicz <krzysztof.jurewicz@gmail.com> (tiny change)
+2016-01-01 Paul Eggert <eggert@cs.ucla.edu>
- Fix auth source lookups from erc with port numbers
+ Fix copyright years by hand
- * lisp/erc/erc.el (erc-open): `auth-source' wants strings, not port
- numbers (bug#20541).
+ These are dates that admin/update-copyright did not update, or
+ updated incorrectly.
-2015-12-27 Fran Litterio <flitterio@gmail.com>
+2016-01-01 Paul Eggert <eggert@cs.ucla.edu>
- Run erc-kill-channel-hook always on exit
+ Update copyright year to 2016
- * lisp/erc/erc.el (erc-kill-buffer-function): Run erc-kill-channel-hook
- when erc-kill-queries-on-quit is set (bug#21187).
+ Run admin/update-copyright.
-2015-12-27 Paul Eggert <eggert@cs.ucla.edu>
+2016-01-01 Paul Eggert <eggert@cs.ucla.edu>
- Spelling fix
+ Merge from gnulib
- * test/automated/url-parse-tests.el:
- (url-generic-parse-url/same-document-reference):
- Rename from url-generic-parse-url/same-decument-reference.
+ This mostly just updates copyright dates of gnulib files.
+ It also updates to the latest version of texinfo.tex.
-2015-12-27 Paul Eggert <eggert@cs.ucla.edu>
+2015-12-31 Mark Oteiza <mvoteiza@udel.edu>
- Reword initial *scratch* for brevity, appearance
+ lisp/emacs-lisp/chart.el (chart-new-buffer): Move to silence byte compiler.
- * lisp/startup.el (initial-scratch-message):
- Reword to avoid apostrophes, and to make it shorter.
- See the thread starting in:
- http://lists.gnu.org/archive/html/emacs-devel/2015-12/msg01241.html
+2015-12-31 Mark Oteiza <mvoteiza@udel.edu>
-2015-12-26 Leo Liu <sdl.web@gmail.com>
+ Port chart.el methods to cl-generic.
- Add ert-deftest to lisp-mode.el
+ cl-call-next-method cannot be used inside EIEIO's defmethod.
+ * lisp/emacs-lisp/chart.el: Require cl-generic at compile time.
+ * lisp/emacs-lisp/chart.el (initialize-instance, chart-draw):
+ (chart-draw-title, chart-size-in-dir, chart-draw-axis):
+ (chart-axis-draw, chart-translate-xpos, chart-translate-ypos):
+ (chart-translate-namezone, chart-draw-data, chart-add-sequence):
+ (chart-trim, chart-sort): Use cl-defmethod instead of defmethod.
- * lisp/emacs-lisp/lisp-mode.el (lisp-imenu-generic-expression,
- lisp-el-font-lock-keywords-1): Add ert-deftest.
+2015-12-31 Brian Burns <bburns.km@gmail.com>
-2015-12-26 Lars Ingebrigtsen <larsi@gnus.org>
+ Add nt/INSTALL.W64 build instructions
- Mark imap changes as not needing doc changes
+ * nt/INSTALL.W64: New file.
+ * nt/INSTALL: Point to INSTALL.W64 for 64-bit build instructions.
- * lisp/net/imap.el (imap-ssl-open): Remove
+2015-12-31 Joakim Jalap <joakim.jalap@fastmail.com>
-2015-12-26 Lars Ingebrigtsen <larsi@gnus.org>
+ Add new input method 'programmer-dvorak'
- Use built-in encryption in imap.el
+ * lisp/leim/quail/programmer-dvorak.el ("programmer-dvorak"): New
+ input method.
- * lisp/net/imap.el (imap-ssl-program): Remove (bug#21134).
- (imap-starttls-open): Use open-network-stream instead of starttls.el.
- (imap-tls-open): Use open-network-stream instead of tls.el.
+ * etc/NEWS: Mention it.
-2015-12-26 Eli Zaretskii <eliz@gnu.org>
+2015-12-31 Eli Zaretskii <eliz@gnu.org>
- Don't try using /bin/sh in artist.el on MS-Windows
+ Allow to invoke original M-TAB binding in 'flyspell-prog-mode'
- * lisp/textmodes/artist.el (artist-figlet-get-font-list-windows):
- New function.
- (artist-figlet-choose-font): Use it on MS-Windows and MS-DOS.
- (Bug#20167)
+ * lisp/textmodes/flyspell.el (flyspell-prog-mode): Record the
+ original M-TAB binding in a buffer-local variable.
+ (flyspell-auto-correct-word): Invoke the original binding of M-TAB
+ if that is recorded, when point is in a place where flyspell
+ should not be active (e.g., because the user turned on
+ 'flyspell-prog-mode'). (Bug#18533)
-2015-12-26 Wolfgang Jenkner <wjenkner@inode.at>
+2015-12-31 Eli Zaretskii <eliz@gnu.org>
- Always define gmalloc etc. in src/gmalloc.c
+ Fix EWW rendering of long RTL lines
- This is a work-around to prevent the compiler from using semantic
- knowledge about malloc for optimization purposes. E.g., gcc 5.2
- with -O2 replaces most of calloc's definition by a call to calloc;
- see Bug#22085.
- * src/gmalloc.c [!HYBRID_MALLOC] (malloc, realloc, calloc)
- (aligned_alloc, free): Do not undef. Instead, define these as
- functions (perhaps renamed to gmalloc etc.) in terms of gmalloc etc.
+ * lisp/net/shr.el (shr-insert-document): Undo any previous hscroll
+ of the selected window before filling its lines. (Bug#22250)
-2015-12-26 Eli Zaretskii <eliz@gnu.org>
+2015-12-31 Vincent Belaïche <vincentb1@users.sourceforge.net>
- Fix documentation of browse-url browser-related functions
+ fix bug#21054
- * lisp/net/browse-url.el (browse-url)
- (browse-url-default-browser, browse-url-default-windows-browser)
- (browse-url-default-macosx-browser, browse-url-chromium)
- (browse-url-kde, browse-url-text-xterm): Clarify the usage of ARGS
- and NEW-WINDOW arguments in these functions. (Bug#19421)
+ * ses.el (ses-check-curcell): Call `ses-set-curcell' unconditionally
-2015-12-26 Paul Eggert <eggert@cs.ucla.edu>
+2015-12-31 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
- Propagate Bug#14412 fix to backtrace_eval_unrewind
+ Clean up cairo printing code
- * src/eval.c (unbind_to): Redo so that the FALLTHROUGH!! comment
- becomes accurate again. This shouldn’t affect behavior.
- (backtrace_eval_unrewind): Apply the recent unbind_to fix here, too.
+ * src/gtkutil.c (xg_get_page_setup): Use listn.
+ * src/xfns.c (Fx_export_frames, Fx_print_frames_dialog): Doc fix. Use
+ decode_window_system_frame and FRAME_VISIBLE_P.
+ (Fx_print_frames_dialog): Use redisplay_preserve_echo_area instead
+ of Fdisplay.
+ * src/xterm.c (x_cr_export_frames): Use redisplay_preserve_echo_area
+ instead of Fdisplay. Temporarily unblock_input around QUIT.
-2015-12-26 Eli Zaretskii <eliz@gnu.org>
+2015-12-30 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
- Don't produce non-ASCII characters in *scratch*
+ Add handle_user_signal_hook
- * lisp/startup.el (initial-scratch-message): Quote apostrophes to
- avoid producing non-ASCII characters in the *scratch* buffer's
- commentary.
+ * src/keyboard.h (handle_user_signal_hook): New declaration.
+ * src/keyboard.c (handle_user_signal_hook): New variable.
+ (handle_user_signal): Call it.
-2015-12-26 Eli Zaretskii <eliz@gnu.org>
+2015-12-30 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
- Document changes in 'compare-windows'
+ Avoid writing to purespace
- * lisp/vc/compare-w.el (compare-windows-removed)
- (compare-windows-added): Doc fix.
+ * src/alloc.c (Fmake_string): Don't write to empty string contents.
+ (allocate_vector): Don't write to empty vector size.
+ * src/character.h (CHECK_CHARACTER_CAR, CHECK_CHARACTER_CDR):
+ Don't call unnecessary XSETCAR or XSETCDR.
+ * src/lisp.h (STRING_SET_UNIBYTE, STRING_SET_MULTIBYTE): Don't
+ write to empty string size_byte.
- * doc/emacs/files.texi (Comparing Files): Document the changes in
- window selection by 'compare-windows'.
+2015-12-30 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
-2015-12-26 Eli Zaretskii <eliz@gnu.org>
+ Remove unused variable
- Document 'vc-annotate-background-mode'
+ * lisp/international/mule-cmds.el: Remove unused variable
+ `mac-system-coding-system'.
- * doc/emacs/maintaining.texi (Old Revisions): Document
- 'vc-annotate-background-mode'.
+2015-12-30 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
-2015-12-26 Eli Zaretskii <eliz@gnu.org>
+ * configure.ac: Find libxml2 headers in Xcode SDK dir on Darwin.
- Document 'vc-region-history'
+2015-12-30 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
- * doc/emacs/maintaining.texi (VC Change Log): Document
- 'vc-region-history'.
+ Use posix_openpt instead of openpty on Darwin
-2015-12-26 Eli Zaretskii <eliz@gnu.org>
+ * configure.ac (PTY_ITERATION, FIRST_PTY_LETTER, PTY_OPEN)
+ (PTY_NAME_SPRINTF, PTY_TTY_NAME_SPRINTF): Remove
+ Darwin-specific definitions. Use posix_openpt instead.
- Improve documentation of 'vc-push'
+2015-12-30 Shakthi Kannan <shakthimaan@gmail.com>
- * doc/emacs/maintaining.texi (Pulling / Pushing): Expand and
- improve the documentation of 'vc-push'.
+ Document support for ':documentation' in Lisp mode
- * lisp/vc/vc.el (vc-pull, vc-push): Doc fix.
+ * lisp/emacs-lisp/lisp-mode.el (lisp-string-in-doc-position-p)
+ (lisp-string-after-doc-keyword-p)
+ (lisp-font-lock-syntactic-face-function): Add doc strings.
-2015-12-26 Alain Schneble <a.s@realize.ch>
+2015-12-30 Shakthi Kannan <shakthimaan@gmail.com>
- Include the tests for the URL parsing fixes
+ Document new features of TeX mode
-2015-12-26 Alain Schneble <a.s@realize.ch>
+ * doc/emacs/text.texi (TeX Print): Document
+ 'tex-print-file-extension'.
+ * doc/emacs/programs.texi (Misc for Programs): Document support
+ for Prettify Symbols mode in TeX mode.
- Make relative URL parsing and resolution consistent with RFC 3986 (bug#22044)
+2015-12-30 Eli Zaretskii <eliz@gnu.org>
- * test/automated/url-parse-tests.el: Add tests covering url-generic-parse-url.
- * test/automated/url-expand-tests.el: Add tests covering url-expand-file-name.
- * lisp/url/url-parse.el (url-generic-parse-url): Keep empty fragment
- information in URL-struct.
- * lisp/url/url-parse.el (url-path-and-query): Do not artificially turn empty
- path and query into nil path and query, respectively.
- * lisp/url/url-expand.el (url-expander-remove-relative-links): Do not turn
- empty path into an absolute ("/") path.
- * lisp/url/url-expand.el (url-expand-file-name): Properly resolve
- fragment-only URIs. Do not just return them unchanged.
- * lisp/url/url-expand.el (url-default-expander): An empty path in the relative
- reference URI should not drop the last segment.
+ Clarify docs of hscroll in RTL text
- Backport:
+ * doc/lispref/windows.texi (Horizontal Scrolling): Clarify the
+ meaning of a window's horizontal scroll amount for RTL paragraphs.
- (cherry picked from commit b792ecea1715e080ad8e232d3d154b8a25d2edfb)
+2015-12-30 Eli Zaretskii <eliz@gnu.org>
-2015-12-26 Eli Zaretskii <eliz@gnu.org>
+ Fix rendering of HTML pages that use character composition
- Document 'url-user-agent'.
+ * src/indent.c (Fvertical_motion): Fix the case when point starts
+ in the middle of a composition, as in shr-vertical-motion.
+ (Bug#22250)
- * lisp/url/url-http.el (url-user-agent): Move from here...
- * lisp/url/url-vars.el (url-user-agent): ...to here. This is to
- keep all the URL defcustoms in one place, and also have it defined
- whenever the URL library is loaded.
+2015-12-30 Eli Zaretskii <eliz@gnu.org>
- * doc/misc/url.texi (Customization): Document 'url-user-agent'.
+ Avoid some compiler warnings in w32.c
-2015-12-26 Eli Zaretskii <eliz@gnu.org>
+ * src/w32.c (codepage_for_filenames, crlf_to_lf)
+ (ansi_encode_filename, socket_to_fd, sys_write)
+ (check_windows_init_file): Avoid compiler warnings about
+ differences in pointer signedness.
- Document protocols supported by URL library via Tramp
+2015-12-29 Dmitry Gutov <dgutov@yandex.ru>
- * doc/misc/url.texi (Tramp): New node, describes the URL schemes
- supported via Tramp.
- (Supported URL Types, file/ftp, rlogin/telnet/tn3270): Mention
- Tramp.
+ Undo ill-advised change
-2015-12-26 Eli Zaretskii <eliz@gnu.org>
+ * lisp/progmodes/xref.el (xref-collect-matches): Undo
+ ill-advised change. The hits come in the order that `find'
+ produces them in, which isn't alphabetical.
- Document changes in Shell-script mode
+2015-12-29 Dmitry Gutov <dgutov@yandex.ru>
- * lisp/progmodes/sh-script.el (sh-mode, sh-set-shell): Document
- the 'sh-shell' file-local variable.
- (top level): Add an auto-load form to avoid byte-compiler warning
- about 'comint-send-string'.
+ Unbreak completion in python-mode buffers
-2015-12-26 Eli Zaretskii <eliz@gnu.org>
+ * lisp/progmodes/python.el (python-shell-completion-at-point):
+ Unbreak in python-mode buffers.
- Fix documentation of 'ses-define-local-printer'
+2016-01-09 Andrew Hyatt <ahyatt@gmail.com>
- * doc/misc/ses.texi (Printer functions): Fix whitespace between
- sentences and punctuation. Add an index entry for
- 'ses-define-local-printer'.
+ Adding example replies to bug-triage.
-2015-12-26 Shakthi Kannan <shakthimaan@gmail.com>
+ * admin/notes/bug-triage: Added example replies. Also, as requested,
+ making the process notes into more of a checklist.
- Document 'ert-summarize-tests-batch-and-exit'
+2016-01-08 Andrew Hyatt <ahyatt@gmail.com>
- * doc/misc/ert.texi (Running Tests in Batch Mode): Document
- 'ert-summarize-tests-batch-and-exit'.
+ Rename the notes/admin/triage file to bug-triage.
-2015-12-26 Eli Zaretskii <eliz@gnu.org>
+ * CONTRIBUTE: Change reference to the triage file name.
+ * admin/notes/triage: Rename file to admin/notes/bug-triage.
- Avoid assertion violation in unbind_to
+2016-01-07 Glenn Morris <rgm@gnu.org>
- * src/eval.c (unbind_to) <SPECPDL_LET>: Avoid assertion violation
- if we get here with an object that is not a symbol. (Bug#14412)
+ Allow creation of loaddefs files without timestamps.
-2015-12-25 Andreas Schwab <schwab@linux-m68k.org>
+ * lisp/emacs-lisp/autoload.el (autoload-timestamps): New variable.
+ (autoload-generate-file-autoloads, update-directory-autoloads):
+ If autoload-timestamps is nil, write "t" instead of file timestamp.
+ (autoload-find-destination, update-directory-autoloads):
+ If timestamp is "t", use the modtime of the output file instead.
- Don't treat /foo/bar:mumble as ange-ftp address
+2016-01-06 Glenn Morris <rgm@gnu.org>
- * lisp/net/browse-url.el (browse-url-filename-alist): Match colons
- only in the first component. (bug#5362)
+ Doc tweaks.
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+ * lisp/calendar/cal-hebrew.el (diary-hebrew-list-entries):
+ * lisp/calendar/cal-iso.el (calendar-iso-to-absolute)
+ (calendar-iso-from-absolute):
+ * lisp/calendar/cal-tex.el (cal-tex-comment):
+ * lisp/calendar/solar.el (calendar-time-display-form): Doc tweaks.
- Follow <meta> redirects in eww
+2016-01-06 Glenn Morris <rgm@gnu.org>
- Merge conflict, but I think I resolved it.
+ Build tweaks related to tags files.
- Follow meta refresh tags in eww
+ * lib-src/Makefile.in (tagsfiles): New variable.
+ (TAGS): Also depend on the source files. Use our own etags program.
+ * lisp/Makefile.in (ETAGS): Add EXEEXT.
+ (lisptagsfiles1, lisptagsfiles2, lisptagsfiles3, lisptagsfiles4):
+ Remove.
+ (tagsfiles): New, replacing lisptagsfiles1 etc.
+ Remove irrelevant source files here rather than in the TAGS rule.
+ (${ETAGS}): New rule.
+ (TAGS): Also depend on the etags executable.
+ * lwlib/Makefile.in (EXEEXT): New, set by configure.
+ (ETAGS): Add EXEEXT.
+ (${ETAGS}): New rule.
+ (ctagsfiles): Use "wildcard".
+ (TAGS): Also depend on the etags executable.
+ * nt/Makefile.in (ETAGS, tagsfiles): New variables.
+ (${ETAGS}): New rule.
+ (TAGS): Fix dependencies.
+ * oldXMenu/Makefile.in (EXEEXT): New, set by configure.
+ (ETAGS): New variable, replacing $TAGS. Use our own etags program.
+ Remove "-t" argument.
+ (${ETAGS}): New rule.
+ (tagsfiles): New variable.
+ (TAGS): New rule, with proper dependencies.
+ * src/Makefile.in (ETAGS): Add EXEEXT. Add a build rule.
+ (ctagsfiles1, ctagsfiles2): Use "wildcard".
+ (ctagsfiles3): Remove.
+ (TAGS): Depend on etags.
+ (../lisp/TAGS, $(lwlibdir)/TAGS): Let the rules in the relevant
+ directories decide if updates are needed.
+
+2016-01-06 Glenn Morris <rgm@gnu.org>
+
+ * lisp/Makefile.in (CAL_SRC): Skip calendar.el.
+
+2016-01-06 Glenn Morris <rgm@gnu.org>
+
+ * test/lisp/emacs-lisp/package-tests.el
+
+ (package-test-macro-compilation): Fixup branch merge.
- * eww.el (eww-tag-meta): Follow meta refresh tags (bug#22234).
+2016-01-05 Eli Zaretskii <eliz@gnu.org>
- Backport:
+ Fix fallout from merging emacs-25 branch in test/
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+ * .gitignore: Update for the new place of biditest.txt.
+ * test/automated/: Directory removed. All files moved to their
+ proper places.
+ * test/etags/: Directory removed. All files moved to their proper
+ places.
+ * test/automated/url-parse-tests.el: File removed; it was an exact
+ copy of the same file in test/lisp/url/.
+ * test/automated/url-expand-tests.el: Moved to test/lisp/url/.
- Allow http://user:pass@foo/ URLs again
+2016-01-04 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/url/url-auth.el (url-basic-auth): Allow explicit
- user/passwords in URLs (bug#19046).
+ Spelling fixes.
- Backport:
+2016-01-04 Daniel Colascione <dancol@dancol.org>
- (cherry picked from commit b563715a2db265517d5a77f165a42afa1e233fdd)
+ Let users disable unsafe signal handling code
-2015-12-25 Samer Masterson <samer@samertm.com>
+ * src/keyboard.c (syms_of_keyboard): New user variables
+ `attempt-stack-overflow-recovery' and
+ `attempt-orderly-shutdown-on-fatal-signal'.
+ * src/sysdep.c (stack_overflow): Check
+ `attempt-stack-overflow-recovery'.
+ * src/emacs.c (terminate_due_to_signal): Check
+ `attempt-orderly-shutdown-on-fatal-signal'.
- Autoload url-insert-buffer-contents
+2016-01-03 Michael Albinus <michael.albinus@gmx.de>
- * lisp/url/url-handlers.el: Add autoload cookie so that
- `package-list-packages' doesn't bug out (bug#21927) (tiny change)
+ * configure.ac: Add error message for gfile on Nextstep.
- Backport:
+2016-01-03 John Wiegley <johnw@newartisans.com>
- (cherry picked from commit 7a7b5b492ff9929eecd90c4564db6fbf3b192323)
+ Merge branch 'emacs-25-merge'
-2015-12-25 Eli Zaretskii <eliz@gnu.org>
+2016-01-02 Vincent Belaïche <vincentb1@users.sourceforge.net>
- Make sure *scratch* etc. use forward slashes in its default-directory
+ Align textually on fix done for emacs-25 branch for bug#21054
- * lisp/startup.el (normal-top-level): On MS-Windows, convert
- backslashes to forward slashes while decoding default-directory
- of the initially-created buffers.
+ * lisp/ses.el (ses-check-curcell): Suppress ``temporary fix'' comment,
+ and useless `(if t ...)' in order to align textually on fix done for
+ emacs-25 branch for bug#21054.
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+2016-01-02 K. Handa <handa@gnu.org>
- More eww file name coding fixes
+ support rendering of wider range of combinging characters by ftfont backend
- * eww.el (eww-decode-url-file-name): Use the base coding
- system to check for encodability.
+ * lisp/language/hebrew.el (hebrew-shape-gstring): If the font backend
+ supports rendering of combining characters, call
+ font-shape-gstring.
- Backport:
+ * src/font.c (Ffont_get): Handle `combining-capability' property.
+ (syms_of_font): New symbol ":combining-capability'.
- (cherry picked from commit a8627008abe4ab339df19b417776da28b3ce0fc7)
+ * src/font.h (struct font_driver): New member combining_capability.
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+ * src/ftfont.c: Include "category.h".
+ (ftfont_driver): Initialize combining_capability to
+ ftfont_combining_capability.
+ (ftfont_shape_by_flt): If OTF is null, try to find a suitable
+ FLT in advance.
+ (ftfont_combining_capability): New function.
- Always save eww history
+2016-01-01 Andrew Hyatt <ahyatt@gmail.com>
- * eww.el (eww-setup-buffer): Always save history, even when
- called from outside the eww buffer (bug#19638).
+ Add notes on bug triage procedure
- Backport:
+ * CONTRIBUTE: In section on the issue tracker, point to new triage file.
+ * admin/notes/triage: New file explaining triage procedure.
- (cherry picked from commit 2a0f18d9b6ce0ccce3d9c4a4a3b5743bae71b41e)
+2015-12-30 Vincent Belaïche <vincentb1@users.sourceforge.net>
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+ Correct ses-rename-cell cursor-intangible text prop updating.
- Default web pages to right-to-left
+ There were two problems:
- * eww.el (eww-mode): Most web pages are left-to-right, so make
- that the default (bug#19801).
+ - First ses-rename-cell has to work when called non interactively
+ (with non-nil CELL argument), so in this case the start pos of
+ put-text-property cannot be plainly (point), you need a
+ ses-goto-print call before
- * shr.el (shr-tag-html): Respect "dir" attributes
- (left-to-right, right-to-left).
+ - Second, the range itself was computed erronously, only the first
+ char was affected instead of the full cell width. This was not
+ noticeable prior to changes (Deprecate `intangible' and
+ `point-entered' properties) made by Stefan on 2015-04-13T19:51:15Z
- Backport:
+ * lisp/ses.el (ses-rename-cell): Correct computation of position range
+ to which the 'cursor-intangible text property has to be set to cell
+ new name.
- (cherry picked from commit 9e089ec8a380ec3758fcf1564c5f86dc92c68c2a)
+2015-12-30 Vincent Belaïche <vincentb1@users.sourceforge.net>
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+ Don't fake empty cells value by "" when printing with a lambda.
- Make toggling checkboxes work again
+ When using a lambda expression printer function the user should be
+ free to format differently a really empty cell, ie. containing nil,
+ from a cell containing an empty string "".
- * eww.el (eww-update-field): Make toggling checkboxes work
- again (bug#21881).
+ * ses.el (ses-call-printer): Replace `(or value "")' by just `value'
+ in the case of a lambda expression printer function.
- Backport:
+ * ses.texi (Printer functions): Add example and description about
+ lambda expression printer function handling all the possible values,
+ including unexpected ones.
- (cherry picked from commit 5e56f606952e5e81b4d3a93ea70e791b74b33041)
+2015-12-30 Vincent Belaïche <vincentb1@users.sourceforge.net>
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+ Quick temporary hack to fix curcell refreshing.
- Don't store cookies with empty names
+ The problem was caused by change: 2015-04-13 Deprecate `intangible'
+ and `point-entered' properties. The problem is that this change has
+ removed the (setq ses--curcell t) setting in the ses-command-hook
+ function.
- * lisp/url/url-cookie.el (url-cookie-store): Refuse to store
- cookies with empty names (bug#21936).
+ * ses.el (ses-check-curcell): replace `(eq ses--curcell t)' by just `t' as
+ a condition to call function `ses-set-curcell'. Comment this as a quick
+ temporary hack to make it work, as I don't know yet whether a definite
+ correction would be to make the ses-set-curcell at every ses-check-curcell,
+ or to revert to the previous approach, ie marking ses--curcell as out-of-date
+ at every potentially cursor motion command.
- Backport:
+2015-12-30 Lars Magne Ingebrigtsen <larsi@gnus.org>
- (cherry picked from commit 9f0fd7cb1aec3eb9e2e0f7b8854c30870286d96c)
+ Restrictive URL checking tweaks
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+ * lisp/net/eww.el (eww): Check whether the domain is
+ restrictive instead of the string
+ (http://македонија.icom.museum is restrictive even if each
+ part is from a different script).
- Stop rendering HTML before specdlr exhaustion
+2015-12-30 Lars Magne Ingebrigtsen <larsi@gnus.org>
- Fixes: 22117
+ New function `puny-highly-restrictive-domain-p'
- * shr.el (shr-descend): Stop rendering before we run out of
- specpdl room (bug#22117).
+ * lisp/net/puny.el (puny-highly-restrictive-string-p): Rename.
+ (puny-highly-restrictive-domain-p): New function.
- Backport:
+2015-12-30 Lars Magne Ingebrigtsen <larsi@gnus.org>
- (cherry picked from commit 248da292fe46224b0b5a79b632c89cf4de2c2081)
+ eww build fix (require puny)
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+2015-12-30 Lars Magne Ingebrigtsen <larsi@gnus.org>
- Use cl-reduce, not reduce.
+ Transform non-restrictive domains to punycode for display
- Backport:
+ * lisp/net/eww.el (eww): Check whether the domain is Highly
+ Restrictive in the Unicode IDNA sense.
- (cherry picked from commit fe4606f93b91ff3d046aee0cf21ecc277af7a786)
+2015-12-30 John Wiegley <johnw@newartisans.com>
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+ Merge emacs-25 into master (using imerge)
- Allow several <tbody> tags in shr
+2015-12-29 Eli Zaretskii <eliz@gnu.org>
- * shr.el (shr-table-body): New function to find the real body
- of a table.
- (shr-tag-table): Use it to render several <tbody> tags in a
- table (bug#22170).
+ Fix typos in CC Mode manual
- Backport:
+ * doc/misc/cc-mode.texi (c-offsets-alist, Style Variables): Fix
+ typos. (Bug#22267)
- (cherry picked from commit cdaf33029d6620073833876d76056045ecfbc7c4)
+2015-12-29 Eli Zaretskii <eliz@gnu.org>
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+ Avoid assertion violations in compact_font_cache_entry
- Make prettier unique file names in eww
+ * src/alloc.c (compact_font_cache_entry): Don't use VECTORP to
+ avoid assertion violation in ASIZE. (Bug#22263)
- (eww-make-unique-file-name): Make unique file names by making
- files like foo(2).jpg instead of foo(1)(2).jpg.
+2015-12-29 Eli Zaretskii <eliz@gnu.org>
- Backport:
+ Fix filling text with bidirectional characters in shr.el
- (cherry picked from commit edfdd0a6cbdfa9e5e4bd0553e2b489401ca39266)
+ * lisp/net/shr.el (shr-insert-document): Bind
+ bidi-display-reordering to nil while filling lines. This is
+ required for when a line includes characters whose bidi
+ directionality is opposite to the base paragraph direction,
+ because columns are counted in the logical order. (Bug#22250)
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+2015-12-29 Lars Ingebrigtsen <larsi@gnus.org>
- Decode hex-encoded URLs before using them as file names
+ Further Unicode restrictive fixups
- * eww.el (eww-decode-url-file-name): New function.
- (eww-download-callback): Use it to decode file names before
- saving them.
+ * puny.el (puny-highly-restrictive-p): Include the extra
+ identifier characters from table 3.
- Backport:
+2015-12-29 Martin Rudalics <rudalics@gmx.at>
- (cherry picked from commit af22a010d87516c2a646572fb27512c03057784f)
+ * src/xfns.c (x_create_tip_frame): Process alpha parameter.
-2015-12-25 Ashish SHUKLA <ashish.is@lostca.se>
+2015-12-29 Michael Albinus <michael.albinus@gmx.de>
- Add FreeBSD cert bundle
+ Sync with Tramp 2.2.13
- * doc/misc/emacs-gnutls.texi (Help For Users): Document
- FreeBSD bundle.
+ * doc/misc/trampver.texi: Change version to "2.2.13.25.1".
- * lisp/net/gnutls.el (gnutls-trustfiles): Add FreeBSD cert bundle.
+ * lisp/net/tramp-compat.el (tramp-compat-delete-dups):
+ Use `tramp-compat-funcall'.
- Backport:
+ * lisp/net/tramp-gvfs.el (tramp-gvfs-parse-device-names):
+ Make `split-string' call compatible with older Emacsen.
- (cherry picked from commit 60c0f1a18ad88d6dc1a8f4ee5d9d18940eaeb6f7)
+ * lisp/net/trampver.el: Change version to "2.2.13.25.1".
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+2015-12-29 Lambda Coder <sjLambda@gmail.com>
- Ignore invalid SVG images
+ * doc/misc/tramp.texi: Editorial revisions to the Tramp manual
- * shr.el (shr-tag-svg): Ignore SVG images that have no width
- or height, because these can't be displayed by ImageMagick,
- anyway.
+2015-12-29 Lars Ingebrigtsen <larsi@gnus.org>
- Backport:
+ Mention that tls.el is secure by default, and will fail
- (cherry picked from commit 821107d53c2e390240d25c036b99ebbf9b4a93b6)
+2015-12-29 Lars Ingebrigtsen <larsi@gnus.org>
-2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
+ Make tls.el use trustfiles by default
- shr table rendering fix
+ * lisp/net/tls.el (tls-program): Add a certfile by default (bug#21227).
+ (open-tls-stream): Insert the trustfile by looking at
+ `gnutls-trustfiles'.
- * shr.el (shr-tag-table): Allow rendering body-less tables
- that have headers.
+2015-12-29 Lars Ingebrigtsen <larsi@gnus.org>
- Backport:
+ Refactor out gnutls-trustfiles
- (cherry picked from commit b05471e42c17e02c56c87d7599ada0c124a5fe09)
+ * lisp/net/gnutls.el (gnutls-trustfiles): Refactor out for reuse by tls.el.
-2015-12-25 Eli Zaretskii <eliz@gnu.org>
+2015-12-29 Lars Ingebrigtsen <larsi@gnus.org>
- Restore info about the build host in bug reports
+ Remove --insecure from gnutls-cli invocation
- * lisp/mail/emacsbug.el (report-emacs-bug): Report the system on
- which Emacs was built. This is important information for
- investigating bug reports reported by users who don't build their
- Emacs.
+ * tls.el (tls-program): Default to using secure TLS
+ connections (bug#19284).
-2015-12-25 Eli Zaretskii <eliz@gnu.org>
+2015-12-29 Lars Ingebrigtsen <larsi@gnus.org>
- Fix bootstrap broken by changes related to OS X file-name encoding
+ Add a new function to say whether a string is restrictive
- * lisp/international/ucs-normalize.el (eval-when-compile): Make
- sure char-code-property-alist includes elements that allow access
- to 'decomposition' and 'canonical-combining-class' Unicode
- properties, as compiling ucs-normalize.el requires that.
- * lisp/loadup.el (featurep 'ns): Load ucs-normalize and ns-win
- only of charprop.el was already loaded.
+ * puny.el (puny-highly-restrictive-p): New function.
- * src/Makefile.in ($(lispsource)/international/ucs-normalize.elc):
- New order-only dependency.
+2015-12-28 Paul Eggert <eggert@cs.ucla.edu>
-2015-12-25 Leo Liu <sdl.web@gmail.com>
+ Spelling fix
- * lisp/ido.el (ido-add-virtual-buffers-to-list): Use bookmark-get-filename.
+2015-12-28 Paul Eggert <eggert@cs.ucla.edu>
-2015-12-25 Michael Albinus <michael.albinus@gmx.de>
+ Port report-emacs-bug to deterministic builds
- Make tramp-test29-vc-registered more robust
+ * lisp/mail/emacsbug.el (report-emacs-bug): Future-proof the
+ recent "built on" change to deterministic builds where
+ emacs-build-system will be nil. See:
+ http://lists.gnu.org/archive/html/emacs-devel/2015-12/msg01369.html
- * test/automated/tramp-tests.el (tramp-test29-vc-registered):
- Move `bzr' case down. Skip test when `vc-create-repo' fails.
- Remove instrumentation.
+2015-12-28 Jose A. Ortega Ruiz <jao@gnu.org> (tiny change)
-2015-12-24 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+ Fix URL auth error message
- * lisp/term/x-win.el (x-gtk-stock-map): Fix typo.
+ * lisp/url/url-http.el (url-http-handle-authentication): Make the error
+ message more correct (bug#20069).
-2015-12-24 Katsumi Yamaoka <yamaoka@jpl.org>
+2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
- Fix `gnus-union' so as to behave like `cl-union'
+ Mention the new puny.el library
- * lisp/gnus/gnus-group.el (gnus-group-prepare-flat):
- Make gnus-union use `equal' to compare items in lists.
+2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/gnus/gnus-util.el (gnus-union):
- Make it behave like cl-union partially.
+ IDNA-related fixes for the URL library
-2015-12-23 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/url/url-http.el (url-http-create-request): IDNA-encode
+ the Host: header.
- Fix dired.c typo with ptrdiff_t vs Lisp_Object
+ * lisp/url/url-util.el (url-encode-url): Don't hex-encode
+ domain names, but leave them as UTF-8, so that they can be
+ IDNA-encoded later when contacting the host.
- * src/dired.c (file_name_completion): Don't assume Lisp_Object is
- an integer type, fixing a problem introduced in the recent fix for
- Bug#22169.
+2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
-2015-12-23 Eli Zaretskii <eliz@gnu.org>
+ IDNA-encode all domain names in `open-network-stream'
- Document default process sentinel more prominently
+ * network-stream.el (open-network-stream)
+ (network-stream-open-plain, network-stream-open-starttls):
+ IDNA-encode all domain names, if needed.
- * doc/lispref/processes.texi (Asynchronous Processes): Mention the
- defaults for process filter and sentinel. Provide cross-references.
- (Process Information): Provide cross-references to where filters
- and sentinels are described.
- (Filter Functions): Add an index entry for "default filter".
- (Sentinels): Add a few status messages not documented previously.
- Resolve the "killed" confusion. Document and describe the default
- sentinel. (Bug#22220)
+2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
-2015-12-23 Eli Zaretskii <eliz@gnu.org>
+ Fix puny-encoding all-non-ASCII domains
- Fix file-name completion on OS X
+ * puny.el (puny-encode-string): Fix the all-non-ASCII encoding case.
- * src/dired.c (file_name_completion): Reject false matches due to
- file-name-coding-systems that decompose characters when encoding
- file names, by comparing decoded file names as well. (Bug#22169)
- (syms_of_dired) <Qdecomposed_characters>: New DEFSYM.
+2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/international/ucs-normalize.el (utf-8-hfs): Give it a
- non-nil 'decomposed-characters' property.
+ * lisp/net/shr.el (shr-next-link): Don't bug out on adjacent links.
-2015-12-23 Anders Lindgren <andlind@gmail.com>
+2015-12-28 Tom Tromey <tom@tromey.com>
- File-name completion of non-ASCII characters on OS X (bug#22169)
+ set :safe on css-indent-offset
- The coding system `utf-8-nfd', locally defined in ns-win.el,
- didn't provide a :pre-write-conversion method, causing file name
- completion of non-ASCII characters to fail. Solved by using the
- `utf-8-hfs' coding system provided by `ucs-normalize'.
+ * lisp/textmodes/css-mode.el (css-indent-offset): Add :safe 'integerp.
- * lisp/loadup.el: Load international/ucs-normalize (when building
- for ns).
+2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/term/ns-win.el (utf-8-nfd): Made `utf-8-nfd' as alias for
- `utf-8-hfs' and removed the old implementation. Set `utf-8-hfs'
- as the file name coding system.
+ * eww.el (eww-mode): Remove superfluous bidi reset.
- * src/nsfns.m (ns-convert-utf8-nfd-to-nfc): Removed.
+2015-12-28 James Stout <james.wolf.stout@gmail.com> (tiny change)
-2015-12-23 Tom Tromey <tom@tromey.com>
+ Make chunked encoding trailer detection more compliant
- Fix bug #18588 by making bug-reference-bug-regexp more lenient
+ * lisp/url/url-http.el
+ (url-http-chunked-encoding-after-change-function): Make
+ trailer detection more compliant (bug#16345).
- * lisp/progmodes/bug-reference.el (bug-reference-bug-regexp): Accept
- "bug NNNN". (Bug #18588)
+2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
-2015-12-23 Tom Tromey <tom@tromey.com>
+ Reconnect erc even on server errors
- add some cl-* aliases to lisp-mode imenu
+ * lisp/erc/erc-backend.el (erc-server-reconnect-p): Try to
+ reconnect even if a server error has occurred (bug#18527).
- * (lisp-imenu-generic-expression): Add cl-define-compiler-macro,
- cl-defgeneric, and cl-defmethod.
+2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
-2015-12-22 Tom Tromey <tom@tromey.com>
+ Fix punycode short circuit logic
- Make a variable buffer-local
+ * puny.el (puny-encode-domain): Fix short-circuit logic.
- * lisp/generic-x.el (generic-rul-mode-setup-function): Make
- font-lock-syntax-table buffer-local. (Bug #21627)
+2015-12-28 Martin Rudalics <rudalics@gmx.at>
-2015-12-22 Eli Zaretskii <eliz@gnu.org>
+ Fix Bug#10873 in `report-emacs-bug'
- Fix decoding of text in URLs retrieved by EWW
+ * lisp/mail/emacsbug.el (report-emacs-bug): If
+ `report-emacs-bug-no-explanations' is nil, make sure we can show
+ mail and warnings buffer on this frame (Bug#10873).
- * lisp/net/eww.el (eww-render): Pass 'charset' to
- 'eww-display-raw'. Use the value of 'last-coding-system-used', if
- non-nil, to set 'buffer-file-coding-system' of the buffer where we
- show the URL.
- (eww-display-html, eww-display-raw): Decode the text correctly,
- using the charset found in the headers, and defaulting to UTF-8.
- If the user told us to use a specific encoding, override the
- charset from the headers. (Bug#22222)
+2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
-2015-12-22 Alan Mackenzie <acm@muc.de>
+ IDNA speed up
- Fix a coding error in c-forward-<>-arglist-recur. Fixes bug#22156
+ * puny.el (puny-encode-domain): Make the common non-IDNA case faster
- * lisp/progmodes/cc-engine.el (c-forward-<>-arglist-recur): Remove unused
- variable `tmp'.
- After a failed search for a matching ">", restore point before continuing.
+2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
-2015-12-22 Michael Albinus <michael.albinus@gmx.de>
+ Add IDNA domain encode/decode functions
- Instrument Tramp tests
+ * puny.el (puny-decode-domain): New function.
+ (puny-encode-domain): Ditto.
+ (puny-decode-digit): Fix digit decoding error.
- * test/automated/tramp-tests.el (tramp-test29-vc-registered)
- (tramp--test-utf8): Instrument tests.
+2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
-2015-12-22 Martin Rudalics <rudalics@gmx.at>
+ Rename idna.el to puny.el
- Fix `display-buffer' call in `display-message-or-buffer' (Bug#22221)
+ * puny.el: Renamed from idna.el to avoid name collisions with
+ the external idna.el library.
- * lisp/simple.el (display-message-or-buffer): Call
- `display-buffer' with ACTION instead of NOT-THIS-WINDOW
- (Bug#22221).
+2015-12-28 Lars Ingebrigtsen <larsi@gnus.org>
-2015-12-22 Juri Linkov <juri@linkov.net>
+ Always reset the bidi direction
- * lisp/saveplace.el (toggle-save-place, save-place-to-alist)
+ * eww.el (eww-display-html): Always reset the bidi direction
+ to `left-to-right' (bug#22257).
- (save-places-to-alist, save-place-dired-hook):
- Check for dired-subdir-alist. (Bug#19851)
+2015-12-28 Alan Mackenzie <acm@muc.de>
-2015-12-21 Paul Eggert <eggert@cs.ucla.edu>
+ Allow line comments ending with escaped NL to be continued to the next line.
- Add FIXME comment re stack overflow and modules
+ Use this in C, C++, and Objective C Modes. Fixes bug#22246
-2015-12-21 Paul Eggert <eggert@cs.ucla.edu>
+ * src/syntax.c (comment-end-can-be-escaped): New buffer local variable.
+ (forw-comment, back-comment): On encountering an end of comment character,
+ test whether it is escaped when `comment-end-can-be-escaped' is non-nil.
- Revert some recent emacs-module commentary
+ * doc/lispref/syntax.texi (Control Parsing): Describe
+ `comment-end-can-be-escaped'.
- Most of the recently-added commentary was incorrect, due to the
- possibility of stack overflow.
+ * etc/NEWS (Lisp Changes): Describe `comment-end-can-be-escaped'.
-2015-12-21 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/progmodes/cc-langs.el: New c-lang-setvar `comment-end-can-be-escaped'.
- Spelling fix: prefer "cooperate" to "co-operate"
+2015-12-28 Katsumi Yamaoka <yamaoka@jpl.org>
-2015-12-21 Paul Eggert <eggert@cs.ucla.edu>
+ lisp/gnus/mml-sec.el (mml-secure-bcc-is-safe): Keep old Emacsen compatibility
- Port undo fixes to -fno-common
+ * lisp/gnus/mml-sec.el (mml-secure-bcc-is-safe):
+ Don't use split-string with 4th arg for old Emacsen compatibility.
- Port recent fix for Bug#21968 to platforms like 'gcc -fno-common'.
- * src/keyboard.c, src/keyboard.h (point_before_last_command_or_undo)
- (buffer_before_last_command_or_undo):
- Declare in keyboard.h, and define in keyboard.c,
- instead of assuming the traditional Unix relaxed ref-def linkage.
+2015-12-27 Dmitry Gutov <dgutov@yandex.ru>
-2015-12-20 Philipp Stephani <phst@google.com>
+ Rename project-library-roots to project-external-roots
- Improve commentary for emacs-module.c
+ * lisp/progmodes/project.el (project-library-roots): Rename to
+ project-external-roots.
+ (project-library-roots-function): Rename to
+ project-vc-external-roots-function. Only use it in the VC
+ backend, for now. Update project-external-roots accordingly.
+ (project-vc-library-roots): Remove.
+ (project-or-libraries-find-regexp):
+ Rename to project-or-external-find-regexp.
- * src/lisp.h: Document emacs-module.c assumptions about EQ and NILP.
- * src/emacs-module.c (module_non_local_exit_get): Document that we
- cannot use the current implementation.
- (module_is_not_nil, module_eq): Document assumptions about EQ and
- NILP.
+ * lisp/progmodes/elisp-mode.el (elisp-library-roots):
+ Rename to elisp-load-path-roots.
-2015-12-20 Michael Albinus <michael.albinus@gmx.de>
+ * lisp/progmodes/etags.el (etags-library-roots): Remove. Use
+ an anonymous function for the default value of
+ project-vc-external-roots-function.
- Suppress test on Mac OS X
+2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
- * test/automated/tramp-tests.el (tramp--test-darwin-p): New defun.
- (tramp--test-utf8): Use it.
+ * idna.el (idna-decode-string-internal): Implement decoding.
-2015-12-20 Alan Mackenzie <acm@muc.de>
+2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
- Merge branch 'scratch/follow' into emacs-25
+ Further IDNA tweaks
- This allows Isearch, etc., to work well when Follow Mode is active.
+ (idna-encode-string): Make idna-encode-string safe for
+ non-ASCII use.
-2015-12-19 Michael Albinus <michael.albinus@gmx.de>
+2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/net/tramp-sh.el (tramp-get-ls-command-with-w-option): Improve check.
+ Clean up the code slightly
-2015-12-19 Eli Zaretskii <eliz@gnu.org>
+2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
- Fix last commit
+ Added basic idna encoding support
- * doc/emacs/rmail.texi (Rmail Deletion): Document new behavior of 'u'
- with numeric argument.
+ * lisp/net/idna.el: New file.
-2015-12-19 Eli Zaretskii <eliz@gnu.org>
+2015-12-27 Vivek Dasmohapatra <vivek@etla.org>
- Document new features of Rmail
+ Disconnection fixes for erc
- * doc/emacs/rmail.texi (Rmail Summary Edit, Rmail Deletion):
- Document new behavior of 'd' and 'C-d' with numeric argument.
- (Rmail Display): Document the rendering of HTML MIME parts.
+ * lisp/erc/erc-backend.el (erc-server-reconnect-p): Don't
+ reconnect if the user has disconnected explicitly (bug#4589).
-2015-12-19 Eli Zaretskii <eliz@gnu.org>
+2015-12-27 Thomas Riccardi <riccardi.thomas@gmail.com> (tiny change)
- Improve documentation of new cl-lib functions
+ Further erc asynch fixes
- * doc/misc/cl.texi (Predicates on Numbers, Numerical Functions):
- Fix wording.
+ * lisp/erc/erc-backend.el (erc-process-sentinel-2): Make
+ erc-server-connect to return even if the connection is not
+ ready. Then erc-open and erc-server-reconnect do the
+ same. (bug#5650).
-2015-12-19 Eli Zaretskii <eliz@gnu.org>
+2015-12-27 Vivek Dasmohapatra <vivek@etla.org>
- Document the new feature of 'minibuffer-with-setup-hook'
+ Make erc connect asynchronously
- * lisp/files.el (minibuffer-with-setup-hook): Clarify how FUN is
- added to `minibuffer-setup-hook'.
+ * lisp/erc/erc-backend.el (erc-server-reconnect): Use it to
+ reconnect asynchronously.
-2015-12-19 Eli Zaretskii <eliz@gnu.org>
+ * lisp/erc/erc-backend.el (erc-open-network-stream): New function (bug#5650).
- Document new features of Font Lock
+2015-12-27 Deniz Dogan <deniz@dogan.se>
- * doc/lispref/modes.texi (Other Font Lock Variables): Document
- 'font-lock-flush-function' and 'font-lock-ensure-function'.
- (Font Lock Basics): Document the basic fontification functions
- referenced in "Other Font Lock Variables".
+ Clear erc user list upon disconnection
- * lisp/font-lock.el (font-lock-flush, font-lock-ensure): Doc fix.
+ * lisp/erc/erc-backend.el (erc-process-sentinel): Clear channel user
+ lists upon disconnection. This prevents invalid channel
+ user lists when reconnecting (bug#10947).
-2015-12-19 Eli Zaretskii <eliz@gnu.org>
+2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
- Document new features of Rectangle mode
+ Don't bug out in erc after waking from sleep
- * doc/emacs/killing.texi (Rectangles): Document "C-x C-x" in
- rectangle-mark-mode.
+ * erc-backend.el (erc-server-send-ping): If the server has
+ closed connection, this may already have been detected and
+ `erc-server-last-received-time' has been set to nil (bug#13608).
-2015-12-19 Eli Zaretskii <eliz@gnu.org>
+2015-12-27 David Edmondson <dme@dme.org>
- Manual followup to last change
-
- * doc/lispref/display.texi (Displaying Messages): Sync with the
- doc string. (Bug#22210)
+ Proxy error in erc with multiple clients
-2015-12-19 Eli Zaretskii <eliz@gnu.org>
+ * lisp/erc/erc.el (erc-channel-receive-names): Fix errors
+ generated when multiple IRC clients talk to a single IRC proxy
+ (bug#19034).
- Clarify doc string of 'display-message-or-buffer'
+2015-12-27 Dima Kogan <dima@secretsauce.net>
- * lisp/simple.el (display-message-or-buffer): Doc fix. Suggested
- by Sebastian Wiesner <swiesner@lunaryorn.com>. (Bug#22210)
+ Ensure that we don't have several timers in erc
-2015-12-19 Eli Zaretskii <eliz@gnu.org>
+ * lisp/erc/erc-backend.el (erc-server-setup-periodical-ping): Checks
+ for existing timers in the alist before adding new ones. If a
+ timer already exists, it is cancelled and
+ overwritten. (bug#19292).
- * doc/emacs/emacs.texi (Top): Update top-level menus.
+2015-12-27 Jens Lechtenboerger <jens.lechtenboerger@fsfe.org>
- * doc/lispref/elisp.texi (Top): Update top-level menus.
+ * lisp/gnus/mml-sec.el: Fix warnings by adding autoloads
+ (bug#18718).
-2015-12-19 Eli Zaretskii <eliz@gnu.org>
+2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
- Document how to avoid file-local variables that aren't
+ * lisp/erc/erc-log.el (erc-log-setup-logging): Insert the previous log
+ at the start of the buffer, not at the end (bug#20496).
- * doc/emacs/custom.texi (Specifying File Variables): Describe how
- to prevent Emacs from interpreting unrelated text as file-local
- variables. (Bug#22166)
+2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
-2015-12-19 Dave Thomas <dave@pragprog.org> (tiny change)
+ * lisp/net/eww.el (eww-setup-buffer): Restore left-to-right defaults.
- Fix a typo in eterm-color's termcap entry
+2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/term.el (term-termcap-format): Fix a typo in the "ue="
- entry. (Bug#22184)
+ Don't join erc channels doubly
-2015-12-19 Eli Zaretskii <eliz@gnu.org>
+ * erc-join.el (erc-autojoin-channels): Don't join channels
+ more than once (if you have several nicks) (bug#20695).
- Allow 'browse-url-emacs' visit non-existent URLs
+2015-12-27 Eli Zaretskii <eliz@gnu.org>
- * lisp/url/url-handlers.el (url-insert-file-contents): Don't
- signal an error if VISIT is non-nil, to more faithfully emulate
- the behavior of 'insert-file-contents'. (Bug#22160)
+ Avoid leaving "ghost" of mouse pointer on MS-Windows
-2015-12-19 Paul Eggert <eggert@cs.ucla.edu>
+ * src/w32term.c (frame_set_mouse_pixel_position):
+ * src/w32fns.c (Fw32_mouse_absolute_pixel_position): Momentarily
+ disable "mouse trails" when moving the mouse pointer. (Bug#22247)
+ * src/w32term.c (frame_set_mouse_pixel_position): Include
+ w32common.h.
- Remove SunOS 4.x cruft
+2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
- Support for SunOS 4.x was removed in Emacs 23 but some cruft was left behind.
- * lib-src/pop.c [sun]: Remove no-longer-needed include.
- * lwlib/xlwmenu.c (SUNSO41): Remove.
+ * lisp/gnus/mml-sec.el (mml-secure-bcc-is-safe): Fix typo in last check-in.
-2015-12-19 Paul Eggert <eggert@cs.ucla.edu>
+2015-12-27 Jens Lechtenboerger <jens.lechtenboerger@fsfe.org>
- Merge from gnulib
+ Identify unsafe combinations of Bcc and encryption
- This mostly commentary fixes.
- * doc/misc/texinfo.tex, lib/intprops.h: Copy from gnulib.
- * lib/gnulib.mk: Regenerate with new gnulib-tool.
+ * lisp/gnus/gnus-util.el (gnus-subsetp): New function
+ * lisp/gnus/mml-sec.el (mml-secure-safe-bcc-list): New variable
+ * lisp/gnus/mml-sec.el (mml-secure-bcc-is-safe): New function
-2015-12-18 Michael Albinus <michael.albinus@gmx.de>
+2015-12-27 Krzysztof Jurewicz <krzysztof.jurewicz@gmail.com> (tiny change)
- Minor fixes in Tramp
+ Fix auth source lookups from erc with port numbers
- * lisp/net/tramp-sh.el (tramp-do-file-attributes-with-ls):
- Reorder ls arguments.
+ * lisp/erc/erc.el (erc-open): `auth-source' wants strings, not port
+ numbers (bug#20541).
- * lisp/net/tramp.el (tramp-dissect-file-name): Fix docstring.
+2015-12-27 Fran Litterio <flitterio@gmail.com>
-2015-12-18 Michael Albinus <michael.albinus@gmx.de>
+ Run erc-kill-channel-hook always on exit
- Make tramp a built-in package
+ * lisp/erc/erc.el (erc-kill-buffer-function): Run erc-kill-channel-hook
+ when erc-kill-queries-on-quit is set (bug#21187).
- * lisp/finder.el (finder-compile-keywords): Update
- `package--builtins' also when Version: keyword is available.
+2015-12-26 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/net/trampver.el: Add Version: keyword.
- (tramp-version): Change it to "2.2.13.25.1", in order to be
- compatible with `version-to-list'.
+ Spelling fix
-2015-12-18 Lele Gaifax <lele@metapensiero.it>
+ * test/automated/url-parse-tests.el:
+ (url-generic-parse-url/same-document-reference):
+ Rename from url-generic-parse-url/same-decument-reference.
- * etc/tutorials/TUTORIAL.it: Update and fix typos.
+2015-12-26 Paul Eggert <eggert@cs.ucla.edu>
-2015-12-18 Alan Mackenzie <acm@muc.de>
+ Reword initial *scratch* for brevity, appearance
- Rename `recenter-group' to `recenter-window-group'
+ * lisp/startup.el (initial-scratch-message):
+ Reword to avoid apostrophes, and to make it shorter.
+ See the thread starting in:
+ http://lists.gnu.org/archive/html/emacs-devel/2015-12/msg01241.html
- * doc/lispref/windows.texi (Textual Scrolling)
- * lisp/window.el (top level, recenter-group)
- * lisp/follow.el (follow-mode)
- * lisp/isearch.el (isearch-back-into-window): Rename `recenter-group' to
- `recenter-window-group' and `recenter-group-function' to
- `recenter-window-group-function'.
+2015-12-26 Leo Liu <sdl.web@gmail.com>
-2015-12-18 Eli Zaretskii <eliz@gnu.org>
+ Add ert-deftest to lisp-mode.el
- Fix vertical-motion in tabulated-list mode
+ * lisp-mode.el (lisp-imenu-generic-expression,
+ lisp-el-font-lock-keywords-1): Add ert-deftest.
- * src/indent.c (Fvertical_motion): When moving from line beginning
- to point under line truncation, assume overshoot by one line only
- if point actually lies beyond the window's right margin.
- (Bug#22194)
+2015-12-26 Lars Ingebrigtsen <larsi@gnus.org>
-2015-12-18 Martin Rudalics <rudalics@gmx.at>
+ Mark imap changes as not needing doc changes
- Don't have help functions call x-display-pixel-width/-height on ttys
+ * imap.el (imap-ssl-open): Remove
- * lisp/help.el (temp-buffer-max-height, temp-buffer-max-width):
- Don't call x-display-pixel-width/-height on ttys.
+2015-12-26 Lars Ingebrigtsen <larsi@gnus.org>
-2015-12-18 Dmitry Gutov <dgutov@yandex.ru>
+ Use built-in encryption in imap.el
- Use 'hg id' in vc-hg-previous-revision
+ * lisp/net/imap.el (imap-ssl-program): Remove (bug#21134).
+ (imap-starttls-open): Use open-network-stream instead of starttls.el.
+ (imap-tls-open): Use open-network-stream instead of tls.el.
- * lisp/vc/vc-hg.el (vc-hg-previous-revision):
- Use 'hg id' to retrieve it (bug#22032).
+2015-12-26 Eli Zaretskii <eliz@gnu.org>
-2015-12-17 Alan Mackenzie <acm@muc.de>
+ Don't try using /bin/sh in artist.el on MS-Windows
- * lisp/follow.el (follow-sit-for): Remove (it's redundant).
+ * lisp/textmodes/artist.el (artist-figlet-get-font-list-windows):
+ New function.
+ (artist-figlet-choose-font): Use it on MS-Windows and MS-DOS.
+ (Bug#20167)
-2015-12-17 Eli Zaretskii <eliz@gnu.org>
+2015-12-26 Wolfgang Jenkner <wjenkner@inode.at>
- Fix a typo in the Emacs manual
+ Always define gmalloc etc. in src/gmalloc.c
- * doc/emacs/trouble.texi (Sending Patches): Fix a typo. Reported
- by Lele Gaifax <lele@metapensiero.it>. (Bug#22193)
+ This is a work-around to prevent the compiler from using semantic
+ knowledge about malloc for optimization purposes. E.g., gcc 5.2
+ with -O2 replaces most of calloc's definition by a call to calloc;
+ see Bug#22085.
+ * src/gmalloc.c [!HYBRID_MALLOC] (malloc, realloc, calloc)
+ (aligned_alloc, free): Do not undef. Instead, define these as
+ functions (perhaps renamed to gmalloc etc.) in terms of gmalloc etc.
-2015-12-17 Eli Zaretskii <eliz@gnu.org>
+2015-12-26 Eli Zaretskii <eliz@gnu.org>
- Fix parsing netrc entries with ports
+ Fix documentation of browse-url browser-related functions
- * lisp/gnus/auth-source.el (auth-source-ensure-strings): Don't
- make a list out of 't'. (Bug#22188)
+ * lisp/net/browse-url.el (browse-url)
+ (browse-url-default-browser, browse-url-default-windows-browser)
+ (browse-url-default-macosx-browser, browse-url-chromium)
+ (browse-url-kde, browse-url-text-xterm): Clarify the usage of ARGS
+ and NEW-WINDOW arguments in these functions. (Bug#19421)
- * test/automated/auth-source-tests.el
- (auth-source-test-netrc-parse-entry): New test.
+2015-12-26 Paul Eggert <eggert@cs.ucla.edu>
-2015-12-17 Paul Eggert <eggert@cs.ucla.edu>
+ Propagate Bug#14412 fix to backtrace_eval_unrewind
- Fix typo in Doug Lea malloc configure log
+ * src/eval.c (unbind_to): Redo so that the FALLTHROUGH!! comment
+ becomes accurate again. This shouldn’t affect behavior.
+ (backtrace_eval_unrewind): Apply the recent unbind_to fix here, too.
- * configure.ac (emacs_cv_var_doug_lea_malloc):
- Fix typo that confused the log output of 'configure'.
+2015-12-26 Eli Zaretskii <eliz@gnu.org>
-2015-12-16 Nicolas Petton <nicolas@petton.fr>
+ Don't produce non-ASCII characters in *scratch*
- * etc/NEWS: Mention the new pcase patterns `seq' and `map'.
+ * lisp/startup.el (initial-scratch-message): Quote apostrophes to
+ avoid producing non-ASCII characters in the *scratch* buffer's
+ commentary.
-2015-12-16 Alan Mackenzie <acm@muc.de>
+2015-12-26 Eli Zaretskii <eliz@gnu.org>
- * etc/NEWS: Move entry on pcase to correct section
+ Document changes in 'compare-windows'
- (Accidentally omitted from previous commit)
+ * lisp/vc/compare-w.el (compare-windows-removed)
+ (compare-windows-added): Doc fix.
-2015-12-16 Alan Mackenzie <acm@muc.de>
+ * doc/emacs/files.texi (Comparing Files): Document the changes in
+ window selection by 'compare-windows'.
- Add documentation for changes to Show Paren mode.
+2015-12-26 Eli Zaretskii <eliz@gnu.org>
- * lisp/paren.el (show-paren-highlight-openparen): Enhance doc string.
+ Document 'vc-annotate-background-mode'
- * doc/emacs/programs.texi (Matching): Add descriptions of some pertinent user
- options, including the new show-paren-when-point-inside-paren and
- show-paren-when-point-in-periphery.
+ * doc/emacs/maintaining.texi (Old Revisions): Document
+ 'vc-annotate-background-mode'.
- * etc/NEWS (.. Specialized Modes ...): Add an entry for Show Paren mode.
- Move an entry on pcase to the Lisp Changes section.
+2015-12-26 Eli Zaretskii <eliz@gnu.org>
-2015-12-16 Eli Zaretskii <eliz@gnu.org>
+ Document 'vc-region-history'
- Document Eldoc changes
+ * doc/emacs/maintaining.texi (VC Change Log): Document
+ 'vc-region-history'.
- * doc/emacs/programs.texi (Lisp Doc): Document Global Eldoc mode.
+2015-12-26 Eli Zaretskii <eliz@gnu.org>
-2015-12-16 Eli Zaretskii <eliz@gnu.org>
+ Improve documentation of 'vc-push'
- Fix invocation of Python and Guile interpreters from gdb-mi
+ * doc/emacs/maintaining.texi (Pulling / Pushing): Expand and
+ improve the documentation of 'vc-push'.
- * lisp/progmodes/gdb-mi.el (gdb-control-commands-regexp): Add
- commands for interactive Python and Guile interpreters.
- (gdb-send): Recognize various ways of exiting from Python and
- Guile interpreters and returning to GDB. For details, see
- http://lists.gnu.org/archive/html/emacs-devel/2015-12/msg00693.html
- and http://stackoverflow.com/questions/31514741.
+ * lisp/vc/vc.el (vc-pull, vc-push): Doc fix.
-2015-12-16 Paul Eggert <eggert@cs.ucla.edu>
+2015-12-26 Alain Schneble <a.s@realize.ch>
- Remove attempt to use C11 threads
+ Include the tests for the URL parsing fixes
- C11 threads are not needed for Emacs now, and their use is causing
- hassles on FreeBSD 10.x. Problem reported by Ashish SHUKLA in:
- http://lists.gnu.org/archive/html/emacs-devel/2015-12/msg00648.html
- * configure.ac: Do not check for C11 threads. Remove unnecessary
- fiddling with CPPFLAGS when configuring pthreads.
- * src/emacs-module.c (main_thread, check_main_thread)
- (module_init): Do not worry about C11 threads.
+2015-12-26 Eli Zaretskii <eliz@gnu.org>
-2015-12-15 Michael Albinus <michael.albinus@gmx.de>
+ Document 'url-user-agent'.
- Set utf8 encoding with stty in Tramp
+ * lisp/url/url-http.el (url-user-agent): Move from here...
+ * lisp/url/url-vars.el (url-user-agent): ...to here. This is to
+ keep all the URL defcustoms in one place, and also have it defined
+ whenever the URL library is loaded.
- * lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell):
- Move up uname check. Handle Mac OS X eol encoding. Set utf8
- encoding with stty.
+ * doc/misc/url.texi (Customization): Document 'url-user-agent'.
-2015-12-15 Alan Mackenzie <acm@muc.de>
+2015-12-26 Eli Zaretskii <eliz@gnu.org>
- Tidy up documentation associated with window groups.
+ Document protocols supported by URL library via Tramp
- * doc/lispref/windows.texi (Basic Windows): Add an @anchor for "Window
- Groups". Correct example function to `window-group-start'.
- (Window Start and End, Textual scrolling): Point to the new anchor. State
- that (most of) the args in window group functions have the same meaning as for
- the corresponding window primitives.
+ * doc/misc/url.texi (Tramp): New node, describes the URL schemes
+ supported via Tramp.
+ (Supported URL Types, file/ftp, rlogin/telnet/tn3270): Mention
+ Tramp.
- * doc/lispref/positions.texi (Screen Lines). Same as above.
+2015-12-26 Eli Zaretskii <eliz@gnu.org>
-2015-12-15 Michael Albinus <michael.albinus@gmx.de>
+ Document changes in Shell-script mode
- Complete last commit
+ * lisp/progmodes/sh-script.el (sh-mode, sh-set-shell): Document
+ the 'sh-shell' file-local variable.
+ (top level): Add an auto-load form to avoid byte-compiler warning
+ about 'comint-send-string'.
- * lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell):
- Move uname check up. Handle Mac OS X eol encoding.
+2015-12-26 Eli Zaretskii <eliz@gnu.org>
-2015-12-15 Michael Albinus <michael.albinus@gmx.de>
+ Fix documentation of 'ses-define-local-printer'
- Handle Mac OS X eol encoding in Tramp
+ * doc/misc/ses.texi (Printer functions): Fix whitespace between
+ sentences and punctuation. Add an index entry for
+ 'ses-define-local-printer'.
- * lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell):
- Handle Mac OS X eol encoding.
+2015-12-26 Shakthi Kannan <shakthimaan@gmail.com>
-2015-12-15 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+ Document 'ert-summarize-tests-batch-and-exit'
- Fix variable name typo in compute_tip_xy
+ * doc/misc/ert.texi (Running Tests in Batch Mode): Document
+ 'ert-summarize-tests-batch-and-exit'.
- * src/w32fns.c (compute_tip_xy):
- * src/xfns.c (compute_tip_xy): Modify *root_x instead of *root_y
- when `right' is integer.
+2015-12-26 Eli Zaretskii <eliz@gnu.org>
-2015-12-14 foudfou <foudil.newbie+git@gmail.com>
+ Avoid assertion violation in unbind_to
- * lisp/ibuffer.el: Add ability to (un-)mark or delete buffers in the region.
+ * src/eval.c (unbind_to) <SPECPDL_LET>: Avoid assertion violation
+ if we get here with an object that is not a symbol. (Bug#14412)
-2015-12-14 Tassilo Horn <tsdh@gnu.org>
+2015-12-25 Andreas Schwab <schwab@linux-m68k.org>
- Revert "Fix rx matcher overflow without limiting"
+ Don't treat /foo/bar:mumble as ange-ftp address
+ * lisp/net/browse-url.el (browse-url-filename-alist): Match colons
+ only in the first component. (bug#5362)
- This reverts commit fe27e037663d36be3e5741c2ce86ab4ee8017db1.
+2015-12-25 Eli Zaretskii <eliz@gnu.org>
-2015-12-14 Alan Mackenzie <acm@muc.de>
+ Make sure *scratch* etc. use forward slashes in its default-directory
- Ispell: Bind isearch-regexp-function to nil around call to isearch..-new-loop
+ * lisp/startup.el (normal-top-level): On MS-Windows, convert
+ backslashes to forward slashes while decoding default-directory
+ of the initially-created buffers.
- * lisp/textmodes/ispell.el (ispell-highlight-spelling-error-overlay): bind
- isearch-regexp-function to nil around call to isearch-lazy-highligh-new-loop.
+2015-12-25 Eli Zaretskii <eliz@gnu.org>
-2015-12-14 Tassilo Horn <tsdh@gnu.org>
+ Restore info about the build host in bug reports
- Fix rx matcher overflow without limiting
+ * lisp/mail/emacsbug.el (report-emacs-bug): Report the system on
+ which Emacs was built. This is important information for
+ investigating bug reports reported by users who don't build their
+ Emacs.
- * lisp/textmodes/reftex-vars.el (reftex-label-regexps): Improve last
- change to the regexp without imposing a limit on the length of the
- options.
+2015-12-25 Eli Zaretskii <eliz@gnu.org>
-2015-12-14 Alan Mackenzie <acm@muc.de>
+ Fix bootstrap broken by changes related to OS X file-name encoding
- Enhance ispell-skip-region-alist by generating part of it at runtime.
+ * lisp/international/ucs-normalize.el (eval-when-compile): Make
+ sure char-code-property-alist includes elements that allow access
+ to 'decomposition' and 'canonical-combining-class' Unicode
+ properties, as compiling ucs-normalize.el requires that.
+ * lisp/loadup.el (featurep 'ns): Load ucs-normalize and ns-win
+ only of charprop.el was already loaded.
- * lisp/textmodes/ispell.el (ispell--\\w-filter, ispell--make-\\w-expression)
- (ispell--make-filename-or-URL-re): New functions which generate a regexp.
- (ispell-skip-region-alist): Remove the bit that matches a filename/URL, etc.
- (ispell-begin-skip-region-regexp, ispell-skip-region-list, ispell-message):
- Include the result of ispell--make-filename-or-URL-re in regexps.
+ * src/Makefile.in ($(lispsource)/international/ucs-normalize.elc):
+ New order-only dependency.
-2015-12-14 Glenn Morris <rgm@gnu.org>
+2015-12-25 Leo Liu <sdl.web@gmail.com>
- * build-aux/gitlog-to-emacslog: Ignore more pointless merge commits.
+ * lisp/ido.el (ido-add-virtual-buffers-to-list):
+ Use bookmark-get-filename.
-2015-12-14 Alan Mackenzie <acm@muc.de>
+2015-12-25 Michael Albinus <michael.albinus@gmx.de>
- Replace GROUP argument in six window primitives by new functions.
+ Make tramp-test29-vc-registered more robust
- * doc/lispref/windows.texi (Window Start and End, Textual Scrolling)
- * doc/lispref/positions.texi (Screen Lines): Remove optional GROUP argument
- from description of six window functions. Add in description of new functions
- window-group-start, window-group-end, set-window-group-start,
- pos-visible-in-window-group-p, recenter-group and move-to-window-group-line,
- together with the six variables indirecting to the pertinent group
- functions.
+ * test/automated/tramp-tests.el (tramp-test29-vc-registered):
+ Move `bzr' case down. Skip test when `vc-create-repo' fails.
+ Remove instrumentation.
- * src/window.c
- * src/keyboard.c: Revert the commit from 2015-11-11 12:02:48, in so far as it
- applies to these two files, which added the GROUP argument to six window
- primitives.
+2015-12-24 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
- * lisp/follow.el (follow-mode): Use updated variable names for the indirected
- functions.
+ * lisp/term/x-win.el (x-gtk-stock-map): Fix typo.
- * lisp/isearch.el (isearch-update, isearch-done, isearch-string-out-of-window)
- (isearch-back-into-window, isearch-lazy-highlight-new-loop)
- (isearch-lazy-highlight-search, isearch-lazy-highlight-update): Replace calls
- to window primitives (e.g. window-start) with a GROUP argument by calls to
- new functions (e.g. window-group-start).
+2015-12-23 Katsumi Yamaoka <yamaoka@jpl.org>
- * lisp/ispell.el (ispell-command-loop): Replace call to
- pos-visible-in-window-p with pos-visible-in-window-group-p.
+ Fix `gnus-union' so as to behave like `cl-union'
- * lisp/window.el (window-group-start, window-group-end)
- (set-window-group-start, recenter-group, pos-visible-in-window-group-p)
- (selected-window-group, move-to-window-group-line): New functions.
- (window-group-start-function, window-group-end-function)
- (set-window-group-start-function, recenter-group-function)
- (pos-visible-in-window-group-p-function, selected-window-group-function)
- (move-to-window-group-line-function): New variables.
+ * lisp/gnus/gnus-group.el (gnus-group-prepare-flat):
+ Make gnus-union use `equal' to compare items in lists.
-2015-12-14 Vitorio Miguel <vdrbandeiras@gmail.com> (tiny change)
+ * lisp/gnus/gnus-util.el (gnus-union):
+ Make it behave like cl-union partially.
- * etc/tutorials/TUTORIAL.pt_BR: Fix a typo. (Bug#22165)
+2015-12-23 Paul Eggert <eggert@cs.ucla.edu>
-2015-12-13 Eli Zaretskii <eliz@gnu.org>
+ Fix dired.c typo with ptrdiff_t vs Lisp_Object
- Merge branch 'emacs-25' of git.savannah.gnu.org:/srv/git/emacs into emacs-25
+ * src/dired.c (file_name_completion): Don't assume Lisp_Object is
+ an integer type, fixing a problem introduced in the recent fix for
+ Bug#22169.
-2015-12-13 Tassilo Horn <tsdh@gnu.org>
+2015-12-23 Eli Zaretskii <eliz@gnu.org>
- Improve regex to not trigger stack overflow
+ Document default process sentinel more prominently
- * lisp/textmodes/reftex-vars.el (reftex-label-regexps): Improve regex in
- order not to trigger a stack overflow in regex matcher with unbalanced
- brackets (bug#22146).
+ * doc/lispref/processes.texi (Asynchronous Processes): Mention the
+ defaults for process filter and sentinel. Provide cross-references.
+ (Process Information): Provide cross-references to where filters
+ and sentinels are described.
+ (Filter Functions): Add an index entry for "default filter".
+ (Sentinels): Add a few status messages not documented previously.
+ Resolve the "killed" confusion. Document and describe the default
+ sentinel. (Bug#22220)
-2015-12-13 Eli Zaretskii <eliz@gnu.org>
+2015-12-23 Eli Zaretskii <eliz@gnu.org>
- Fix visiting files with raw-text
+ Fix file-name completion on OS X
- * src/fileio.c (Finsert_file_contents): Fix setting buffer unibyte
- when some stuff was actually read. (Bug#22162)
+ * src/dired.c (file_name_completion): Reject false matches due to
+ file-name-coding-systems that decompose characters when encoding
+ file names, by comparing decoded file names as well. (Bug#22169)
+ (syms_of_dired) <Qdecomposed_characters>: New DEFSYM.
-2015-12-13 Tassilo Horn <tsdh@gnu.org>
+ * lisp/international/ucs-normalize.el (utf-8-hfs): Give it a
+ non-nil 'decomposed-characters' property.
- Fix regex matching keyval labels
+2015-12-23 Anders Lindgren <andlind@gmail.com>
- * lisp/textmodes/reftex-vars.el (reftex-label-regexps): Fix regexp
- matching keyval labels.
+ File-name completion of non-ASCII characters on OS X (bug#22169)
-2015-12-13 Michael Albinus <michael.albinus@gmx.de>
+ The coding system `utf-8-nfd', locally defined in ns-win.el,
+ didn't provide a :pre-write-conversion method, causing file name
+ completion of non-ASCII characters to fail. Solved by using the
+ `utf-8-hfs' coding system provided by `ucs-normalize'.
- * lisp/ido.el (ido-file-name-all-completions-1): Do not raise an error
+ * lisp/loadup.el: Load international/ucs-normalize (when building
+ for ns).
- ... in case of Tramp. (Bug#20821)
+ * lisp/term/ns-win.el (utf-8-nfd): Made `utf-8-nfd' as alias for
+ `utf-8-hfs' and removed the old implementation. Set `utf-8-hfs'
+ as the file name coding system.
-2015-12-13 Paul Eggert <eggert@cs.ucla.edu>
+ * src/nsfns.m (ns-convert-utf8-nfd-to-nfc): Removed.
- Fix performance regression with gcc -O0
+2015-12-22 Tom Tromey <tom@tromey.com>
- This fixes the smaller performance hit that I noted in:
- https://lists.gnu.org/archive/html/emacs-devel/2015-12/msg00357.html
- * src/alloc.c (macro_XPNTR_OR_SYMBOL_OFFSET, macro_XPNTR):
- * src/puresize.h (puresize_h_PURE_P)
- (puresize_h_CHECK_IMPURE):
- New macros, with the old contents of the functions.
- * src/alloc.c (XPNTR_OR_SYMBOL_OFFSET, XPNTR):
- * src/puresize.h (PURE_P, CHECK_IMPURE):
- Use the new macros. Also macros, if DEFINE_KEY_OPS_AS_MACROS.
- * src/conf_post.h (ATTRIBUTE_UNUSED):
- * src/lisp.h (DEFINE_KEY_OPS_AS_MACROS): New macros.
+ Fix bug #18588 by making bug-reference-bug-regexp more lenient
-2015-12-12 Artur Malabarba <bruce.connor.am@gmail.com>
+ * lisp/progmodes/bug-reference.el (bug-reference-bug-regexp): Accept
+ "bug NNNN". (Bug #18588)
- * lisp/emacs-lisp/package.el (package-unpack): Security check
+2015-12-22 Tom Tromey <tom@tromey.com>
- Check that we received the package we were offered.
+ add some cl-* aliases to lisp-mode imenu
-2015-12-12 Artur Malabarba <bruce.connor.am@gmail.com>
+ * (lisp-imenu-generic-expression): Add cl-define-compiler-macro,
+ cl-defgeneric, and cl-defmethod.
- * lisp/emacs-lisp/package.el (package--compile): Don't activate
+2015-12-22 Tom Tromey <tom@tromey.com>
- `package-unpack' takes care of all activations now (other than
- `package-initialize). `package--compile' now only compiles.
+ Make a variable buffer-local
-2015-12-12 Eli Zaretskii <eliz@gnu.org>
+ * lisp/generic-x.el (generic-rul-mode-setup-function): Make
+ font-lock-syntax-table buffer-local. (Bug #21627)
- Document the new bindings of <UP> and <DOWN> in the minibuffer
+2015-12-22 Eli Zaretskii <eliz@gnu.org>
- * doc/emacs/mini.texi (Minibuffer History): Describe the new
- bindings of <UP> and <DOWN> in the minibuffer.
+ Fix decoding of text in URLs retrieved by EWW
-2015-12-12 Eli Zaretskii <eliz@gnu.org>
+ * lisp/net/eww.el (eww-render): Pass 'charset' to
+ 'eww-display-raw'. Use the value of 'last-coding-system-used', if
+ non-nil, to set 'buffer-file-coding-system' of the buffer where we
+ show the URL.
+ (eww-display-html, eww-display-raw): Decode the text correctly,
+ using the charset found in the headers, and defaulting to UTF-8.
+ If the user told us to use a specific encoding, override the
+ charset from the headers. (Bug#22222)
- Document new features of Ido
+2015-12-22 Alan Mackenzie <acm@muc.de>
- * doc/misc/ido.texi (Misc): Document 'C-S-b'.
+ Fix a coding error in c-forward-<>-arglist-recur. Fixes bug#22156
-2015-12-12 Martin Rudalics <rudalics@gmx.at>
+ * lisp/progmodes/cc-engine.el (c-forward-<>-arglist-recur): Remove unused
+ variable `tmp'.
+ After a failed search for a matching ">", restore point before continuing.
- Fix frame height calculations with added menu bar on Windows (Bug#22105)
+2015-12-22 Michael Albinus <michael.albinus@gmx.de>
- * doc/lispref/frames.texi (Parameter Access): Mention pitfalls
- when simultaneously specifying multiple parameters for
- `modify-frame-parameters' that all may change the frame's size.
- * src/w32fns.c (x_set_menu_bar_lines): Don't set
- windows_or_buffers_changed here.
- (my_create_tip_window, Fx_show_tip): Call AdjustWindowRect
- with third argument false.
- * src/w32menu.c (set_frame_menubar): Set
- windows_or_buffers_changed here.
- * src/w32term.c (x_set_window_size): Determine third argument of
- AdjustWindowRect from whether the frame has a menu bar and not
- from whether it wants one.
+ Instrument Tramp tests
-2015-12-12 Eli Zaretskii <eliz@gnu.org>
+ * test/automated/tramp-tests.el (tramp-test29-vc-registered)
+ (tramp--test-utf8): Instrument tests.
- Document the change in interactive shell mode
+2015-12-22 Martin Rudalics <rudalics@gmx.at>
- * doc/emacs/misc.texi (Interactive Shell): Document that the
- '*shell*' buffer by default displays in a new window.
+ Fix `display-buffer' call in `display-message-or-buffer' (Bug#22221)
-2015-12-12 Eli Zaretskii <eliz@gnu.org>
+ * lisp/simple.el (display-message-or-buffer): Call
+ `display-buffer' with ACTION instead of NOT-THIS-WINDOW
+ (Bug#22221).
- Document new features of package.el
+2015-12-21 Juri Linkov <juri@linkov.net>
- * doc/emacs/package.texi (Package Menu): Document the 'external'
- status and the new menu commands.
- (Package Installation): Document archive priorities.
+ * lisp/saveplace.el (toggle-save-place, save-place-to-alist)
- * lisp/emacs-lisp/package.el (package-archive-priorities): Doc fix.
- (package-menu-hide-low-priority): Doc fix.
+ (save-places-to-alist, save-place-dired-hook):
+ Check for dired-subdir-alist. (Bug#19851)
-2015-12-12 Eli Zaretskii <eliz@gnu.org>
+2015-12-21 Paul Eggert <eggert@cs.ucla.edu>
- Update and document new features of xterm support
+ Add FIXME comment re stack overflow and modules
- * doc/emacs/frames.texi (Text-Only Mouse): Document that
- track-mouse is supported by newer xterm versions.
+2015-12-20 Paul Eggert <eggert@cs.ucla.edu>
-2015-12-12 Eli Zaretskii <eliz@gnu.org>
+ Revert some recent emacs-module commentary
- Document new features of Prettify Mode
+ Most of the recently-added commentary was incorrect, due to the
+ possibility of stack overflow.
- * doc/emacs/programs.texi (Misc for Programs): Document
- 'prettify-symbols-compose-predicate' and
- 'prettify-symbols-unprettify-at-point'.
+2015-12-20 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/progmodes/prog-mode.el (prettify-symbols-alist)
- (prettify-symbols-default-compose-p)
- (prettify-symbols-compose-predicate)
- (prettify-symbols--compose-symbol): Doc fixes.
+ Spelling fix: prefer "cooperate" to "co-operate"
-2015-12-12 Eli Zaretskii <eliz@gnu.org>
+2015-12-20 Paul Eggert <eggert@cs.ucla.edu>
- Document multi-mode indentation facilities
+ Port undo fixes to -fno-common
- * doc/lispref/text.texi (Mode-Specific Indent): Document
- 'prog-indentation-context', 'prog-first-column', and 'prog-widen'.
+ Port recent fix for Bug#21968 to platforms like 'gcc -fno-common'.
+ * src/keyboard.c, src/keyboard.h (point_before_last_command_or_undo)
+ (buffer_before_last_command_or_undo):
+ Declare in keyboard.h, and define in keyboard.c,
+ instead of assuming the traditional Unix relaxed ref-def linkage.
- * lisp/progmodes/prog-mode.el (prog-indentation-context)
- (prog-widen): Doc fixes.
+2015-12-20 Philipp Stephani <phst@google.com>
-2015-12-12 Eli Zaretskii <eliz@gnu.org>
+ Improve commentary for emacs-module.c
- Document 'vc-refresh-state'
+ * src/lisp.h: Document emacs-module.c assumptions about EQ and NILP.
+ * src/emacs-module.c (module_non_local_exit_get): Document that we
+ cannot use the current implementation.
+ (module_is_not_nil, module_eq): Document assumptions about EQ and
+ NILP.
- * doc/emacs/maintaining.texi (Version Control): Document
- 'vc-refresh-state'.
+2015-12-20 Michael Albinus <michael.albinus@gmx.de>
- * lisp/vc/vc-hooks.el (vc-refresh-state): Doc fix.
+ Suppress test on Mac OS X
-2015-12-12 Eli Zaretskii <eliz@gnu.org>
+ * test/automated/tramp-tests.el (tramp--test-darwin-p): New defun.
+ (tramp--test-utf8): Use it.
- Fix echo for "C-u"
+2015-12-20 Alan Mackenzie <acm@muc.de>
- * src/keyboard.c (command_loop_1): Undo last change. It caused
- duplicate echo of C-u. (Bug#22107)
+ Merge branch 'scratch/follow' into emacs-25
-2015-12-11 Eli Zaretskii <eliz@gnu.org>
+ This allows Isearch, etc., to work well when Follow Mode is active.
- Avoid errors when creating files under SVN in new directory
+2015-12-19 Michael Albinus <michael.albinus@gmx.de>
- * lisp/vc/vc-svn.el (vc-svn-registered): Use
- file-accessible-directory-p, to avoid cd'ing to a non-existing
- directory, which signals an error on some systems. (Bug#21984)
- (vc-svn-checkin): Call log-edit-extract-headers with 2 arguments.
- Use declare-function to avoid byte-compiler warnings.
+ * lisp/net/tramp-sh.el (tramp-get-ls-command-with-w-option):
+ Improve check.
-2015-12-11 Eli Zaretskii <eliz@gnu.org>
+2015-12-19 Eli Zaretskii <eliz@gnu.org>
- Improve Lua support in etags
+ Fix last commit
- * lib-src/etags.c (Lua_functions): Skip spaces before looking for
- "function".
+ * doc/emacs/rmail.texi (Rmail Deletion): Document new behavior of 'u'
+ with numeric argument.
- * etc/NEWS: Mention improved Lua support by 'etags'.
+2015-12-19 Eli Zaretskii <eliz@gnu.org>
- * test/etags/lua-src/test.lua (test): Add tests for indented
- function definitions.
- * test/etags/ETAGS.good_1:
- * test/etags/ETAGS.good_2:
- * test/etags/ETAGS.good_3:
- * test/etags/ETAGS.good_4:
- * test/etags/ETAGS.good_5:
- * test/etags/ETAGS.good_6:
- * test/etags/CTAGS.good: Adapt to the modified Lua tests.
+ Document new features of Rmail
-2015-12-11 Eli Zaretskii <eliz@gnu.org>
+ * doc/emacs/rmail.texi (Rmail Summary Edit, Rmail Deletion):
+ Document new behavior of 'd' and 'C-d' with numeric argument.
+ (Rmail Display): Document the rendering of HTML MIME parts.
- Fix 'this-command-keys' wrt prefix argument
+2015-12-19 Eli Zaretskii <eliz@gnu.org>
- * src/keyboard.c (command_loop_1): Restore the feature whereby C-u
- was part of this-command-keys, but not of this-single-command-keys.
- (Bug#22107)
+ Improve documentation of new cl-lib functions
- * lisp/simple.el (internal-echo-keystrokes-prefix): Add
- commentary about the function's return value.
+ * doc/misc/cl.texi (Predicates on Numbers, Numerical Functions):
+ Fix wording.
-2015-12-11 Eli Zaretskii <eliz@gnu.org>
+2015-12-19 Eli Zaretskii <eliz@gnu.org>
- * lisp/files.el (load-library): Doc fix. (Bug#22140)
+ Document the new feature of 'minibuffer-with-setup-hook'
-2015-12-11 Eli Zaretskii <eliz@gnu.org>
+ * lisp/files.el (minibuffer-with-setup-hook): Clarify how FUN is
+ added to `minibuffer-setup-hook'.
- Improve and document Ruby support in 'etags'
+2015-12-19 Eli Zaretskii <eliz@gnu.org>
- * lib-src/etags.c (Ruby_suffixes): Add ".ruby".
- (Ruby_functions): Support "module" and overloaded operators.
- (Ruby_help): Mention "module".
+ Document new features of Font Lock
- * test/etags/ruby-src/test.rb:
- * test/etags/ruby-src/test1.ruby: New files.
- * test/etags/Makefile (RBSRC): New tests.
- (SRCS): Add ${RBSRC}.
- * test/etags/ETAGS.good_1:
- * test/etags/ETAGS.good_2:
- * test/etags/ETAGS.good_3:
- * test/etags/ETAGS.good_4:
- * test/etags/ETAGS.good_5:
- * test/etags/ETAGS.good_6:
- * test/etags/CTAGS.good: Adapt to the new Ruby tests.
+ * doc/lispref/modes.texi (Other Font Lock Variables): Document
+ 'font-lock-flush-function' and 'font-lock-ensure-function'.
+ (Font Lock Basics): Document the basic fontification functions
+ referenced in "Other Font Lock Variables".
- * doc/man/etags.1: Mention Ruby support.
- * etc/NEWS: Mention Ruby support.
+ * lisp/font-lock.el (font-lock-flush, font-lock-ensure): Doc fix.
-2015-12-11 Xi Lu <lx@shellcodes.org>
+2015-12-19 Eli Zaretskii <eliz@gnu.org>
- Initial support for Ruby in 'etags'
+ Document new features of Rectangle mode
- * lib-src/etags.c <Ruby_suffixes>: New variable.
- (lang_names): Add an entry for Ruby.
- (Ruby_functions): New function. (Bug#22116)
+ * doc/emacs/killing.texi (Rectangles): Document "C-x C-x" in
+ rectangle-mark-mode.
-2015-12-11 Eli Zaretskii <eliz@gnu.org>
+2015-12-19 Eli Zaretskii <eliz@gnu.org>
- Clarify documentation of 'modify-frame-parameters'
+ Manual followup to last change
- * doc/lispref/frames.texi (Parameter Access): Clarify what "ignored
- PARMs" mean for 'modify-frame-parameters'.
+ * doc/lispref/display.texi (Displaying Messages): Sync with the
+ doc string. (Bug#22210)
- * src/frame.c (Fmodify_frame_parameters): Clarify what "ignored
- PARMs" mean for this function. (Bug#22104)
+2015-12-19 Eli Zaretskii <eliz@gnu.org>
-2015-12-11 Eli Zaretskii <eliz@gnu.org>
+ Clarify doc string of 'display-message-or-buffer'
- Fix setting buffer unibyte when reading from a device
+ * lisp/simple.el (display-message-or-buffer): Doc fix. Suggested
+ by Sebastian Wiesner <swiesner@lunaryorn.com>. (Bug#22210)
- * src/fileio.c (Finsert_file_contents): Call Fset_buffer_multibyte
- to make a (possibly non-empty) buffer unibyte. (Bug#22096)
+2015-12-19 Eli Zaretskii <eliz@gnu.org>
-2015-12-11 Eli Zaretskii <eliz@gnu.org>
+ * doc/emacs/emacs.texi (Top): Update top-level menus.
- Clarify documentation of 'values'
+ * doc/lispref/elisp.texi (Top): Update top-level menus.
- * doc/lispref/eval.texi (Eval): Clarify that 'values' are not
- updated by any evaluation commands in 'lisp-interaction-mode'.
- (Bug#22056)
+2015-12-19 Eli Zaretskii <eliz@gnu.org>
-2015-12-11 Anders Lindgren <andlind@gmail.com>
+ Document how to avoid file-local variables that aren't
- Fixed subversion vc error when opening file in new directory (bug#21984).
+ * doc/emacs/custom.texi (Specifying File Variables): Describe how
+ to prevent Emacs from interpreting unrelated text as file-local
+ variables. (Bug#22166)
- * lisp/vc/vc-svn.el (vc-svn-registered): Check if directory exists.
+2015-12-19 Dave Thomas <dave@pragprog.org> (tiny change)
-2015-12-09 Eli Zaretskii <eliz@gnu.org>
+ Fix a typo in eterm-color's termcap entry
- Yet another fix for when point ends up in invisible text
+ * lisp/term.el (term-termcap-format): Fix a typo in the "ue="
+ entry. (Bug#22184)
- * src/xdisp.c (redisplay_window): When someone forced
- window-start, and honoring that failed to show the cursor, try
- moving out of invisible text, before falling back to the middle of
- the window. (Bug#22098)
+2015-12-19 Eli Zaretskii <eliz@gnu.org>
-2015-12-09 Michael Albinus <michael.albinus@gmx.de>
+ Allow 'browse-url-emacs' visit non-existent URLs
- Fix error in Tramp perl script for cygwin
+ * lisp/url/url-handlers.el (url-insert-file-contents): Don't
+ signal an error if VISIT is non-nil, to more faithfully emulate
+ the behavior of 'insert-file-contents'. (Bug#22160)
- * lisp/net/tramp-sh.el (tramp-perl-file-truename): Do not raise an
- error if file doesn't exist.
+2015-12-18 Paul Eggert <eggert@cs.ucla.edu>
-2015-12-09 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+ Remove SunOS 4.x cruft
- Remove font workaround for limited outdated versions
+ Support for SunOS 4.x was removed in Emacs 23 but some cruft was left behind.
+ * lib-src/pop.c [sun]: Remove no-longer-needed include.
+ * lwlib/xlwmenu.c (SUNSO41): Remove.
- * src/macfont.m (mac_font_descriptor_get_adjusted_weight): Remove
- workaround for HiraginoSans-W7 on OS X 10.11 and 10.11.1.
+2015-12-18 Paul Eggert <eggert@cs.ucla.edu>
-2015-12-09 Anders Lindgren <andlind@gmail.com>
+ Merge from gnulib
- Don't add "." to load path (bug#21104)
+ This mostly commentary fixes.
+ * doc/misc/texinfo.tex, lib/intprops.h: Copy from gnulib.
+ * lib/gnulib.mk: Regenerate with new gnulib-tool.
- When configured with --enable-locallisppath=no, which is the
- default for OS X, the load-path incorrectly was populated with ".".
+2015-12-18 Michael Albinus <michael.albinus@gmx.de>
- * src/lread.c (init_lread): Don't call `decode_env_path' when
- PATH_SITELOADSEARCH is empty.
+ Minor fixes in Tramp
-2015-12-08 Artur Malabarba <bruce.connor.am@gmail.com>
+ * lisp/net/tramp-sh.el (tramp-do-file-attributes-with-ls):
+ Reorder ls arguments.
- * lisp/emacs-lisp/package.el (package--with-response-buffer):
+ * lisp/net/tramp.el (tramp-dissect-file-name): Fix docstring.
- Search for the blank-line in the right buffer.
+2015-12-18 Michael Albinus <michael.albinus@gmx.de>
-2015-12-08 Glenn Morris <rgm@gnu.org>
+ Make tramp a built-in package
- * test/automated/simple-test.el (undo-auto-boundary-timer): Update
- for recent change.
+ * lisp/finder.el (finder-compile-keywords): Update
+ `package--builtins' also when Version: keyword is available.
-2015-12-08 Glenn Morris <rgm@gnu.org>
+ * lisp/net/trampver.el: Add Version: keyword.
+ (tramp-version): Change it to "2.2.13.25.1", in order to be
+ compatible with `version-to-list'.
- Fix some display-warning usage.
+2015-12-18 Lele Gaifax <lele@metapensiero.it>
- * lisp/files.el (hack-local-variables, hack-dir-local-variables):
- * lisp/calendar/diary-lib.el (diary-include-files, diary-sexp-entry):
- * lisp/calendar/holidays.el (calendar-holiday-list):
- * lisp/mail/rmailout.el (rmail-output-read-file-name):
- Fix display-warning usage.
+ * etc/tutorials/TUTORIAL.it: Update and fix typos. (Bug#22187)
-2015-12-08 Glenn Morris <rgm@gnu.org>
+2015-12-18 Alan Mackenzie <acm@muc.de>
- * lisp/calendar/cal-html.el: Require diary-lib.
+ Rename `recenter-group' to `recenter-window-group'
- (cal-html-list-diary-entries): Handle no diary. (Bug#21994)
+ * doc/lispref/windows.texi (Textual Scrolling)
+ * lisp/window.el (top level, recenter-group)
+ * lisp/follow.el (follow-mode)
+ * lisp/isearch.el (isearch-back-into-window): Rename `recenter-group' to
+ `recenter-window-group' and `recenter-group-function' to
+ `recenter-window-group-function'.
-2015-12-08 Thomas Fitzsimmons <fitzsim@fitzsim.org>
+2015-12-18 Eli Zaretskii <eliz@gnu.org>
- Add Obsolete-since header to eudcb-ph.el
+ Fix vertical-motion in tabulated-list mode
- * lisp/obsolete/eudcb-ph.el: Add Obsolete-since header.
+ * src/indent.c (Fvertical_motion): When moving from line beginning
+ to point under line truncation, assume overshoot by one line only
+ if point actually lies beyond the window's right margin.
+ (Bug#22194)
-2015-12-07 Paul Eggert <eggert@cs.ucla.edu>
-
- Spelling fixes
+2015-12-18 Martin Rudalics <rudalics@gmx.at>
- * doc/misc/calc.texi (Predefined Units): Use the bland modern
- scientific style for spelling the units “ampere” and
- “angstrom” rather than the older style “Ampere” and
- “Ångstrom”. The latter spelling was wrong anyway (it should
- have been “Ångström”).
- * lisp/emacs-lisp/ert.el (ert--explain-equal-rec):
- Fix misspelling of ‘atom’ in code.
+ Don't have help functions call x-display-pixel-width/-height on ttys
-2015-12-07 Eli Zaretskii <eliz@gnu.org>
+ * lisp/help.el (temp-buffer-max-height, temp-buffer-max-width):
+ Don't call x-display-pixel-width/-height on ttys.
- Improve documentation of kill commands
+2015-12-17 Dmitry Gutov <dgutov@yandex.ru>
- * lisp/simple.el (region-extract-function, delete-backward-char)
- (delete-forward-char, kill-region, copy-region-as-kill)
- (kill-ring-save): Better document the optional argument REGION in
- the doc strings. Mention in the doc strings that text put in the
- kill-ring can be filtered by 'filter-buffer-substring'.
+ Use 'hg id' in vc-hg-previous-revision
- * doc/lispref/text.texi (Kill Functions): Mention that functions
- described in this subsection can filter text they put in the
- kill-ring. Add a cross-reference to "Buffer Contents" and an
- index entry. Document the optional argument 'region' and its
- effect.
- (Bug#21315)
+ * lisp/vc/vc-hg.el (vc-hg-previous-revision):
+ Use 'hg id' to retrieve it (bug#22032).
-2015-12-
07 Alan Mackenzie <acm@muc.de>
+2015-12-
17 Alan Mackenzie <acm@muc.de>
- Further progress making Isearch, Ispell, Replace work with Follow Mode.
+ * lisp/follow.el (follow-sit-for): Remove (it's redundant).
- * lisp/follow.el: (follow-mode): Remove references to sit*-for-function, which
- no longer exists. Add follow-post-command-hook to three special purpose
- hooks at setup, and remove them at tear down.
+2015-12-17 Eli Zaretskii <eliz@gnu.org>
- * lisp/isearch.el: (isearch-update): invoke isearch-update-post-hook before
- isearch-lazy-highlight-new-loop.
- (isearch-lazy-highlight-new-loop): Restore this function to what it previously
- was, merging the functionality of isearch-lazy-highlight-maybe-new-loop into
- it.
- (isearch-lazy-highlight-maybe-new-loop): function removed.
+ Fix a typo in the Emacs manual
- * lisp/replace.el: (replace-update-post-hook): New hook variable.
- (perform-replace): Add second (nil) argument to looking-back. Invoke
- replace-update-post-hook before calling replace-highlight.
+ * doc/emacs/trouble.texi (Sending Patches): Fix a typo. Reported
+ by Lele Gaifax <lele@metapensiero.it>. (Bug#22193)
- * lisp/textmodes/ispell.el: (ispell-update-post-hook): New hook variable.
- (ispell-command-loop): invoke ispell-update-post-hook. Add GROUP argument to
- call of pos-visible-in-window-p.
- (ispell-display-buffer): Place *Choices* window at the top of the last window
- in a window group.
+2015-12-17 Eli Zaretskii <eliz@gnu.org>
-2015-12-07 Alan Mackenzie <acm@muc.de>
+ Fix parsing netrc entries with ports
- Amend doc of `mapconcat': it can take sequences, not merely strings.
+ * lisp/gnus/auth-source.el (auth-source-ensure-strings): Don't
+ make a list out of 't'. (Bug#22188)
- * doc/lispref/functions.texi (Mapping Functions): Amend the doc of `mapconcat'
- to say that SEPARATOR and the results from FUNCTION may be any character
- sequences, not just strings. Add an @xref to "Sequences Arrays Vectors".
+ * test/automated/auth-source-tests.el
+ (auth-source-test-netrc-parse-entry): New test.
-2015-12-07 Michael Albinus <michael.albinus@gmx.de>
+2015-12-17 Paul Eggert <eggert@cs.ucla.edu>
- Fix an utf8 problem for Tramp on BSD
+ Fix typo in Doug Lea malloc configure log
- * lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell):
- Make lax check for utf8.
- (tramp-get-remote-locale): Add "en_US.UTF-8" as candidate.
+ * configure.ac (emacs_cv_var_doug_lea_malloc):
+ Fix typo that confused the log output of 'configure'.
-2015-12-07 Thomas Fitzsimmons <fitzsim@fitzsim.org>
+2015-12-16 Nicolas Petton <nicolas@petton.fr>
- Make eudcb-ph.el obsolete
+ * etc/NEWS: Mention the new pcase patterns `seq' and `map'.
- * doc/misc/eudc.texi: Bump version to 1.40.0.
- Remove PH/QI sections and mentions.
- * lisp/obsolete/eudcb-ph.el: Make obsolete.
- * lisp/net/eudc-vars.el (eudc-known-protocols): Remove ph.
- (eudc-ph-bbdb-conversion-alist): Make obsolete.
- * etc/NEWS: Mention this. (Bug#21191)
+2015-12-16 Alan Mackenzie <acm@muc.de>
-2015-12-07 Paul Eggert <eggert@cs.ucla.edu>
+ * etc/NEWS: Move entry on pcase to correct section
- Remove overenthusiastic eassert
+ (Accidentally omitted from previous commit)
- * src/lisp.h (XSYMBOL): Remove eassert incorrectly added in
- previous change. It breaks on MS-Windows --with-wide-int.
- Problem reported by Eli Zaretskii in:
- http://lists.gnu.org/archive/html/emacs-devel/2015-12/msg00275.html
+2015-12-16 Alan Mackenzie <acm@muc.de>
-2015-12-06 Paul Eggert <eggert@cs.ucla.edu>
+ Add documentation for changes to Show Paren mode.
- Pacify gcc -Wparentheses
+ * lisp/paren.el (show-paren-highlight-openparen): Enhance doc string.
- * src/xdisp.c (row_containing_pos): Reparenthesize.
+ * doc/emacs/programs.texi (Matching): Add descriptions of some pertinent user
+ options, including the new show-paren-when-point-inside-paren and
+ show-paren-when-point-in-periphery.
-2015-12-06 Paul Eggert <eggert@cs.ucla.edu>
+ * etc/NEWS (.. Specialized Modes ...): Add an entry for Show Paren mode.
+ Move an entry on pcase to the Lisp Changes section.
- Port mod-test to 32-bit Emacs --without-wide-int
+2015-12-16 Eli Zaretskii <eliz@gnu.org>
- * modules/mod-test/test.el (mod-test-sum-test):
- Bring back the 2**29 tests, but port them to 32-bit Emacs
- --without-wide-int.
+ Document Eldoc changes
-2015-12-06 Michael Albinus <michael.albinus@gmx.de>
+ * doc/emacs/programs.texi (Lisp Doc): Document Global Eldoc mode.
- Fix minor Tramp problems found on BSD
+2015-12-16 Eli Zaretskii <eliz@gnu.org>
- * lisp/net/tramp-sh.el (tramp-perl-file-truename): Do not append
- trailing slash. Quote apostrophes.
- (tramp-sh-handle-file-truename): Do not append trailing slash in
- the "ls" case.
- (tramp-get-ls-command-with-w-option): New defun.
- (tramp-do-file-attributes-with-ls)
- (tramp-do-directory-files-and-attributes-with-stat): Use it.
+ Fix invocation of Python and Guile interpreters from gdb-mi
- * test/automated/tramp-tests.el
- (tramp-test31-special-characters-with-perl)
- (tramp-test31-special-characters-with-ls)
- (tramp-test32-utf8-with-perl, tramp-test32-utf8-with-ls):
- Suppress also readlink.
+ * lisp/progmodes/gdb-mi.el (gdb-control-commands-regexp): Add
+ commands for interactive Python and Guile interpreters.
+ (gdb-send): Recognize various ways of exiting from Python and
+ Guile interpreters and returning to GDB. For details, see
+ http://lists.gnu.org/archive/html/emacs-devel/2015-12/msg00693.html
+ and http://stackoverflow.com/questions/31514741.
-2015-12-06 Eli Zaretskii <eliz@gnu.org>
+2015-12-16 Paul Eggert <eggert@cs.ucla.edu>
- Fix cursor display when invisible text is at line beginning
+ Remove attempt to use C11 threads
- * src/xdisp.c (redisplay_window): When scrolling fails to show
- point, prefer using the desired matrix if possible for finding the
- fallback glyph row for displaying the cursor. (Bug#22098)
- (row_containing_pos): Exit the loop as soon as we hit the first
- disabled glyph row. Otherwise we risk accessing garbled data and
- departing to the no-no land.
+ C11 threads are not needed for Emacs now, and their use is causing
+ hassles on FreeBSD 10.x. Problem reported by Ashish SHUKLA in:
+ http://lists.gnu.org/archive/html/emacs-devel/2015-12/msg00648.html
+ * configure.ac: Do not check for C11 threads. Remove unnecessary
+ fiddling with CPPFLAGS when configuring pthreads.
+ * src/emacs-module.c (main_thread, check_main_thread)
+ (module_init): Do not worry about C11 threads.
-2015-12-06 Paul Eggert <eggert@cs.ucla.edu>
+2015-12-15 Michael Albinus <michael.albinus@gmx.de>
- Improve module interface when WIDE_EMACS_INT
+ Set utf8 encoding with stty in Tramp
- * src/emacs-module.c (plain_values): New constant.
- (module_nil): Now a constant.
- (Finternal_module_call, value_to_lisp_bits, lisp_to_value_bits)
- (syms_of_module): Use if, not #ifdef, so that both sides are
- checked at compile-time, and so that GCC doesn’t complain
- about an unused var in the typical case. Also, depend on
- plain_values, not on WIDE_EMACS_INT; the code shouldn’t assume
- that WIDE_EMACS_INT implies !USE_LSB_TAG.
- (value_to_lisp_bits, lisp_to_value_bits): New functions.
- Sign-extend integers rather than zero-extending them, as small
- negative integers are more likely.
- (value_to_lisp, lisp_to_value): Rewrite in terms of the new *_bits
- functions.
- (HAVE_STRUCT_ATTRIBUTE_ALIGNED): Define to 0 if not already defined.
- (mark_modules): Remove. All uses removed.
- (lisp_to_value): Don’t assume Fcons returns a pointer aligned
- to GCALIGNMENT.
- (syms_of_module): Check that module_nil converts to Qnil.
- * src/lisp.h (lisp_h_XSYMBOL, XSYMBOL): Use signed conversion, since
- we prefer signed to unsigned when either will do.
- (TAG_PTR): Sign-extend pointers when USE_LSB_TAG, as this is
- a bit better for emacs-module.c.
+ * lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell):
+ Move up uname check. Handle Mac OS X eol encoding. Set utf8
+ encoding with stty.
-2015-12-06 Paul Eggert <eggert@cs.ucla.edu>
+2015-12-15 Alan Mackenzie <acm@muc.de>
- Port mod-test to x86-64 GNU/Linux running 32-bit
+ Tidy up documentation associated with window groups.
- * modules/mod-test/test.el (mod-test-sum-test):
- Don’t attempt to match descriptions to operating systems.
- It didn’t work on Fedora x86-64 running a 32-bit executable,
- and it’s not worth the trouble anyway.
- Port to 32-bit platforms by removing an assumption about
- fixnum widths.
+ * doc/lispref/windows.texi (Basic Windows): Add an @anchor for "Window
+ Groups". Correct example function to `window-group-start'.
+ (Window Start and End, Textual scrolling): Point to the new anchor. State
+ that (most of) the args in window group functions have the same meaning as for
+ the corresponding window primitives.
-2015-12-06 Michael Albinus <michael.albinus@gmx.de>
+ * doc/lispref/positions.texi (Screen Lines). Same as above.
- Fix auto-revert-tests.el when filenotify isn't used
+2015-12-15 Michael Albinus <michael.albinus@gmx.de>
- * test/automated/auto-revert-tests.el (auto-revert--wait-for-revert):
- Make it working also when filenotify isn't used.
+ Complete last commit
-2015-12-06 Juri Linkov <juri@linkov.net>
+ * lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell):
+ Move uname check up. Handle Mac OS X eol encoding.
- * lisp/textmodes/ispell.el (ispell-highlight-spelling-error-overlay):
+2015-12-15 Michael Albinus <michael.albinus@gmx.de>
- Let-bind isearch-regexp-function to nil. (Bug#22097)
+ Handle Mac OS X eol encoding in Tramp
-2015-12-05 Artur Malabarba <bruce.connor.am@gmail.com>
+ * lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell):
+ Handle Mac OS X eol encoding.
- * lisp/emacs-lisp/package.el: Don't install bad signatures (bug#22089)
+2015-12-15 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
- (package--with-response-buffer): NOERROR and ERROR-FORM only
- handle connection errors.
- (bad-signature): New error type.
- (package--check-signature-content): Use it.
- (package--check-signature): Properly distinguish connection errors
- from bad-signature errors. Do the check for
- `package-check-signature' `allow-unsigned' here instead of forcing
- the callbacks to do it. Add a new argument, UNWIND.
- (package--download-one-archive, package-install-from-archive):
- Update usage of `package--check-signature'.
+ Fix variable name typo in compute_tip_xy
-2015-12-05 Ulf Jasper <ulf.jasper@web.de>
+ * src/w32fns.c (compute_tip_xy):
+ * src/xfns.c (compute_tip_xy): Modify *root_x instead of *root_y
+ when `right' is integer.
- Fix Bug#22092.
+2015-12-14 foudfou <foudil.newbie+git@gmail.com> (tiny change)
- * lisp/calendar/icalendar.el (icalendar--get-unfolded-buffer):
- Clean up inconsistent line endings. (Bug#22092)
- (icalendar--clean-up-line-endings): New.
- * test/automated/icalendar-tests.el (icalendar-real-world): Add test
- for Bug#22092.
+ * lisp/ibuffer.el: Add ability to (un-)mark or delete buffers in the region.
-2015-12-05 Eli Zaretskii <eliz@gnu.org>
+2015-12-14 Tassilo Horn <tsdh@gnu.org>
- Document 'bookmark-set-no-overwrite'
+ Revert "Fix rx matcher overflow without limiting"
- * doc/emacs/regs.texi (Bookmarks): Document the new command
- 'bookmark-set-no-overwrite' and its keybinding.
+ This reverts commit fe27e037663d36be3e5741c2ce86ab4ee8017db1.
-2015-12-05 Eli Zaretskii <eliz@gnu.org>
+2015-12-14 Alan Mackenzie <acm@muc.de>
- Document new binding of 'mouse-buffer-menu'
+ Ispell: Bind isearch-regexp-function to nil around call to isearch..-new-loop
- * doc/emacs/buffers.texi (Buffer Menus): 'mouse-buffer-menu' is
- now also on C-F10.
+ * lisp/textmodes/ispell.el (ispell-highlight-spelling-error-overlay): bind
+ isearch-regexp-function to nil around call to isearch-lazy-highligh-new-loop.
-2015-12-05 Eli Zaretskii <eliz@gnu.org>
+2015-12-14 Tassilo Horn <tsdh@gnu.org>
- Initial documentation of dynamic modules
+ Fix rx matcher overflow without limiting
- * doc/lispref/loading.texi (Dynamic Modules): New section with
+ * lisp/textmodes/reftex-vars.el (reftex-label-regexps): Improve last
+ change to the regexp without imposing a limit on the length of the
+ options.
+
+2015-12-14 Alan Mackenzie <acm@muc.de>
+
+ Enhance ispell-skip-region-alist by generating part of it at runtime.
+
+ * lisp/textmodes/ispell.el (ispell--\\w-filter, ispell--make-\\w-expression)
+ (ispell--make-filename-or-URL-re): New functions which generate a regexp.
+ (ispell-skip-region-alist): Remove the bit that matches a filename/URL, etc.
+ (ispell-begin-skip-region-regexp, ispell-skip-region-list, ispell-message):
+ Include the result of ispell--make-filename-or-URL-re in regexps.
+
+2015-12-14 Glenn Morris <rgm@gnu.org>
+
+ * build-aux/gitlog-to-emacslog: Ignore more pointless merge commits.
+
+2015-12-14 Alan Mackenzie <acm@muc.de>
+
+ Replace GROUP argument in six window primitives by new functions.
+
+ * doc/lispref/windows.texi (Window Start and End, Textual Scrolling)
+ * doc/lispref/positions.texi (Screen Lines): Remove optional GROUP argument
+ from description of six window functions. Add in description of new functions
+ window-group-start, window-group-end, set-window-group-start,
+ pos-visible-in-window-group-p, recenter-group and move-to-window-group-line,
+ together with the six variables indirecting to the pertinent group
+ functions.
+
+ * src/window.c
+ * src/keyboard.c: Revert the commit from 2015-11-11 12:02:48, in so far as it
+ applies to these two files, which added the GROUP argument to six window
+ primitives.
+
+ * lisp/follow.el (follow-mode): Use updated variable names for the indirected
+ functions.
+
+ * lisp/isearch.el (isearch-update, isearch-done, isearch-string-out-of-window)
+ (isearch-back-into-window, isearch-lazy-highlight-new-loop)
+ (isearch-lazy-highlight-search, isearch-lazy-highlight-update): Replace calls
+ to window primitives (e.g. window-start) with a GROUP argument by calls to
+ new functions (e.g. window-group-start).
+
+ * lisp/ispell.el (ispell-command-loop): Replace call to
+ pos-visible-in-window-p with pos-visible-in-window-group-p.
+
+ * lisp/window.el (window-group-start, window-group-end)
+ (set-window-group-start, recenter-group, pos-visible-in-window-group-p)
+ (selected-window-group, move-to-window-group-line): New functions.
+ (window-group-start-function, window-group-end-function)
+ (set-window-group-start-function, recenter-group-function)
+ (pos-visible-in-window-group-p-function, selected-window-group-function)
+ (move-to-window-group-line-function): New variables.
+
+2015-12-14 Vitorio Miguel <vdrbandeiras@gmail.com> (tiny change)
+
+ * etc/tutorials/TUTORIAL.pt_BR: Fix a typo. (Bug#22165)
+
+2015-12-13 Eli Zaretskii <eliz@gnu.org>
+
+ Merge branch 'emacs-25' of git.savannah.gnu.org:/srv/git/emacs into emacs-25
+
+2015-12-13 Tassilo Horn <tsdh@gnu.org>
+
+ Improve regex to not trigger stack overflow
+
+ * lisp/textmodes/reftex-vars.el (reftex-label-regexps): Improve regex in
+ order not to trigger a stack overflow in regex matcher with unbalanced
+ brackets (bug#22146).
+
+2015-12-13 Eli Zaretskii <eliz@gnu.org>
+
+ Fix visiting files with raw-text
+
+ * src/fileio.c (Finsert_file_contents): Fix setting buffer unibyte
+ when some stuff was actually read. (Bug#22162)
+
+2015-12-13 Tassilo Horn <tsdh@gnu.org>
+
+ Fix regex matching keyval labels
+
+ * lisp/textmodes/reftex-vars.el (reftex-label-regexps): Fix regexp
+ matching keyval labels.
+
+2015-12-13 Michael Albinus <michael.albinus@gmx.de>
+
+ * lisp/ido.el (ido-file-name-all-completions-1): Do not raise an error
+
+ ... in case of Tramp. (Bug#20821)
+
+2015-12-12 Paul Eggert <eggert@cs.ucla.edu>
+
+ Fix performance regression with gcc -O0
+
+ This fixes the smaller performance hit that I noted in:
+ https://lists.gnu.org/archive/html/emacs-devel/2015-12/msg00357.html
+ * src/alloc.c (macro_XPNTR_OR_SYMBOL_OFFSET, macro_XPNTR):
+ * src/puresize.h (puresize_h_PURE_P)
+ (puresize_h_CHECK_IMPURE):
+ New macros, with the old contents of the functions.
+ * src/alloc.c (XPNTR_OR_SYMBOL_OFFSET, XPNTR):
+ * src/puresize.h (PURE_P, CHECK_IMPURE):
+ Use the new macros. Also macros, if DEFINE_KEY_OPS_AS_MACROS.
+ * src/conf_post.h (ATTRIBUTE_UNUSED):
+ * src/lisp.h (DEFINE_KEY_OPS_AS_MACROS): New macros.
+
+2015-12-12 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/emacs-lisp/package.el (package-unpack): Security check
+
+ Check that we received the package we were offered.
+
+2015-12-12 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/emacs-lisp/package.el (package--compile): Don't activate
+
+ `package-unpack' takes care of all activations now (other than
+ `package-initialize). `package--compile' now only compiles.
+
+2015-12-12 Eli Zaretskii <eliz@gnu.org>
+
+ Document the new bindings of <UP> and <DOWN> in the minibuffer
+
+ * doc/emacs/mini.texi (Minibuffer History): Describe the new
+ bindings of <UP> and <DOWN> in the minibuffer.
+
+2015-12-12 Eli Zaretskii <eliz@gnu.org>
+
+ Document new features of Ido
+
+ * doc/misc/ido.texi (Misc): Document 'C-S-b'.
+
+2015-12-12 Martin Rudalics <rudalics@gmx.at>
+
+ Fix frame height calculations with added menu bar on Windows (Bug#22105)
+
+ * doc/lispref/frames.texi (Parameter Access): Mention pitfalls
+ when simultaneously specifying multiple parameters for
+ `modify-frame-parameters' that all may change the frame's size.
+ * src/w32fns.c (x_set_menu_bar_lines): Don't set
+ windows_or_buffers_changed here.
+ (my_create_tip_window, Fx_show_tip): Call AdjustWindowRect
+ with third argument false.
+ * src/w32menu.c (set_frame_menubar): Set
+ windows_or_buffers_changed here.
+ * src/w32term.c (x_set_window_size): Determine third argument of
+ AdjustWindowRect from whether the frame has a menu bar and not
+ from whether it wants one.
+
+2015-12-12 Eli Zaretskii <eliz@gnu.org>
+
+ Document the change in interactive shell mode
+
+ * doc/emacs/misc.texi (Interactive Shell): Document that the
+ '*shell*' buffer by default displays in a new window.
+
+2015-12-12 Eli Zaretskii <eliz@gnu.org>
+
+ Document new features of package.el
+
+ * doc/emacs/package.texi (Package Menu): Document the 'external'
+ status and the new menu commands.
+ (Package Installation): Document archive priorities.
+
+ * lisp/emacs-lisp/package.el (package-archive-priorities): Doc fix.
+ (package-menu-hide-low-priority): Doc fix.
+
+2015-12-12 Eli Zaretskii <eliz@gnu.org>
+
+ Update and document new features of xterm support
+
+ * doc/emacs/frames.texi (Text-Only Mouse): Document that
+ track-mouse is supported by newer xterm versions.
+
+2015-12-12 Eli Zaretskii <eliz@gnu.org>
+
+ Document new features of Prettify Mode
+
+ * doc/emacs/programs.texi (Misc for Programs): Document
+ 'prettify-symbols-compose-predicate' and
+ 'prettify-symbols-unprettify-at-point'.
+
+ * lisp/progmodes/prog-mode.el (prettify-symbols-alist)
+ (prettify-symbols-default-compose-p)
+ (prettify-symbols-compose-predicate)
+ (prettify-symbols--compose-symbol): Doc fixes.
+
+2015-12-12 Eli Zaretskii <eliz@gnu.org>
+
+ Document multi-mode indentation facilities
+
+ * doc/lispref/text.texi (Mode-Specific Indent): Document
+ 'prog-indentation-context', 'prog-first-column', and 'prog-widen'.
+
+ * lisp/progmodes/prog-mode.el (prog-indentation-context)
+ (prog-widen): Doc fixes.
+
+2015-12-12 Eli Zaretskii <eliz@gnu.org>
+
+ Document 'vc-refresh-state'
+
+ * doc/emacs/maintaining.texi (Version Control): Document
+ 'vc-refresh-state'.
+
+ * lisp/vc/vc-hooks.el (vc-refresh-state): Doc fix.
+
+2015-12-12 Eli Zaretskii <eliz@gnu.org>
+
+ Fix echo for "C-u"
+
+ * src/keyboard.c (command_loop_1): Undo last change. It caused
+ duplicate echo of C-u. (Bug#22107)
+
+2015-12-11 Eli Zaretskii <eliz@gnu.org>
+
+ Avoid errors when creating files under SVN in new directory
+
+ * lisp/vc/vc-svn.el (vc-svn-registered): Use
+ file-accessible-directory-p, to avoid cd'ing to a non-existing
+ directory, which signals an error on some systems. (Bug#21984)
+ (vc-svn-checkin): Call log-edit-extract-headers with 2 arguments.
+ Use declare-function to avoid byte-compiler warnings.
+
+2015-12-11 Eli Zaretskii <eliz@gnu.org>
+
+ Improve Lua support in etags
+
+ * lib-src/etags.c (Lua_functions): Skip spaces before looking for
+ "function".
+
+ * etc/NEWS: Mention improved Lua support by 'etags'.
+
+ * test/etags/lua-src/test.lua (test): Add tests for indented
+ function definitions.
+ * test/etags/ETAGS.good_1:
+ * test/etags/ETAGS.good_2:
+ * test/etags/ETAGS.good_3:
+ * test/etags/ETAGS.good_4:
+ * test/etags/ETAGS.good_5:
+ * test/etags/ETAGS.good_6:
+ * test/etags/CTAGS.good: Adapt to the modified Lua tests.
+
+2015-12-11 Eli Zaretskii <eliz@gnu.org>
+
+ Fix 'this-command-keys' wrt prefix argument
+
+ * src/keyboard.c (command_loop_1): Restore the feature whereby C-u
+ was part of this-command-keys, but not of this-single-command-keys.
+ (Bug#22107)
+
+ * lisp/simple.el (internal-echo-keystrokes-prefix): Add
+ commentary about the function's return value.
+
+2015-12-11 Eli Zaretskii <eliz@gnu.org>
+
+ * lisp/files.el (load-library): Doc fix. (Bug#22140)
+
+2015-12-11 Eli Zaretskii <eliz@gnu.org>
+
+ Improve and document Ruby support in 'etags'
+
+ * lib-src/etags.c (Ruby_suffixes): Add ".ruby".
+ (Ruby_functions): Support "module" and overloaded operators.
+ (Ruby_help): Mention "module".
+
+ * test/etags/ruby-src/test.rb:
+ * test/etags/ruby-src/test1.ruby: New files.
+ * test/etags/Makefile (RBSRC): New tests.
+ (SRCS): Add ${RBSRC}.
+ * test/etags/ETAGS.good_1:
+ * test/etags/ETAGS.good_2:
+ * test/etags/ETAGS.good_3:
+ * test/etags/ETAGS.good_4:
+ * test/etags/ETAGS.good_5:
+ * test/etags/ETAGS.good_6:
+ * test/etags/CTAGS.good: Adapt to the new Ruby tests.
+
+ * doc/man/etags.1: Mention Ruby support.
+ * etc/NEWS: Mention Ruby support.
+
+2015-12-11 Xi Lu <lx@shellcodes.org>
+
+ Initial support for Ruby in 'etags'
+
+ * lib-src/etags.c <Ruby_suffixes>: New variable.
+ (lang_names): Add an entry for Ruby.
+ (Ruby_functions): New function. (Bug#22116)
+
+2015-12-11 Eli Zaretskii <eliz@gnu.org>
+
+ Clarify documentation of 'modify-frame-parameters'
+
+ * doc/lispref/frames.texi (Parameter Access): Clarify what "ignored
+ PARMs" mean for 'modify-frame-parameters'.
+
+ * src/frame.c (Fmodify_frame_parameters): Clarify what "ignored
+ PARMs" mean for this function. (Bug#22104)
+
+2015-12-11 Eli Zaretskii <eliz@gnu.org>
+
+ Fix setting buffer unibyte when reading from a device
+
+ * src/fileio.c (Finsert_file_contents): Call Fset_buffer_multibyte
+ to make a (possibly non-empty) buffer unibyte. (Bug#22096)
+
+2015-12-11 Eli Zaretskii <eliz@gnu.org>
+
+ Clarify documentation of 'values'
+
+ * doc/lispref/eval.texi (Eval): Clarify that 'values' are not
+ updated by any evaluation commands in 'lisp-interaction-mode'.
+ (Bug#22056)
+
+2015-12-11 Anders Lindgren <andlind@gmail.com>
+
+ Fixed subversion vc error when opening file in new directory (bug#21984).
+
+ * lisp/vc/vc-svn.el (vc-svn-registered): Check if directory exists.
+
+2015-12-09 Eli Zaretskii <eliz@gnu.org>
+
+ Yet another fix for when point ends up in invisible text
+
+ * src/xdisp.c (redisplay_window): When someone forced
+ window-start, and honoring that failed to show the cursor, try
+ moving out of invisible text, before falling back to the middle of
+ the window. (Bug#22098)
+
+2015-12-09 Michael Albinus <michael.albinus@gmx.de>
+
+ Fix error in Tramp perl script for cygwin
+
+ * lisp/net/tramp-sh.el (tramp-perl-file-truename): Do not raise an
+ error if file doesn't exist.
+
+2015-12-09 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+
+ Remove font workaround for limited outdated versions
+
+ * src/macfont.m (mac_font_descriptor_get_adjusted_weight): Remove
+ workaround for HiraginoSans-W7 on OS X 10.11 and 10.11.1.
+
+2015-12-09 Anders Lindgren <andlind@gmail.com>
+
+ Don't add "." to load path (bug#21104)
+
+ When configured with --enable-locallisppath=no, which is the
+ default for OS X, the load-path incorrectly was populated with ".".
+
+ * src/lread.c (init_lread): Don't call `decode_env_path' when
+ PATH_SITELOADSEARCH is empty.
+
+2015-12-08 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/emacs-lisp/package.el (package--with-response-buffer):
+
+ Search for the blank-line in the right buffer.
+
+2015-12-08 Glenn Morris <rgm@gnu.org>
+
+ * test/automated/simple-test.el (undo-auto-boundary-timer): Update
+ for recent change.
+
+2015-12-08 Glenn Morris <rgm@gnu.org>
+
+ Fix some display-warning usage.
+
+ * lisp/files.el (hack-local-variables, hack-dir-local-variables):
+ * lisp/calendar/diary-lib.el (diary-include-files, diary-sexp-entry):
+ * lisp/calendar/holidays.el (calendar-holiday-list):
+ * lisp/mail/rmailout.el (rmail-output-read-file-name):
+ Fix display-warning usage.
+
+2015-12-07 Glenn Morris <rgm@gnu.org>
+
+ * lisp/calendar/cal-html.el: Require diary-lib.
+
+ (cal-html-list-diary-entries): Handle no diary. (Bug#21994)
+
+2015-12-07 Thomas Fitzsimmons <fitzsim@fitzsim.org>
+
+ Add Obsolete-since header to eudcb-ph.el
+
+ * eudcb-ph.el: Add Obsolete-since header.
+
+2015-12-07 Paul Eggert <eggert@cs.ucla.edu>
+
+ Spelling fixes
+
+ * doc/misc/calc.texi (Predefined Units): Use the bland modern
+ scientific style for spelling the units “ampere” and
+ “angstrom” rather than the older style “Ampere” and
+ “Ångstrom”. The latter spelling was wrong anyway (it should
+ have been “Ångström”).
+ * lisp/emacs-lisp/ert.el (ert--explain-equal-rec):
+ Fix misspelling of ‘atom’ in code.
+
+2015-12-07 Eli Zaretskii <eliz@gnu.org>
+
+ Improve documentation of kill commands
+
+ * lisp/simple.el (region-extract-function, delete-backward-char)
+ (delete-forward-char, kill-region, copy-region-as-kill)
+ (kill-ring-save): Better document the optional argument REGION in
+ the doc strings. Mention in the doc strings that text put in the
+ kill-ring can be filtered by 'filter-buffer-substring'.
+
+ * doc/lispref/text.texi (Kill Functions): Mention that functions
+ described in this subsection can filter text they put in the
+ kill-ring. Add a cross-reference to "Buffer Contents" and an
+ index entry. Document the optional argument 'region' and its
+ effect.
+ (Bug#21315)
+
+2015-12-07 Alan Mackenzie <acm@muc.de>
+
+ Further progress making Isearch, Ispell, Replace work with Follow Mode.
+
+ * lisp/follow.el: (follow-mode): Remove references to sit*-for-function, which
+ no longer exists. Add follow-post-command-hook to three special purpose
+ hooks at setup, and remove them at tear down.
+
+ * lisp/isearch.el: (isearch-update): invoke isearch-update-post-hook before
+ isearch-lazy-highlight-new-loop.
+ (isearch-lazy-highlight-new-loop): Restore this function to what it previously
+ was, merging the functionality of isearch-lazy-highlight-maybe-new-loop into
+ it.
+ (isearch-lazy-highlight-maybe-new-loop): function removed.
+
+ * lisp/replace.el: (replace-update-post-hook): New hook variable.
+ (perform-replace): Add second (nil) argument to looking-back. Invoke
+ replace-update-post-hook before calling replace-highlight.
+
+ * lisp/textmodes/ispell.el: (ispell-update-post-hook): New hook variable.
+ (ispell-command-loop): invoke ispell-update-post-hook. Add GROUP argument to
+ call of pos-visible-in-window-p.
+ (ispell-display-buffer): Place *Choices* window at the top of the last window
+ in a window group.
+
+2015-12-07 Alan Mackenzie <acm@muc.de>
+
+ Amend doc of `mapconcat': it can take sequences, not merely strings.
+
+ * doc/lispref/functions.texi (Mapping Functions): Amend the doc of `mapconcat'
+ to say that SEPARATOR and the results from FUNCTION may be any character
+ sequences, not just strings. Add an @xref to "Sequences Arrays Vectors".
+
+2015-12-07 Michael Albinus <michael.albinus@gmx.de>
+
+ Fix an utf8 problem for Tramp on BSD
+
+ * lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell):
+ Make lax check for utf8.
+ (tramp-get-remote-locale): Add "en_US.UTF-8" as candidate.
+
+2015-12-06 Thomas Fitzsimmons <fitzsim@fitzsim.org>
+
+ Make eudcb-ph.el obsolete
+
+ * doc/misc/eudc.texi: Bump version to 1.40.0.
+ Remove PH/QI sections and mentions.
+ * lisp/obsolete/eudcb-ph.el: Make obsolete.
+ * lisp/net/eudc-vars.el (eudc-known-protocols): Remove ph.
+ (eudc-ph-bbdb-conversion-alist): Make obsolete.
+ * etc/NEWS: Mention this. (Bug#21191)
+
+2015-12-06 Paul Eggert <eggert@cs.ucla.edu>
+
+ Remove overenthusiastic eassert
+
+ * src/lisp.h (XSYMBOL): Remove eassert incorrectly added in
+ previous change. It breaks on MS-Windows --with-wide-int.
+ Problem reported by Eli Zaretskii in:
+ http://lists.gnu.org/archive/html/emacs-devel/2015-12/msg00275.html
+
+2015-12-06 Paul Eggert <eggert@cs.ucla.edu>
+
+ Pacify gcc -Wparentheses
+
+ * src/xdisp.c (row_containing_pos): Reparenthesize.
+
+2015-12-06 Paul Eggert <eggert@cs.ucla.edu>
+
+ Port mod-test to 32-bit Emacs --without-wide-int
+
+ * modules/mod-test/test.el (mod-test-sum-test):
+ Bring back the 2**29 tests, but port them to 32-bit Emacs
+ --without-wide-int.
+
+2015-12-06 Michael Albinus <michael.albinus@gmx.de>
+
+ Fix minor Tramp problems found on BSD
+
+ * lisp/net/tramp-sh.el (tramp-perl-file-truename): Do not append
+ trailing slash. Quote apostrophes.
+ (tramp-sh-handle-file-truename): Do not append trailing slash in
+ the "ls" case.
+ (tramp-get-ls-command-with-w-option): New defun.
+ (tramp-do-file-attributes-with-ls)
+ (tramp-do-directory-files-and-attributes-with-stat): Use it.
+
+ * test/automated/tramp-tests.el
+ (tramp-test31-special-characters-with-perl)
+ (tramp-test31-special-characters-with-ls)
+ (tramp-test32-utf8-with-perl, tramp-test32-utf8-with-ls):
+ Suppress also readlink.
+
+2015-12-06 Eli Zaretskii <eliz@gnu.org>
+
+ Fix cursor display when invisible text is at line beginning
+
+ * src/xdisp.c (redisplay_window): When scrolling fails to show
+ point, prefer using the desired matrix if possible for finding the
+ fallback glyph row for displaying the cursor. (Bug#22098)
+ (row_containing_pos): Exit the loop as soon as we hit the first
+ disabled glyph row. Otherwise we risk accessing garbled data and
+ departing to the no-no land.
+
+2015-12-06 Paul Eggert <eggert@cs.ucla.edu>
+
+ Improve module interface when WIDE_EMACS_INT
+
+ * src/emacs-module.c (plain_values): New constant.
+ (module_nil): Now a constant.
+ (Finternal_module_call, value_to_lisp_bits, lisp_to_value_bits)
+ (syms_of_module): Use if, not #ifdef, so that both sides are
+ checked at compile-time, and so that GCC doesn’t complain
+ about an unused var in the typical case. Also, depend on
+ plain_values, not on WIDE_EMACS_INT; the code shouldn’t assume
+ that WIDE_EMACS_INT implies !USE_LSB_TAG.
+ (value_to_lisp_bits, lisp_to_value_bits): New functions.
+ Sign-extend integers rather than zero-extending them, as small
+ negative integers are more likely.
+ (value_to_lisp, lisp_to_value): Rewrite in terms of the new *_bits
+ functions.
+ (HAVE_STRUCT_ATTRIBUTE_ALIGNED): Define to 0 if not already defined.
+ (mark_modules): Remove. All uses removed.
+ (lisp_to_value): Don’t assume Fcons returns a pointer aligned
+ to GCALIGNMENT.
+ (syms_of_module): Check that module_nil converts to Qnil.
+ * src/lisp.h (lisp_h_XSYMBOL, XSYMBOL): Use signed conversion, since
+ we prefer signed to unsigned when either will do.
+ (TAG_PTR): Sign-extend pointers when USE_LSB_TAG, as this is
+ a bit better for emacs-module.c.
+
+2015-12-06 Paul Eggert <eggert@cs.ucla.edu>
+
+ Port mod-test to x86-64 GNU/Linux running 32-bit
+
+ * modules/mod-test/test.el (mod-test-sum-test):
+ Don’t attempt to match descriptions to operating systems.
+ It didn’t work on Fedora x86-64 running a 32-bit executable,
+ and it’s not worth the trouble anyway.
+ Port to 32-bit platforms by removing an assumption about
+ fixnum widths.
+
+2015-12-06 Michael Albinus <michael.albinus@gmx.de>
+
+ Fix auto-revert-tests.el when filenotify isn't used
+
+ * test/automated/auto-revert-tests.el (auto-revert--wait-for-revert):
+ Make it working also when filenotify isn't used.
+
+2015-12-05 Juri Linkov <juri@linkov.net>
+
+ * lisp/textmodes/ispell.el (ispell-highlight-spelling-error-overlay):
+
+ Let-bind isearch-regexp-function to nil. (Bug#22097)
+
+2015-12-05 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/emacs-lisp/package.el: Don't install bad signatures (bug#22089)
+
+ (package--with-response-buffer): NOERROR and ERROR-FORM only
+ handle connection errors.
+ (bad-signature): New error type.
+ (package--check-signature-content): Use it.
+ (package--check-signature): Properly distinguish connection errors
+ from bad-signature errors. Do the check for
+ `package-check-signature' `allow-unsigned' here instead of forcing
+ the callbacks to do it. Add a new argument, UNWIND.
+ (package--download-one-archive, package-install-from-archive):
+ Update usage of `package--check-signature'.
+
+2015-12-05 Ulf Jasper <ulf.jasper@web.de>
+
+ Fix Bug#22092.
+
+ * lisp/calendar/icalendar.el (icalendar--get-unfolded-buffer):
+ Clean up inconsistent line endings. (Bug#22092)
+ (icalendar--clean-up-line-endings): New.
+ * test/automated/icalendar-tests.el (icalendar-real-world): Add test
+ for Bug#22092.
+
+2015-12-05 Eli Zaretskii <eliz@gnu.org>
+
+ Document 'bookmark-set-no-overwrite'
+
+ * doc/emacs/regs.texi (Bookmarks): Document the new command
+ 'bookmark-set-no-overwrite' and its keybinding.
+
+2015-12-05 Eli Zaretskii <eliz@gnu.org>
+
+ Document new binding of 'mouse-buffer-menu'
+
+ * doc/emacs/buffers.texi (Buffer Menus): 'mouse-buffer-menu' is
+ now also on C-F10.
+
+2015-12-05 Eli Zaretskii <eliz@gnu.org>
+
+ Initial documentation of dynamic modules
+
+ * doc/lispref/loading.texi (Dynamic Modules): New section with
initial documentation for dynamic modules.
* doc/lispref/elisp.texi (Top): Add "Dynamic Modules" to the
detailed menu
- * etc/NEWS: Fix typos in dynamic modules' entry.
+ * etc/NEWS: Fix typos in dynamic modules' entry.
+
+2015-12-05 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ Remove copyright statements from trivial test files
+
+2015-12-05 Eli Zaretskii <eliz@gnu.org>
+
+ Add "Preliminaries" section to etc/DEBUG
+
+ * etc/DEBUG: Add the "Preliminaries" section for GDB beginners.
+ Most of the content was suggested by Phillip Lord
+ <phillip.lord@russet.org.uk>. Remove the section about debugging
+ with the Visual Studio, as building Emacs with the Microsoft
+ compilers is no longer supported. Minor fixes in some other
+ sections.
+
+2015-12-05 Alex Dunn <dunn.alex@gmail.com> (tiny change)
+
+ Improve parsing of version strings
+
+ * lisp/subr.el (version-regexp-alist): Allow "." as priority separator
+ (version-to-list): More helpful error messages.
+ (version-to-list): ".5" is valid (update docstring). Make
+ "22.8X3" invalid, as the doc string says.
+
+ * test/automated/subr-tests.el (ert-test-version-parsing): New
+ tests for version string processing.
+
+2015-12-05 Eli Zaretskii <eliz@gnu.org>
+
+ Fix documentation of 'undo' changes
+
+ * doc/lispref/text.texi (Undo): Minor wording changes. Use US
+ English conventions for spelling and whitespace between sentences.
+
+ * etc/NEWS: Fix wording and spelling of undo-related entries.
+ Mark them as documented.
+
+2015-12-04 Glenn Morris <rgm@gnu.org>
+
+ * lisp/net/net-utils.el: Small improvements.
+
+ (net-utils--executable-find-sbin): New function.
+ (ifconfig-program): Check sbin directories.
+ Fallback to "ip". (Bug#22091)
+ (ifconfig-program-options): Check the actual program in use.
+ (arp-program): Check sbin directories.
+
+2015-12-04 Arash Esbati <esbati@gmx.de> (tiny change)
+
+ Fix wrong-type-argument integer-or-marker-p nil error
+
+ * lisp/textmodes/reftex-auc.el (reftex-what-index-tag):
+ Fix (wrong-type-argument integer-or-marker-p nil) error (bug#22077).
+
+2015-12-04 Alan Mackenzie <acm@muc.de>
+
+ Merge branch 'scratch/follow' of /home/acm/emacs/emacs.git/emacs-25 into scratch/follow
+
+ Merge necessitated by a rebase operation.
+
+2015-12-04 Alan Mackenzie <acm@muc.de>
+
+ lisp/isearch.el: Eliminate macro isearch-call-message, replacing with funcall.
+
+2015-12-04 Alan Mackenzie <acm@muc.de>
+
+ First commit to scratch/follow. Make Isearch work with Follow Mode, etc.
+
+ doc/lispref/window.texi (Basic Windows): Add paragraph defining "Group of
+ Windows" and new @defun selected-window-group.
+ (Window Start and End): Describe new &optional parameter GROUP and
+ ...-group-function for window-start, window-end, set-window-start, and
+ pos-visible-in-window-p.
+ (Textual Scrolling) Describe the same for recenter.
+ doc/lispref/positions.texi (Screen Lines): Describe the same for
+ move-to-window-line.
+
+ src/window.c (Fwindow_start, Fwindow_end, Fset_window_start)
+ (Fpos_visible_in_window_p, Frecenter, Fmove_to_window_line): To each, add ar
+ new optional parameter "group". At the beginning of each, check whether the
+ corresponding ...-group-function is set to a function, and if so execute this
+ function in place of the normal processing.
+ (syms_of_window): Define symbols for the six new variables below.
+ (window-start-group-function, window-end-group-function)
+ (set-window-start-group-function, recenter-group-function)
+ (pos-visible-in-window-p-group-function, move-to-window-line-group-function):
+ New permanent local buffer local variables.
+ src/keyboard.c (Fposn_at_point): Add extra parameter in call to
+ Fpos_visible_in_window_p.
+
+ lisp/window.el (selected-window-group-function): New permanent local buffer
+ local variable.
+ (selected-window-group): New function.
+
+ lisp/follow.el (follow-mode): Set the ...-group-function variables at mode
+ enable, kill them at mode disable. Add/remove follow-after-change to/from
+ after-change-functions.
+ (follow-start-end-invalid): New variable.
+ (follow-redisplay): Manipulate follow-start-end-invalid.
+ (follow-after-change, follow-window-start, follow-window-end)
+ (follow-set-window-start, follow-pos-visible-in-window-p)
+ (follow-move-to-window-line, follow-sit-for): New functions.
+
+ lisp/isearch.el (isearch-call-message): New macro.
+ (isearch-update, with-isearch-suspended, isearch-del-char)
+ (isearch-search-and-update, isearch-ring-adjust): Invoke above new macro.
+ (with-isearch-suspended): Rearrange code such that isearch-call-message is
+ invoked before point is moved.
+ (isearch-message): Add comment about where point must be at function call.
+ (isearch-search): Remove call to isearch-message.
+ (isearch-lazy-highlight-window-group): New variable.
+ (isearch-lazy-highlight-new-loop): Unconditionally start idle timer. Move
+ the battery of tests to ...
+ (isearch-lazy-highlight-maybe-new-loop): New function, started by idle timer.
+ Note: (sit-for 0) is still called.
+ (isearch-lazy-highlight-update): Check membership of
+ isearch-lazy-highlight-window-group. Don't set the `window' overlay
+ property.
+ (isearch-update, isearch-done, isearch-string-out-of-window)
+ (isearch-back-into-window, isearch-lazy-highlight-maybe-new-loop)
+ (isearch-lazy-highlight-search, isearch-lazy-highlight-update)
+ (isearch-lazy-highlight-update): Call the six amended primitives (see
+ src/window.c above) with the new `group' argument set to t, to cooperate
+ with Follow Mode.
+
+2015-12-04 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * lisp/emacs-lisp/ert.el: Prefer pcase over cl-typecase
+
+ * lisp/emacs-lisp/ert.el (ert--should-error-handle-error)
+ (ert--explain-format-atom, ert--explain-equal-rec)
+ (ert--print-backtrace, ert-test-result-type-p, ert-select-tests)
+ (ert--insert-human-readable-selector): Prefer pcase over cl-typecase.
+
+2015-12-04 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/character-fold.el: Remove special case-folding support
+
+ (character-fold-to-regexp): Remove special code for
+ case-folding. Char-fold search still respects the
+ `case-fold-search' variable (i.e., f matches F). This only
+ removes the code that was added to ensure that f also matched
+ all chars that F matched. For instance, after this commit, f
+ no longer matches 𝔽.
+
+ This was necessary because the logic created a regexp with
+ 2^(length of the string) redundant paths. So, when a very
+ long string "almost" matched, Emacs took a very long time to
+ figure out that it didn't. This became particularly relevant
+ because isearch's lazy-highlight does a search bounded by (1-
+ match-end) (which, in most circumstances, is a search that
+ almost matches). A recipe for this can be found in bug#22090.
+
+2015-12-04 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * lisp/emacs-lisp/cl-macs.el (character): Can't be negative
+ Fixes (bug#21701)
+
+2015-12-04 Daiki Ueno <ueno@gnu.org>
+
+ lisp/gnus/qp.el: Don't replace "from " at bol
+
+ * lisp/gnus/qp.el (quoted-printable-encode-region): Bind `case-fold-search'
+ to nil when looking for "^From ". Problem reported by Simon Josefsson.
+
+2015-12-03 Phillip Lord <phillip.lord@russet.org.uk>
+
+ Externalize some symbols in undo-auto
+
+ * doc/lispref/text.texi: Update symbols.
+ * lisp/simple.el (undo-auto--amalgamate,
+ undo-auto--current-boundary-timer): Make symbols public.
+ * src/cmds.c (Fself_insert_command,Fdelete_char): Call
+ updated symbol.
+
+2015-12-03 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * lisp/emacs-lisp/smie.el (smie-next-sexp): Fix BOB "token"
+
+2015-12-03 Michael Albinus <michael.albinus@gmx.de>
+
+ Some error message improvements in tramp-sh.el
+
+ * lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell):
+ Suppress error messages for "mesg" and "biff" calls.
+ (tramp-get-remote-path): Ignore errors when expanding
+ `tramp-own-remote-path'. Raise a warning instead.
+
+2015-12-03 Eli Zaretskii <eliz@gnu.org>
+
+ Document 'nacl' value for 'system-type'
+
+ * doc/lispref/os.texi (System Environment): Document the 'nacl'
+ value of 'system-type'.
+
+2015-12-03 Eli Zaretskii <eliz@gnu.org>
+
+ Document 'window-max-chars-per-line'
+
+ * doc/lispref/windows.texi (Window Sizes): Document
+ 'window-max-chars-per-line'.
+
+2015-12-03 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ Fix some file headers for the purpose of `package--builtins'
+
+ * lisp/emacs-lisp/cl-preloaded.el
+ * lisp/emacs-lisp/eieio-compat.el
+ * lisp/net/sasl-scram-rfc.el: Add a "Package:" header
+
+ * lisp/ielm.el: Fix summary line.
+
+2015-12-03 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/emacs-lisp/package.el (package-unpack): Load before compiling
+
+ Reload any previously loaded package files before compiling
+ the package (also reload the same files after compiling).
+ This ensures that we have the most recent definitions during
+ compilation, and avoids generating bad elc files when a macro
+ changes and it is used in a different file from the one it's
+ defined in.
+
+2015-12-03 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/emacs-lisp/package.el: Refactor package activation code
+
+ (package-activate): Move code that activates dependencies into
+ package-activate-1.
+ (package--load-files-for-activation): New function.
+ (package-activate-1): Add code for (optionally) activating
+ dependencies, and move file-loading code into
+ `package--load-files-for-activation'.
+
+2015-12-03 Eli Zaretskii <eliz@gnu.org>
+
+ Document new font-related functionality
+
+ * doc/lispref/display.texi (Low-Level Font): Document
+ 'default-font-width', 'default-font-height', 'window-font-width',
+ and 'window-font-height'.
+
+ * etc/NEWS: Move entries for 'default-font-width',
+ 'default-font-height', 'window-font-width', and 'window-font-height'
+ to their place and mark them documented.
+
+2015-12-03 Eli Zaretskii <eliz@gnu.org>
+
+ Fix documentation and implementation of 'directory-name-p'
+
+ * lisp/files.el (directory-name-p): Modify to recognize
+ backslashes on MS-Windows and MS-DOS. Adjust the doc string
+ accordingly. Use '=', not char-equal, for comparison, as
+ letter-case cannot possibly be an issue here.
+
+ * doc/lispref/files.texi (Directory Names): Move the documentation
+ of directory-name-p here from "Relative File Names". Update the
+ description per the changes in implementation.
+
+ * etc/NEWS: Move the entry for 'directory-name-p' to its proper
+ place and mark it documented.
+
+2015-12-02 Eli Zaretskii <eliz@gnu.org>
+
+ Minor copyedit in Emacs manual
+
+ * doc/emacs/search.texi (Lax Search): Make wording about character
+ folding by default less definitive. (Bug#22043)
+
+2015-12-02 Eli Zaretskii <eliz@gnu.org>
+
+ More emacs-module.c fixes for wide ints
+
+ * src/emacs-module.c (value_to_lisp) [WIDE_EMACS_INT]: Use
+ unsigned data types to manipulate pointers, to avoid sign
+ extension coming after us with a vengeance.
+
+ * modules/mod-test/test.el (mod-test-sum-test): Add tests for
+ Emacs with wide ints that verify integer values near the critical
+ value that requires us to switch to a cons cell.
+
+2015-12-02 Stephen Leake <stephen_leake@stephe-leake.org>
+
+ Fix bug#22069 in cl-generic.el
+
+ * lisp/emacs-lisp/cl-generic.el (cl-no-method): Remove %S; this string is
+ not run thru `format'.
+
+2015-12-01 Dmitry Gutov <dgutov@yandex.ru>
+
+ APPEND etags--xref-backend to xref-backend-functions
+
+ * lisp/progmodes/xref.el (xref-backend-functions):
+ Use APPEND when adding the default element
+ (http://lists.gnu.org/archive/html/emacs-devel/2015-12/msg00061.html).
+
+2015-12-01 Eli Zaretskii <eliz@gnu.org>
+
+ More accurate documentation of lax whitespace matching
+
+ * lisp/isearch.el (isearch-forward-word, isearch-forward-symbol)
+ (word-search-backward, word-search-forward)
+ (word-search-backward-lax, word-search-forward-lax): Mention in
+ doc strings that toggling lax whitespace matching has no effect on
+ these commands.
+
+ * doc/emacs/search.texi (Word Search, Symbol Search): Clarify that
+ lax whitespace matching has no effect on these commands.
+
+2015-12-01 Eli Zaretskii <eliz@gnu.org>
+
+ Fix emacs-module.c for wide ints
+
+ * src/emacs-module.c (lisp_to_value): Compare the produced value
+ with the original Lisp object, not with the one potentially
+ converted into a Lisp_Cons. Fixes assertion violations when
+ working with integers larger than fit into a 32-bit value.
+
+ * modules/mod-test/test.el (mod-test-sum-test): Add tests for
+ large integers, to test --with-wide-int.
+
+2015-12-01 Eli Zaretskii <eliz@gnu.org>
+
+ Document 'directory-files-recursively'
+
+ * lisp/files.el (directory-files-recursively): Doc fix. Rename
+ the argument MATCH to REGEXP, to be more explicit about its form.
+
+ * doc/lispref/files.texi (Contents of Directories): Improve the
+ documentation of 'directory-files-recursively'. Add
+ cross-references.
+
+ * etc/NEWS: Move the entry for 'directory-files-recursively' to
+ its place and mark it documented.
+
+2015-12-01 Eli Zaretskii <eliz@gnu.org>
+
+ Document 'inhibit-read-only' property
+
+ * doc/lispref/text.texi (Special Properties): Describe the new
+ 'inhibit-read-only' text property. Add cross-reference to where
+ read-only buffers are described.
+ * doc/lispref/buffers.texi (Read Only Buffers): Mention that
+ 'inhibit-read-only' property exempts text from being read-only.
+ Add cross-reference to "Special Properties".
+
+ * etc/NEWS: Move the entry about 'inhibit-read-only' property to
+ its place and mark it documented.
+
+2015-12-01 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/emacs-lisp/package.el: Update header comments
+
+2015-12-01 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/character-fold.el: Add back multi-char matching
+
+ (character-fold-to-regexp): Uncomment recently commented code
+ and make the algorithm "dummer" by not checking every possible
+ combination. This will miss some possible matches, but it
+ greatly reduces regexp size.
+
+ * test/automated/character-fold-tests.el
+ (character-fold--test-fold-to-regexp): Comment out test of
+ functionality no longer supported.
+
+2015-12-01 Xue Fuqiao <xfq.free@gmail.com>
+
+ * doc/emacs/ack.texi (Acknowledgments): Update.
+
+2015-12-01 Michael Albinus <michael.albinus@gmx.de>
+
+ Check `file-remote-p' over absolute files names in files.el
+
+ * lisp/files.el (directory-files-recursively)
+ (get-free-disk-space): Check `file-remote-p' over absolute files names.
+
+2015-12-01 Andreas Schwab <schwab@linux-m68k.org>
+
+ * src/lread.c (syms_of_lread): Doc fix.
+
+2015-11-30 Dmitry Gutov <dgutov@yandex.ru>
+
+ Don't mistake certain JS method calls for keywords
+
+ * lisp/progmodes/js.el (js--ctrl-statement-indentation):
+ Braceless keyword can't come after a period (bug#22063).
+
+2015-11-30 David Reitter <david.reitter@gmail.com>
+
+ Read frame_title_format from buffer-local variable for NS port
+
+ * src/nsfns.m (x_implicitly_set_name): Read frame-title-format and
+ icon-title-format variables from buffer in appropriate window.
+ (Bug#22048)
+
+2015-11-30 Juri Linkov <juri@linkov.net>
+
+ * lisp/replace.el (occur-engine): Count matches in empty lines.
+
+ (Bug#22062)
+
+2015-11-30 Aurélien Aptel <aurelien.aptel@gmail.com>
+
+ * src/emacs-module.h: Fix finalizer typedef for C++11
+
+ C++11 standard doesn't allow exception-specification in typedef.
+ The workaround is to declare a dummy function prototype and use
+ decltype on it.
+
+2015-11-30 Eli Zaretskii <eliz@gnu.org>
+
+ Fix last change
+
+ * src/emacs-module.c (lisp_to_value, value_to_lisp)
+ [WIDE_EMACS_INT]: Avoid compiler warnings.
+
+2015-11-30 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ Rely on conservative stack scanning to find "emacs_value"s
+
+ * src/emacs-module.c (struct emacs_value_tag)
+ (struct emacs_value_frame, struct emacs_value_storage): Remove.
+ (value_frame_size): Remove constant.
+ (struct emacs_env_private): Use Lisp_Object for non_local_exit info.
+ (lisp_to_value): Remove first arg.
+ (module_nil): New constant.
+ Use it instead of NULL when returning an emacs_value.
+ (module_make_function): Adjust to new calling convention of
+ Qinternal_module_call.
+ (DEFUN): Receive args in an array rather than a list.
+ Use SAFE_ALLOCA rather than xnmalloc. Skip the lisp_to_value loop when
+ we don't have WIDE_EMACS_INT. Adjust to new type of non_local_exit info.
+ (module_non_local_exit_signal_1, module_non_local_exit_throw_1):
+ Adjust to new type of non_local_exit info.
+ (ltv_mark) [WIDE_EMACS_INT]: New constant.
+ (value_to_lisp, lisp_to_value): Rewrite.
+ (initialize_frame, initialize_storage, finalize_storage): Remove functions.
+ (allocate_emacs_value): Remove function.
+ (mark_modules): Gut it.
+ (initialize_environment): Don't initialize storage any more.
+ Keep the actual env object on Vmodule_environments.
+ (finalize_environment): Don't finalize storage any more.
+ (syms_of_module): Initialize ltv_mark and module_nil.
+
+ * src/emacs-module.h (emacs_value): Make it more clear that this type
+ is really opaque, including the fact that NULL may not be valid.
+
+ * modules/mod-test/mod-test.c (Fmod_test_signal, Fmod_test_throw):
+ Don't assume that NULL is a valid emacs_value.
+
+2015-11-30 Eli Zaretskii <eliz@gnu.org>
+
+ Yet another doc improvement for search commands
+
+ * doc/emacs/search.texi (Word Search, Symbol Search)
+ (Regexp Search): Document commands that don't support lax
+ whitespace matching or character folding.
+ (Nonincremental Search): Mention the search commands that can be
+ invoked from the menu bar.
+
+ * lisp/isearch.el (isearch-define-mode-toggle-word)
+ (isearch-define-mode-toggle-symbol)
+ (isearch-define-mode-toggle-character-fold): Note in the doc
+ string that turning these on exits the regexp mode.
+ (isearch-forward-regexp, isearch-forward-word)
+ (isearch-forward-symbol, isearch-backward-regexp)
+ (word-search-backward, word-search-forward)
+ (word-search-backward-lax, word-search-forward-lax): State in the
+ doc string which commands don't support character folding and/or
+ lax-whitespace matching.
+
+2015-11-30 Martin Rudalics <rudalics@gmx.at>
+
+ Run `window-size-change-functions' also when reading from minibuffer
+
+ * src/xdisp.c (redisplay_internal): Run `window-size-change-functions'
+ also when reading from minibuffer.
+
+2015-11-30 Ulf Jasper <ulf.jasper@web.de>
+
+ Fix scrambling of html-rendered item buffers
+
+ * lisp/net/newst-treeview.el (newsticker--treeview-render-text): Fix
+ scrambling of contents by wrapping call to html-renderer in
+ save-selected-window.
+
+2015-11-30 Paul Eggert <eggert@cs.ucla.edu>
+
+ Fix font typo in previous doc fix.
+
+2015-11-30 Paul Eggert <eggert@cs.ucla.edu>
+
+ A bit more security doc, esp. file local vars
+
+ * doc/emacs/emacs.texi (Top):
+ * doc/emacs/misc.texi (Miscellaneous Commands):
+ Refer to new Host Security section.
+ (Host Security): New section.
+ * doc/lispref/os.texi (Security Considerations):
+ Mention file local variables.
+
+2015-11-30 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/character-fold.el: Comment out branching code
+
+ (character-fold-to-regexp): Comment out code that uses multi-char
+ table. The branching caused by this induces absurdly long regexps,
+ up to 10k chars for as little as 25 input characters.
+
+2015-11-30 Paul Eggert <eggert@cs.ucla.edu>
+
+ Spelling and grammar fixes
+
+2015-11-29 Dmitry Gutov <dgutov@yandex.ru>
+
+ Make lisp-completion-at-point a wrapper instead of an alias
+
+ * lisp/progmodes/elisp-mode.el (lisp-completion-at-point):
+ Turn into an obsolete wrapper around elisp-completion-at-point
+ (bug#20455).
+
+2015-11-29 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/isearch.el (isearch-search-fun-default): Nicer error
+
+ message when the search fails.
+
+2015-11-29 Dmitry Gutov <dgutov@yandex.ru>
+
+ Update menu-bar-goto-uses-etags-p for the current xref API
+
+ * lisp/menu-bar.el (menu-bar-goto-uses-etags-p): Consult
+ xref-backend-functions, instead of now-nonexistent
+ xref-find-function.
+
+2015-11-29 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/isearch.el (isearch-define-mode-toggle): Advertise binding
+
+2015-11-29 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/menu-bar.el: Use folding in searches
+
+ (nonincremental-search-forward): Use `isearch-search-fun-default'
+ to determine the search function.
+ (nonincremental-search-backward)
+ (nonincremental-repeat-search-forward)
+ (nonincremental-repeat-search-backward): Use it.
+
+2015-11-29 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/menu-bar.el (menu-bar-goto-uses-etags-p): Fix a warning
+
+2015-11-29 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/character-fold.el (character-fold-to-regexp): Be careful
+
+ not to return huge regexps.
+
+2015-11-29 Eli Zaretskii <eliz@gnu.org>
+
+ Improve documentation of string-collate-* functions
+
+ * doc/lispref/strings.texi (Text Comparison): Improve wording and
+ indexing of 'string-collate-equalp' and 'string-collate-lessp'.
+
+ * etc/NEWS: Move the entry of 'string-collate-equalp' and
+ 'string-collate-lessp' to "Lisp Changes" section and mark it as
+ documented.
+
+2015-11-29 Eli Zaretskii <eliz@gnu.org>
+
+ Document truncate-string-ellipsis
+
+ * doc/lispref/display.texi (Size of Displayed Text): Document
+ 'truncate-string-ellipsis'.
+
+ * lisp/international/mule-util.el (truncate-string-ellipsis): Doc fix.
+ (truncate-string-to-width): Mention in the doc string that the
+ default for ELLIPSIS comes from 'truncate-string-ellipsis'.
+
+ * etc/NEWS: Move the 'truncate-string-ellipsis' entry to the "Lisp
+ Changes" section.
+
+2015-11-29 Eli Zaretskii <eliz@gnu.org>
+
+ Fix confusion wrt character folding in the Emacs manual
+
+ * doc/emacs/search.texi (Nonincremental Search, Regexp Search):
+ Document that invoking search-forward/backward and
+ re-search-forward/backward supports only case folding, but not the
+ rest of the lax-search features. Reported by Mike Kupfer
+ <m.kupfer@acm.org>.
+
+2015-11-29 Ken Brown <kbrown@cornell.edu>
+
+ Update mod-test-sum-test
+
+ * modules/mod-test/test.el (mod-test-sum-test): Update to
+ accommodate the lack of dladdr on Cygwin.
+
+2015-11-29 Alan Mackenzie <acm@muc.de>
+
+ Byte compiler: Catch missing argument to `funcall'. Fixes bug#22051.
+
+ * lisp/emacs-lisp/bytecomp.el (byte-compile-funcall): When there's no argument
+ to `funcall', (i) Output an error message; (ii) Generate code to signal a
+ `wrong-number-of-arguments' error.
+
+2015-11-29 Martin Rudalics <rudalics@gmx.at>
+
+ * lisp/window.el (split-window): Don't sanitize sizes when SIZE is non-nil.
+
+2015-11-28 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/character-fold.el (character-fold-to-regexp)
+
+ Warn about using long strings.
+
+ * test/automated/character-fold-tests.el
+ (character-fold--test-lax-whitespace)
+ (character-fold--test-consistency): Reduce string size for tests.
+
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
+
+ Document renaming of x-select-enable-* variables
+
+ * doc/emacs/killing.texi (Clipboard): Rename
+ x-select-enable-clipboard to select-enable-clipboard and
+ x-select-enable-primary to select-enable-primary. Update index
+ entries.
+
+ * etc/NEWS: Mark entry as documented.
+
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
+
+ Document the shorthand hints displayed by M-x
+
+ * doc/emacs/m-x.texi (M-x): Document the numeric meaning of
+ suggest-key-bindings. Document the shorthand hints for commands
+ that have no key bindings. Document that M-x completion ignores
+ obsolete commands.
+
+ * etc/NEWS: Move the M-x entry to "Editing Changes" and mark it as
+ documented.
+
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
+
+ Update docs of character folding
+
+ * doc/emacs/search.texi (Lax Search): Update the description of
+ character folding for the latest changes.
+
+2015-11-28 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/character-fold.el: Also play nice with case-folding
+
+ (character-fold-to-regexp): Take `case-fold-search' into account.
+
+2015-11-28 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/character-fold.el: Add support for multi-char matches
+
+ (character-fold-table): Now has an extra-slot. This is a second
+ char-table that holds multi-character matches. See docstring for
+ details.
+ (character-fold-to-regexp): Can build branching regexps when a
+ character's entry the extra slot of `character-fold-table' matches the
+ characters that succeed it.
+
+2015-11-28 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/character-fold.el: Code simplifications
+
+ (character-fold-table): Reduce the scope of a variable.
+ (character-fold-to-regexp): Change logic to work directly on the
+ input string. It's a little easier to understand, probably
+ faster, and sets us up for implementing multi-char matches.
+
+ * test/automated/character-fold-tests.el
+ (character-fold--test-fold-to-regexp): New test.
+
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
+
+ Document changes in "C-h l"
+
+ * doc/emacs/help.texi (Misc Help): Document the changes in "C-h l".
+
+ * etc/NEWS: mark "C-h l" changes as documented.
+
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
+
+ Finalize documentation of 'custom-prompt-customize-unsaved-options'
+
+ * doc/emacs/custom.texi (Saving Customizations): Index the new
+ function 'custom-prompt-customize-unsaved-options'.
+
+ * etc/NEWS: Mention when 'custom-prompt-customize-unsaved-options'
+ is useful.
+
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
+
+ Document 'comment-line'
+
+ * doc/emacs/programs.texi (Comment Commands): Document
+ 'comment-line'.
+
+ * etc/NEWS: Move the entry for 'comment-line' into "Editing Changes".
+
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
+
+ Document new checkdoc features
+
+ * doc/lispref/tips.texi (Tips, Library Headers): Document the
+ keyword-checking features of checkdoc and the commands
+ 'checkdoc-file' and 'checkdoc-current-buffer'.
+
+ * etc/NEWS: Move the checkdoc-related entries to their own
+ section.
+
+2015-11-28 Philipp Stephani <p.stephani2@gmail.com>
+
+ Simplify the prologue of emacs-module.c functions
+
+ * src/emacs-module.c (MODULE_FUNCTION_BEGIN): New macro.
+ (module_make_global_ref)
+ (module_free_global_ref, module_make_function, module_funcall)
+ (module_intern, module_type_of, module_extract_integer)
+ (module_make_integer, module_extract_float, module_make_float)
+ (module_copy_string_contents, module_make_string)
+ (module_make_user_ptr, module_get_user_ptr, module_set_user_ptr)
+ (module_get_user_finalizer, module_set_user_finalizer)
+ (module_vec_set, module_vec_get, module_vec_size): Use new helper
+ macro MODULE_FUNCTION_BEGIN.
+
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
+
+ Don't reject module calls with no arguments
+
+ * src/emacs-module.c (Finternal_module_call): Allow ARGLIST be nil.
+
+2015-11-28 Philipp Stephani <p.stephani2@gmail.com>
+
+ Make module-call be visible from Lisp
+
+ * src/emacs-module.c (module_make_function): Use internal--module-call.
+ (Finternal_module_call): Renamed from Fmodule_call. Add safety
+ checks.
+ (syms_of_module): DEFSYM save-value-p and save-pointer-p. Do
+ defsubr internal--module-call.
+
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
+
+ Add etags tests for the recent Lua-related bugfix
+
+ * test/etags/lua-src/test.lua: New file, tests the issues raised
+ by bug#21934.
+ * test/etags/Makefile (LUASRC): Add test.lua.
+ * test/etags/ETAGS.good_1:
+ * test/etags/ETAGS.good_2:
+ * test/etags/ETAGS.good_3:
+ * test/etags/ETAGS.good_4:
+ * test/etags/ETAGS.good_5:
+ * test/etags/ETAGS.good_6:
+ * test/etags/CTAGS.good: Adapt to the new Lua test. Also, an old
+ regression fix, resolved around 25 May 2015, required changes to
+ the "good" ETAGS files.
+
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
+
+ Fix Lua tags when a function name includes '.' or ':'
+
+ * lib-src/etags.c (Lua_functions): Add a tag for the last element
+ of a function name after a dot or a colon. (Bug#21934)
+
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
+
+ Improve documentation of search and replace commands
+
+ * doc/emacs/search.texi (Replacement and Lax Matches): Document
+ which commands are affected by 'replace-character-fold'.
+ (Lax Search): Add a cross reference to "Replacement and Lax
+ Matches". Improve wording. Fix lost extra whitespace.
+ (Search Customizations): Improve wording. (Bug#22036)
+ See also comments in
+ http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg02376.html.
+
+ * lisp/replace.el (query-replace, query-replace-regexp)
+ (query-replace-regexp-eval, replace-string, replace-regexp):
+ Mention 'replace-character-fold' in the doc strings.
+
+2015-11-28 Paul Eggert <eggert@cs.ucla.edu>
+
+ Fix minor problems found by static checking
+
+ * src/undo.c (prepare_record): Add proper prototype for C.
+
+2015-11-27 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * src/emacs-module.c (struct env_storage): Delete
+
+ (struct emacs_runtime_private): Keep an emacs_env instead.
+ (Fmodule_load, Fmodule_call): Declare emacs_env_private separately.
+ (initialize_environment): Split the arg in two. Adjust all callers.
+ Only store the private part in Vmodule_environments.
+ (finalize_environment): Change the arg to only be the private env.
+ Adjust all callers.
+
+2015-11-27 Eli Zaretskii <eliz@gnu.org>
+
+ Improve documentation of 'replace-character-fold'
+
+ * lisp/replace.el (replace-character-fold): Clarify which commands
+ are affected by this variable.
+
+2015-11-27 Dmitry Gutov <dgutov@yandex.ru>
+
+ Autoload etags when using its xref backend
+
+ * lisp/progmodes/xref.el (xref--etags-backend):
+ Rename to etags--xref-backend. Move to etags.el. Autoload.
+ (Bug#22026)
+
+2015-11-27 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/character-fold.el: Allow complex chars to match their decomposition
+
+ (character-fold-table): When a character's decomposition does not
+ involve a formatting tag (i.e., if it has an "exact" description via
+ other characters), then this character is allowed to match the
+ decomposition.
+
+2015-11-27 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/character-fold.el: More descriptive variable names
+
+ (character-fold-table): Rename a lot of the lexical variables to
+ make the code easier to read.
+
+2015-11-27 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * lisp/isearch.el: Ensure we still support `isearch-new-word'
+
+ (isearch-new-regexp-function): Define variable.
+ (isearch-new-word): Define as an obsolete alias. (Bug#22018)
+
+2015-11-27 Eli Zaretskii <eliz@gnu.org>
+
+ Merge branch 'emacs-25' of git.savannah.gnu.org:/srv/git/emacs into emacs-25
+
+2015-11-27 Lee Bochicchio <lboc.home@gmail.com>
+
+ * test/lisp/abbrev-tests.el: Define more tests
+
+ (abbrev-table-name-test, kill-all-abbrevs-test)
+ (clear-abbrev-table-test): New tests.
+
+2015-11-27 Eli Zaretskii <eliz@gnu.org>
+
+ Add module tests for wrong-type-argument
+
+ * modules/mod-test/test.el (mod-test-sum-test): Add tests for
+ wrong-type-argument.
+
+2015-11-27 Eli Zaretskii <eliz@gnu.org>
+
+ Improve handling of signals and 'throw' in modules
+
+ * src/emacs-module.c: Add commentary explaining how to write
+ functions in this file.
+ (module_make_global_ref, module_free_global_ref)
+ (module_non_local_exit_signal, module_non_local_exit_throw)
+ (module_make_function, module_funcall, module_intern)
+ (module_type_of, module_is_not_nil, module_eq)
+ (module_extract_integer, module_make_integer)
+ (module_extract_float, module_make_float)
+ (module_copy_string_contents, module_make_string)
+ (module_make_user_ptr, module_get_user_ptr, module_set_user_ptr)
+ (module_get_user_finalizer, module_set_user_finalizer)
+ (module_vec_set, module_vec_get, module_vec_size)
+ (module_non_local_exit_signal_1, module_non_local_exit_throw_1):
+ Do nothing and return with failure indication immediately, if some
+ previous module call signaled an error or wants to throw. See
+ http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg02133.html
+ for the relevant discussions.
+
+2015-11-27 Eli Zaretskii <eliz@gnu.org>
+
+ Add ':version' tag to 'checkdoc-package-keywords-flag'
+
+ * lisp/emacs-lisp/checkdoc.el (checkdoc-package-keywords-flag):
+ Add a ':version' tag.
+
+2015-11-27 Eli Zaretskii <eliz@gnu.org>
+
+ Improve documentation of 'eval-buffer' and 'eval-region'
+
+ * src/lread.c (Feval_buffer, Feval_region): Doc fixes. (Bug#22023)
+
+ * doc/lispref/eval.texi (Eval): Mention narrowing to clarify
+ "accessible portion of buffer".
+
+2015-11-27 Eli Zaretskii <eliz@gnu.org>
+
+ Unbreak the Cygwin w32 build
+
+ * src/emacs.c (main): Call w32_init_main_thread in the Cygwin w32
+ build as well. Reported by Andy Moreton <andrewjmoreton@gmail.com>.
+
+2015-11-27 Eli Zaretskii <eliz@gnu.org>
+
+ Improve commentary in character-fold.el
+
+ * lisp/character-fold.el (character-fold-to-regexp): Move detailed
+ description from commit log message to comments. (Bug#22019)
+
+2015-11-26 Alan Mackenzie <acm@muc.de>
+
+ Byte Compiler: generate code to adjust stack count after call to `signal'.
+
+ Corrects change from earlier today.
+
+ * lisp/emacs-lisp/bytecomp.el (byte-compile-setq): supply the current value of
+ `byte-compile--for-effect' as argument to `byte-compile-form'.
+
+2015-11-26 Eli Zaretskii <eliz@gnu.org>
+
+ Improve commentary of prepare_to_modify_buffer_1
+
+ * src/insdel.c (prepare_to_modify_buffer_1): Mention in commentary
+ that this function runs Lisp. Suggested by Richard Stallman
+ <rms@gnu.org>.
+
+2015-11-26 Phillip Lord <phillip.lord@russet.org.uk>
+
+ Merge branch 'emacs-25' of git.sv.gnu.org:/srv/git/emacs into emacs-25
+
+2015-11-26 Phillip Lord <phillip.lord@russet.org.uk>
+
+ Fix regression after merge.
+
+ * src/undo.c (prepare_record): Remove call to run_undoable_change.
+
+2015-11-26 Phillip Lord <phillip.lord@russet.org.uk>
+
+ After delete, record point location in undo.
+
+ Addresses Bug #21968.
+
+ * lisp/simple.el (undo-auto--add-boundary): Clean up code to
+ better support intercalating calls.
+ * src/keyboard.c, src/keyboard.h (command_loop_1): Store value of
+ point and current buffer before each command.
+ * src/undo.c (record_point): Now only record the point.
+ * src/undo.c (prepare_record): Functionality removed form
+ record_point.
+ * src/undo.c (record_delete): Check if point needs recording.
+ * src/undo.c (undo-boundary): Record value of point before each
+ boundary.
+ * test/automated/simple-test.el: New tests.
+
+ Conflicts:
+ src/undo.c
+
+2015-11-26 Eli Zaretskii <eliz@gnu.org>
+
+ Fix compiler warnings in w32.c
+
+ * src/w32.c (sys_socket): In case of error, use -1 as return
+ value, not INVALID_SOCKET, which causes compiler warnings.
+ (maybe_load_unicows_dll): Cast the return value of GetProcAddress
+ to the appropriate function signature, to avoid compiler errors.
+ Reported by Andy Moreton <andrewjmoreton@gmail.com>. (Bug#21953)
+
+2015-11-26 Dmitry Gutov <dgutov@yandex.ru>
+
+ Check if the file exists on disk before producing the revert diff
+
+ * lisp/vc/vc-dispatcher.el (vc-buffer-sync): Check if the file
+ exists on disk (bug#20558).
+
+2015-11-26 Alan Mackenzie <acm@muc.de>
+
+ Byte compiler: on setq with an odd number of arguments, generate a `signal'
+
+ * lisp/emacs-lisp/cconv.el (cconv-convert): Don't transform `setq' form when
+ it has an odd number of arguments, to allow bytecomp to handle the error.
+
+ * lisp/emacs-lisp/bytecomp.el (byte-compile-setq): In a `setq' form with an
+ odd number of arguments, generate a `signal' instead of the normal code.
+
+2015-11-25 Dmitry Gutov <dgutov@yandex.ru>
+
+ Use find-tag-default for xref-backend-identifier-at-point
+
+ * lisp/progmodes/etags.el (find-tag-tag)
+ (tags-completion-at-point-function): Extract common code as
+ find-tag--default.
+ (xref-backend-identifier-at-point): Define in terms of the new
+ function.
+
+2015-11-25 Paul Eggert <eggert@cs.ucla.edu>
+
+ * src/undo.c (record_property_change): Remove now-unused local.
+
+2015-11-25 Phillip Lord <phillip.lord@russet.org.uk>
+
+ run_undoable_changes now called from insdel.
+
+ The original calls from inside undo.c are not always at a safe position
+ to call lisp, as they originate in varied positions within insdel.c.
+ Calling them directly from prepare_to_modify_buffer_1 ensures that they
+ are always run at the same point.
+
+ * src/undo.c (run_undoable_changes,syms_of_undo): Remove function
+ and symbol used.
+ * src/insdel.c (run_undoable_changes): Add function and symbol.
+
+2015-11-25 Eli Zaretskii <eliz@gnu.org>
+
+ Improve and update documentation of search commands
+
+ * doc/emacs/search.texi (Lax Search): Renamed from "Search Case";
+ all references changed. Move the description of lax-whitespace
+ here. Add description of the new character folding features and
+ additional customizable options.
+ (Isearch Yank): Move before "Error in Search".
+ (Basic Isearch): Improve wording. Add index entries. Add short
+ description of how to abandon search, making this subsection a
+ complete introduction to search basics.
+ (Repeat Isearch): Add index entries. Describe additional
+ customizable options. Describe mouse clicks.
+ (Isearch Yank): Add index entries. Describe mouse-2 click in echo
+ area. Describe more customizable options.
+ (Error in Isearch): Add index entries.
+ (Special Isearch): Move actual description of some isearch
+ commands to other sections, leaving here just the summary of the
+ commands. Add command that toggles character folding. Describe
+ commands, like "C-h C-h", that were previously omitted for some
+ reason.
+ (Not Exiting Isearch): Describe search-exit-option. Add index
+ entries.
+ (Word Search): Describe eww-search-word and eww-search-prefix.
+ (Symbol Search): Add index entries.
+ (Regexp Search): Describe regexp-search-ring-max.
+ (Replacement and Lax Matches): Renamed from "Replacement and
+ Case"; all references changed. Describe lax-whitespace matching
+ in replace commands and related options. Describe character
+ folding in replace commands and related options.
+ (Query Replace): Describe query-replace-from-to-separator and the
+ new history features. Add index entries for highlighted text.
+ Describe query-replace-skip-read-only. Describe more keys
+ accepted by query-replace.
+ (Other Repeating Search): More index entries for Occur. Describe
+ list-matching-lines-default-context-lines.
+ (Search Customizations): New section, documents customizable
+ options that were not documented until now.
+ * doc/emacs/glossary.texi (Glossary): Add "Case Folding" and
+ "Character Folding".
+
+ * etc/NEWS: Move search- and replace-related entries to a single
+ parent section.
-2015-12-05 Artur Malabarba <bruce.connor.am@gmail.com>
+ * lisp/replace.el (query-replace-show-replacement): Doc fix.
+ * lisp/isearch.el (search-nonincremental-instead)
+ (isearch-hide-immediately): Doc fixes.
- Remove copyright statements from trivial test files
+2015-11-25 Katsumi Yamaoka <yamaoka@jpl.org>
-2015-12-05 Eli Zaretskii <eliz@gnu.org>
+ Remove nnml-retrieve-groups that is unnecessary and somewhat problematic
- Add "Preliminaries" section to etc/DEBUG
+ * lisp/gnus/nnml.el (nnml-retrieve-groups): Remove. See:
+ <http://thread.gmane.org/gmane.emacs.gnus.general/86308> and
+ <http://thread.gmane.org/gmane.emacs.gnus.general/86321>
- * etc/DEBUG: Add the "Preliminaries" section for GDB beginners.
- Most of the content was suggested by Phillip Lord
- <phillip.lord@russet.org.uk>. Remove the section about debugging
- with the Visual Studio, as building Emacs with the Microsoft
- compilers is no longer supported. Minor fixes in some other
- sections.
+2015-11-25 Paul Eggert <eggert@cs.ucla.edu>
-2015-12-05 Alex Dunn <dunn.alex@gmail.com> (tiny change)
+ Fix module_format_fun_env when dynlib_addr fails
- Improve parsing of version strings
+ * src/emacs-module.c (module_format_fun_env):
+ exprintf doesn’t support %p, so use %x. Reported by Eli Zaretskii in:
+ http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg02122.html
- * lisp/subr.el (version-regexp-alist): Allow "." as priority separator
- (version-to-list): More helpful error messages.
- (version-to-list): ".5" is valid (update docstring). Make
- "22.8X3" invalid, as the doc string says.
+2015-11-25 Paul Eggert <eggert@cs.ucla.edu>
- * test/automated/subr-tests.el (ert-test-version-parsing): New
- tests for version string processing.
+ Disambiguate variable help a bit better
-2015-12-05 Eli Zaretskii <eliz@gnu.org>
+ * lisp/help-fns.el (describe-variable): Quote the
+ variable’s value if it is a symbol other than t or nil.
+ See: T.V Raman in:
+ http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg02147.html
- Fix documentation of 'undo' changes
+2015-11-24 Dmitry Gutov <dgutov@yandex.ru>
- * doc/lispref/text.texi (Undo): Minor wording changes. Use US
- English conventions for spelling and whitespace between sentences.
+ Pass SVN commit message through log-edit-extract-headers
- * etc/NEWS: Fix wording and spelling of undo-related entries.
- Mark them as documented.
+ * lisp/vc/vc-svn.el (vc-svn-checkin): Pass COMMENT through
+ log-edit-extract-headers (bug#18954).
-2015-12-05 Glenn Morris <rgm@gnu.org>
+2015-11-24 Alan Mackenzie <acm@muc.de>
- * lisp/net/net-utils.el: Small improvements.
+ CC Mode: Eliminate compiler warning messages.
- (net-utils--executable-find-sbin): New function.
- (ifconfig-program): Check sbin directories.
- Fallback to "ip". (Bug#22091)
- (ifconfig-program-options): Check the actual program in use.
- (arp-program): Check sbin directories.
+ * lisp/progmodes/cc-mode.el (top level): remove compile time declaration of
+ `font-lock-syntactic-keywords' (which CC Mode doesn't use).
+ * lisp/progmodes/cc-awk.el (awk-mode-syntax-table)
+ (c-awk-set-syntax-table-properties): Clarify comments about
+ `font-lock-syntactic-keywords'.
-2015-12-04 (tiny change) Arash Esbati <esbati@gmx.de> (tiny change)
+ * lisp/progmodes/cc-bytecomp.el (cc-bytecomp-load): Create a dummy declaration
+ of this before the real (interpreted) one, to satisfy the byte compiler.
- Fix wrong-type-argument integer-or-marker-p nil error
+2015-11-24 Simen Heggestøyl <simenheg@gmail.com>
- * lisp/textmodes/reftex-auc.el (reftex-what-index-tag):
- Fix (wrong-type-argument integer-or-marker-p nil) error (bug#22077).
+ Extend the test suite for json.el
-2015-12-04 Alan Mackenzie <acm@muc.de>
+ * lisp/json.el (json-plist-p): Clarify docstring.
- Merge branch 'scratch/follow' of /home/acm/emacs/emacs.git/emacs-25 into scratch/follow
+ * test/automated/json-tests.el (json-tests--with-temp-buffer): New
+ macro.
+ (test-json-join, test-json-alist-p)
+ (test-json-plist-p, test-json-advance, test-json-peek)
+ (test-json-pop, test-json-skip-whitespace)
+ (test-json-read-keyword, test-json-encode-keyword)
+ (test-json-read-number, test-json-encode-number)
+ (test-json-read-escaped-char, test-json-read-string)
+ (test-json-encode-string, test-json-encode-key)
+ (test-json-new-object, test-json-add-to-object)
+ (test-json-read-object, test-json-encode-list)
+ (test-json-read-array, test-json-encode-array)
+ (test-json-read, test-json-read-from-string)
+ (test-json-encode): New tests.
+ (json-read-simple-alist): Merged into `test-json-read-object'.
+ (json-encode-string-with-special-chars): Merged into
+ `test-json-encode-string'.
+ (json-read-string-with-special-chars): Split into
+ `test-json-encode-string' and `test-json-read-from-string'.
- Merge necessitated by a rebase operation.
+2015-11-24 Anders Lindgren <andlind@gmail.com>
-2015-12-04 Alan Mackenzie <acm@muc.de>
+ Fixed bug#18283: Enable applescript in NextStep.
- lisp/isearch.el: Eliminate macro isearch-call-message, replacing with funcall.
+ * nextstep/templates/Info.plist.in: Set NSAppleScriptEnabled to YES.
-2015-12-04 Alan Mackenzie <acm@muc.de>
+2015-11-24 Eli Zaretskii <eliz@gnu.org>
- First commit to scratch/follow. Make Isearch work with Follow Mode, etc.
+ Allow completion on dynamic module files in load-library
- doc/lispref/window.texi (Basic Windows): Add paragraph defining "Group of
- Windows" and new @defun selected-window-group.
- (Window Start and End): Describe new &optional parameter GROUP and
- ...-group-function for window-start, window-end, set-window-start, and
- pos-visible-in-window-p.
- (Textual Scrolling) Describe the same for recenter.
- doc/lispref/positions.texi (Screen Lines): Describe the same for
- move-to-window-line.
+ * lisp/files.el (load-library): Bind completion-ignored-extensions
+ to nil, to allow completion on dynamic modules typed as file
+ names. Reported by Andy Moreton <andrewjmoreton@gmail.com>.
- src/window.c (Fwindow_start, Fwindow_end, Fset_window_start)
- (Fpos_visible_in_window_p, Frecenter, Fmove_to_window_line): To each, add ar
- new optional parameter "group". At the beginning of each, check whether the
- corresponding ...-group-function is set to a function, and if so execute this
- function in place of the normal processing.
- (syms_of_window): Define symbols for the six new variables below.
- (window-start-group-function, window-end-group-function)
- (set-window-start-group-function, recenter-group-function)
- (pos-visible-in-window-p-group-function, move-to-window-line-group-function):
- New permanent local buffer local variables.
- src/keyboard.c (Fposn_at_point): Add extra parameter in call to
- Fpos_visible_in_window_p.
+2015-11-24 Alan Mackenzie <acm@muc.de>
- lisp/window.el (selected-window-group-function): New permanent local buffer
- local variable.
- (selected-window-group): New function.
+ CC Mode: eliminate almost all byte compilation warnings
- lisp/follow.el (follow-mode): Set the ...-group-function variables at mode
- enable, kill them at mode disable. Add/remove follow-after-change to/from
- after-change-functions.
- (follow-start-end-invalid): New variable.
- (follow-redisplay): Manipulate follow-start-end-invalid.
- (follow-after-change, follow-window-start, follow-window-end)
- (follow-set-window-start, follow-pos-visible-in-window-p)
- (follow-move-to-window-line, follow-sit-for): New functions.
+ * lisp/progmodes/cc-bytecomp.el (cc-bytecomp-noruntime-functions): Remove.
+ (cc-require): Remove the crude hack that saved and restored
+ byte-compile-noruntime-functions.
+ (cc-conditional-require, cc-conditional-require-after-load): New macros.
- lisp/isearch.el (isearch-call-message): New macro.
- (isearch-update, with-isearch-suspended, isearch-del-char)
- (isearch-search-and-update, isearch-ring-adjust): Invoke above new macro.
- (with-isearch-suspended): Rearrange code such that isearch-call-message is
- invoked before point is moved.
- (isearch-message): Add comment about where point must be at function call.
- (isearch-search): Remove call to isearch-message.
- (isearch-lazy-highlight-window-group): New variable.
- (isearch-lazy-highlight-new-loop): Unconditionally start idle timer. Move
- the battery of tests to ...
- (isearch-lazy-highlight-maybe-new-loop): New function, started by idle timer.
- Note: (sit-for 0) is still called.
- (isearch-lazy-highlight-update): Check membership of
- isearch-lazy-highlight-window-group. Don't set the `window' overlay
- property.
- (isearch-update, isearch-done, isearch-string-out-of-window)
- (isearch-back-into-window, isearch-lazy-highlight-maybe-new-loop)
- (isearch-lazy-highlight-search, isearch-lazy-highlight-update)
- (isearch-lazy-highlight-update): Call the six amended primitives (see
- src/window.c above) with the new `group' argument set to t, to cooperate
- with Follow Mode.
+ * lisp/progmodes/cc-defs.el (top level): Reformulate code which loaded
+ cc-fix.el using the new macros in cc-bytecomp.el.
-2015-12-04 Stefan Monnier <monnier@iro.umontreal.ca>
+ * lisp/progmodes/cc-langs.el (c++-template-syntax-table)
+ (c-no-parens-syntax-table): Add extra "(eval ..)"s around "'(lambda ..)"
+ forms to remove the superflous quotes.
- * lisp/emacs-lisp/ert.el: Prefer pcase over cl-typecase
+2015-11-24 Eli Zaretskii <eliz@gnu.org>
- * lisp/emacs-lisp/ert.el (ert--should-error-handle-error)
- (ert--explain-format-atom, ert--explain-equal-rec)
- (ert--print-backtrace, ert-test-result-type-p, ert-select-tests)
- (ert--insert-human-readable-selector): Prefer pcase over cl-typecase.
+ Add one more mod-test test
-2015-12-04 Artur Malabarba <bruce.connor.am@gmail.com>
+ * modules/mod-test/test.el (mod-test-sum-test): Test the error
+ signaled when the function is invoked with a wrong number of
+ arguments.
- * lisp/character-fold.el: Remove special case-folding support
+2015-11-24 Philipp Stephani <phst@google.com>
- (character-fold-to-regexp): Remove special code for
- case-folding. Char-fold search still respects the
- `case-fold-search' variable (i.e., f matches F). This only
- removes the code that was added to ensure that f also matched
- all chars that F matched. For instance, after this commit, f
- no longer matches 𝔽.
+ * modules/mod-test/mod-test.c (Fmod_test_sum): Verify there are 2 args.
- This was necessary because the logic created a regexp with
- 2^(length of the string) redundant paths. So, when a very
- long string "almost" matched, Emacs took a very long time to
- figure out that it didn't. This became particularly relevant
- because isearch's lazy-highlight does a search bounded by (1-
- match-end) (which, in most circumstances, is a search that
- almost matches). A recipe for this can be found in bug#22090.
+2015-11-24 Eli Zaretskii <eliz@gnu.org>
-2015-12-04 Stefan Monnier <monnier@iro.umontreal.ca>
+ Implement dynlib_addr for MS-Windows
- * lisp/emacs-lisp/cl-macs.el (character): Can't be negative
+ * src/dynlib.c [WINDOWSNT]: Include w32common.h.
+ <g_b_init_get_module_handle_ex> [WINDOWSNT]: New static variable.
+ (GET_MODULE_HANDLE_EX_FLAG_FROM_ADDRESS)
+ (GET_MODULE_HANDLE_EX_FLAG_UNCHANGED_REFCOUNT) [WINDOWSNT]: Define
+ if undefined.
+ (dynlib_reset_last_error): Reset g_b_init_get_module_handle_ex to
+ zero.
+ (dynlib_addr) [WINDOWSNT]: Non-trivial implementation to report
+ the full file name of the module for a given address.
- Fixes (bug#21701)
+2015-11-24 Alan Mackenzie <acm@muc.de>
-2015-12-04 Daiki Ueno <ueno@gnu.org>
+ Merge branch 'emacs-25' of git.sv.gnu.org:/srv/git/emacs into emacs-25
- lisp/gnus/qp.el: Don't replace "from " at bol
+2015-11-24 Alan Mackenzie <acm@muc.de>
- * lisp/gnus/qp.el (quoted-printable-encode-region): Bind `case-fold-search'
- to nil when looking for "^From ". Problem reported by Simon Josefsson.
+ Squashed commit of the following:
-2015-12-03 Phillip Lord <phillip.lord@russet.org.uk>
+ commit e1ecf76585bef2eb87995f7a7f92cc12003a6f70
+ Author: Alan Mackenzie <acm@muc.de>
+ Date: Tue Nov 24 16:50:09 2015 +0000
- Externalize some symbols in undo-auto
+ Byte compile: minor amendments.
- * doc/lispref/text.texi: Update symbols.
- * lisp/simple.el (undo-auto--amalgamate,
- undo-auto--current-boundary-timer): Make symbols public.
- * src/cmds.c (Fself_insert_command,Fdelete_char): Call
- updated symbol.
+ * lisp/emacs-lisp/bytecomp.el (byte-compile-initial-macro-environment):
+ add a comment to explain the binding of variables around a subsidiary
+ compilation.
+ (byte-compile-new-defuns): Amend the doc string.
-2015-12-03 Stefan Monnier <monnier@iro.umontreal.ca>
+ commit c537bfed1dda1593d218956ff00c6105a3ff0316
+ Author: Alan Mackenzie <acm@muc.de>
+ Date: Sat Nov 21 18:43:57 2015 +0000
- * lisp/emacs-lisp/smie.el (smie-next-sexp): Fix BOB "token"
+ Byte compiler: fix spurious warnings "might not be defined at runtime".
-2015-12-03 Michael Albinus <michael.albinus@gmx.de>
+ Also initialize byte-compile-noruntime-functions between runs.
- Some error message improvements in tramp-sh.el
+ * lisp/emacs-lisp/bytecomp.el (byte-compile-new-defuns): New variable.
+ (byte-compile-initial-macro-environment): For eval-when-compile: bind
+ byte-compile-unresolved-functions and byte-compile-new-defuns around
+ byte-compile-top-level, to prevent spurious entries being made.
+ (byte-compile-warn-about-unresolved-functions): Check whether function is
+ in byte-compile-new-defuns before emitting a warning about it.
+ (byte-compile-from-buffer): Initialize new variable and
+ byte-compile-noruntime-functions to nil.
+ (byte-compile-file-form-require): record all new functions defined by a
+ `require' in byte-compile-new-defuns.
+ (byte-compile-file-form-defmumble): record the new alias in
+ byte-compile-new-defuns.
- * lisp/net/tramp-sh.el (tramp-open-connection-setup-interactive-shell):
- Suppress error messages for "mesg" and "biff" calls.
- (tramp-get-remote-path): Ignore errors when expanding
- `tramp-own-remote-path'. Raise a warning instead.
+2015-11-24 Eli Zaretskii <eliz@gnu.org>
-2015-12-03 Eli Zaretskii <eliz@gnu.org>
+ Fix crash at startup related to GC of font entities
- Document 'nacl' value for 'system-type'
+ * src/font.h (GC_FONT_SPEC_P, GC_FONT_ENTITY_P)
+ (GC_FONT_OBJECT_P, GC_XFONT_SPEC, GC_XFONT_ENTITY)
+ (GC_XFONT_OBJECT): New macros, for use in garbage collector.
+ * src/alloc.c (compact_font_cache_entry, compact_font_caches):
+ Don't ifdef away font cache compaction on NT_GUI, as the problems
+ which led to that seem to have been solved.
+ (compact_font_cache_entry): Use GC_FONT_SPEC_P, GC_XFONT_SPEC,
+ GC_XFONT_ENTITY, and GC_XFONT_OBJECT, instead of their non-GC_
+ cousins. (Bug#21999)
- * doc/lispref/os.texi (System Environment): Document the 'nacl'
- value of 'system-type'.
+2015-11-24 Alan Mackenzie <acm@muc.de>
-2015-12-03 Eli Zaretskii <eliz@gnu.org>
+ Byte compile: Output an error, not a warning, for odd number of args to setq
- Document 'window-max-chars-per-line'
+ * lisp/emacs-lisp/bytecomp.el (byte-compile-setq): Amend.
- * doc/lispref/windows.texi (Window Sizes): Document
- 'window-max-chars-per-line'.
+2015-11-24 Ken Raeburn <raeburn@raeburn.org>
-2015-12-03 Artur Malabarba <bruce.connor.am@gmail.com>
+ Fix kbd_buffer iteration loop in readable_events
- Fix some file headers for the purpose of `package--builtins'
+ * src/keyboard.c (readable_events): Wrap the event pointer back to the
+ start of the kbd_buffer array inside the top of the loop instead of
+ right before checking the loop condition, since kbd_fetch_ptr and
+ kbd_store_ptr point past the end of the array to mean that element 0
+ is next. (bug#21935)
- * lisp/emacs-lisp/cl-preloaded.el
- * lisp/emacs-lisp/eieio-compat.el
- * lisp/net/sasl-scram-rfc.el: Add a "Package:" header
+2015-11-24 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/ielm.el: Fix summary line.
+ Improve text-quoting-style doc again
-2015-12-03 Artur Malabarba <bruce.connor.am@gmail.com>
+ * doc/lispref/help.texi (Keys in Documentation):
+ Omit overkill discussion of ‘setq’. Mention Emacs versions
+ where ‘grave’ style was standard.
- * lisp/emacs-lisp/package.el (package-unpack): Load before compiling
+2015-11-23 Paul Eggert <eggert@cs.ucla.edu>
- Reload any previously loaded package files before compiling
- the package (also reload the same files after compiling).
- This ensures that we have the most recent definitions during
- compilation, and avoids generating bad elc files when a macro
- changes and it is used in a different file from the one it's
- defined in.
+ Improve text-quoting-style doc
-2015-12-03 Artur Malabarba <bruce.connor.am@gmail.com>
+2015-11-23 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/emacs-lisp/package.el: Refactor package activation code
+ Simplify module_make_function
- (package-activate): Move code that activates dependencies into
- package-activate-1.
- (package--load-files-for-activation): New function.
- (package-activate-1): Add code for (optionally) activating
- dependencies, and move file-loading code into
- `package--load-files-for-activation'.
+ * src/emacs-module.c (module_make_function):
+ Simplify by calling build_unibyte_string.
-2015-12-03 Eli Zaretskii <eliz@gnu.org>
+2015-11-23 Paul Eggert <eggert@cs.ucla.edu>
- Document new font-related functionality
+ Port better to FreeBSD’s dlfunc vs dlsym
- * doc/lispref/display.texi (Low-Level Font): Document
- 'default-font-width', 'default-font-height', 'window-font-width',
- and 'window-font-height'.
+ This avoids warnings when converting between void * and
+ function pointers, which strict C11 does not allow.
+ * configure.ac (dlfunc): Check for existence.
+ * src/dynlib.c (dlfunc) [!HAVE_DLFUNC]: New macro.
+ (dynlib_func): New function.
+ * src/dynlib.h (dynlib_function_ptr, dynlib_func): New decls.
+ * src/emacs-module.c (Fmodule_load): Use dynlib_func, not
+ dynlib_sym, for function pointers.
- * etc/NEWS: Move entries for 'default-font-width',
- 'default-font-height', 'window-font-width', and 'window-font-height'
- to their place and mark them documented.
+2015-11-23 Paul Eggert <eggert@cs.ucla.edu>
-2015-12-03 Eli Zaretskii <eliz@gnu.org>
+ Simplify use of emacs_finalizer_function type
- Fix documentation and implementation of 'directory-name-p'
+ * src/emacs-module.h (emacs_finalizer_function):
+ Now EMACS_NOEXCEPT. All users simplified to omit EMACS_NOEXCEPT.
+ (struct emacs_env_25): Use emacs_finalizer_function where applicable.
- * lisp/files.el (directory-name-p): Modify to recognize
- backslashes on MS-Windows and MS-DOS. Adjust the doc string
- accordingly. Use '=', not char-equal, for comparison, as
- letter-case cannot possibly be an issue here.
+2015-11-23 Paul Eggert <eggert@cs.ucla.edu>
- * doc/lispref/files.texi (Directory Names): Move the documentation
- of directory-name-p here from "Relative File Names". Update the
- description per the changes in implementation.
+ module_format_fun_env fixes
- * etc/NEWS: Move the entry for 'directory-name-p' to its proper
- place and mark it documented.
+ * src/doprnt.c (exprintf) [HAVE_MODULES]: Also define in this case.
+ * src/emacs-module.c (module_format_fun_env):
+ Convert path and sym to UTF-8.
+ Don’t use VLAs, as the C11 standard says they’re optional,
+ and anyway they can cause core dumps with large allocations.
+ Use exprintf rather than snprintf, as exprintf handles arbitrarily
+ long strings. Simplify the code a bit.
-2015-12-02 Eli Zaretskii <eliz@gnu.org>
+2015-11-23 Dmitry Gutov <dgutov@yandex.ru>
- Minor copyedit in Emacs manual
+ Don't use package-user-dir in elisp-library-roots if it's not bound
- * doc/emacs/search.texi (Lax Search): Make wording about character
- folding by default less definitive. (Bug#22043)
+ * lisp/progmodes/elisp-mode.el (elisp-library-roots): Don't
+ use package-user-dir if it's not bound (bug#19759).
-2015-12-02 Eli Zaretskii <eliz@gnu.org>
+2015-11-23 Anders Lindgren <andlind@gmail.com>
- More emacs-module.c fixes for wide ints
+ New visible-bell for NextStep (OS X El Capitan compatible).
- * src/emacs-module.c (value_to_lisp) [WIDE_EMACS_INT]: Use
- unsigned data types to manipulate pointers, to avoid sign
- extension coming after us with a vengeance.
+ Instead of inverting a rectangle in the middle of the frame, use
+ the standard NextStep image "caution", represented using an
+ warning sign with an exclamation mark. (Bug#21662)
- * modules/mod-test/test.el (mod-test-sum-test): Add tests for
- Emacs with wide ints that verify integer values near the critical
- value that requires us to switch to a cons cell.
+ Implemented based on a suggestion drafted by Mustafa Kocaturk.
-2015-12-02 Stephen Leake <stephen_leake@stephe-leake.org>
+ * src/nsterm.m (EmacsBell): New class for managing the caution
+ image. Support multiple active bells, the image is removed once
+ all bells have timed out.
+ (ns_timeout): Removed, no longer used.
+ (ns_ring_bell): Reimplemented to use EmacsBell.
- Fix bug#22069 in cl-generic.el
+2015-11-23 Johan Bockgård <bojohan@gnu.org>
- * lisp/emacs-lisp/cl-generic.el (cl-no-method): Remove %S; this string is
- not run thru `format'.
+ * lisp/emacs-lisp/nadvice.el (add-function): Fix debug spec.
-2015-12-02 Dmitry Gutov <dgutov@yandex.ru>
+ (remove-function): Ditto. (Bug#20376)
- APPEND etags--xref-backend to xref-backend-functions
+2015-11-23 Mark Oteiza <mvoteiza@udel.edu>
- * lisp/progmodes/xref.el (xref-backend-functions):
- Use APPEND when adding the default element
- (http://lists.gnu.org/archive/html/emacs-devel/2015-12/msg00061.html).
+ * lisp/leim/quail/tamil-dvorak.el: Add necessary escapes.
-2015-12-01 Eli Zaretskii <eliz@gnu.org>
+2015-11-23 Eli Zaretskii <eliz@gnu.org>
- More accurate documentation of lax whitespace matching
+ Improve how non-ASCII strings are accepted from modules
- * lisp/isearch.el (isearch-forward-word, isearch-forward-symbol)
- (word-search-backward, word-search-forward)
- (word-search-backward-lax, word-search-forward-lax): Mention in
- doc strings that toggling lax whitespace matching has no effect on
- these commands.
+ * src/emacs-module.c (module_make_function, module_make_string):
+ Build a unibyte Lisp string and then decode it by UTF-8, instead
+ of building a multibyte string without decoding. This is more
+ tolerant to deviations from UTF-8.
- * doc/emacs/search.texi (Word Search, Symbol Search): Clarify that
- lax whitespace matching has no effect on these commands.
+2015-11-23 Paul Eggert <eggert@cs.ucla.edu>
-2015-12-01 Eli Zaretskii <eliz@gnu.org>
+ Port recent module changes to pickier compilers
- Fix emacs-module.c for wide ints
+ * src/emacs-module.c (module_make_function)
+ (module_make_string): Add casts to fix pointer signedness issues.
- * src/emacs-module.c (lisp_to_value): Compare the produced value
- with the original Lisp object, not with the one potentially
- converted into a Lisp_Cons. Fixes assertion violations when
- working with integers larger than fit into a 32-bit value.
+2015-11-23 Philipp Stephani <phst@google.com>
- * modules/mod-test/test.el (mod-test-sum-test): Add tests for
- large integers, to test --with-wide-int.
+ Fix how strings are accepted from modules
-2015-12-01 Eli Zaretskii <eliz@gnu.org>
+ * emacs-module.c (module_make_function, module_make_string): Use
+ make_multibyte_string.
+ (module_copy_string_contents): Encode before reading the byte
+ size. Return false if and only if an error occurred.
- Document 'directory-files-recursively'
+2015-11-23 Eli Zaretskii <eliz@gnu.org>
- * lisp/files.el (directory-files-recursively): Doc fix. Rename
- the argument MATCH to REGEXP, to be more explicit about its form.
+ Merge branch 'emacs-25' of git.savannah.gnu.org:/srv/git/emacs into emacs-25
- * doc/lispref/files.texi (Contents of Directories): Improve the
- documentation of 'directory-files-recursively'. Add
- cross-references.
+2015-11-23 Shakthi Kannan <shakthimaan@gmail.com>
- * etc/NEWS: Move the entry for 'directory-files-recursively' to
- its place and mark it documented.
+ Add the tamil-dvorak input method
-2015-12-01 Eli Zaretskii <eliz@gnu.org>
+ * lisp/leim/quail/tamil-dvorak.el: New file. (Bug#21768)
- Document 'inhibit-read-only' property
+ * etc/NEWS: Mention the new input method.
- * doc/lispref/text.texi (Special Properties): Describe the new
- 'inhibit-read-only' text property. Add cross-reference to where
- read-only buffers are described.
- * doc/lispref/buffers.texi (Read Only Buffers): Mention that
- 'inhibit-read-only' property exempts text from being read-only.
- Add cross-reference to "Special Properties".
+2015-11-23 Martin Rudalics <rudalics@gmx.at>
- * etc/NEWS: Move the entry about 'inhibit-read-only' property to
- its place and mark it documented.
+ Move setting FRAME_WINDOW_SIZES_CHANGED to resize_frame_windows.
-2015-12-01 Artur Malabarba <bruce.connor.am@gmail.com>
+ * src/frame.c (adjust_frame_size): Don't set
+ FRAME_WINDOW_SIZES_CHANGED here ...
+ * src/window.c (resize_frame_windows): ... but here, as suggested
+ by Stefan Monnier. Also remove some dead code along the way.
- * lisp/emacs-lisp/package.el: Update header comments
+2015-11-23 Alan Mackenzie <acm@muc.de>
-2015-12-01 Artur Malabarba <bruce.connor.am@gmail.com>
+ * /etc/NEWS (Incompatible Lisp Changes): Also `setf' needs an even # of args.
- * lisp/character-fold.el: Add back multi-char matching
+2015-11-23 Alan Mackenzie <acm@muc.de>
- (character-fold-to-regexp): Uncomment recently commented code
- and make the algorithm "dummer" by not checking every possible
- combination. This will miss some possible matches, but it
- greatly reduces regexp size.
+ Signal an error when `setf' gets an odd number of arguments.
- * test/automated/character-fold-tests.el
- (character-fold--test-fold-to-regexp): Comment out test of
- functionality no longer supported.
+ * lisp/emacs-lisp/gv.el (setf): Amend.
-2015-12-01 Xue Fuqiao <xfq.free@gmail.com>
+2015-11-23 Stefan Monnier <monnier@iro.umontreal.ca>
- * doc/emacs/ack.texi (Acknowledgments): Update.
+ * lisp/emacs-lisp/smie.el (smie-backward-sexp): Handle BOB better.
-2015-12-01 Michael Albinus <michael.albinus@gmx.de>
+2015-11-23 Alan Mackenzie <acm@muc.de>
+
+ * etc/NEWS (Incompatible Lisp Changes): Document new restriction on `setq'.
- Check `file-remote-p' over absolute files names in files.el
+2015-11-23 Alan Mackenzie <acm@muc.de>
- * lisp/files.el (directory-files-recursively)
- (get-free-disk-space): Check `file-remote-p' over absolute files names.
+ Expunge occurrences of `setq' with an odd number of arguments.
-2015-12-01 Andreas Schwab <schwab@linux-m68k.org>
+ * lisp/apropos.el (apropos-documentation):
+ * lisp/obsolete/complete.el (PC-include-file-all-completions):
+ * lisp/progmodes/compile.el (compilation-goto-locus):
+ * lisp/vc/vc-cvs.el (vc-cvs-parse-root): (twice)
+ Insert missing nil at end of `setq' forms.
- * src/lread.c (syms_of_lread): Doc fix.
+ * lisp/emacs-lisp/bytecomp.el (byte-compile-file-form-autoload): Remove an
+ erroneous trailing variable name from a setq, thus allowing a compilation
+ properly to track functions not defined at runtime.
-2015-12-01 Dmitry Gutov <dgutov@yandex.ru>
+2015-11-23 John Wiegley <johnw@newartisans.com>
- Don't mistake certain JS method calls for keywords
+ Add a note about a questionable use of bool in xdisp.c
- * lisp/progmodes/js.el (js--ctrl-statement-indentation):
- Braceless keyword can't come after a period (bug#22063).
+2015-11-23 Alan Mackenzie <acm@muc.de>
-2015-12-01 David Reitter <david.reitter@gmail.com>
+ Issue a warning from the byte compiler on a malformed `setq' form.
- Read frame_title_format from buffer-local variable for NS port
+ Partly fixes bug#20241.
+ * lisp/emacs-lisp/bytecomp.el (byte-compile-setq): Issue a warning when a
+ `setq' form with an odd number of arguments is compiled.
- * src/nsfns.m (x_implicitly_set_name): Read frame-title-format and
- icon-title-format variables from buffer in appropriate window.
- (Bug#22048)
+2015-11-23 Alan Mackenzie <acm@muc.de>
-2015-12-01 Juri Linkov <juri@linkov.net>
+ Don't let cconv_convert insert a nil argument into a `setq' form.
- * lisp/replace.el (occur-engine): Count matches in empty lines.
+ Fixes bug#21983.
+ * lisp/emacs-lisp/cconv.el (cconv-convert): Don't silently insert a nil last
+ argument into a `setq' when there're an odd number of args. This enables the
+ byte compiler to issue a message in this case.
- (Bug#22062)
+2015-11-23 Alan Mackenzie <acm@muc.de>
-2015-11-30 Aurélien Aptel <aurelien.aptel@gmail.com>
+ Signal an error when `setq' has an odd number of arguments. Fixes bug#20241.
- * src/emacs-module.h: Fix finalizer typedef for C++11
+ * src/eval.c (Fsetq): Signal an error on an odd number of arguments.
+ (syms_of_eval): Add a DEFSYM for Qsetq.
- C++11 standard doesn't allow exception-specification in typedef.
- The workaround is to declare a dummy function prototype and use
- decltype on it.
+2015-11-23 Martin Rudalics <rudalics@gmx.at>
-2015-11-30 Eli Zaretskii <eliz@gnu.org>
+ * doc/lispref/windows.texi (Window Sizes): Fix indices and references.
- Fix last change
+ * src/frame.c (adjust_frame_size): Set FRAME_WINDOW_SIZES_CHANGED (Bug#21975).
- * src/emacs-module.c (lisp_to_value, value_to_lisp)
- [WIDE_EMACS_INT]: Avoid compiler warnings.
+2015-11-22 Thomas Fitzsimmons <fitzsim@fitzsim.org>
-2015-11-30 Stefan Monnier <monnier@iro.umontreal.ca>
+ Add EUDC BBDB 3 entry in NEWS
- Rely on conservative stack scanning to find "emacs_value"s
+ * NEWS: Mention EUDC BBDB backend support for BBDB 3.
- * src/emacs-module.c (struct emacs_value_tag)
- (struct emacs_value_frame, struct emacs_value_storage): Remove.
- (value_frame_size): Remove constant.
- (struct emacs_env_private): Use Lisp_Object for non_local_exit info.
- (lisp_to_value): Remove first arg.
- (module_nil): New constant.
- Use it instead of NULL when returning an emacs_value.
- (module_make_function): Adjust to new calling convention of
- Qinternal_module_call.
- (DEFUN): Receive args in an array rather than a list.
- Use SAFE_ALLOCA rather than xnmalloc. Skip the lisp_to_value loop when
- we don't have WIDE_EMACS_INT. Adjust to new type of non_local_exit info.
- (module_non_local_exit_signal_1, module_non_local_exit_throw_1):
- Adjust to new type of non_local_exit info.
- (ltv_mark) [WIDE_EMACS_INT]: New constant.
- (value_to_lisp, lisp_to_value): Rewrite.
- (initialize_frame, initialize_storage, finalize_storage): Remove functions.
- (allocate_emacs_value): Remove function.
- (mark_modules): Gut it.
- (initialize_environment): Don't initialize storage any more.
- Keep the actual env object on Vmodule_environments.
- (finalize_environment): Don't finalize storage any more.
- (syms_of_module): Initialize ltv_mark and module_nil.
+2015-11-22 Thomas Fitzsimmons <fitzsim@fitzsim.org>
- * src/emacs-module.h (emacs_value): Make it more clear that this type
- is really opaque, including the fact that NULL may not be valid.
+ Improve EUDC to BBDB 3 export
- * modules/mod-test/mod-test.c (Fmod_test_signal, Fmod_test_throw):
- Don't assume that NULL is a valid emacs_value.
+ * eudc-vars.el (eudc-ldap-bbdb-conversion-alist): Change phone
+ entry to single item. Add company conversion.
+ * eudc-export.el (eudc-bbdbify-company): New function.
+ (bbdb-parse-phone): Declare function.
+ (eudc-bbdbify-phone): Add BBDB 3 support.
+ (Bug#21971)
-2015-11-30 Eli Zaretskii <eliz@gnu.org>
+2015-11-22 Thomas Fitzsimmons <fitzsim@fitzsim.org>
- Yet another doc improvement for search commands
+ Add BBDB 3 support for EUDC export
- * doc/emacs/search.texi (Word Search, Symbol Search)
- (Regexp Search): Document commands that don't support lax
- whitespace matching or character folding.
- (Nonincremental Search): Mention the search commands that can be
- invoked from the menu bar.
+ * eudc.el: Add bbdb-version defvar.
+ (eudc--using-bbdb-3-or-newer-p): New function.
+ * eudc-export.el (eudc-create-bbdb-record): Add support for
+ bbdb-create-internal argument list changes introduced in BBDB 3.
+ * eudcb-bbdb.el: Remove bbdb-version defvar.
+ (eudc-bbdb-field): Call eudc--using-bbdb-3-or-newer-p.
+ (Bug#21971)
- * lisp/isearch.el (isearch-define-mode-toggle-word)
- (isearch-define-mode-toggle-symbol)
- (isearch-define-mode-toggle-character-fold): Note in the doc
- string that turning these on exits the regexp mode.
- (isearch-forward-regexp, isearch-forward-word)
- (isearch-forward-symbol, isearch-backward-regexp)
- (word-search-backward, word-search-forward)
- (word-search-backward-lax, word-search-forward-lax): State in the
- doc string which commands don't support character folding and/or
- lax-whitespace matching.
+2015-11-22 Eli Zaretskii <eliz@gnu.org>
-2015-11-30 Martin Rudalics <rudalics@gmx.at>
+ Allow loading modules by 'load-file'
- Run `window-size-change-functions' also when reading from minibuffer
+ * src/lread.c (Fload): Call 'unbind_to' with 'Fmodule_load' as the
+ 2nd arg, to avoid the "binding stack not balanced" error.
+ (syms_of_lread) <module-file-suffix>: New Lisp variable.
- * src/xdisp.c (redisplay_internal): Run `window-size-change-functions'
- also when reading from minibuffer.
+ * lisp/files.el (module-file-suffix): Declare.
+ (load-file): Remove 'module-file-suffix' from
+ 'completion-ignored-extensions', to allow completion on modules.
-2015-11-30 Ulf Jasper <ulf.jasper@web.de>
+ * etc/NEWS: Mention 'module-file-suffix'.
- Fix scrambling of html-rendered item buffers
+2015-11-22 Eli Zaretskii <eliz@gnu.org>
- * lisp/net/newst-treeview.el (newsticker--treeview-render-text): Fix
- scrambling of contents by wrapping call to html-renderer in
- save-selected-window.
+ Fix unoptimized builds
-2015-11-30 Paul Eggert <eggert@cs.ucla.edu>
+ * src/lisp.h (XTYPE): Move before XSYMBOL, to fix unoptimized
+ builds.
- Fix font typo in previous doc fix.
+2015-11-22 Dmitry Gutov <dgutov@yandex.ru>
-2015-11-30 Paul Eggert <eggert@cs.ucla.edu>
+ Work around the asynchronous-empty-diff problem
- A bit more security doc, esp. file local vars
+ * lisp/vc/vc-rcs.el (vc-rcs-diff):
+ * lisp/vc/vc-mtn.el (vc-mtn-diff):
+ * lisp/vc/vc-hg.el (vc-hg-diff):
+ * lisp/vc/vc-git.el (vc-git-diff): Ignore the ASYNC argument,
+ do a synchronous process call (bug#21969).
- * doc/emacs/emacs.texi (Top):
- * doc/emacs/misc.texi (Miscellaneous Commands):
- Refer to new Host Security section.
- (Host Security): New section.
- * doc/lispref/os.texi (Security Considerations):
- Mention file local variables.
+2015-11-21 Karl Fogel <kfogel@red-bean.com>
-2015-11-30 Artur Malabarba <bruce.connor.am@gmail.com>
+ Finish excising electric indent from `open-line'
- * lisp/character-fold.el: Comment out branching code
+ * lisp/simple.el (open-line): Remove INTERACTIVE argument.
- (character-fold-to-regexp): Comment out code that uses multi-char
- table. The branching caused by this induces absurdly long regexps,
- up to 10k chars for as little as 25 input characters.
+ * test/automated/simple-test.el (open-line-indent, open-line-hook):
+ Adjust accordingly.
-2015-11-30 Paul Eggert <eggert@cs.ucla.edu>
+ This change finishes what my commit of Thu Nov 19 17:32:37 2015 -0600
+ (git commit c59353896) started. It turns out that having INTERACTIVE
+ cause `post-self-insert-hook' to run (via `newline') meant `open-line'
+ still had the electric indent behavior, as `post-self-insert-hook'
+ normally contains `electric-indent-post-self-insert-function' ever
+ since `electric-indent-mode' has been on by default. Tracing the code
+ change in `open-line' is mildly twisty, because Artur Malabarba's
+ earliest two commits of 24 Oct 2015 first removed the `interactive'
+ form entirely (git commit 6939896e2) and then restored it with the new
+ extra "p" already added (git commit bd4f04f86), such that there is no
+ single-commit diff in which one sees the second "p" appear. Thus this
+ change is effectively a reversion of parts of each of those commits.
- Spelling and grammar fixes
+ This could close bug#21884, at least until further discussion.
-2015-11-30 Dmitry Gutov <dgutov@yandex.ru>
+2015-11-21 Dmitry Gutov <dgutov@yandex.ru>
- Make lisp-completion-at-point a wrapper instead of an alias
+ Adhere closer to the "implicit tag name" definition
- * lisp/progmodes/elisp-mode.el (lisp-completion-at-point):
- Turn into an obsolete wrapper around elisp-completion-at-point
- (bug#20455).
+ * lisp/progmodes/etags.el (etags-tags-completion-table):
+ Adhere closer to the "implicit tag name" definition. Simplify
+ the regexp. Search for the explicit tag name first, and when
+ not found, search locally for the implicit one. (Bug#21934)
-2015-11-29 Artur Malabarba <bruce.connor.am@gmail.com>
+2015-11-21 Stefan Monnier <monnier@iro.umontreal.ca>
- * lisp/isearch.el (isearch-search-fun-default): Nicer error
+ Unrevert most of regexp reentrancy abort patch
- message when the search fails.
+ The problem was in:
+ * src/syntax.c (update_syntax_table_forward): Propertize even when truncated
+ which is hence not unreverted.
+ The rest is:
+ * src/syntax.h (UPDATE_SYNTAX_TABLE_FORWARD_FAST):
+ (UPDATE_SYNTAX_TABLE_FAST): Re-introduce.
+ All callers in regex.c changed back to the _FAST versions.
-2015-11-29 Dmitry Gutov <dgutov@yandex.ru>
+ * test/automated/message-mode-tests.el: Tweak the test to rely on auto
+ propertization in backward-sexp.
- Update menu-bar-goto-uses-etags-p for the current xref API
+2015-11-21 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/menu-bar.el (menu-bar-goto-uses-etags-p): Consult
- xref-backend-functions, instead of now-nonexistent
- xref-find-function.
+ Revert regexp reentrancy abort patch
-2015-11-29 Artur Malabarba <bruce.connor.am@gmail.com>
+ Although the patch does fix Bug#21688 and prevents a core dump,
+ it also makes the message-mode-propertize test fail; see:
+ http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg01667.html
+ Perhaps someone else can come up with a better fix some day.
+ * src/syntax.c (update_syntax_table_forward):
+ Propertize even when truncated.
+ * src/syntax.h (UPDATE_SYNTAX_TABLE_FORWARD_FAST):
+ (UPDATE_SYNTAX_TABLE_FAST): Remove.
+ All callers changed back to the non-_FAST versions.
- * lisp/isearch.el (isearch-define-mode-toggle): Advertise binding
+2015-11-21 Paul Eggert <eggert@cs.ucla.edu>
-2015-11-29 Artur Malabarba <bruce.connor.am@gmail.com>
+ Add a few safety checks when ENABLE_CHECKING
- * lisp/menu-bar.el: Use folding in searches
+ This was motivated by the recent addition of module code,
+ which added some ENABLE_CHECKING-enabled checks that are
+ useful elsewhere too.
+ * src/alloc.c (compact_font_cache_entry):
+ * src/fns.c (sweep_weak_table):
+ * src/lread.c (oblookup):
+ Use gc_asize rather than doing it by hand.
+ * src/emacs-module.c (module_make_global_ref)
+ (module_free_global_ref, module_vec_size):
+ Omit assertions that lisp.h now checks.
+ * src/lisp.h (XFASTINT, ASIZE): In functional implementations,
+ check that the result is nonnegative. Use eassume, as this
+ info can help a bit when optimizing production code.
+ (XSYMBOL) [!USE_LSB_TAG]: Assert that argument is a symbol,
+ to be consistent with the USE_LSB_TAG case.
+ (gc_asize): New function, when ASIZE is needed in the gc.
+ (gc_aset): Use it.
+ (HASH_TABLE_P): Move definition up, so that it can be used ...
+ (XHASH_TABLE): ... here, to assert that the arg is a hash table.
- (nonincremental-search-forward): Use `isearch-search-fun-default'
- to determine the search function.
- (nonincremental-search-backward)
- (nonincremental-repeat-search-forward)
- (nonincremental-repeat-search-backward): Use it.
+2015-11-21 Eli Zaretskii <eliz@gnu.org>
-2015-11-29 Artur Malabarba <bruce.connor.am@gmail.com>
+ Simplify recording of main thread's ID on MS-Windows
- * lisp/menu-bar.el (menu-bar-goto-uses-etags-p): Fix a warning
+ * src/w32term.c (w32_initialize):
+ * src/w32console.c (initialize_w32_display):
+ * src/w32fns.c (globals_of_w32fns): Don't record the main thread
+ ID independently for each type of session (GUI, TTY, batch).
+ * src/w32term.c (w32_init_main_thread): New function, records the
+ main thread's thread ID.
+ * src/w32term.h: Add prototype for w32_init_main_thread.
+ * src/emacs.c (main) [WINDOWSNT]: Call w32_init_main_thread.
-2015-11-29 Artur Malabarba <bruce.connor.am@gmail.com>
+ * src/emacs-module.c [WINDOWSNT]: Rename main_thread_id to
+ main_thread, for consistency with other threading libraries. All
+ users changed. Include w32term.h.
+ (check_main_thread) [WINDOWSNT]: Simplify the test: no need to
+ make sure the main thread is alive, as we hold a handle on it
+ opened by w32_init_main_thread.
+ (module_init) [WINDOWSNT]: Reuse the thread ID recorded by
+ w32_init_main_thread, instead of calling the requisite APIs once
+ more.
- * lisp/character-fold.el (character-fold-to-regexp): Be careful
+2015-11-21 Eli Zaretskii <eliz@gnu.org>
- not to return huge regexps.
+ Call 'window-size-change-functions' for mini-windows
-2015-11-29 Eli Zaretskii <eliz@gnu.org>
+ * src/window.c (grow_mini_window, shrink_mini_window): Set the
+ frame's 'window_sizes_changed' flag.
+ * src/xdisp.c (redisplay_internal): Call the hooks on
+ 'window-size-change-functions' if the call to 'echo_area_display'
+ sets the frame's 'window_sizes_changed' flag.
+ (syms_of_xdisp) <window-size-change-functions>:
+ Update doc string to indicate the mini-window resizes trigger a
+ call to the hooks, and don't promise that will happen "before
+ redisplay". (Bug#19576, Bug#21333)
- Improve documentation of string-collate-* functions
+ * doc/lispref/windows.texi (Window Hooks): Update the description
+ of 'window-size-change-functions'.
- * doc/lispref/strings.texi (Text Comparison): Improve wording and
- indexing of 'string-collate-equalp' and 'string-collate-lessp'.
+2015-11-21 Eli Zaretskii <eliz@gnu.org>
- * etc/NEWS: Move the entry of 'string-collate-equalp' and
- 'string-collate-lessp' to "Lisp Changes" section and mark it as
- documented.
+ Improve documentation of dynamic modules
-2015-11-29 Eli Zaretskii <eliz@gnu.org>
+ * src/fns.c (Frequire): Doc fix to include the dynamic module
+ support.
+ * src/lread.c (Fload, Vload_suffixes): Doc fixes to include the
+ dynamic module support.
+ (Fload): Treat the module suffix the same as '*.el' and '*.elc'
+ wrt the MUST-SUFFIX argument.
- Document truncate-string-ellipsis
+ * etc/NEWS: Expand documentation of dynamically loaded modules.
- * doc/lispref/display.texi (Size of Displayed Text): Document
- 'truncate-string-ellipsis'.
+2015-11-21 Philipp Stephani <phst@google.com> (tiny change)
- * lisp/international/mule-util.el (truncate-string-ellipsis): Doc fix.
- (truncate-string-to-width): Mention in the doc string that the
- default for ELLIPSIS comes from 'truncate-string-ellipsis'.
+ Initial documentation for dynamic modules
- * etc/NEWS: Move the 'truncate-string-ellipsis' entry to the "Lisp
- Changes" section.
+ * etc/NEWS: Mention the new support for dynamically loaded modules.
-2015-11-29 Eli Zaretskii <eliz@gnu.org>
+2015-11-20 Dmitry Gutov <dgutov@yandex.ru>
- Fix confusion wrt character folding in the Emacs manual
+ Add xref--etags-backend to xref-backing-functions using add-hook
- * doc/emacs/search.texi (Nonincremental Search, Regexp Search):
- Document that invoking search-forward/backward and
- re-search-forward/backward supports only case folding, but not the
- rest of the lax-search features. Reported by Mike Kupfer
- <m.kupfer@acm.org>.
+ * lisp/progmodes/xref.el (xref-backend-functions): Move the
+ default value into a separate `add-hook' call (bug#21964).
-2015-11-29 Ken Brown <kbrown@cornell.edu>
+ * lisp/progmodes/elisp-mode.el (emacs-lisp-mode):
+ Don't declare the xref-backend-functions variable.
+ It doesn't make any difference.
- Update mod-test-sum-test
+2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
- * modules/mod-test/test.el (mod-test-sum-test): Update to
- accommodate the lack of dladdr on Cygwin.
+ Fix double-decrement bug when freeing global refs
-2015-11-29 Alan Mackenzie <acm@muc.de>
+ * src/emacs-module.c (module_free_global_ref): Add a FIXME
+ comment about error reporting. Fix a recently-introduced typo
+ that double-decremented the refcount.
- Byte compiler: Catch missing argument to `funcall'. Fixes bug#22051.
+2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/emacs-lisp/bytecomp.el (byte-compile-funcall): When there's no argument
- to `funcall', (i) Output an error message; (ii) Generate code to signal a
- `wrong-number-of-arguments' error.
+ Declare emacs_module_init in the module API
-2015-11-29 Martin Rudalics <rudalics@gmx.at>
+ * src/emacs-module.h (emacs_module_init): New decl.
+ Without it, GCC might complain about a module that defines
+ emacs_module_init without using it. This also checks the
+ API better.
- * lisp/window.el (split-window): Don't sanitize sizes when SIZE is non-nil.
+2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
-2015-11-28 Artur Malabarba <bruce.connor.am@gmail.com>
+ Fix module test to use ptrdiff_t nargs too
- * lisp/character-fold.el (character-fold-to-regexp)
+ * modules/mod-test/mod-test.c (Fmod_test_return_t)
+ (Fmod_test_sum, Fmod_test_signal, Fmod_test_throw)
+ (Fmod_test_non_local_exit_funcall, Fmod_test_globref_make)
+ (Fmod_test_string_a_to_b, Fmod_test_userptr_make)
+ (Fmod_test_userptr_get, Fmod_test_vector_fill)
+ (Fmod_test_vector_eq): Arg counts are ptrdiff_t, not int.
+ (finalizer): Remove; no longer used.
- Warn about using long strings.
+2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
- * test/automated/character-fold-tests.el
- (character-fold--test-lax-whitespace)
- (character-fold--test-consistency): Reduce string size for tests.
+ Fix reindent-introduced typo in module code
-2015-11-28 Eli Zaretskii <eliz@gnu.org>
+ * src/emacs-module.c (MODULE_SETJMP_1): Fix typo that I
+ introduced while reindenting the code earlier, and add a
+ comment explaining the unusual use of do-while here.
- Document renaming of x-select-enable-* variables
+2015-11-20 Anders Lindgren <andlind@gmail.com>
- * doc/emacs/killing.texi (Clipboard): Rename
- x-select-enable-clipboard to select-enable-clipboard and
- x-select-enable-primary to select-enable-primary. Update index
- entries.
+ Fixed bug#19576: `write-file' saves wrong buffer.
- * etc/NEWS: Mark entry as documented.
+ If a function on the hook `window-size-change-functions' doesn't
+ restore the current buffer, functions that save and restore the
+ current window configuration (like `y-or-no-p') could silently
+ change the current buffer. When `write-file' asked the user
+ confirmation to overwrite a file, `y-or-no-p' changed the current
+ buffer, and the wrong buffer was saved to the file.
-2015-11-28 Eli Zaretskii <eliz@gnu.org>
+ * lisp/follow.el (follow-windows-start-end): Call `select-frame'
+ using the `norecord' parameter.
+ (follow-window-size-change): Restore current buffer. Call
+ `select-frame' using the `norecord' parameter. Cleanup.
- Document the shorthand hints displayed by M-x
+2015-11-20 John Wiegley <johnw@newartisans.com>
- * doc/emacs/m-x.texi (M-x): Document the numeric meaning of
- suggest-key-bindings. Document the shorthand hints for commands
- that have no key bindings. Document that M-x completion ignores
- obsolete commands.
+ Correct a documentation error in frames.texi
- * etc/NEWS: Move the M-x entry to "Editing Changes" and mark it as
- documented.
+2015-11-20 Stephen Leake <stephen_leake@stephe-leake.org>
-2015-11-28 Eli Zaretskii <eliz@gnu.org>
+ * lisp/cedet/mode-local.el: Delete obsolete comment
- Update docs of character folding
+2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
- * doc/emacs/search.texi (Lax Search): Update the description of
- character folding for the latest changes.
+ Module function arg counts are ptrdiff_t, not int
-2015-11-28 Artur Malabarba <bruce.connor.am@gmail.com>
+ * src/emacs-module.c (struct module_fun_env)
+ (module_make_function, module_funcall, Fmodule_call):
+ * src/emacs-module.h (struct emacs_runtime, struct emacs_env_25):
+ Use ptrdiff_t, not int, for arg counts.
+ * src/emacs-module.c (module_make_function): Don’t bother
+ checking arity against MOST_POSITIVE_FIXNUM, as that’s
+ unnecessary here. Make the checking clearer by negating it.
+ (module_make_function, Fmodule_call): No need to use xzalloc
+ since the storage doesn’t need to be cleared.
+ (module_funcall): Don’t use VLA, since C11 doesn’t guarantee support
+ for it, and many implementations are buggy with large VLAs anyway.
+ Use SAFE_ALLOCA_LISP instead.
+ (module_vec_set): Don’t crash if i < 0.
+ (module_vec_get): Don’t crash if i < MOST_NEGATIVE_FIXNUM.
+ (module_vec_set, module_vec_get): Do fixnum checks only when
+ i is out of array bounds, for efficiency in the usual case.
+ (Fmodule_load): Simplify fixnum range check.
+ (Fmodule_call): Simplify arity check. Use xnmalloc to detect
+ integer overflow in array allocation size.
- * lisp/character-fold.el: Also play nice with case-folding
+2015-11-20 Eli Zaretskii <eliz@gnu.org>
- (character-fold-to-regexp): Take `case-fold-search' into account.
+ Minor improvements in module test
-2015-11-28 Artur Malabarba <bruce.connor.am@gmail.com>
+ * modules/mod-test/mod-test.c: Include stdlib.h, to avoid warnings
+ about missing prototype of malloc.
+ * modules/mod-test/Makefile (CFLAGS): Add -std=gnu99, to avoid
+ compiler warnings.
- * lisp/character-fold.el: Add support for multi-char matches
+2015-11-20 Eli Zaretskii <eliz@gnu.org>
- (character-fold-table): Now has an extra-slot. This is a second
- char-table that holds multi-character matches. See docstring for
- details.
- (character-fold-to-regexp): Can build branching regexps when a
- character's entry the extra slot of `character-fold-table' matches the
- characters that succeed it.
+ Improve MS-Windows implementation in dynlib.c
-2015-11-28 Artur Malabarba <bruce.connor.am@gmail.com>
+ * src/dynlib.c [WINDOWSNT]: Include errno.h, lisp.h, and w32.h.
+ No need to include windows.h, as w32.h already does that.
+ <dynlib_last_err>: New static variable.
+ (dynlib_reset_last_error): New function.
+ (dynlib_open): Convert forward slashes to backslashes. Convert
+ file names from UTF-8 to either UTF-16 or the current ANSI
+ codepage, and call either LoadLibraryW or LoadLibraryA. If the
+ argument is NULL, return a handle to the main module, like
+ 'dlopen' does. Record the error, if any, for use by dynlib_error.
+ (dynlib_sym): Check the handle for validity. Record the error, if
+ any, for use by dynlib_error.
+ (dynlib_error): Call w32_strerror to produce the error string, and
+ zero out the last error code, like dlerror does.
+ (dynlib_close): Check the handle for validity. Record the error,
+ if any, for use by dynlib_error. Don't call FreeLibrary with a
+ handle for the main module.
+ * src/w32.c (globals_of_w32): Call dynlib_reset_last_error.
- * lisp/character-fold.el: Code simplifications
+2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
- (character-fold-table): Reduce the scope of a variable.
- (character-fold-to-regexp): Change logic to work directly on the
- input string. It's a little easier to understand, probably
- faster, and sets us up for implementing multi-char matches.
+ Include-file tweaks for modules
- * test/automated/character-fold-tests.el
- (character-fold--test-fold-to-regexp): New test.
+ * src/dynlib.c, src/emacs-module.c: Include <config.h> first.
+ * src/dynlib.h: Do not include config.h.
+ It’s every .c file’s responsibility to include config.h first.
+ * src/emacs-module.c: Include emacs-module.h immediately after
+ config.h, to test that emacs-module.h doesn’t depend on
+ include files other than config.h.
-2015-11-28 Eli Zaretskii <eliz@gnu.org>
+2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
- Document changes in "C-h l"
+ Simplify push_handler and profile its malloc
- * doc/emacs/help.texi (Misc Help): Document the changes in "C-h l".
+ * src/lisp.h (PUSH_HANDLER): Remove.
+ All callers changed to use push_handler directly.
+ * src/eval.c (internal_condition_case)
+ (internal_condition_case_1, internal_condition_case_2)
+ (internal_condition_case_n):
+ Use same pattern as for other invokers of push_handler.
+ (push_handler, push_handler_nosignal): Use call-by-value
+ instead of call-by-reference. All uses changed.
+ (push_handler): Simplify by rewriting in terms of
+ push_handler_nosignal.
+ (push_handler_nosignal): Profile any newly allocated memory.
- * etc/NEWS: mark "C-h l" changes as documented.
+2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
-2015-11-28 Eli Zaretskii <eliz@gnu.org>
+ * src/emacs-module.h: Include stddef.h, not stdlib.h.
- Finalize documentation of 'custom-prompt-customize-unsaved-options'
+2015-11-19 Juanma Barranquero <lekktu@gmail.com>
- * doc/emacs/custom.texi (Saving Customizations): Index the new
- function 'custom-prompt-customize-unsaved-options'.
+ Discover repository version in linked worktrees (bug#21930)
- * etc/NEWS: Mention when 'custom-prompt-customize-unsaved-options'
- is useful.
+ * lisp/version.el (emacs-repository--version-git-1): Do not assume
+ HEAD is at .git/HEAD, it can also be at .git/worktrees/<branch>/HEAD.
+ (emacs-repository-get-version): Grok linked worktrees when EXTERNAL
+ is nil too.
-2015-11-28 Eli Zaretskii <eliz@gnu.org>
+2015-11-19 Juri Linkov <juri@linkov.net>
- Document 'comment-line'
+ * lisp/replace.el (occur-regexp-descr): New function.
+ (occur-1, occur-engine): Use it.
- * doc/emacs/programs.texi (Comment Commands): Document
- 'comment-line'.
+ * lisp/isearch.el (isearch-occur): Propertize regexp with
+ isearch-string and isearch-regexp-function-descr for
+ occur-regexp-descr to display the correct description
+ message in the header (bug#21176, bug#21180).
- * etc/NEWS: Move the entry for 'comment-line' into "Editing Changes".
+2015-11-19 Karl Fogel <kfogel@red-bean.com>
-2015-11-28 Eli Zaretskii <eliz@gnu.org>
+ Revert `open-line' electric-indent sensitivity
- Document new checkdoc features
+ * lisp/simple.el (open-line): Remove electric indent code.
+ (electric-indent-just-newline): Don't declare.
- * doc/lispref/tips.texi (Tips, Library Headers): Document the
- keyword-checking features of checkdoc and the commands
- 'checkdoc-file' and 'checkdoc-current-buffer'.
+ * test/automated/simple-test.el (open-line-indent): Adjust test.
- * etc/NEWS: Move the checkdoc-related entries to their own
- section.
+ This partly reverts Artur Malabarba's change that added electric
+ indent sensitivity to `open-line' (Oct 24 22:26:27 2015 +0100, git
+ commit bd4f04f86), and adjusts a new test he added right afterwards
+ (Sat Oct 24 23:43:06 2015 +0100, git commit 207f235e3) accordingly.
+ However, the new INTERACTIVE argument to `open-line', which he also
+ added in the first commit, is not reverted here.
-2015-11-28 Philipp Stephani <p.stephani2@gmail.com>
+ See the thread "Questioning the new behavior of `open-line'." on the
+ Emacs Devel mailing list, and in particular this message:
- Simplify the prologue of emacs-module.c functions
+ From: Artur Malabarba
+ Subject: Re: Questioning the new behavior of `open-line'.
+ To: Karl Fogel
+ Cc: David Kastrup, Pierpaolo Bernardi, emacs-devel
+ Date: Wed, 18 Nov 2015 21:03:58 +0000
+ Message-ID: \
+ <CAAdUY-KN06pvCMy5bt3+Buk3yeKjf6n9iB2FaSTTOPpCqPwyhA@mail.gmail.com>
- * src/emacs-module.c (MODULE_FUNCTION_BEGIN): New macro.
- (module_make_global_ref)
- (module_free_global_ref, module_make_function, module_funcall)
- (module_intern, module_type_of, module_extract_integer)
- (module_make_integer, module_extract_float, module_make_float)
- (module_copy_string_contents, module_make_string)
- (module_make_user_ptr, module_get_user_ptr, module_set_user_ptr)
- (module_get_user_finalizer, module_set_user_finalizer)
- (module_vec_set, module_vec_get, module_vec_size): Use new helper
- macro MODULE_FUNCTION_BEGIN.
+ https://lists.gnu.org/archive/html/emacs-devel/2015-11/msg01707.html
-2015-11-28 Eli Zaretskii <eliz@gnu.org>
+2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
- Don't reject module calls with no arguments
+ Omit unnecessary clear in Fmodule_load
- * src/emacs-module.c (Finternal_module_call): Allow ARGLIST be nil.
+ * src/emacs-module.c (Fmodule_load):
+ Simplify and avoid unnecessary initialization of priv member to 0.
-2015-11-28 Philipp Stephani <p.stephani2@gmail.com>
+ * src/emacs-module.c: (module_vec_set, module_vec_get, module_vec_size)
- Make module-call be visible from Lisp
+2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
- * src/emacs-module.c (module_make_function): Use internal--module-call.
- (Finternal_module_call): Renamed from Fmodule_call. Add safety
- checks.
- (syms_of_module): DEFSYM save-value-p and save-pointer-p. Do
- defsubr internal--module-call.
+ Prefer signed integer types in module code
-2015-11-28 Eli Zaretskii <eliz@gnu.org>
+ Generally speaking, at the C level the Emacs source code prefers
+ signed types like ‘ptrdiff_t’ to unsigned types like ‘size_t’,
+ partly to avoid the usual signedness confusion when comparing values.
+ Change the module API to follow this convention.
+ Use ‘int’ for small values that can’t exceed INT_MAX.
+ * modules/mod-test/mod-test.c (Fmod_test_globref_make)
+ (Fmod_test_string_a_to_b, Fmod_test_vector_fill)
+ (Fmod_test_vector_eq):
+ * src/emacs-module.c (struct emacs_value_frame)
+ (module_make_global_ref, module_free_global_ref)
+ (module_copy_string_contents, module_make_string)
+ (module_vec_set, module_vec_get, module_vec_size):
+ * src/emacs-module.h (struct emacs_runtime, struct emacs_env_25):
+ * src/lread.c (suffix_p):
+ Prefer signed to unsigned integer types.
- Add etags tests for the recent Lua-related bugfix
+2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
- * test/etags/lua-src/test.lua: New file, tests the issues raised
- by bug#21934.
- * test/etags/Makefile (LUASRC): Add test.lua.
- * test/etags/ETAGS.good_1:
- * test/etags/ETAGS.good_2:
- * test/etags/ETAGS.good_3:
- * test/etags/ETAGS.good_4:
- * test/etags/ETAGS.good_5:
- * test/etags/ETAGS.good_6:
- * test/etags/CTAGS.good: Adapt to the new Lua test. Also, an old
- regression fix, resolved around 25 May 2015, required changes to
- the "good" ETAGS files.
+ Omit ‘const’ on locals
-2015-11-28 Eli Zaretskii <eliz@gnu.org>
+ Remove ‘const’ qualifier from locals that were newly added.
+ We don’t normally bother declaring locals with ‘const’ even
+ though they are not modified, for the same reason we don’t
+ bother declaring them with ‘register’ even though their
+ addresses are not taken; the advantage in compile-time
+ checking isn’t worth the loss of readability.
+ * modules/mod-test/mod-test.c (Fmod_test_non_local_exit_funcall)
+ (Fmod_test_vector_fill, Fmod_test_vector_eq):
+ * src/emacs-module.c (MODULE_SETJMP_1)
+ (module_make_global_ref, module_free_global_ref)
+ (module_non_local_exit_get, module_make_function)
+ (module_extract_integer, module_extract_float)
+ (module_get_user_ptr, module_set_user_ptr)
+ (module_get_user_finalizer, module_set_user_finalizer)
+ (module_vec_get, Fmodule_call)
+ (module_non_local_exit_signal_1)
+ (module_non_local_exit_throw_1, lisp_to_value)
+ (finalize_storage, allocate_emacs_value, mark_modules)
+ (module_handle_signal, module_handle_throw)
+ (module_format_fun_env):
+ * src/eval.c (push_handler, push_handler_nosignal)
+ (init_handler):
+ * src/lread.c (suffix_p):
+ Omit unnecessary ‘const’.
- Fix Lua tags when a function name includes '.' or ':'
+2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
- * lib-src/etags.c (Lua_functions): Add a tag for the last element
- of a function name after a dot or a colon. (Bug#21934)
+ Prefer intmax_t to int64_t in module code
-2015-11-28 Eli Zaretskii <eliz@gnu.org>
+ * modules/mod-test/mod-test.c (sum, Fmod_test_sum):
+ * src/emacs-module.c (module_extract_integer)
+ (module_make_integer):
+ * src/emacs-module.h (struct emacs_env_25):
+ Prefer intmax_t to int64_t. This doesn’t change the generated
+ code on any of the machines Emacs currently ports to, but it’s
+ at least in theory more future-proof as C99 doesn’t guarantee
+ that int64_t exists.
- Improve documentation of search and replace commands
+2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
- * doc/emacs/search.texi (Replacement and Lax Matches): Document
- which commands are affected by 'replace-character-fold'.
- (Lax Search): Add a cross reference to "Replacement and Lax
- Matches". Improve wording. Fix lost extra whitespace.
- (Search Customizations): Improve wording. (Bug#22036)
- See also comments in
- http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg02376.html.
+ Rename module.c to emacs-module.c, etc.
- * lisp/replace.el (query-replace, query-replace-regexp)
- (query-replace-regexp-eval, replace-string, replace-regexp):
- Mention 'replace-character-fold' in the doc strings.
+ * src/emacs-module.c: Rename from src/module.c.
+ * src/emacs-module.h: Rename from src/module.h.
+ All uses changed.
-2015-11-28 Paul Eggert <eggert@cs.ucla.edu>
+2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
- Fix minor problems found by static checking
+ Fix minor module problems found by static checking
- * src/undo.c (prepare_record): Add proper prototype for C.
+ * src/dynlib.c (dynlib_close): #ifdef out for now, as it’s not used.
+ * src/eval.c, src/lisp.h (lisp_eval_depth): Now static.
+ * src/module.c (Fmodule_load): Fix pointer signedness bug.
+ (Fmodule_call): Tell GCC that the default case is unreachable.
-2015-11-27 Stefan Monnier <monnier@iro.umontreal.ca>
+2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
- * src/emacs-module.c (struct env_storage): Delete
+ Style fixes for indenting etc. in module code
- (struct emacs_runtime_private): Keep an emacs_env instead.
- (Fmodule_load, Fmodule_call): Declare emacs_env_private separately.
- (initialize_environment): Split the arg in two. Adjust all callers.
- Only store the private part in Vmodule_environments.
- (finalize_environment): Change the arg to only be the private env.
- Adjust all callers.
+ This is mostly indenting and spacing changes. Also, remove
+ some unnecessary static decls instead of bothering to reindent them.
+ * src/module.h (EMACS_EXTERN_C_BEGIN): Remove, and do this inline,
+ as most other Emacs files do for this sort of thing.
-2015-11-27 Eli Zaretskii <eliz@gnu.org>
+2015-11-19 Eli Zaretskii <eliz@gnu.org>
- Improve documentation of 'replace-character-fold'
+ Minor improvements in modules testing Makefile
- * lisp/replace.el (replace-character-fold): Clarify which commands
- are affected by this variable.
+ * modules/mod-test/Makefile (EMACS, SO): New variables.
+ (CFLAGS): When SO = dll, don't use -fPIC.
+ (check): New target, runs the test.
-2015-11-27 Mark Oteiza <mvoteiza@udel.edu>
+2015-11-19 Eli Zaretskii <eliz@gnu.org>
- Backport: Add interactive seek command.
+ * .gitignore: Add "*.dll".
- * lisp/mpc.el (mpc-cmd-seekcur): New function.
- (mpc-seek-current): New command.
- (mpc-mode-menu): Add entry for mpc-seek-current
- (mpc-mode-map): Bind mpc-seek-current to "g"
+2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
-2015-11-27 Dmitry Gutov <dgutov@yandex.ru>
+ Migrate modules/.gitignore into .gitignore
- Autoload etags when using its xref backend
+ * .gitignore: Add former contents of modules/.gitignore.
+ * modules/.gitignore: Remove.
- * lisp/progmodes/xref.el (xref--etags-backend):
- Rename to etags--xref-backend. Move to etags.el. Autoload.
- (Bug#22026)
+2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
-2015-11-27 Artur Malabarba <bruce.connor.am@gmail.com>
+ Add copyright notices to module code
- * lisp/character-fold.el: Allow complex chars to match their decomposition
+ Put them in the usual format for GNU Emacs copyright notices.
- (character-fold-table): When a character's decomposition does not
- involve a formatting tag (i.e., if it has an "exact" description via
- other characters), then this character is allowed to match the
- decomposition.
+2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
-2015-11-27 Artur Malabarba <bruce.connor.am@gmail.com>
+ Rename emacs_module.h to module.h
- * lisp/character-fold.el: More descriptive variable names
+ * src/module.h: Rename from src/emacs_module.h.
+ All uses changed.
- (character-fold-table): Rename a lot of the lexical variables to
- make the code easier to read.
+2015-11-19 Juanma Barranquero <lekktu@gmail.com>
-2015-11-27 Artur Malabarba <bruce.connor.am@gmail.com>
+ * src/module.c (Fmodule_load): Remove unused vars `doc_name', `args'
- * lisp/isearch.el: Ensure we still support `isearch-new-word'
+ * src/lread.c (Fload): Remove unused variable `size'
- (isearch-new-regexp-function): Define variable.
- (isearch-new-word): Define as an obsolete alias. (Bug#22018)
+2015-11-19 Alan Mackenzie <acm@muc.de>
-2015-11-27 Eli Zaretskii <eliz@gnu.org>
+ src/keyboard.c (pre-command-hook): Fix typo in doc string: "pre" -> "post".
- Merge branch 'emacs-25' of git.savannah.gnu.org:/srv/git/emacs into emacs-25
+2015-11-18 Dmitry Gutov <dgutov@yandex.ru>
-2015-11-27 Lee Bochicchio <lboc.home@gmail.com>
+ Prioritize looking inside vc-parent-buffer over log-view-mode fallback
- * test/automated/abbrev-tests.el: Define more tests
+ * lisp/vc/vc.el (vc-deduce-fileset): Prioritize looking inside
+ vc-parent-buffer over log-view-mode fallback (bug#21955).
- (abbrev-table-name-test, kill-all-abbrevs-test)
- (clear-abbrev-table-test): New tests.
+2015-11-18 Alan Mackenzie <acm@muc.de>
-2015-11-27 Eli Zaretskii <eliz@gnu.org>
+ lisp/isearch.el: Eliminate macro isearch-call-message, replacing with funcall.
- Add module tests for wrong-type-argument
+2015-11-18 Ken Brown <kbrown@cornell.edu>
- * modules/mod-test/test.el (mod-test-sum-test): Add tests for
- wrong-type-argument.
+ * configure.ac (LIBMODULES): Don’t define on Cygwin
-2015-11-27 Eli Zaretskii <eliz@gnu.org>
+2015-11-18 Eli Zaretskii <eliz@gnu.org>
- Improve handling of signals and 'throw' in modules
+ Fix MS-Windows build --with-modules
- * src/emacs-module.c: Add commentary explaining how to write
- functions in this file.
- (module_make_global_ref, module_free_global_ref)
- (module_non_local_exit_signal, module_non_local_exit_throw)
- (module_make_function, module_funcall, module_intern)
- (module_type_of, module_is_not_nil, module_eq)
- (module_extract_integer, module_make_integer)
- (module_extract_float, module_make_float)
- (module_copy_string_contents, module_make_string)
- (module_make_user_ptr, module_get_user_ptr, module_set_user_ptr)
- (module_get_user_finalizer, module_set_user_finalizer)
- (module_vec_set, module_vec_get, module_vec_size)
- (module_non_local_exit_signal_1, module_non_local_exit_throw_1):
- Do nothing and return with failure indication immediately, if some
- previous module call signaled an error or wants to throw. See
- http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg02133.html
- for the relevant discussions.
+ * src/module.c: Reformat copyright commentary.
+ (module_vec_get): Use explicit cast to size_t to avoid compiler
+ warning in 32-bit builds.
+ (check_main_thread) [WINDOWSNT]: Fix letter-case in Windows APIs.
+ Compare thread IDs directly, as GetThreadId is not available
+ before Windows Vista.
+ (check_main_thread) [WINDOWSNT]: Duplicate the thread handle
+ without using APIs and constants not available on XP and older
+ systems. Obtain and store the thread ID as well.
-2015-11-27 Eli Zaretskii <eliz@gnu.org>
+2015-11-18 Aurélien Aptel <aurelien.aptel@gmail.com>
+ Philipp Stephani <phst@google.com>
- Add ':version' tag to 'checkdoc-package-keywords-flag'
+ Add dynamic module test and helper script
- * lisp/emacs-lisp/checkdoc.el (checkdoc-package-keywords-flag):
- Add a ':version' tag.
+ Add 'modhelp.py' script (python2) to automate module testing and
+ module generation.
-2015-11-27 Eli Zaretskii <eliz@gnu.org>
+ To build and test all modules in the modules/ dir
+ $ ./modhelp.py test
- Improve documentation of 'eval-buffer' and 'eval-region'
+ To generate a module from template code (good starting point)
+ $ ./modhelp init mynewtestmodule
- * src/lread.c (Feval_buffer, Feval_region): Doc fixes. (Bug#22023)
+ See the script -h option for more documentation.
- * doc/lispref/eval.texi (Eval): Mention narrowing to clarify
- "accessible portion of buffer".
+ * modules/modhelp.py: New module helper script.
+ * modules/mod-test/Makefile: New file. Makefile for the test module.
+ * modules/mod-test/mod-test.c: New file. Test module source file.
+ * modules/mod-test/test.el: New file. ert test suite for the test module.
+ * modules/.gitignore: New file. Local .gitignore file.
-2015-11-27 Eli Zaretskii <eliz@gnu.org>
+2015-11-18 Aurélien Aptel <aurelien.aptel@gmail.com>
- Unbreak the Cygwin w32 build
+ Make 'Fload' look for modules
- * src/emacs.c (main): Call w32_init_main_thread in the Cygwin w32
- build as well. Reported by Andy Moreton <andrewjmoreton@gmail.com>.
+ 'Fload' can now load dynamic modules. This also makes 'require' work.
-2015-11-27 Eli Zaretskii <eliz@gnu.org>
+ * src/lread.c:
+ (suffix_p): New function.
+ (Fload): Use 'suffix_p'. Call 'Fmodule_load' when we try to load a file
+ with a module suffix.
+ (syms_of_lread): Append module suffix to 'Vload_suffixes'.
- Improve commentary in character-fold.el
+2015-11-18 Aurélien Aptel <aurelien.aptel@gmail.com>
+ Philipp Stephani <phst@google.com>
- * lisp/character-fold.el (character-fold-to-regexp): Move detailed
- description from commit log message to comments. (Bug#22019)
+ Add dynamic module module support
-2015-11-26 Alan Mackenzie <acm@muc.de>
+ * configure.ac: Add '--with-modules' option. Conditionally add
+ dynlib.o and module.o to the list of objects. Add any system
+ specific flags to the linker flags to support dynamic libraries.
+ * m4/ax_gcc_var_attribute.m4: Add autoconf extension to test gcc
+ attributes.
+ * src/Makefile.in: Conditionally add module objects and linker flags.
+ * src/alloc.c (garbage_collect_1): protect module local values from
+ GC.
+ * src/lisp.h: Add 'module_init' and 'syms_of_module' prototypes.
+ * src/emacs_module.h: New header file included by modules. Public
+ module API.
+ * src/module.c: New module implementation file.
- Byte Compiler: generate code to adjust stack count after call to `signal'.
+2015-11-18 Aurélien Aptel <aurelien.aptel@gmail.com>
- Corrects change from earlier today.
+ Add new User Pointer (User_Ptr) type
- * lisp/emacs-lisp/bytecomp.el (byte-compile-setq): supply the current value of
- `byte-compile--for-effect' as argument to `byte-compile-form'.
+ * src/lisp.h: Add new Lisp_Misc_User_Ptr type.
+ (XUSER_PTR): New User_Ptr accessor.
+ * src/alloc.c (make_user_ptr): New function.
+ (mark_object, sweep_misc): Handle Lisp_Misc_User_Ptr.
+ * src/data.c (Ftype_of): Return 'user-ptr' for user pointer.
+ (Fuser-ptrp): New user pointer type predicate function.
+ (syms_of_data): New 'user-ptrp', 'user-ptr' symbol. New 'user-ptrp'
+ subr.
+ * src/print.c (print_object): Add printer for User_Ptr type.
-2015-11-26 Eli Zaretskii <eliz@gnu.org>
+2015-11-18 Aurélien Aptel <aurelien.aptel@gmail.com>
+ Philipp Stephani <phst@google.com>
- Improve commentary of prepare_to_modify_buffer_1
+ Add portable layer for dynamic loading
- * src/insdel.c (prepare_to_modify_buffer_1): Mention in commentary
- that this function runs Lisp. Suggested by Richard Stallman
- <rms@gnu.org>.
+ * src/dynlib.h: New file.
+ * src/dynlib.c: New file.
-2015-11-26 Phillip Lord <phillip.lord@russet.org.uk>
+2015-11-18 Philipp Stephani <phst@google.com>
- Merge branch 'emacs-25' of git.sv.gnu.org:/srv/git/emacs into emacs-25
+ Add catch-all & no-signal version of PUSH_HANDLER
-2015-11-26 Phillip Lord <phillip.lord@russet.org.uk>
+ Ground work for modules. Add a non-signaling version of PUSH_HANDLER and
+ a new "catch-all" handler type.
- Fix regression after merge.
+ * src/eval.c (init_handler, push_handler, push_handler_nosignal): New
+ functions.
+ * src/fns.c (hash_remove_from_table): Expose function public.
+ * src/lisp.h: New handler type, define macro to push_handler call.
- * src/undo.c (prepare_record): Remove call to run_undoable_change.
+2015-11-18 Ken Brown <kbrown@cornell.edu>
-2015-11-26 Phillip Lord <phillip.lord@russet.org.uk>
+ Silence byte-compiler warning
- After delete, record point location in undo.
+ * lisp/server.el (server-process-filter): Silence byte-compiler
+ warning.
- Addresses Bug #21968.
+2015-11-18 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/simple.el (undo-auto--add-boundary): Clean up code to
- better support intercalating calls.
- * src/keyboard.c, src/keyboard.h (command_loop_1): Store value of
- point and current buffer before each command.
- * src/undo.c (record_point): Now only record the point.
- * src/undo.c (prepare_record): Functionality removed form
- record_point.
- * src/undo.c (record_delete): Check if point needs recording.
- * src/undo.c (undo-boundary): Record value of point before each
- boundary.
- * test/automated/simple-test.el: New tests.
+ Quote symbols in docstrings using `'
- Conflicts:
- src/undo.c
+ Be more systematic about quoting symbols `like-this' rather than
+ `like-this or 'like-this' in docstrings. This follows up Artur
+ Malabarba's email in:
+ http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg01647.html
-2015-11-26 Eli Zaretskii <eliz@gnu.org>
+2015-11-18 Peder O. Klingenberg <peder@klingenberg.no>
- Fix compiler warnings in w32.c
+ Fix savegames in dunnet
- * src/w32.c (sys_socket): In case of error, use -1 as return
- value, not INVALID_SOCKET, which causes compiler warnings.
- (maybe_load_unicows_dll): Cast the return value of GetProcAddress
- to the appropriate function signature, to avoid compiler errors.
- Reported by Andy Moreton <andrewjmoreton@gmail.com>. (Bug#21953)
+ * lisp/play/dunnet.el (dun-rot13): Use the standard rot13-region instead
+ of separate implementation.
-2015-11-26 Dmitry Gutov <dgutov@yandex.ru>
+2015-11-18 Artur Malabarba <bruce.connor.am@gmail.com>
- Check if the file exists on disk before producing the revert diff
+ * lisp/emacs-lisp/package.el (package--with-response-buffer):
- * lisp/vc/vc-dispatcher.el (vc-buffer-sync): Check if the file
- exists on disk (bug#20558).
+ Ensure we're at the start of the buffer before searching for
+ the end of headers.
-2015-11-26 Alan Mackenzie <acm@muc.de>
+2015-11-17 Xue Fuqiao <xfq.free@gmail.com>
- Byte compiler: on setq with an odd number of arguments, generate a `signal'
+ * admin/release-process: Improve wording.
- * lisp/emacs-lisp/cconv.el (cconv-convert): Don't transform `setq' form when
- it has an odd number of arguments, to allow bytecomp to handle the error.
+2015-11-17 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/emacs-lisp/bytecomp.el (byte-compile-setq): In a `setq' form with an
- odd number of arguments, generate a `signal' instead of the normal code.
+ Fix docstring quoting problems with ‘ '’
-2015-11-26 Dmitry Gutov <dgutov@yandex.ru>
+ Problem reported by Artur Malabarba in:
+ http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg01513.html
+ Most of these fixes are to documentation; many involve fixing
+ longstanding quoting glitches that are independent of the
+ recent substitute-command-keys changes. The changes to code are:
+ * lisp/cedet/mode-local.el (mode-local-augment-function-help)
+ (describe-mode-local-overload):
+ Substitute docstrings before displaying them.
+ * lisp/emacs-lisp/cl-macs.el (cl--transform-lambda):
+ Quote the generated docstring for later substitution.
- Use find-tag-default for xref-backend-identifier-at-point
+2015-11-17 Eli Zaretskii <eliz@gnu.org>
- * lisp/progmodes/etags.el (find-tag-tag)
- (tags-completion-at-point-function): Extract common code as
- find-tag--default.
- (xref-backend-identifier-at-point): Define in terms of the new
- function.
+ Improve configure --help text for wide ints
-2015-11-26 Paul Eggert <eggert@cs.ucla.edu>
+ * configure.ac (wide-int): Clarify user-level advantages and
+ disadvantages.
- * src/undo.c (record_property_change): Remove now-unused local.
+2015-11-17 Stephen Leake <stephen_leake@stephe-leake.org>
-2015-11-25 Phillip Lord <phillip.lord@russet.org.uk>
+ Improve doc string
- run_undoable_changes now called from insdel.
+ * lisp/progmodes/xref.el (xref-backend-references): Improve doc string.
- The original calls from inside undo.c are not always at a safe position
- to call lisp, as they originate in varied positions within insdel.c.
- Calling them directly from prepare_to_modify_buffer_1 ensures that they
- are always run at the same point.
+2015-11-17 Paul Eggert <eggert@cs.ucla.edu>
- * src/undo.c (run_undoable_changes,syms_of_undo): Remove function
- and symbol used.
- * src/insdel.c (run_undoable_changes): Add function and symbol.
+ eval_sub followed dangling pointer when debugging
-2015-11-25 Eli Zaretskii <eliz@gnu.org>
+ Problem reported by Pip Cet (Bug#21245).
+ This bug could occur in eval_sub if the C compiler reused
+ storage associated with the ‘argvals’ local after ‘argvals’
+ went out of scope, and if the Elisp debugger stopped on Elisp
+ function exit and accessed ‘argvals’. It could also occur if
+ a variadic function was called with so many arguments (over
+ 2048 args on x86-64) that SAFE_ALLOCA_LISP called malloc, then
+ SAFE_FREE freed the arguments, then the memory manager used
+ the storage for other purposes, then the debugger accessed the
+ arguments.
+ * src/eval.c (eval_sub): Declare ‘argvals’ at top level of
+ function body. Simplify local decls.
+ When allocating args via SAFE_ALLOCA, call
+ debugger before invoking SAFE_FREE, as the debugger needs
+ access to the args.
+ (eval_sub, apply_lambda): Rework to avoid need for
+ set_backtrace_debug_on_exit hack. This is cleaner,
+ and should work better with buggy custom debuggers.
- Improve and update documentation of search commands
+2015-11-16 Daiki Ueno <ueno@gnu.org>
- * doc/emacs/search.texi (Lax Search): Renamed from "Search Case";
- all references changed. Move the description of lax-whitespace
- here. Add description of the new character folding features and
- additional customizable options.
- (Isearch Yank): Move before "Error in Search".
- (Basic Isearch): Improve wording. Add index entries. Add short
- description of how to abandon search, making this subsection a
- complete introduction to search basics.
- (Repeat Isearch): Add index entries. Describe additional
- customizable options. Describe mouse clicks.
- (Isearch Yank): Add index entries. Describe mouse-2 click in echo
- area. Describe more customizable options.
- (Error in Isearch): Add index entries.
- (Special Isearch): Move actual description of some isearch
- commands to other sections, leaving here just the summary of the
- commands. Add command that toggles character folding. Describe
- commands, like "C-h C-h", that were previously omitted for some
- reason.
- (Not Exiting Isearch): Describe search-exit-option. Add index
- entries.
- (Word Search): Describe eww-search-word and eww-search-prefix.
- (Symbol Search): Add index entries.
- (Regexp Search): Describe regexp-search-ring-max.
- (Replacement and Lax Matches): Renamed from "Replacement and
- Case"; all references changed. Describe lax-whitespace matching
- in replace commands and related options. Describe character
- folding in replace commands and related options.
- (Query Replace): Describe query-replace-from-to-separator and the
- new history features. Add index entries for highlighted text.
- Describe query-replace-skip-read-only. Describe more keys
- accepted by query-replace.
- (Other Repeating Search): More index entries for Occur. Describe
- list-matching-lines-default-context-lines.
- (Search Customizations): New section, documents customizable
- options that were not documented until now.
- * doc/emacs/glossary.texi (Glossary): Add "Case Folding" and
- "Character Folding".
+ * lisp/image-mode.el: Support encrypted file
+
+ (image-toggle-display-image): Read content from the buffer instead
+ of the file, if the buffer holds a decrypted data. (Bug#21870)
+
+2015-11-16 Paul Eggert <eggert@cs.ucla.edu>
+
+ ELF unexec: align section header
+
+ This ports the recent unexelf.c changes to Fedora x86-64
+ when configured with GCC’s -fsanitize=undefined option.
+ * src/unexelf.c (unexec): Align new_data2_size to a multiple
+ of ElfW (Shdr)’s alignment, so that NEW_SECTION_H returns a
+ pointer aligned appropriately for its type.
- * etc/NEWS: Move search- and replace-related entries to a single
- parent section.
+2015-11-16 Andreas Schwab <schwab@linux-m68k.org>
- * lisp/replace.el (query-replace-show-replacement): Doc fix.
- * lisp/isearch.el (search-nonincremental-instead)
- (isearch-hide-immediately): Doc fixes.
+ Do more checks on bytecode objects (Bug#21929)
-2015-11-25 Katsumi Yamaoka <yamaoka@jpl.org>
+ * src/eval.c (funcall_lambda): Check size of compiled function
+ object.
+ (Ffetch_bytecode): Likewise.
- Remove nnml-retrieve-groups that is unnecessary and somewhat problematic
+2015-11-16 Johan Bockgård <bojohan@gnu.org>
- * lisp/gnus/nnml.el (nnml-retrieve-groups): Remove. See:
- <http://thread.gmane.org/gmane.emacs.gnus.general/86308> and
- <http://thread.gmane.org/gmane.emacs.gnus.general/86321>
+ pcase.el: Fix edebugging of backquoted cons patterns
-2015-11-25 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/emacs-lisp/pcase.el (pcase-QPAT): Fix edebugging of backquoted
+ cons patterns. (Bug#21920)
- Fix module_format_fun_env when dynlib_addr fails
+2015-11-16 Paul Eggert <eggert@cs.ucla.edu>
- * src/emacs-module.c (module_format_fun_env):
- exprintf doesn’t support %p, so use %x. Reported by Eli Zaretskii in:
- http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg02122.html
+ Improve fix for regex reentrancy abort
-2015-11-25 Paul Eggert <eggert@cs.ucla.edu>
+ Suggested by Stefan Monnier (Bug#21688).
+ * src/syntax.c (update_syntax_table_forward):
+ Remove recently-added PROPERTIZE arg, and assume it is true.
+ All callers changed.
+ * src/syntax.h (UPDATE_SYNTAX_TABLE_FORWARD_FAST):
+ Invoke update_syntax_table directly.
- Disambiguate variable help a bit better
+2015-11-16 Artur Malabarba <bruce.connor.am@gmail.com>
- * lisp/help-fns.el (describe-variable): Quote the
- variable’s value if it is a symbol other than t or nil.
- See: T.V Raman in:
- http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg02147.html
+ * lisp/faces.el (faces--attribute-at-point): Use `face-list-p'
-2015-11-25 Dmitry Gutov <dgutov@yandex.ru>
+ * lisp/emacs-lisp/package.el (package--with-response-buffer): Missing require
- Pass SVN commit message through log-edit-extract-headers
+ * lisp/emacs-lisp/nadvice.el (add-function): Escape quote
- * lisp/vc/vc-svn.el (vc-svn-checkin): Pass COMMENT through
- log-edit-extract-headers (bug#18954).
+2015-11-15 Vasily Korytov <vasily.korytov@yahoo.com>
-2015-11-24 Alan Mackenzie <acm@muc.de>
+ Recognize .rbw and .pyw files (bug#18753)
- CC Mode: Eliminate compiler warning messages.
+ * lisp/progmodes/python.el (auto-mode-alist):
+ Recognize .pyw files.
- * lisp/progmodes/cc-mode.el (top level): remove compile time declaration of
- `font-lock-syntactic-keywords' (which CC Mode doesn't use).
- * lisp/progmodes/cc-awk.el (awk-mode-syntax-table)
- (c-awk-set-syntax-table-properties): Clarify comments about
- `font-lock-syntactic-keywords'.
+ * lisp/progmodes/ruby-mode.el (auto-mode-alist):
+ Recognize .rbw files.
- * lisp/progmodes/cc-bytecomp.el (cc-bytecomp-load): Create a dummy declaration
- of this before the real (interpreted) one, to satisfy the byte compiler.
+2015-11-15 Dmitry Gutov <dgutov@yandex.ru>
-2015-11-24 Simen Heggestøyl <simenheg@gmail.com>
+ Fix ruby-mode auto-mode-alist entry
- Extend the test suite for json.el
+ * lisp/progmodes/ruby-mode.el (auto-mode-alist): Add grouping
+ around the extensions (bug#21257).
- * lisp/json.el (json-plist-p): Clarify docstring.
+2015-11-15 Dmitry Gutov <dgutov@yandex.ru>
- * test/automated/json-tests.el (json-tests--with-temp-buffer): New
- macro.
- (test-json-join, test-json-alist-p)
- (test-json-plist-p, test-json-advance, test-json-peek)
- (test-json-pop, test-json-skip-whitespace)
- (test-json-read-keyword, test-json-encode-keyword)
- (test-json-read-number, test-json-encode-number)
- (test-json-read-escaped-char, test-json-read-string)
- (test-json-encode-string, test-json-encode-key)
- (test-json-new-object, test-json-add-to-object)
- (test-json-read-object, test-json-encode-list)
- (test-json-read-array, test-json-encode-array)
- (test-json-read, test-json-read-from-string)
- (test-json-encode): New tests.
- (json-read-simple-alist): Merged into `test-json-read-object'.
- (json-encode-string-with-special-chars): Merged into
- `test-json-encode-string'.
- (json-read-string-with-special-chars): Split into
- `test-json-encode-string' and `test-json-read-from-string'.
+ Fix etags completion near eob
-2015-11-24 Anders Lindgren <andlind@gmail.com>
+ * lisp/progmodes/etags.el (tags-completion-at-point-function):
+ Use `goto-char', to avoid the end-of-buffer error (bug#20061).
- Fixed bug#18283: Enable applescript in NextStep.
+2015-11-15 Alan Mackenzie <acm@muc.de>
- * nextstep/templates/Info.plist.in: Set NSAppleScriptEnabled to YES.
+ De-pessimize detection of C++ member initialization lists.
-2015-11-24 Eli Zaretskii <eliz@gnu.org>
+ list/progmodes/cc-engine.el (c-back-over-list-of-member-inits): New macro.
+ (c-back-over-member-initializers): Reformulate such that c-at-toplevel-p
+ is only called when a construct "looks right" rather than continually.
+ (c-guess-basic-syntax, CASE 5R): Add a check for the mode being C++ Mode.
- Allow completion on dynamic module files in load-library
+2015-11-15 Stephen Leake <stephen_leake@stephe-leake.org>
- * lisp/files.el (load-library): Bind completion-ignored-extensions
- to nil, to allow completion on dynamic modules typed as file
- names. Reported by Andy Moreton <andrewjmoreton@gmail.com>.
+ Improve a few doc strings, comments
-2015-11-24 Alan Mackenzie <acm@muc.de>
+ * lisp/cedet/cedet-global.el (cedet-gnu-global-expand-filename):
+ * lisp/cedet/ede/locate.el (ede-locate-base):
+ * lisp/cedet/semantic/symref.el (semantic-symref-calculate-rootdir):
+ * src/fns.c (Fdelq): Improve doc string.
- CC Mode: eliminate almost all byte compilation warnings
+ * lisp/progmodes/elisp-mode.el (elisp--xref-find-definitions): Add FIXME.
- * lisp/progmodes/cc-bytecomp.el (cc-bytecomp-noruntime-functions): Remove.
- (cc-require): Remove the crude hack that saved and restored
- byte-compile-noruntime-functions.
- (cc-conditional-require, cc-conditional-require-after-load): New macros.
+2015-11-15 Anders Lindgren <andlind@gmail.com>
- * lisp/progmodes/cc-defs.el (top level): Reformulate code which loaded
- cc-fix.el using the new macros in cc-bytecomp.el.
+ Enhance NSTRACE (trace output for NextStep).
- * lisp/progmodes/cc-langs.el (c++-template-syntax-table)
- (c-no-parens-syntax-table): Add extra "(eval ..)"s around "'(lambda ..)"
- forms to remove the superflous quotes.
+ Trace can be disabled for groups of functions. By default, event
+ functions and functions that generate lots of output are disabled.
-2015-11-24 Eli Zaretskii <eliz@gnu.org>
+ Trace output of Objective-C functions now use the "[ClassName
+ parameter:]" form.
- Add one more mod-test test
+ * src/nsterm.h (NSTRACE_ALL_GROUPS, NSTRACE_GROUP_EVENTS)
+ (NSTRACE_GROUP_UPDATES, NSTRACE_GROUP_FRINGE, NSTRACE_GROUP_COLOR)
+ (NSTRACE_GROUP_GLYPHS, NSTRACE_GROUP_FOCUS): New macros,
+ controlling in which function groups trace should be active.
+ (NSTRACE_WHEN): Support for silencing a function, this also
+ silencing all called functions.
+ (NSTRACE_UNSILENCE): New macro, used to re-enable trace.
+ (NSTRACE_FMT_FSTYPE, NSTRACE_ARG_FSTYPE): New macros, used to
+ print the full screen state in NSTRACE functions.
- * modules/mod-test/test.el (mod-test-sum-test): Test the error
- signaled when the function is invoked with a wrong number of
- arguments.
+ * src/nsterm.m (nstrace_depth, nstrace_num): Made volatile as they
+ can be accessed from multiple threads.
+ (nstrace_enabled_global): New variable, when FALSE, trace is
+ silenced.
+ (nstrace_restore_global_trace_state): New function, used to
+ restore `nstrace_enabled_global' at end of block.
+ ([EmacsView setFrame:], [EmacsWindow setFrame:display:])
+ ([EmacsWindow setFrame:display:animation:])
+ ([EmacsWindow setFrameTopLeftPoint:]): New functions, print trace
+ and call corresponding super function.
+ (Many functions): Add or enhance trace output.
-2015-11-24 Philipp Stephani <phst@google.com>
+ * src/nsimage.m (ns_image_from_file): Enhanced trace output.
- * modules/mod-test/mod-test.c (Fmod_test_sum): Verify there are 2 args.
+ * src/nsfns.m (x_set_tool_bar_lines): Add trace output.
-2015-11-24 Eli Zaretskii <eliz@gnu.org>
+ * src/nsmenu.m ([EmacsToolbar setVisible:]): New function, print trace
+ and call corresponding super function.
- Implement dynlib_addr for MS-Windows
+2015-11-15 Anders Lindgren <andlind@gmail.com>
- * src/dynlib.c [WINDOWSNT]: Include w32common.h.
- <g_b_init_get_module_handle_ex> [WINDOWSNT]: New static variable.
- (GET_MODULE_HANDLE_EX_FLAG_FROM_ADDRESS)
- (GET_MODULE_HANDLE_EX_FLAG_UNCHANGED_REFCOUNT) [WINDOWSNT]: Define
- if undefined.
- (dynlib_reset_last_error): Reset g_b_init_get_module_handle_ex to
- zero.
- (dynlib_addr) [WINDOWSNT]: Non-trivial implementation to report
- the full file name of the module for a given address.
+ Fixed a toolbar related issue on OS X.
-2015-11-24 Alan Mackenzie <acm@muc.de>
+ Earlier, when toggling the tool-bar in a maximized frame, the
+ frame size didn't match the number of text lines, leaving an
+ unused area at the bottom of the frame.
- Merge branch 'emacs-25' of git.sv.gnu.org:/srv/git/emacs into emacs-25
+ * nsfns.m (x_set_tool_bar_lines): Exit maximized and full height
+ fullscreen modes when tool bar is disabled.
-2015-11-24 Alan Mackenzie <acm@muc.de>
+2015-11-15 Anders Lindgren <andlind@gmail.com>
- Squashed commit of the following:
+ Fixed OS X 10.6.8 build issue (bug#21862).
- commit e1ecf76585bef2eb87995f7a7f92cc12003a6f70
- Author: Alan Mackenzie <acm@muc.de>
- Date: Tue Nov 24 16:50:09 2015 +0000
+ * src/nsterm.h (EmacsView): Add missing declarations.
+ * src/nsterm.m ([EmacsView windowDidBecomeKey]): New method, like
+ the standard method but without the notification parameter.
+ Intended to be used for direct calls.
+ ([EmacsView windowDidEnterFullScreen]): Call the non-notification
+ version of `windowDidBecomeKey'. Made the notification method call
+ the non-notification method instead of the vice versa.
+ (NSWindowDidEnterFullScreenNotification): Deleted, no longer
+ needed.
- Byte compile: minor amendments.
+2015-11-15 Artur Malabarba <bruce.connor.am@gmail.com>
- * lisp/emacs-lisp/bytecomp.el (byte-compile-initial-macro-environment):
- add a comment to explain the binding of variables around a subsidiary
- compilation.
- (byte-compile-new-defuns): Amend the doc string.
+ * lisp/faces.el (faces--attribute-at-point): Fix an issue
- commit c537bfed1dda1593d218956ff00c6105a3ff0316
- Author: Alan Mackenzie <acm@muc.de>
- Date: Sat Nov 21 18:43:57 2015 +0000
+ Previous code would signal an error when the face at point was
+ a manually built list of attributes such as '(:foregroud "white").
- Byte compiler: fix spurious warnings "might not be defined at runtime".
+ * test/automated/faces-tests.el (faces--test-color-at-point): Add a test
- Also initialize byte-compile-noruntime-functions between runs.
+2015-11-15 Paul Eggert <eggert@cs.ucla.edu>
- * lisp/emacs-lisp/bytecomp.el (byte-compile-new-defuns): New variable.
- (byte-compile-initial-macro-environment): For eval-when-compile: bind
- byte-compile-unresolved-functions and byte-compile-new-defuns around
- byte-compile-top-level, to prevent spurious entries being made.
- (byte-compile-warn-about-unresolved-functions): Check whether function is
- in byte-compile-new-defuns before emitting a warning about it.
- (byte-compile-from-buffer): Initialize new variable and
- byte-compile-noruntime-functions to nil.
- (byte-compile-file-form-require): record all new functions defined by a
- `require' in byte-compile-new-defuns.
- (byte-compile-file-form-defmumble): record the new alias in
- byte-compile-new-defuns.
+ Fix regex abort when it tries to reenter itself
-2015-11-24 Eli Zaretskii <eliz@gnu.org>
+ Problem reported by Ken Raeburn.
+ Solution suggested by Stefan Monnier (Bug#21688).
+ * src/regex.c (re_match_2_internal):
+ Use new _FAST functions to avoid regex code reentering itself.
+ * src/syntax.c (update_syntax_table_forward): New arg PROPERTIZE.
+ All callers changed.
+ * src/syntax.h (UPDATE_SYNTAX_TABLE_FORWARD_FAST)
+ (UPDATE_SYNTAX_TABLE_FAST): New inline functions.
- Fix crash at startup related to GC of font entities
+2015-11-15 Dmitry Gutov <dgutov@yandex.ru>
- * src/font.h (GC_FONT_SPEC_P, GC_FONT_ENTITY_P)
- (GC_FONT_OBJECT_P, GC_XFONT_SPEC, GC_XFONT_ENTITY)
- (GC_XFONT_OBJECT): New macros, for use in garbage collector.
- * src/alloc.c (compact_font_cache_entry, compact_font_caches):
- Don't ifdef away font cache compaction on NT_GUI, as the problems
- which led to that seem to have been solved.
- (compact_font_cache_entry): Use GC_FONT_SPEC_P, GC_XFONT_SPEC,
- GC_XFONT_ENTITY, and GC_XFONT_OBJECT, instead of their non-GC_
- cousins. (Bug#21999)
+ Improve Ruby 1.9-style keyword keys highlighting
-2015-11-24 Alan Mackenzie <acm@muc.de>
+ * lisp/progmodes/ruby-mode.el (ruby-font-lock-keywords):
+ Handle required keyword arguments (bug#21367).
+ And highlight the colon together with the name.
+
+2015-11-15 Dmitry Gutov <dgutov@yandex.ru>
+
+ Unify the absolutely equal xref-backend-references implementations
+
+ * lisp/progmodes/elisp-mode.el (xref-backend-references):
+ Remove.
- Byte compile: Output an error, not a warning, for odd number of args to setq
+ * lisp/progmodes/etags.el (xref-backend-references):
+ Remove.
- * lisp/emacs-lisp/bytecomp.el (byte-compile-setq): Amend.
+ * lisp/progmodes/xref.el (xref-backend-references):
+ Define the default implementation.
-2015-11-24 Ken Raeburn <raeburn@raeburn.org>
+2015-11-14 Dmitry Gutov <dgutov@yandex.ru>
- Fix kbd_buffer iteration loop in readable_events
+ Update project-find-regexp for the new xref API
- * src/keyboard.c (readable_events): Wrap the event pointer back to the
- start of the kbd_buffer array inside the top of the loop instead of
- right before checking the loop condition, since kbd_fetch_ptr and
- kbd_store_ptr point past the end of the array to mean that element 0
- is next. (bug#21935)
+ * lisp/progmodes/project.el (project--read-regexp):
+ Update to use the new xref API methods.
-2015-11-24 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/progmodes/xref.el (xref-find-backend): Autoload.
- Improve text-quoting-style doc again
+2015-11-14 Dmitry Gutov <dgutov@yandex.ru>
- * doc/lispref/help.texi (Keys in Documentation):
- Omit overkill discussion of ‘setq’. Mention Emacs versions
- where ‘grave’ style was standard.
+ Fix replacing a match with a shorter string
-2015-11-24 Paul Eggert <eggert@cs.ucla.edu>
+ In effect, partially reverting fe973fc.
- Improve text-quoting-style doc
+ * lisp/progmodes/xref.el (xref-query-replace): Store the end
+ of each match as a marker again, instead of length.
+ (xref--query-replace-1): Update accordingly.
-2015-11-24 Paul Eggert <eggert@cs.ucla.edu>
+2015-11-14 Artur Malabarba <bruce.connor.am@gmail.com>
- Simplify module_make_function
+ * lisp/progmodes/xref.el (xref-pop-marker-stack): Downgrade errors
- * src/emacs-module.c (module_make_function):
- Simplify by calling build_unibyte_string.
+ Signal user-errors instead.
-2015-11-24 Paul Eggert <eggert@cs.ucla.edu>
+2015-11-14 Eli Zaretskii <eliz@gnu.org>
- Port better to FreeBSD’s dlfunc vs dlsym
+ Document 'describe-symbol'
- This avoids warnings when converting between void * and
- function pointers, which strict C11 does not allow.
- * configure.ac (dlfunc): Check for existence.
- * src/dynlib.c (dlfunc) [!HAVE_DLFUNC]: New macro.
- (dynlib_func): New function.
- * src/dynlib.h (dynlib_function_ptr, dynlib_func): New decls.
- * src/emacs-module.c (Fmodule_load): Use dynlib_func, not
- dynlib_sym, for function pointers.
+ * doc/emacs/help.texi (Help Summary): Mention "C-h o".
+ (Name Help): Document "C-h o" and describe-symbol.
-2015-11-24 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/help-fns.el (describe-symbol): Doc fix.
- Simplify use of emacs_finalizer_function type
+2015-11-14 Paul Eggert <eggert@cs.ucla.edu>
- * src/emacs-module.h (emacs_finalizer_function):
- Now EMACS_NOEXCEPT. All users simplified to omit EMACS_NOEXCEPT.
- (struct emacs_env_25): Use emacs_finalizer_function where applicable.
+ Change test name to avoid spellcheck issue.
-2015-11-24 Paul Eggert <eggert@cs.ucla.edu>
+2015-11-14 Eli Zaretskii <eliz@gnu.org>
- module_format_fun_env fixes
+ Avoid signaling an error in 'describe-symbol'
- * src/doprnt.c (exprintf) [HAVE_MODULES]: Also define in this case.
- * src/emacs-module.c (module_format_fun_env):
- Convert path and sym to UTF-8.
- Don’t use VLAs, as the C11 standard says they’re optional,
- and anyway they can cause core dumps with large allocations.
- Use exprintf rather than snprintf, as exprintf handles arbitrarily
- long strings. Simplify the code a bit.
+ * lisp/help-fns.el (describe-symbol): Avoid errors when the symbol
+ exists as a function/variable/face/etc., but is undocumented.
-2015-11-23 Dmitry Gutov <dgutov@yandex.ru>
+ * test/automated/help-fns.el (help-fns-test-describe-symbol): New
+ test.
- Don't use package-user-dir in elisp-library-roots if it's not bound
+2015-11-14 Eli Zaretskii <eliz@gnu.org>
- * lisp/progmodes/elisp-mode.el (elisp-library-roots): Don't
- use package-user-dir if it's not bound (bug#19759).
+ * INSTALL (--with-cairo): Document this new configure option.
-2015-11-23 Anders Lindgren <andlind@gmail.com>
+2015-11-14 Eli Zaretskii <eliz@gnu.org>
- New visible-bell for NextStep (OS X El Capitan compatible).
+ Document that GNU Make >= 3.81 is required to build Emacs
- Instead of inverting a rectangle in the middle of the frame, use
- the standard NextStep image "caution", represented using an
- warning sign with an exclamation mark. (Bug#21662)
+ * doc/lispref/internals.texi (Building Emacs): Document that GNU
+ Make 3.81 or later is now required.
- Implemented based on a suggestion drafted by Mustafa Kocaturk.
+2015-11-14 Eli Zaretskii <eliz@gnu.org>
- * src/nsterm.m (EmacsBell): New class for managing the caution
- image. Support multiple active bells, the image is removed once
- all bells have timed out.
- (ns_timeout): Removed, no longer used.
- (ns_ring_bell): Reimplemented to use EmacsBell.
+ * CONTRIBUTE (Branches): Improve wording for back-ported commits.
-2015-11-23 Johan Bockgård <bojohan@gnu.org>
+2015-11-13 l3thal <kwhite@gnu.org>
- * lisp/emacs-lisp/nadvice.el (add-function): Fix debug spec.
+ Merge branch 'erc-async-reconnect' into emacs-25
- (remove-function): Ditto. (Bug#20376)
+ Reconnect asynchronously.
-2015-11-23 Mark Oteiza <mvoteiza@udel.edu>
+2015-11-11 Alan Mackenzie <acm@muc.de>
- * lisp/leim/quail/tamil-dvorak.el: Add necessary escapes.
+ First commit to scratch/follow. Make Isearch work with Follow Mode, etc.
-2015-11-23 Eli Zaretskii <eliz@gnu.org>
+ doc/lispref/window.texi (Basic Windows): Add paragraph defining "Group of
+ Windows" and new @defun selected-window-group.
+ (Window Start and End): Describe new &optional parameter GROUP and
+ ...-group-function for window-start, window-end, set-window-start, and
+ pos-visible-in-window-p.
+ (Textual Scrolling) Describe the same for recenter.
+ doc/lispref/positions.texi (Screen Lines): Describe the same for
+ move-to-window-line.
- Improve how non-ASCII strings are accepted from modules
+ src/window.c (Fwindow_start, Fwindow_end, Fset_window_start)
+ (Fpos_visible_in_window_p, Frecenter, Fmove_to_window_line): To each, add ar
+ new optional parameter "group". At the beginning of each, check whether the
+ corresponding ...-group-function is set to a function, and if so execute this
+ function in place of the normal processing.
+ (syms_of_window): Define symbols for the six new variables below.
+ (window-start-group-function, window-end-group-function)
+ (set-window-start-group-function, recenter-group-function)
+ (pos-visible-in-window-p-group-function, move-to-window-line-group-function):
+ New permanent local buffer local variables.
+ src/keyboard.c (Fposn_at_point): Add extra parameter in call to
+ Fpos_visible_in_window_p.
- * src/emacs-module.c (module_make_function, module_make_string):
- Build a unibyte Lisp string and then decode it by UTF-8, instead
- of building a multibyte string without decoding. This is more
- tolerant to deviations from UTF-8.
+ lisp/window.el (selected-window-group-function): New permanent local buffer
+ local variable.
+ (selected-window-group): New function.
-2015-11-23 Paul Eggert <eggert@cs.ucla.edu>
+ lisp/follow.el (follow-mode): Set the ...-group-function variables at mode
+ enable, kill them at mode disable. Add/remove follow-after-change to/from
+ after-change-functions.
+ (follow-start-end-invalid): New variable.
+ (follow-redisplay): Manipulate follow-start-end-invalid.
+ (follow-after-change, follow-window-start, follow-window-end)
+ (follow-set-window-start, follow-pos-visible-in-window-p)
+ (follow-move-to-window-line, follow-sit-for): New functions.
- Port recent module changes to pickier compilers
+ lisp/isearch.el (isearch-call-message): New macro.
+ (isearch-update, with-isearch-suspended, isearch-del-char)
+ (isearch-search-and-update, isearch-ring-adjust): Invoke above new macro.
+ (with-isearch-suspended): Rearrange code such that isearch-call-message is
+ invoked before point is moved.
+ (isearch-message): Add comment about where point must be at function call.
+ (isearch-search): Remove call to isearch-message.
+ (isearch-lazy-highlight-window-group): New variable.
+ (isearch-lazy-highlight-new-loop): Unconditionally start idle timer. Move
+ the battery of tests to ...
+ (isearch-lazy-highlight-maybe-new-loop): New function, started by idle timer.
+ Note: (sit-for 0) is still called.
+ (isearch-lazy-highlight-update): Check membership of
+ isearch-lazy-highlight-window-group. Don't set the `window' overlay
+ property.
+ (isearch-update, isearch-done, isearch-string-out-of-window)
+ (isearch-back-into-window, isearch-lazy-highlight-maybe-new-loop)
+ (isearch-lazy-highlight-search, isearch-lazy-highlight-update)
+ (isearch-lazy-highlight-update): Call the six amended primitives (see
+ src/window.c above) with the new `group' argument set to t, to cooperate
+ with Follow Mode.
- * src/emacs-module.c (module_make_function)
- (module_make_string): Add casts to fix pointer signedness issues.
+2015-12-27 Lars Ingebrigtsen <larsi@gnus.org>
-2015-11-23 Philipp Stephani <phst@google.com>
+ * shr.el (shr-descend): Allow using lambdas in external functions.
- Fix how strings are accepted from modules
+2015-12-25 Stefan Monnier <monnier@iro.umontreal.ca>
- * src/emacs-module.c (module_make_function, module_make_string): Use
- make_multibyte_string.
- (module_copy_string_contents): Encode before reading the byte
- size. Return false if and only if an error occurred.
+ * admin/gitmerge.el: Tweaks that seemed necessary
-2015-11-23 Eli Zaretskii <eliz@gnu.org>
+ * admin/gitmerge.el (gitmerge-skip-regexp): Remove "sync".
+ (gitmerge-maybe-resume): Provide explicit empty commit message.
- Merge branch 'emacs-25' of git.savannah.gnu.org:/srv/git/emacs into emacs-25
+2015-12-25 Łukasz Stelmach <stlman@poczta.fm> (tiny change)
-2015-11-23 Shakthi Kannan <shakthimaan@gmail.com>
+ Use a different port for TLS erc
- Add the tamil-dvorak input method
+ * lisp/erc/erc.el (erc-default-port-tls): New variable
+ (bug#19497).
+ * lisp/erc/erc.el (erc-tls): Use it.
- * lisp/leim/quail/tamil-dvorak.el: New file. (Bug#21768)
+2015-12-25 Alain Schneble <a.s@realize.ch>
- * etc/NEWS: Mention the new input method.
+ Make relative URL parsing and resolution consistent with RFC 3986 (bug#22044)
-2015-11-23 Martin Rudalics <rudalics@gmx.at>
+ * test/lisp/url/url-parse-tests.el: Add tests covering url-generic-parse-url.
+ * test/lisp/url/url-expand-tests.el: Add tests covering url-expand-file-name.
+ * lisp/url/url-parse.el (url-generic-parse-url): Keep empty fragment
+ information in URL-struct.
+ * lisp/url/url-parse.el (url-path-and-query): Do not artificially turn empty
+ path and query into nil path and query, respectively.
+ * lisp/url/url-expand.el (url-expander-remove-relative-links): Do not turn
+ empty path into an absolute ("/") path.
+ * lisp/url/url-expand.el (url-expand-file-name): Properly resolve
+ fragment-only URIs. Do not just return them unchanged.
+ * lisp/url/url-expand.el (url-default-expander): An empty path in the relative
+ reference URI should not drop the last segment.
- Move setting FRAME_WINDOW_SIZES_CHANGED to resize_frame_windows.
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
- * src/frame.c (adjust_frame_size): Don't set
- FRAME_WINDOW_SIZES_CHANGED here ...
- * src/window.c (resize_frame_windows): ... but here, as suggested
- by Stefan Monnier. Also remove some dead code along the way.
+ Let url use default file modes when copying files
-2015-11-23 Alan Mackenzie <acm@muc.de>
+ * lisp/url/url-handlers.el (url-copy-file): Use default file
+ modes when copying files (bug#11400).
- * etc/NEWS (Incompatible Lisp Changes): Also `setf' needs an even # of args.
+2015-12-25 Devon Sean McCullough <Emacs-Hacker2012@jovi.net>
-2015-11-23 Alan Mackenzie <acm@muc.de>
+ Doc fix for url-http
- Signal an error when `setf' gets an odd number of arguments.
+ * lisp/url/url-http.el (url-http): Document better return values
+ (bug#13187) (tiny change)
- * lisp/emacs-lisp/gv.el (setf): Amend.
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
-2015-11-23 Stefan Monnier <monnier@iro.umontreal.ca>
+ * eww.el (eww-display-html): Support <button> tags (bug#20485).
- * lisp/emacs-lisp/smie.el (smie-backward-sexp): Handle BOB better.
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
-2015-11-23 Alan Mackenzie <acm@muc.de>
+ Made ffap-url-p a defun instead of a defsubst
- * etc/NEWS (Incompatible Lisp Changes): Document new restriction on `setq'.
+ * lisp/ffap.el (ffap-url-p): Change from defsusbt to defun,
+ since there doesn't seem to be much of a reason for it to be a
+ defsubst (bug#18203).
-2015-11-23 Alan Mackenzie <acm@muc.de>
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
- Expunge occurrences of `setq' with an odd number of arguments.
+ Add a command to view files in the browser to dired
- * lisp/apropos.el (apropos-documentation):
- * lisp/obsolete/complete.el (PC-include-file-all-completions):
- * lisp/progmodes/compile.el (compilation-goto-locus):
- * lisp/vc/vc-cvs.el (vc-cvs-parse-root): (twice)
- Insert missing nil at end of `setq' forms.
+ * lisp/dired.el (dired-mode-map): Add the `W' command
+ (bug#18810).
- * lisp/emacs-lisp/bytecomp.el (byte-compile-file-form-autoload): Remove an
- erroneous trailing variable name from a setq, thus allowing a compilation
- properly to track functions not defined at runtime.
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
-2015-11-23 John Wiegley <johnw@newartisans.com>
+ Allow http://user:pass@foo/ URLs again
- Add a note about a questionable use of bool in xdisp.c
+ * lisp/url/url-auth.el (url-basic-auth): Allow explicit
+ user/passwords in URLs (bug#19046).
-2015-11-23 Alan Mackenzie <acm@muc.de>
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
- Issue a warning from the byte compiler on a malformed `setq' form.
+ * eww.el (eww-mode-map): Fix command name of eww-toggle-colors.
- Partly fixes bug#20241.
- * lisp/emacs-lisp/bytecomp.el (byte-compile-setq): Issue a warning when a
- `setq' form with an odd number of arguments is compiled.
+2015-12-25 Samer Masterson <samer@samertm.com>
-2015-11-23 Alan Mackenzie <acm@muc.de>
+ Autoload url-insert-buffer-contents
- Don't let cconv_convert insert a nil argument into a `setq' form.
+ * lisp/url/url-handlers.el: Add autoload cookie so that
+ `package-list-packages' doesn't bug out (bug#21927) (tiny change)
- Fixes bug#21983.
- * lisp/emacs-lisp/cconv.el (cconv-convert): Don't silently insert a nil last
- argument into a `setq' when there're an odd number of args. This enables the
- byte compiler to issue a message in this case.
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
-2015-11-23 Alan Mackenzie <acm@muc.de>
+ Allow toggling colors in eww
- Signal an error when `setq' has an odd number of arguments. Fixes bug#20241.
+ * doc/misc/eww.texi (Basics): Mention "C".
- * src/eval.c (Fsetq): Signal an error on an odd number of arguments.
- (syms_of_eval): Add a DEFSYM for Qsetq.
+ * lisp/net/eww.el (eww-toggle-colors): New command and keystroke.
-2015-11-23 Martin Rudalics <rudalics@gmx.at>
+ * lisp/net/shr.el (shr-use-colors): New variable.
+ (shr-colorize-region): Use it.
- * doc/lispref/windows.texi (Window Sizes): Fix indices and references.
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
- * src/frame.c (adjust_frame_size): Set FRAME_WINDOW_SIZES_CHANGED (Bug#21975).
+ Follow meta refresh tags in eww
-2015-11-23 Thomas Fitzsimmons <fitzsim@fitzsim.org>
+ * eww.el (eww-tag-meta): Follow meta refresh tags (bug#22234).
- Add EUDC BBDB 3 entry in NEWS
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
- * NEWS: Mention EUDC BBDB backend support for BBDB 3.
+ More eww file name coding fixes
-2015-11-23 Thomas Fitzsimmons <fitzsim@fitzsim.org>
+ * eww.el (eww-decode-url-file-name): Use the base coding
+ system to check for encodability.
- Improve EUDC to BBDB 3 export
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/net/eudc-vars.el (eudc-ldap-bbdb-conversion-alist): Change phone
- entry to single item. Add company conversion.
- * lisp/net/eudc-export.el (eudc-bbdbify-company): New function.
- (bbdb-parse-phone): Declare function.
- (eudc-bbdbify-phone): Add BBDB 3 support.
- (Bug#21971)
+ Always save eww history
-2015-11-23 Thomas Fitzsimmons <fitzsim@fitzsim.org>
+ * eww.el (eww-setup-buffer): Always save history, even when
+ called from outside the eww buffer (bug#19638).
- Add BBDB 3 support for EUDC export
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/net/eudc.el: Add bbdb-version defvar.
- (eudc--using-bbdb-3-or-newer-p): New function.
- * lisp/net/eudc-export.el (eudc-create-bbdb-record): Add support for
- bbdb-create-internal argument list changes introduced in BBDB 3.
- * lisp/net/eudcb-bbdb.el: Remove bbdb-version defvar.
- (eudc-bbdb-field): Call eudc--using-bbdb-3-or-newer-p.
- (Bug#21971)
+ Default web pages to right-to-left
-2015-11-22 Eli Zaretskii <eliz@gnu.org>
+ * eww.el (eww-mode): Most web pages are left-to-right, so make
+ that the default (bug#19801).
- Allow loading modules by 'load-file'
+ * shr.el (shr-tag-html): Respect "dir" attributes
+ (left-to-right, right-to-left).
- * src/lread.c (Fload): Call 'unbind_to' with 'Fmodule_load' as the
- 2nd arg, to avoid the "binding stack not balanced" error.
- (syms_of_lread) <module-file-suffix>: New Lisp variable.
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/files.el (module-file-suffix): Declare.
- (load-file): Remove 'module-file-suffix' from
- 'completion-ignored-extensions', to allow completion on modules.
+ Make toggling checkboxes work again
- * etc/NEWS: Mention 'module-file-suffix'.
+ * eww.el (eww-update-field): Make toggling checkboxes work
+ again (bug#21881).
-2015-11-22 Eli Zaretskii <eliz@gnu.org>
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
- Fix unoptimized builds
+ Don't store cookies with empty names
- * src/lisp.h (XTYPE): Move before XSYMBOL, to fix unoptimized
- builds.
+ * lisp/url/url-cookie.el (url-cookie-store): Refuse to store
+ cookies with empty names (bug#21936).
-2015-11-22 Dmitry Gutov <dgutov@yandex.ru>
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
- Work around the asynchronous-empty-diff problem
+ * shr.el (shr-descend): Stop rendering before we run out of
+ specpdl room (bug#22117).
- * lisp/vc/vc-rcs.el (vc-rcs-diff):
- * lisp/vc/vc-mtn.el (vc-mtn-diff):
- * lisp/vc/vc-hg.el (vc-hg-diff):
- * lisp/vc/vc-git.el (vc-git-diff): Ignore the ASYNC argument,
- do a synchronous process call (bug#21969).
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
-2015-11-22 Karl Fogel <kfogel@red-bean.com>
+ Use cl-reduce, not reduce.
- Finish excising electric indent from `open-line'
+2015-12-25 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/simple.el (open-line): Remove INTERACTIVE argument.
+ Allow several <tbody> tags in shr
- * test/automated/simple-test.el (open-line-indent, open-line-hook):
- Adjust accordingly.
+ * shr.el (shr-table-body): New function to find the real body
+ of a table.
+ (shr-tag-table): Use it to render several <tbody> tags in a
+ table (bug#22170).
- This change finishes what my commit of Thu Nov 19 17:32:37 2015 -0600
- (git commit c59353896) started. It turns out that having INTERACTIVE
- cause `post-self-insert-hook' to run (via `newline') meant `open-line'
- still had the electric indent behavior, as `post-self-insert-hook'
- normally contains `electric-indent-post-self-insert-function' ever
- since `electric-indent-mode' has been on by default. Tracing the code
- change in `open-line' is mildly twisty, because Artur Malabarba's
- earliest two commits of 24 Oct 2015 first removed the `interactive'
- form entirely (git commit 6939896e2) and then restored it with the new
- extra "p" already added (git commit bd4f04f86), such that there is no
- single-commit diff in which one sees the second "p" appear. Thus this
- change is effectively a reversion of parts of each of those commits.
+2015-12-24 Lars Ingebrigtsen <larsi@gnus.org>
- This could close bug#21884, at least until further discussion.
+ Make prettier unique file names in eww
-2015-11-22 Dmitry Gutov <dgutov@yandex.ru>
+ (eww-make-unique-file-name): Make unique file names by making
+ files like foo(2).jpg instead of foo(1)(2).jpg.
- Adhere closer to the "implicit tag name" definition
+2015-12-24 Lars Ingebrigtsen <larsi@gnus.org>
- * lisp/progmodes/etags.el (etags-tags-completion-table):
- Adhere closer to the "implicit tag name" definition. Simplify
- the regexp. Search for the explicit tag name first, and when
- not found, search locally for the implicit one. (Bug#21934)
+ Decode hex-encoded URLs before using them as file names
-2015-11-22 Stefan Monnier <monnier@iro.umontreal.ca>
+ * eww.el (eww-decode-url-file-name): New function.
+ (eww-download-callback): Use it to decode file names before
+ saving them.
- Unrevert most of regexp reentrancy abort patch
+2015-12-24 Ashish SHUKLA <ashish.is@lostca.se> (tiny change)
- The problem was in:
- * src/syntax.c (update_syntax_table_forward): Propertize even when truncated
- which is hence not unreverted.
- The rest is:
- * src/syntax.h (UPDATE_SYNTAX_TABLE_FORWARD_FAST):
- (UPDATE_SYNTAX_TABLE_FAST): Re-introduce.
- All callers in regex.c changed back to the _FAST versions.
+ * doc/misc/emacs-gnutls.texi (Help For Users): Document FreeBSD bundle.
+ * lisp/net/gnutls.el (gnutls-trustfiles): Add FreeBSD cert bundle.
- * test/automated/message-mode-tests.el: Tweak the test to rely on auto
- propertization in backward-sexp.
+2015-12-24 Lars Ingebrigtsen <larsi@gnus.org>
-2015-11-21 Paul Eggert <eggert@cs.ucla.edu>
+ Allow overriding shr functions from eww
- Revert regexp reentrancy abort patch
+ * eww.el (eww-display-html): Allow overriding elements in
+ `shr-external-rendering-functions'.
- Although the patch does fix Bug#21688 and prevents a core dump,
- it also makes the message-mode-propertize test fail; see:
- http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg01667.html
- Perhaps someone else can come up with a better fix some day.
- * src/syntax.c (update_syntax_table_forward):
- Propertize even when truncated.
- * src/syntax.h (UPDATE_SYNTAX_TABLE_FORWARD_FAST):
- (UPDATE_SYNTAX_TABLE_FAST): Remove.
- All callers changed back to the non-_FAST versions.
+2015-12-24 Lars Ingebrigtsen <larsi@gnus.org>
-2015-11-21 Paul Eggert <eggert@cs.ucla.edu>
+ Ignore invalid SVG images
- Add a few safety checks when ENABLE_CHECKING
+ * shr.el (shr-tag-svg): Ignore SVG images that have no width
+ or height, because these can't be displayed by ImageMagick,
+ anyway.
- This was motivated by the recent addition of module code,
- which added some ENABLE_CHECKING-enabled checks that are
- useful elsewhere too.
- * src/alloc.c (compact_font_cache_entry):
- * src/fns.c (sweep_weak_table):
- * src/lread.c (oblookup):
- Use gc_asize rather than doing it by hand.
- * src/emacs-module.c (module_make_global_ref)
- (module_free_global_ref, module_vec_size):
- Omit assertions that lisp.h now checks.
- * src/lisp.h (XFASTINT, ASIZE): In functional implementations,
- check that the result is nonnegative. Use eassume, as this
- info can help a bit when optimizing production code.
- (XSYMBOL) [!USE_LSB_TAG]: Assert that argument is a symbol,
- to be consistent with the USE_LSB_TAG case.
- (gc_asize): New function, when ASIZE is needed in the gc.
- (gc_aset): Use it.
- (HASH_TABLE_P): Move definition up, so that it can be used ...
- (XHASH_TABLE): ... here, to assert that the arg is a hash table.
+2015-12-24 Lars Ingebrigtsen <larsi@gnus.org>
-2015-11-21 Eli Zaretskii <eliz@gnu.org>
+ shr table rendering fix
- Simplify recording of main thread's ID on MS-Windows
+ * shr.el (shr-tag-table): Allow rendering body-less tables
+ that have headers.
- * src/w32term.c (w32_initialize):
- * src/w32console.c (initialize_w32_display):
- * src/w32fns.c (globals_of_w32fns): Don't record the main thread
- ID independently for each type of session (GUI, TTY, batch).
- * src/w32term.c (w32_init_main_thread): New function, records the
- main thread's thread ID.
- * src/w32term.h: Add prototype for w32_init_main_thread.
- * src/emacs.c (main) [WINDOWSNT]: Call w32_init_main_thread.
+2015-12-22 Sam Steingold <sds@gnu.org>
- * src/emacs-module.c [WINDOWSNT]: Rename main_thread_id to
- main_thread, for consistency with other threading libraries. All
- users changed. Include w32term.h.
- (check_main_thread) [WINDOWSNT]: Simplify the test: no need to
- make sure the main thread is alive, as we hold a handle on it
- opened by w32_init_main_thread.
- (module_init) [WINDOWSNT]: Reuse the thread ID recorded by
- w32_init_main_thread, instead of calling the requisite APIs once
- more.
+ clipboard should still work even if interprogram-* is disabled
-2015-11-21 Mark Oteiza <mvoteiza@udel.edu>
+ (clipboard-yank): When `interprogram-cut-function' is nil,
+ bind it to `gui-selection-value' - the default value.
+ (clipboard-kill-region, clipboard-kill-ring-save): When
+ `interprogram-paste-function' is nil, bind it to `gui-select-text' -
+ the default value.
- Backport: Fix issue where a new tempfile was created every refresh
+2015-12-18 Phillip Lord <phillip.lord@russet.org.uk>
- * lisp/mpc.el (mpc-format): Leave dir as relative path
+ Fix bootstrap issue with dired-loaddefs
-2015-11-21 Eli Zaretskii <eliz@gnu.org>
+ * lisp/dired.el: Autoloads for secondary files loaded optionally.
- Call 'window-size-change-functions' for mini-windows
+2015-12-17 Phillip Lord <phillip.lord@russet.org.uk>
- * src/window.c (grow_mini_window, shrink_mini_window): Set the
- frame's 'window_sizes_changed' flag.
- * src/xdisp.c (redisplay_internal): Call the hooks on
- 'window-size-change-functions' if the call to 'echo_area_display'
- sets the frame's 'window_sizes_changed' flag.
- (syms_of_xdisp) <window-size-change-functions>:
- Update doc string to indicate the mini-window resizes trigger a
- call to the hooks, and don't promise that will happen "before
- redisplay". (Bug#19576, Bug#21333)
+ dired generate autoloads to non-versioned file.
- * doc/lispref/windows.texi (Window Hooks): Update the description
- of 'window-size-change-functions'.
+ * lisp/dired.el: Remove autoloads.
+ * lisp/Makefile.in: Add dired to autogenel.
+ * lisp/dired-aux.el,lisp/dired-x.el: Update file local.
+ * test/lisp/dired-tests.el: Add new test.
-2015-11-21 Eli Zaretskii <eliz@gnu.org>
+2015-12-17 Phillip Lord <phillip.lord@russet.org.uk>
- Improve documentation of dynamic modules
+ eieio generate autoloads to non-versioned file.
- * src/fns.c (Frequire): Doc fix to include the dynamic module
- support.
- * src/lread.c (Fload, Vload_suffixes): Doc fixes to include the
- dynamic module support.
- (Fload): Treat the module suffix the same as '*.el' and '*.elc'
- wrt the MUST-SUFFIX argument.
+ * lisp/Makefile.in: eieio-loaddefs add to autogenel.
+ * lisp/emacs-lisp/eieio.el,lisp/emacs-lisp/eieio-core.el:
+ Remove autoloads.
+ * lisp/emacs-lisp/eieio-compat.el,lisp/emacs-lisp/eieio-custom.el,
+ lisp/emacs-lisp/eieio-opt.el: Update file local.
+ * test/lisp/emacs-lisp/eieio-tests/eieio-tests.el: New test.
- * etc/NEWS: Expand documentation of dynamically loaded modules.
+2015-12-17 Phillip Lord <phillip.lord@russet.org.uk>
-2015-11-21 Philipp Stephani <phst@google.com> (tiny change)
+ htmlfontify generate autoload to non-versioned file.
- Initial documentation for dynamic modules
+ * lisp/Makefile.in: Add htmlfontity-loaddefs to autogenel.
+ * lisp/hfy-cmap.el: Update file local.
+ * lisp/htmlfontify.el: Remove autoloads, add require.
+ * test/lisp/htmlfontify-tests.el: Test autoload functionality.
- * etc/NEWS: Mention the new support for dynamically loaded modules.
+2015-12-17 Phillip Lord <phillip.lord@russet.org.uk>
-2015-11-21 Dmitry Gutov <dgutov@yandex.ru>
+ ibuffer generate autoloads to non-versioned file.
- Add xref--etags-backend to xref-backing-functions using add-hook
+ * lisp/Makefile.in: Add ibuffer-loaddefs to autogenel.
+ * lisp/ibuf-ext.el: Update file local.
+ * lisp/ibuffer.el: Remove autoloads and add a require.
+ * test/lisp/ibuffer-tests.el: Test that autoload is working.
- * lisp/progmodes/xref.el (xref-backend-functions): Move the
- default value into a separate `add-hook' call (bug#21964).
+2015-12-17 Phillip Lord <phillip.lord@russet.org.uk>
- * lisp/progmodes/elisp-mode.el (emacs-lisp-mode):
- Don't declare the xref-backend-functions variable.
- It doesn't make any difference.
+ rmail generate autoloads to non-versioned file.
-2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/Makefile.in: Add rmail-loaddefs.el to autogenel.
+ * lisp/mail/rmail.el: Remove autoloads, add require.
+ * lisp/mail/rmailedit.el,lisp/mail/rmailkwd.el,
+ lisp/mail/rmailmm.el,lisp/mail/rmailmsc.el,
+ lisp/mail/rmailsort.el,lisp/mail/rmailsum.el,
+ lisp/mail/undigest.el: Update file-local.
+ * test/lisp/mail/rmail-tests.el:
- Fix double-decrement bug when freeing global refs
+2015-12-17 Phillip Lord <phillip.lord@russet.org.uk>
- * src/emacs-module.c (module_free_global_ref): Add a FIXME
- comment about error reporting. Fix a recently-introduced typo
- that double-decremented the refcount.
+ Add autoload-force target.
-2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/Makefile.in (autoload-force): New target.
- Declare emacs_module_init in the module API
+2015-12-17 Phillip Lord <phillip.lord@russet.org.uk>
- * src/emacs-module.h (emacs_module_init): New decl.
- Without it, GCC might complain about a module that defines
- emacs_module_init without using it. This also checks the
- API better.
+ ps-print generate autoloads to non versioned file.
-2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/Makefile.in: Add ps-print-loaddefs.el to autogen list.
+ * lisp/ps-print.el: Remove autoloads.
+ * lisp/ps-mule.el: Update file-local.
+ * test/lisp/ps-print-tests.el: Test autoload functionality.
- Fix module test to use ptrdiff_t nargs too
+2015-12-17 Phillip Lord <phillip.lord@russet.org.uk>
- * modules/mod-test/mod-test.c (Fmod_test_return_t)
- (Fmod_test_sum, Fmod_test_signal, Fmod_test_throw)
- (Fmod_test_non_local_exit_funcall, Fmod_test_globref_make)
- (Fmod_test_string_a_to_b, Fmod_test_userptr_make)
- (Fmod_test_userptr_get, Fmod_test_vector_fill)
- (Fmod_test_vector_eq): Arg counts are ptrdiff_t, not int.
- (finalizer): Remove; no longer used.
+ reftex generate autoloads to non versioned file.
-2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/Makefile.in: Add reftex-loaddefs to autogen files
+ * lisp/textmodes/reftex.el: Remove autoloads.
+ * lisp/textmodes/reftex-auc.el,lisp/textmodes/reftex-cite.el,
+ lisp/textmodes/reftex-dcr.el,lisp/textmodes/reftex-global.el,
+ lisp/textmodes/reftex-index.el,lisp/textmodes/reftex-parse.el,
+ lisp/textmodes/reftex-ref.el,lisp/textmodes/reftex-sel.el,
+ lisp/textmodes/reftex-toc.el: Update autoload file-local.
+ * test/lisp/textmodes/reftex-tests.el: Add test of an autoloaded
+ function.
- Fix reindent-introduced typo in module code
+2015-12-07 Stefan Monnier <monnier@iro.umontreal.ca>
- * src/emacs-module.c (MODULE_SETJMP_1): Fix typo that I
- introduced while reindenting the code earlier, and add a
- comment explaining the unusual use of do-while here.
+ * lisp/calculator.el (calculator-define-key): Undo last change
-2015-11-20 Anders Lindgren <andlind@gmail.com>
+ Make map argument mandatory instead (bug#22106).
+ (calculator-add-operators): Pass the argument that's not optional any more.
- Fixed bug#19576: `write-file' saves wrong buffer.
+2015-12-03 Glenn Morris <rgm@gnu.org>
- If a function on the hook `window-size-change-functions' doesn't
- restore the current buffer, functions that save and restore the
- current window configuration (like `y-or-no-p') could silently
- change the current buffer. When `write-file' asked the user
- confirmation to overwrite a file, `y-or-no-p' changed the current
- buffer, and the wrong buffer was saved to the file.
+ * Makefile.in: Avoid duplication.
- * lisp/follow.el (follow-windows-start-end): Call `select-frame'
- using the `norecord' parameter.
- (follow-window-size-change): Restore current buffer. Call
- `select-frame' using the `norecord' parameter. Cleanup.
+ (have-tests): New rule.
+ (check, check-maybe): Use it.
-2015-11-20 John Wiegley <johnw@newartisans.com>
+2015-12-02 Phillip Lord <phillip.lord@russet.org.uk>
- Correct a documentation error in frames.texi
+ make check unconditional, check-maybe top-level.
-2015-11-20 Stephen Leake <stephen_leake@stephe-leake.org>
+ * Makefile.in: Add check-maybe target.
+ * test/Makefile.in: Restore unconditional behaviour to make check.
- * lisp/cedet/mode-local.el: Delete obsolete comment
+2015-12-01 Phillip Lord <phillip.lord@russet.org.uk>
-2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
+ Tests now support out-of-source-build.
- Module function arg counts are ptrdiff_t, not int
+ * tests/Makefile.in,test/make-test-deps.emacs-lisp: Remove assumptions
+ about current working directory.
- * src/emacs-module.c (struct module_fun_env)
- (module_make_function, module_funcall, Fmodule_call):
- * src/emacs-module.h (struct emacs_runtime, struct emacs_env_25):
- Use ptrdiff_t, not int, for arg counts.
- * src/emacs-module.c (module_make_function): Don’t bother
- checking arity against MOST_POSITIVE_FIXNUM, as that’s
- unnecessary here. Make the checking clearer by negating it.
- (module_make_function, Fmodule_call): No need to use xzalloc
- since the storage doesn’t need to be cleared.
- (module_funcall): Don’t use VLA, since C11 doesn’t guarantee support
- for it, and many implementations are buggy with large VLAs anyway.
- Use SAFE_ALLOCA_LISP instead.
- (module_vec_set): Don’t crash if i < 0.
- (module_vec_get): Don’t crash if i < MOST_NEGATIVE_FIXNUM.
- (module_vec_set, module_vec_get): Do fixnum checks only when
- i is out of array bounds, for efficiency in the usual case.
- (Fmodule_load): Simplify fixnum range check.
- (Fmodule_call): Simplify arity check. Use xnmalloc to detect
- integer overflow in array allocation size.
+2015-12-01 Artur Malabarba <bruce.connor.am@gmail.com>
-2015-11-20 Eli Zaretskii <eliz@gnu.org>
+ * lisp/emacs-lisp/let-alist.el: Now an Elpa :core package
- Minor improvements in module test
+2015-11-30 Phillip Lord <phillip.lord@russet.org.uk>
- * modules/mod-test/mod-test.c: Include stdlib.h, to avoid warnings
- about missing prototype of malloc.
- * modules/mod-test/Makefile (CFLAGS): Add -std=gnu99, to avoid
- compiler warnings.
+ Improve documentation and clean up.
-2015-11-20 Eli Zaretskii <eliz@gnu.org>
+ * test/Makefile.in: Improve documentation, use EMACS variable
+ correctly, and clean up makefile rules.
- Improve MS-Windows implementation in dynlib.c
+2015-11-30 Phillip Lord <phillip.lord@russet.org.uk>
- * src/dynlib.c [WINDOWSNT]: Include errno.h, lisp.h, and w32.h.
- No need to include windows.h, as w32.h already does that.
- <dynlib_last_err>: New static variable.
- (dynlib_reset_last_error): New function.
- (dynlib_open): Convert forward slashes to backslashes. Convert
- file names from UTF-8 to either UTF-16 or the current ANSI
- codepage, and call either LoadLibraryW or LoadLibraryA. If the
- argument is NULL, return a handle to the main module, like
- 'dlopen' does. Record the error, if any, for use by dynlib_error.
- (dynlib_sym): Check the handle for validity. Record the error, if
- any, for use by dynlib_error.
- (dynlib_error): Call w32_strerror to produce the error string, and
- zero out the last error code, like dlerror does.
- (dynlib_close): Check the handle for validity. Record the error,
- if any, for use by dynlib_error. Don't call FreeLibrary with a
- handle for the main module.
- * src/w32.c (globals_of_w32): Call dynlib_reset_last_error.
+ Update file headers for name change.
-2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
+ * (test/src/decompress-tests.el, test/src/alloc-tests.el): Update headers.
- Include-file tweaks for modules
+2015-11-30 Phillip Lord <phillip.lord@russet.org.uk>
- * src/dynlib.c, src/emacs-module.c: Include <config.h> first.
- * src/dynlib.h: Do not include config.h.
- It’s every .c file’s responsibility to include config.h first.
- * src/emacs-module.c: Include emacs-module.h immediately after
- config.h, to test that emacs-module.h doesn’t depend on
- include files other than config.h.
+ Test files renamed to new scheme.
-2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
+ * (finalizer-tests.el): Now renamed alloc-tests.el
+ * (zlib-tests.el): Now renamed decompress-tests.el.
- Simplify push_handler and profile its malloc
+2015-11-30 Phillip Lord <phillip.lord@russet.org.uk>
- * src/lisp.h (PUSH_HANDLER): Remove.
- All callers changed to use push_handler directly.
- * src/eval.c (internal_condition_case)
- (internal_condition_case_1, internal_condition_case_2)
- (internal_condition_case_n):
- Use same pattern as for other invokers of push_handler.
- (push_handler, push_handler_nosignal): Use call-by-value
- instead of call-by-reference. All uses changed.
- (push_handler): Simplify by rewriting in terms of
- push_handler_nosignal.
- (push_handler_nosignal): Profile any newly allocated memory.
+ Tests now depend on source files
-2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
+ * test/Makefile.in: Include dependences from tests to source files.
+ * test/make-test-deps.emacs-lisp: New file
+ * .gitignore: Ignore generated make include file
- * src/emacs-module.h: Include stddef.h, not stdlib.h.
+2015-11-30 Stefan Monnier <monnier@iro.umontreal.ca>
-2015-11-20 Juanma Barranquero <lekktu@gmail.com>
+ * lisp/progmodes/which-func.el: Improve disabling the mode
- Discover repository version in linked worktrees (bug#21930)
+ Use lexical-binding.
+ (which-func-modes, which-func-non-auto-modes, which-func-maxout)
+ (which-func, which-func-format): Remove redundant :group arg.
+ (which-func-try-to-enable): New function.
+ (which-func-ff-hook, which-function-mode): Use it.
+ (mode-line-misc-info): Add ourselves here instead of in bindings.el.
+ * lisp/bindings.el (mode-line-misc-info): Remove which-func-mode entry.
- * lisp/version.el (emacs-repository--version-git-1): Do not assume
- HEAD is at .git/HEAD, it can also be at .git/worktrees/<branch>/HEAD.
- (emacs-repository-get-version): Grok linked worktrees when EXTERNAL
- is nil too.
+2015-11-30 Stefan Monnier <monnier@iro.umontreal.ca>
-2015-11-20 Juri Linkov <juri@linkov.net>
+ * lisp/calculator.el (calculator-define-key): Silence warning
- * lisp/replace.el (occur-regexp-descr): New function.
- (occur-1, occur-engine): Use it.
+ ...about unknown calculator-mode-map.
- * lisp/isearch.el (isearch-occur): Propertize regexp with
- isearch-string and isearch-regexp-function-descr for
- occur-regexp-descr to display the correct description
- message in the header (bug#21176, bug#21180).
+2015-11-29 Eli Barzilay <eli@barzilay.org>
-2015-11-20 Karl Fogel <kfogel@red-bean.com>
+ * lisp/calculator.el: more improvements and bugfixes.
- Revert `open-line' electric-indent sensitivity
+ - Mark `calculator-paste-decimals' as obsolete. (It wasn't having an
+ effect anyway.)
- * lisp/simple.el (open-line): Remove electric indent code.
- (electric-indent-just-newline): Don't declare.
+ - Simplify `calculator-number-to-string' by throwing most of the work
+ onto `number-to-string', leaving just some tweaks for decimal inputs.
+ This leads to some minor changes, for example, pasting "1x1" in hex
+ mode would warn that "x" is ignored and result in "11" (and it wasn't
+ done in decimal mode), whereas now it just ignores everything from the
+ "x" and on and result in a "1" just like in decimal input mode. Also,
+ overflows are left for `number-to-string' to deal with.
- * test/automated/simple-test.el (open-line-indent): Adjust test.
+ - `calculator-paste' is very simple as a result.
- This partly reverts Artur Malabarba's change that added electric
- indent sensitivity to `open-line' (Oct 24 22:26:27 2015 +0100, git
- commit bd4f04f86), and adjusts a new test he added right afterwards
- (Sat Oct 24 23:43:06 2015 +0100, git commit 207f235e3) accordingly.
- However, the new INTERACTIVE argument to `open-line', which he also
- added in the first commit, is not reverted here.
+ - Extend the simplified `calculator-paste': with a prefix argument it
+ pastes a string as if the characters were entered. This can be used
+ to reduce expressions, but note that it's a simple literal operation,
+ so precedence can be messed, a number can be paster while entering a
+ number, spaces and newlines matter, etc.
- See the thread "Questioning the new behavior of `open-line'." on the
- Emacs Devel mailing list, and in particular this message:
+ - Fix a minor bug where "e+" in hex mode wouldn't use "+" as an
+ operator.
- From: Artur Malabarba
- Subject: Re: Questioning the new behavior of `open-line'.
- To: Karl Fogel
- Cc: David Kastrup, Pierpaolo Bernardi, emacs-devel
- Date: Wed, 18 Nov 2015 21:03:58 +0000
- Message-ID: \
- <CAAdUY-KN06pvCMy5bt3+Buk3yeKjf6n9iB2FaSTTOPpCqPwyhA@mail.gmail.com>
+ - Fix a bug in `calculator-put-value': avoid grouping in the display
+ that is used to construct `calculator-curnum'. This would trigger
+ when pasting or getting a value from a register in some radix mode
+ with a large enough value. Another fix: make the output radix equal
+ the input one, otherwise numbers could be converted twice.
- https://lists.gnu.org/archive/html/emacs-devel/2015-11/msg01707.html
+2015-11-29 Eli Barzilay <eli@barzilay.org>
-2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/calculator.el: Re-do key bindings.
- Omit unnecessary clear in Fmodule_load
+ Use a helper function that arranges a parent keymap that binds alternate
+ case keys so if some letter key is unbound and it's un/shifted version
+ is, it will get used. This makes the global-map trickery unnecessary.
- * src/emacs-module.c (Fmodule_load):
- Simplify and avoid unnecessary initialization of priv member to 0.
+ Also switch to passing strings that name keys through `kbd'.
- * src/emacs-module.c: (module_vec_set, module_vec_get, module_vec_size)
+2015-11-29 Eli Barzilay <eli@barzilay.org>
-2015-11-20 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/calculator.el: improve radix modes
- Prefer signed integer types in module code
+ Fix prompt for some input radix with decimal output (eg, "BD" instead of
+ the incorrect "B="); also, some minor docstring tweaks for these.
- Generally speaking, at the C level the Emacs source code prefers
- signed types like ‘ptrdiff_t’ to unsigned types like ‘size_t’,
- partly to avoid the usual signedness confusion when comparing values.
- Change the module API to follow this convention.
- Use ‘int’ for small values that can’t exceed INT_MAX.
- * modules/mod-test/mod-test.c (Fmod_test_globref_make)
- (Fmod_test_string_a_to_b, Fmod_test_vector_fill)
- (Fmod_test_vector_eq):
- * src/emacs-module.c (struct emacs_value_frame)
- (module_make_global_ref, module_free_global_ref)
- (module_copy_string_contents, module_make_string)
- (module_vec_set, module_vec_get, module_vec_size):
- * src/emacs-module.h (struct emacs_runtime, struct emacs_env_25):
- * src/lread.c (suffix_p):
- Prefer signed to unsigned integer types.
+2015-11-29 Eli Barzilay <eli@barzilay.org>
-2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/calculator.el: better reading of register names
- Omit ‘const’ on locals
+ Use `register-read-with-preview' with a dynamically bound
+ `register-alist' and a proper preview function to read register names.
- Remove ‘const’ qualifier from locals that were newly added.
- We don’t normally bother declaring locals with ‘const’ even
- though they are not modified, for the same reason we don’t
- bother declaring them with ‘register’ even though their
- addresses are not taken; the advantage in compile-time
- checking isn’t worth the loss of readability.
- * modules/mod-test/mod-test.c (Fmod_test_non_local_exit_funcall)
- (Fmod_test_vector_fill, Fmod_test_vector_eq):
- * src/emacs-module.c (MODULE_SETJMP_1)
- (module_make_global_ref, module_free_global_ref)
- (module_non_local_exit_get, module_make_function)
- (module_extract_integer, module_extract_float)
- (module_get_user_ptr, module_set_user_ptr)
- (module_get_user_finalizer, module_set_user_finalizer)
- (module_vec_get, Fmodule_call)
- (module_non_local_exit_signal_1)
- (module_non_local_exit_throw_1, lisp_to_value)
- (finalize_storage, allocate_emacs_value, mark_modules)
- (module_handle_signal, module_handle_throw)
- (module_format_fun_env):
- * src/eval.c (push_handler, push_handler_nosignal)
- (init_handler):
- * src/lread.c (suffix_p):
- Omit unnecessary ‘const’.
+2015-11-29 Eli Barzilay <eli@barzilay.org>
-2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/calculator.el: General improvements
- Prefer intmax_t to int64_t in module code
+ Use things like `when', `unless', and `push'.
- * modules/mod-test/mod-test.c (sum, Fmod_test_sum):
- * src/emacs-module.c (module_extract_integer)
- (module_make_integer):
- * src/emacs-module.h (struct emacs_env_25):
- Prefer intmax_t to int64_t. This doesn’t change the generated
- code on any of the machines Emacs currently ports to, but it’s
- at least in theory more future-proof as C99 doesn’t guarantee
- that int64_t exists.
+ Improve `calculator-last-input' so it doesn't barf when hitting `F1' in
+ non-electric mode.
-2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
+2015-11-28 Michael Albinus <michael.albinus@gmx.de>
- Rename module.c to emacs-module.c, etc.
+ Fix a problem with gfilenotify in filenotify-tests.el
- * src/emacs-module.c: Rename from src/module.c.
- * src/emacs-module.h: Rename from src/module.h.
- All uses changed.
+ * test/lisp/filenotify-tests.el
+ (file-notify--test-expected-events): Remove.
+ (file-notify--test-cleanup): Do not set that variable.
+ (file-notify--test-with-events): EVENTS can also be a list of lists.
+ (file-notify-test02-events, file-notify-test04-file-validity):
+ Adapt expected result.
-2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
- Fix minor module problems found by static checking
+ * .gitignore: Adjust to changes in 'test' directory structure.
- * src/dynlib.c (dynlib_close): #ifdef out for now, as it’s not used.
- * src/eval.c, src/lisp.h (lisp_eval_depth): Now static.
- * src/emacs-module.c (Fmodule_load): Fix pointer signedness bug.
- (Fmodule_call): Tell GCC that the default case is unreachable.
+2015-11-28 Eli Zaretskii <eliz@gnu.org>
-2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
+ Fix test/manual/etags/Makefile
- Style fixes for indenting etc. in module code
+ * test/manual/etags/Makefile (ETAGS_PROG, CTAGS_PROG): Adjust to
+ changes in 'test' directory structure.
- This is mostly indenting and spacing changes. Also, remove
- some unnecessary static decls instead of bothering to reindent them.
- * src/emacs-module.h (EMACS_EXTERN_C_BEGIN): Remove, and do this inline,
- as most other Emacs files do for this sort of thing.
+2015-11-27 Phillip Lord <phillip.lord@russet.org.uk>
-2015-11-19 Eli Zaretskii <eliz@gnu.org>
+ Exclude resource dirs from search for tests.
- Minor improvements in modules testing Makefile
+ * test/Makefile.in: Test file locations are now found with find
+ rather than using finds native functions.
- * modules/mod-test/Makefile (EMACS, SO): New variables.
- (CFLAGS): When SO = dll, don't use -fPIC.
- (check): New target, runs the test.
+2015-11-27 Phillip Lord <phillip.lord@russet.org.uk>
-2015-11-19 Eli Zaretskii <eliz@gnu.org>
+ Add test targets without directory names.
- * .gitignore: Add "*.dll".
+ * (test/Makefile.in): Extend test_template to add two targets for each
+ file.
-2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
+2015-11-27 Artur Malabarba <bruce.connor.am@gmail.com>
- Migrate modules/.gitignore into .gitignore
+ * lisp/emacs-lisp/package.el: Require url-handlers
- * .gitignore: Add former contents of modules/.gitignore.
- * modules/.gitignore: Remove.
+2015-11-27 Phillip Lord <phillip.lord@russet.org.uk>
-2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
+ Move elisp-mode-tests to new function names.
- Add copyright notices to module code
+ * test/lisp/progmodes/elisp-mode-tests.el (find-defsdefun-c-defvar-c,
+ find-defs-defun-el-defvar-c): Call `elisp--xref-find-definitions'.
- Put them in the usual format for GNU Emacs copyright notices.
+2015-11-27 Juanma Barranquero <lekktu@gmail.com>
-2015-11-19 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/emacs-lisp/package.el: Declare `url-insert-buffer-contents'
- Rename emacs_module.h to module.h
+2015-11-26 Phillip Lord <phillip.lord@russet.org.uk>
- * src/module.h: Rename from src/emacs_module.h.
- All uses changed.
+ Merge branch 'feature/standard-test-location'
-2015-11-19 Juanma Barranquero <lekktu@gmail.com>
+2015-11-25 Stefan Monnier <monnier@iro.umontreal.ca>
- * src/module.c (Fmodule_load): Remove unused vars `doc_name', `args'
+ * lisp/emacs-lisp/eieio.el: Add some default implementations
- * src/lread.c (Fload): Remove unused variable `size'
+ (standard-class): Mark it obsolete.
+ (slot-missing): Give it a default implementation.
+ (destructor): Simplify and mark it obsolete.
+ (object-print): Give it a default implementation.
+ (eieio-change-class): Rename from change-class.
+ (change-class): Redefine as obsolete alias.
-2015-11-19 Alan Mackenzie <acm@muc.de>
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
- src/keyboard.c (pre-command-hook): Fix typo in doc string: "pre" -> "post".
+ Some final fixes in file notification before merging with master
-2015-11-19 Dmitry Gutov <dgutov@yandex.ru>
+ * lisp/filenotify.el (file-notify--rm-descriptor): Remove WHAT arg.
+ (file-notify-callback): Improve check for `stopped' event. Call
+ `file-notify-rm-watch' rather than `file-notify--rm-descriptor'.
+ (file-notify-add-watch): In case FILE is not a directory, call the
+ file monitor for the kqueue backend. Otherwise, call the
+ directory monitor for the upper directory.
- Prioritize looking inside vc-parent-buffer over log-view-mode fallback
+ * src/inotify.c (inotifyevent_to_event): Extract file name from
+ watch_object if the event doesn't provide it.
+ (Finotify_add_watch): Add file name to watch_object.
- * lisp/vc/vc.el (vc-deduce-fileset): Prioritize looking inside
- vc-parent-buffer over log-view-mode fallback (bug#21955).
+ * test/automated/file-notify-tests.el (file-notify--test-timeout):
+ Use different timeouts for different libraries.
+ (file-notify--test-with-events): Suppress lock files. Flush
+ outstanding events before running the body.
+ (file-notify-test02-events, file-notify-test04-file-validity): Do
+ not skip cygwin tests. Add additional test for file creation.
+ Adapt expected result for different backends.
+ (file-notify-test03-autorevert): Some of the tests don't work for
+ w32notify.
+ (file-notify-test06-many-events): Rename into both directions.
-2015-11-18 Alan Mackenzie <acm@muc.de>
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
- lisp/isearch.el: Eliminate macro isearch-call-message, replacing with funcall.
+ Rework file notifications, kqueue has problems with directory monitors
-2015-11-18 Ken Brown <kbrown@cornell.edu>
+ * lisp/filenotify.el (file-notify-add-watch): Call the native
+ add-watch function on the file, not on the dir.
- * configure.ac (LIBMODULES): Don’t define on Cygwin
+ * src/kqueue.c (kqueue_compare_dir_list): Make also bookkeeping
+ about already deleted entries.
-2015-11-18 Eli Zaretskii <eliz@gnu.org>
+ * test/automated/auto-revert-tests.el
+ (auto-revert-test01-auto-revert-several-files): Do not call "cp -f"
+ since this deletes the target file first.
- Fix MS-Windows build --with-modules
+ * test/automated/file-notify-tests.el (file-notify--test-event-test):
+ Make stronger checks.
+ (file-notify-test01-add-watch, file-notify-test02-events)
+ (file-notify-test04-file-validity, file-notify-test05-dir-validity):
+ Rewrite in order to call file monitors but directory monitors.
+ (file-notify-test06-many-events): Ler rename work in both directions.
- * src/module.c: Reformat copyright commentary.
- (module_vec_get): Use explicit cast to size_t to avoid compiler
- warning in 32-bit builds.
- (check_main_thread) [WINDOWSNT]: Fix letter-case in Windows APIs.
- Compare thread IDs directly, as GetThreadId is not available
- before Windows Vista.
- (check_main_thread) [WINDOWSNT]: Duplicate the thread handle
- without using APIs and constants not available on XP and older
- systems. Obtain and store the thread ID as well.
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
-2015-11-18 Aurélien Aptel <aurelien.aptel@gmail.com>
- Philipp Stephani <phst@google.com>
+ Continue with pending events
- Add dynamic module test and helper script
+ * src/kqueue.c (pending_events): Remove global variable.
+ (kqueue_compare_dir_list): Create `write' event for not used
+ pending events.
+ (globals_of_kqueue): Remove initialization of pending_events.
- Add 'modhelp.py' script (python2) to automate module testing and
- module generation.
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
- To build and test all modules in the modules/ dir
- $ ./modhelp.py test
+ Improve loops in file-notify-test06-many-events
- To generate a module from template code (good starting point)
- $ ./modhelp init mynewtestmodule
+ * test/automated/file-notify-tests.el (file-notify-test06-many-events):
+ Use `read-event' pauses for the `write-file' loops; otherwise
+ events are lost in inotify and gfilenotify cases.
- See the script -h option for more documentation.
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
- * modules/modhelp.py: New module helper script.
- * modules/mod-test/Makefile: New file. Makefile for the test module.
- * modules/mod-test/mod-test.c: New file. Test module source file.
- * modules/mod-test/test.el: New file. ert test suite for the test module.
- * modules/.gitignore: New file. Local .gitignore file.
+ Handle more complex rename operation in kqueue
-2015-11-18 Aurélien Aptel <aurelien.aptel@gmail.com>
+ * src/kqueue.c (pending_events): New variable.
+ (kqueue_compare_dir_list): Handle more complex rename operation.
+ (globals_of_kqueue): Initialize pending_events.
- Make 'Fload' look for modules
+ * test/automated/file-notify-tests.el (file-notify-test06-many-events):
+ Adapt expected events in the `rename-file' case.
+ (file-notify-test06-many-events-remote): Declare.
- 'Fload' can now load dynamic modules. This also makes 'require' work.
+2015-11-25 Wolfgang Jenkner <wjenkner@inode.at>
- * src/lread.c:
- (suffix_p): New function.
- (Fload): Use 'suffix_p'. Call 'Fmodule_load' when we try to load a file
- with a module suffix.
- (syms_of_lread): Append module suffix to 'Vload_suffixes'.
+ New test with a larger number of events
-2015-11-18 Aurélien Aptel <aurelien.aptel@gmail.com>
- Philipp Stephani <phst@google.com>
+ * test/automated/file-notify-tests.el (file-notify--test-with-events):
+ Make timeout heuristically depend on the number of events.
- Add dynamic module module support
+ (file-notify-test06-many-events): Use it for new test.
- * configure.ac: Add '--with-modules' option. Conditionally add
- dynlib.o and module.o to the list of objects. Add any system
- specific flags to the linker flags to support dynamic libraries.
- * m4/ax_gcc_var_attribute.m4: Add autoconf extension to test gcc
- attributes.
- * src/Makefile.in: Conditionally add module objects and linker flags.
- * src/alloc.c (garbage_collect_1): protect module local values from
- GC.
- * src/lisp.h: Add 'module_init' and 'syms_of_module' prototypes.
- * src/emacs-module.h: New header file included by modules. Public
- module API.
- * src/emacs-module.c: New module implementation file.
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
-2015-11-18 Aurélien Aptel <aurelien.aptel@gmail.com>
+ Further fixes for kqueue
- Add new User Pointer (User_Ptr) type
+ * lisp/filenotify.el (file-notify-callback): Raise also event if
+ directory name matches.
+ (file-notify-add-watch): Add `create' to the flags for `kqueue'.
- * src/lisp.h: Add new Lisp_Misc_User_Ptr type.
- (XUSER_PTR): New User_Ptr accessor.
- * src/alloc.c (make_user_ptr): New function.
- (mark_object, sweep_misc): Handle Lisp_Misc_User_Ptr.
- * src/data.c (Ftype_of): Return 'user-ptr' for user pointer.
- (Fuser-ptrp): New user pointer type predicate function.
- (syms_of_data): New 'user-ptrp', 'user-ptr' symbol. New 'user-ptrp'
- subr.
- * src/print.c (print_object): Add printer for User_Ptr type.
+ * src/kqueue.c (kqueue_generate_event): Use watch_object as
+ argument instead of ident. Remove callback argument. Adapt
+ callees. Check actions whether they are monitored flags.
-2015-11-18 Aurélien Aptel <aurelien.aptel@gmail.com>
- Philipp Stephani <phst@google.com>
+ * test/automated/file-notify-tests.el (file-notify--test-library):
+ New defun.
+ (file-notify-test00-availability, file-notify-test02-events)
+ (file-notify-test04-file-validity)
+ (file-notify-test05-dir-validity): Use it.
+ (file-notify-test02-events, file-notify-test04-file-validity): Add
+ `read-event' calls between different file actions, in order to
+ give the backends a chance to rais an event. Needed especially
+ for kqueue. In case of deleting a directory, there are two
+ `deleted' events.
- Add portable layer for dynamic loading
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
- * src/dynlib.h: New file.
- * src/dynlib.c: New file.
+ Code cleanup of kqueue.c
-2015-11-18 Philipp Stephani <phst@google.com>
+ * src/kqueue.c (kqueue_directory_listing): Skip "." and "..".
+ (kqueue_compare_dir_list): Do not loop when calling
+ directory_files_internal. Remove checks for "." and "..", this is
+ done in kqueue_directory_listing now.
+ (Fkqueue_add_watch): Check for proper emacs_open flags.
- Add catch-all & no-signal version of PUSH_HANDLER
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
- Ground work for modules. Add a non-signaling version of PUSH_HANDLER and
- a new "catch-all" handler type.
+ Doc changes for kqueue
- * src/eval.c (init_handler, push_handler, push_handler_nosignal): New
- functions.
- * src/fns.c (hash_remove_from_table): Expose function public.
- * src/lisp.h: New handler type, define macro to push_handler call.
+ * doc/lispref/os.texi (File Notifications): Add kqueue as backend.
+ Fix some glitches in the example.
-2015-11-18 Ken Brown <kbrown@cornell.edu>
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
- Silence byte-compiler warning
+ Finish implementation in kqueue.c
- * lisp/server.el (server-process-filter): Silence byte-compiler
- warning.
+ * src/kqueue.c (kqueue_directory_listing, kqueue_callback):
+ Simplify access to list.
+ (kqueue_compare_dir_list): Simplify access to list. Raise
+ `delete' event if directory does not exist any longer. Otherwise,
+ wait until directory contents has changed. Fix error in check.
-2015-11-18 Paul Eggert <eggert@cs.ucla.edu>
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
- Quote symbols in docstrings using `'
+ * lisp/filenotify.el (file-notify-add-watch): Fix thinko.
- Be more systematic about quoting symbols `like-this' rather than
- `like-this or 'like-this' in docstrings. This follows up Artur
- Malabarba's email in:
- http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg01647.html
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
-2015-11-18 Peder O. Klingenberg <peder@klingenberg.no>
+ More work on kqueue
- Fix savegames in dunnet
+ * lisp/filenotify.el (file-notify-callback): Handle also the
+ `rename' event from kqueue.
+ (file-notify-add-watch): Do not register an entry twice.
- * lisp/play/dunnet.el (dun-rot13): Use the standard rot13-region instead
- of separate implementation.
+ * src/kqueue.c (kqueue_directory_listing): New function.
+ (kqueue_generate_event): New argument FILE1. Adapt callees.
+ (kqueue_compare_dir_list): Rewrite in order to make it more robust.
-2015-11-18 Artur Malabarba <bruce.connor.am@gmail.com>
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
- * lisp/emacs-lisp/package.el (package--with-response-buffer):
+ Implement directory events
- Ensure we're at the start of the buffer before searching for
- the end of headers.
+ * lisp/filenotify.el (file-notify-handle-event)
+ (file-notify-callback): Remove traces.
-2015-11-18 Xue Fuqiao <xfq.free@gmail.com>
+ * src/kqueue.c: Include <sys/time.h>.
+ (kqueue_generate_event, kqueue_compare_dir_list): New functions.
+ (kqueue_callback): Use them. Call kevent() with a zero timeout.
+ (Fkqueue_add_watch): Adapt docstring. Support directory events.
+ Compute initial directory listing. Close file descriptor in case
+ of errors.
+ (syms_of_kqueue): Declare Qcreate.
- * admin/release-process: Improve wording.
+2015-11-25 Wolfgang Jenkner <wjenkner@inode.at>
-2015-11-18 Xue Fuqiao <xfq.free@gmail.com>
+ Build fixes for kqueue support
- Backport: * CONTRIBUTE: Remove information about feature freeze.
+ * src/kqueue.c (Fkqueue_add_watch): O_BINARY is not a POSIX open(3)
+ flag.
- (cherry picked from commit ae0653b5ab9ee223751ec389b87011963e1cbbef)
+ * configure.ac (HAVE_KQUEUE): There is no pkg-config module for native
+ kqueue on *BSD.
-2015-11-18 Xue Fuqiao <xfq.free@gmail.com>
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
- Backport: Document the release process
+ Continue kqueue implementation
- * admin/notes/versioning: Add information about RC releases.
- * admin/release-process: Document the release process.
- * admin/authors.el (authors-ignored-files):
- * admin/README: Change FOR-RELEASE to release-process.
- * CONTRIBUTE:
- * admin/notes/bugtracker: Don't mention FOR-RELEASE.
+ * lisp/filenotify.el (file-notify-handle-event)
+ (file-notify-callback): Enable trace messages.
- (cherry picked from commit 9a4aa0f5945a03611ae29c516025dbd353bd26ab)
+ * src/kqueue.c: Include also <sys/types.h>.
+ (kqueue_callback): Remove watch in case of NOTE_DELETE or NOTE_RENAME.
+ (Fkqueue_rm_watch, Fkqueue_valid_p): New functions.
+ (syms_of_kqueue): Add them.
-2015-11-18 Xue Fuqiao <xfq.free@gmail.com>
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
- Backport: * admin/release-process: Rename from admin/FOR-RELEASE.
+ Work on kqueue
- (cherry picked from commit f8cc14b59700e51a4e31139c0a65c8154995e055)
+ * lisp/filenotify.el (file-notify--library)
+ (file-notify-descriptors, file-notify-callback)
+ (file-notify-add-watch, file-notify-rm-watch)
+ (file-notify-valid-p): Add kqueue support.
-2015-11-18 Xue Fuqiao <xfq.free@gmail.com>
+ * src/keyboard.c (make_lispy_event): Check also for HAVE_KQUEUE.
- Backport: Mention CONTRIBUTE in README
+2015-11-25 Michael Albinus <michael.albinus@gmx.de>
- Mention CONTRIBUTE in README, since it was moved from etc/ to root.
- * etc/TODO: Remove the reference to `etc/CONTRIBUTE'.
- * README: Mention CONTRIBUTE.
+ Add kqueue support
- (cherry picked from commit ed2e7e20ae0945288c98091f308f5460c3453873)
+ * configure.ac (--with-file-notification): Add kqueue.
+ (top): Remove special test for "${HAVE_NS}" and
+ ${with_file_notification}, this is handled inside gfilenotify
+ tests. Add kqueue tests. Use NOTIFY_CFLAGS and NOTIFY_LIBS
+ instead of library specific variables.
-2015-11-18 Paul Eggert <eggert@cs.ucla.edu>
+ * src/Makefile.in: Use NOTIFY_CFLAGS and NOTIFY_LIBS.
- Fix docstring quoting problems with ‘ '’
+ * src/emacs.c (main): Call globals_of_kqueue and syms_of_kqueue.
- Problem reported by Artur Malabarba in:
- http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg01513.html
- Most of these fixes are to documentation; many involve fixing
- longstanding quoting glitches that are independent of the
- recent substitute-command-keys changes. The changes to code are:
- * lisp/cedet/mode-local.el (mode-local-augment-function-help)
- (describe-mode-local-overload):
- Substitute docstrings before displaying them.
- * lisp/emacs-lisp/cl-macs.el (cl--transform-lambda):
- Quote the generated docstring for later substitution.
+ * src/kqueue.c: New file.
-2015-11-17 Eli Zaretskii <eliz@gnu.org>
+ * src/lisp.h: Declare extern globals_of_kqueue and syms_of_kqueue.
- Improve configure --help text for wide ints
+2015-11-24 Phillip Lord <phillip.lord@russet.org.uk>
+
+ Update elisp-mode-tests for changed file location.
+
+ * test/lisp/progmodes/elisp-mode-tests.el:
+
+2015-11-24 Phillip Lord <phillip.lord@russet.org.uk>
+
+ Exclude manual tests from Makefile
+
+ * test/Makefile.in:
+
+2015-11-24 Phillip Lord <phillip.lord@russet.org.uk>
+
+ Move package test files to new directory.
+
+ * test/lisp/emacs-lisp/package-tests.el: Update resoruce file location.
+ * test/data/package: Moved to test/lisp/emacs-lisp/package-resources
+
+2015-11-24 Phillip Lord <phillip.lord@russet.org.uk>
+
+ Restore delete Makefiles and fix .gitignore.
+
+ * .gitignore: Update Makefiles to changed locations
+ * test/lisp/progmodes/flymake-resources/Makefile,
+ test/manual/etags/Makefile,
+ test/manual/etags/make-src/Makefile,
+ test/manual/indent/Makefile: Restored and moved to new location.
+
+2015-11-24 Phillip Lord <phillip.lord@russet.org.uk>
+
+ Test infrastructure: updates after directory move
+
+ * (test/Makefile.in): Support directories several levels deep.
+ * (test/data/flymake): Rename to test/lisp/progmodes/flymake-resources.
+ * (test/lisp/progmodes/flymake-tests.el): Support renamed resource directory.
+
+2015-11-24 Phillip Lord <phillip.lord@russet.org.uk>
+
+ Rename all test files to reflect source layout.
+
+ * CONTRIBUTE,Makefile.in,configure.ac: Update to reflect
+ test directory moves.
+ * test/file-organisation.org: New file.
+ * test/automated/Makefile.in
+ test/automated/data/decompress/foo.gz
+ test/automated/data/epg/pubkey.asc
+ test/automated/data/epg/seckey.asc
+ test/automated/data/files-bug18141.el.gz
+ test/automated/data/flymake/test.c
+ test/automated/data/flymake/test.pl
+ test/automated/data/package/archive-contents
+ test/automated/data/package/key.pub
+ test/automated/data/package/key.sec
+ test/automated/data/package/multi-file-0.2.3.tar
+ test/automated/data/package/multi-file-readme.txt
+ test/automated/data/package/newer-versions/archive-contents
+ test/automated/data/package/newer-versions/new-pkg-1.0.el
+ test/automated/data/package/newer-versions/simple-single-1.4.el
+ test/automated/data/package/package-test-server.py
+ test/automated/data/package/signed/archive-contents
+ test/automated/data/package/signed/archive-contents.sig
+ test/automated/data/package/signed/signed-bad-1.0.el
+ test/automated/data/package/signed/signed-bad-1.0.el.sig
+ test/automated/data/package/signed/signed-good-1.0.el
+ test/automated/data/package/signed/signed-good-1.0.el.sig
+ test/automated/data/package/simple-depend-1.0.el
+ test/automated/data/package/simple-single-1.3.el
+ test/automated/data/package/simple-single-readme.txt
+ test/automated/data/package/simple-two-depend-1.1.el
+ test/automated/abbrev-tests.el
+ test/automated/auto-revert-tests.el
+ test/automated/calc-tests.el
+ test/automated/icalendar-tests.el
+ test/automated/character-fold-tests.el
+ test/automated/comint-testsuite.el
+ test/automated/descr-text-test.el
+ test/automated/electric-tests.el
+ test/automated/cl-generic-tests.el
+ test/automated/cl-lib-tests.el
+ test/automated/eieio-test-methodinvoke.el
+ test/automated/eieio-test-persist.el
+ test/automated/eieio-tests.el
+ test/automated/ert-tests.el
+ test/automated/ert-x-tests.el
+ test/automated/generator-tests.el
+ test/automated/let-alist.el
+ test/automated/map-tests.el
+ test/automated/advice-tests.el
+ test/automated/package-test.el
+ test/automated/pcase-tests.el
+ test/automated/regexp-tests.el
+ test/automated/seq-tests.el
+ test/automated/subr-x-tests.el
+ test/automated/tabulated-list-test.el
+ test/automated/thunk-tests.el
+ test/automated/timer-tests.el
+ test/automated/epg-tests.el
+ test/automated/eshell.el
+ test/automated/faces-tests.el
+ test/automated/file-notify-tests.el
+ test/automated/auth-source-tests.el
+ test/automated/gnus-tests.el
+ test/automated/message-mode-tests.el
+ test/automated/help-fns.el
+ test/automated/imenu-test.el
+ test/automated/info-xref.el
+ test/automated/mule-util.el
+ test/automated/isearch-tests.el
+ test/automated/json-tests.el
+ test/automated/bytecomp-tests.el
+ test/automated/coding-tests.el
+ test/automated/core-elisp-tests.el
+ test/automated/decoder-tests.el
+ test/automated/files.el
+ test/automated/font-parse-tests.el
+ test/automated/lexbind-tests.el
+ test/automated/occur-tests.el
+ test/automated/process-tests.el
+ test/automated/syntax-tests.el
+ test/automated/textprop-tests.el
+ test/automated/undo-tests.el
+ test/automated/man-tests.el
+ test/automated/completion-tests.el
+ test/automated/dbus-tests.el
+ test/automated/newsticker-tests.el
+ test/automated/sasl-scram-rfc-tests.el
+ test/automated/tramp-tests.el
+ test/automated/obarray-tests.el
+ test/automated/compile-tests.el
+ test/automated/elisp-mode-tests.el
+ test/automated/f90.el
+ test/automated/flymake-tests.el
+ test/automated/python-tests.el
+ test/automated/ruby-mode-tests.el
+ test/automated/subword-tests.el
+ test/automated/replace-tests.el
+ test/automated/simple-test.el
+ test/automated/sort-tests.el
+ test/automated/subr-tests.el
+ test/automated/reftex-tests.el
+ test/automated/sgml-mode-tests.el
+ test/automated/tildify-tests.el
+ test/automated/thingatpt.el
+ test/automated/url-future-tests.el
+ test/automated/url-util-tests.el
+ test/automated/add-log-tests.el
+ test/automated/vc-bzr.el
+ test/automated/vc-tests.el
+ test/automated/xml-parse-tests.el
+ test/BidiCharacterTest.txt
+ test/biditest.el
+ test/cedet/cedet-utests.el
+ test/cedet/ede-tests.el
+ test/cedet/semantic-ia-utest.el
+ test/cedet/semantic-tests.el
+ test/cedet/semantic-utest-c.el
+ test/cedet/semantic-utest.el
+ test/cedet/srecode-tests.el
+ test/cedet/tests/test.c
+ test/cedet/tests/test.el
+ test/cedet/tests/test.make
+ test/cedet/tests/testdoublens.cpp
+ test/cedet/tests/testdoublens.hpp
+ test/cedet/tests/testfriends.cpp
+ test/cedet/tests/testjavacomp.java
+ test/cedet/tests/testnsp.cpp
+ test/cedet/tests/testpolymorph.cpp
+ test/cedet/tests/testspp.c
+ test/cedet/tests/testsppcomplete.c
+ test/cedet/tests/testsppreplace.c
+ test/cedet/tests/testsppreplaced.c
+ test/cedet/tests/testsubclass.cpp
+ test/cedet/tests/testsubclass.hh
+ test/cedet/tests/testtypedefs.cpp
+ test/cedet/tests/testvarnames.c
+ test/etags/CTAGS.good
+ test/etags/ETAGS.good_1
+ test/etags/ETAGS.good_2
+ test/etags/ETAGS.good_3
+ test/etags/ETAGS.good_4
+ test/etags/ETAGS.good_5
+ test/etags/ETAGS.good_6
+ test/etags/a-src/empty.zz
+ test/etags/a-src/empty.zz.gz
+ test/etags/ada-src/2ataspri.adb
+ test/etags/ada-src/2ataspri.ads
+ test/etags/ada-src/etags-test-for.ada
+ test/etags/ada-src/waroquiers.ada
+ test/etags/c-src/a/b/b.c
+ test/etags/c-src/abbrev.c
+ test/etags/c-src/c.c
+ test/etags/c-src/dostorture.c
+ test/etags/c-src/emacs/src/gmalloc.c
+ test/etags/c-src/emacs/src/keyboard.c
+ test/etags/c-src/emacs/src/lisp.h
+ test/etags/c-src/emacs/src/regex.h
+ test/etags/c-src/etags.c
+ test/etags/c-src/exit.c
+ test/etags/c-src/exit.strange_suffix
+ test/etags/c-src/fail.c
+ test/etags/c-src/getopt.h
+ test/etags/c-src/h.h
+ test/etags/c-src/machsyscalls.c
+ test/etags/c-src/machsyscalls.h
+ test/etags/c-src/sysdep.h
+ test/etags/c-src/tab.c
+ test/etags/c-src/torture.c
+ test/etags/cp-src/MDiagArray2.h
+ test/etags/cp-src/Range.h
+ test/etags/cp-src/burton.cpp
+ test/etags/cp-src/c.C
+ test/etags/cp-src/clheir.cpp.gz
+ test/etags/cp-src/clheir.hpp
+ test/etags/cp-src/conway.cpp
+ test/etags/cp-src/conway.hpp
+ test/etags/cp-src/fail.C
+ test/etags/cp-src/functions.cpp
+ test/etags/cp-src/screen.cpp
+ test/etags/cp-src/screen.hpp
+ test/etags/cp-src/x.cc
+ test/etags/el-src/TAGTEST.EL
+ test/etags/el-src/emacs/lisp/progmodes/etags.el
+ test/etags/erl-src/gs_dialog.erl
+ test/etags/f-src/entry.for
+ test/etags/f-src/entry.strange.gz
+ test/etags/f-src/entry.strange_suffix
+ test/etags/forth-src/test-forth.fth
+ test/etags/html-src/algrthms.html
+ test/etags/html-src/index.shtml
+ test/etags/html-src/software.html
+ test/etags/html-src/softwarelibero.html
+ test/etags/lua-src/allegro.lua
+ test/etags/objc-src/PackInsp.h
+ test/etags/objc-src/PackInsp.m
+ test/etags/objc-src/Subprocess.h
+ test/etags/objc-src/Subprocess.m
+ test/etags/objcpp-src/SimpleCalc.H
+ test/etags/objcpp-src/SimpleCalc.M
+ test/etags/pas-src/common.pas
+ test/etags/perl-src/htlmify-cystic
+ test/etags/perl-src/kai-test.pl
+ test/etags/perl-src/yagrip.pl
+ test/etags/php-src/lce_functions.php
+ test/etags/php-src/ptest.php
+ test/etags/php-src/sendmail.php
+ test/etags/prol-src/natded.prolog
+ test/etags/prol-src/ordsets.prolog
+ test/etags/ps-src/rfc1245.ps
+ test/etags/pyt-src/server.py
+ test/etags/tex-src/gzip.texi
+ test/etags/tex-src/nonewline.tex
+ test/etags/tex-src/testenv.tex
+ test/etags/tex-src/texinfo.tex
+ test/etags/y-src/atest.y
+ test/etags/y-src/cccp.c
+ test/etags/y-src/cccp.y
+ test/etags/y-src/parse.c
+ test/etags/y-src/parse.y
+ test/indent/css-mode.css
+ test/indent/js-indent-init-dynamic.js
+ test/indent/js-indent-init-t.js
+ test/indent/js-jsx.js
+ test/indent/js.js
+ test/indent/latex-mode.tex
+ test/indent/modula2.mod
+ test/indent/nxml.xml
+ test/indent/octave.m
+ test/indent/pascal.pas
+ test/indent/perl.perl
+ test/indent/prolog.prolog
+ test/indent/ps-mode.ps
+ test/indent/ruby.rb
+ test/indent/scheme.scm
+ test/indent/scss-mode.scss
+ test/indent/sgml-mode-attribute.html
+ test/indent/shell.rc
+ test/indent/shell.sh
+ test/redisplay-testsuite.el
+ test/rmailmm.el
+ test/automated/buffer-tests.el
+ test/automated/cmds-tests.el
+ test/automated/data-tests.el
+ test/automated/finalizer-tests.el
+ test/automated/fns-tests.el
+ test/automated/inotify-test.el
+ test/automated/keymap-tests.el
+ test/automated/print-tests.el
+ test/automated/libxml-tests.el
+ test/automated/zlib-tests.el: Files Moved.
+
+2015-11-20 Michael Albinus <michael.albinus@gmx.de>
+
+ Rework file notifications, kqueue has problems with directory monitors
+
+ * lisp/filenotify.el (file-notify-add-watch): Call the native
+ add-watch function on the file, not on the dir.
+
+ * src/kqueue.c (kqueue_compare_dir_list): Make also bookkeeping
+ about already deleted entries.
- * configure.ac (wide-int): Clarify user-level advantages and
- disadvantages.
+ * test/automated/auto-revert-tests.el
+ (auto-revert-test01-auto-revert-several-files): Do not call "cp -f"
+ since this deletes the target file first.
-2015-11-17 Stephen Leake <stephen_leake@stephe-leake.org>
+ * test/automated/file-notify-tests.el (file-notify--test-event-test):
+ Make stronger checks.
+ (file-notify-test01-add-watch, file-notify-test02-events)
+ (file-notify-test04-file-validity, file-notify-test05-dir-validity):
+ Rewrite in order to call file monitors but directory monitors.
+ (file-notify-test06-many-events): Ler rename work in both directions.
- Improve doc string
+2015-11-19 Michael Albinus <michael.albinus@gmx.de>
- * lisp/progmodes/xref.el (xref-backend-references): Improve doc string.
+ Continie with pending events
-2015-11-17 Paul Eggert <eggert@cs.ucla.edu>
+ * src/kqueue.c (pending_events): Remove global variable.
+ (kqueue_compare_dir_list): Create `write' event for not used
+ pending events.
+ (globals_of_kqueue): Remove initialization of pending_events.
- eval_sub followed dangling pointer when debugging
+2015-11-19 Michael Albinus <michael.albinus@gmx.de>
- Problem reported by Pip Cet (Bug#21245).
- This bug could occur in eval_sub if the C compiler reused
- storage associated with the ‘argvals’ local after ‘argvals’
- went out of scope, and if the Elisp debugger stopped on Elisp
- function exit and accessed ‘argvals’. It could also occur if
- a variadic function was called with so many arguments (over
- 2048 args on x86-64) that SAFE_ALLOCA_LISP called malloc, then
- SAFE_FREE freed the arguments, then the memory manager used
- the storage for other purposes, then the debugger accessed the
- arguments.
- * src/eval.c (eval_sub): Declare ‘argvals’ at top level of
- function body. Simplify local decls.
- When allocating args via SAFE_ALLOCA, call
- debugger before invoking SAFE_FREE, as the debugger needs
- access to the args.
- (eval_sub, apply_lambda): Rework to avoid need for
- set_backtrace_debug_on_exit hack. This is cleaner,
- and should work better with buggy custom debuggers.
+ Improve loops in file-notify-test06-many-events
-2015-11-17 Daiki Ueno <ueno@gnu.org>
+ * test/automated/file-notify-tests.el (file-notify-test06-many-events):
+ Use `read-event' pauses for the `write-file' loops; otherwise
+ events are lost in inotify and gfilenotify cases.
- * lisp/image-mode.el: Support encrypted file
+2015-11-19 Michael Albinus <michael.albinus@gmx.de>
- (image-toggle-display-image): Read content from the buffer instead
- of the file, if the buffer holds a decrypted data. (Bug#21870)
+ Handle more complex rename operation in kqueue
-2015-11-17 Paul Eggert <eggert@cs.ucla.edu>
+ * src/kqueue.c (pending_events): New variable.
+ (kqueue_compare_dir_list): Handle more complex rename operation.
+ (globals_of_kqueue): Initialize pending_events.
- ELF unexec: align section header
+ * test/automated/file-notify-tests.el (file-notify-test06-many-events):
+ Adapt expected events in the `rename-file' case.
+ (file-notify-test06-many-events-remote): Declare.
- This ports the recent unexelf.c changes to Fedora x86-64
- when configured with GCC’s -fsanitize=undefined option.
- * src/unexelf.c (unexec): Align new_data2_size to a multiple
- of ElfW (Shdr)’s alignment, so that NEW_SECTION_H returns a
- pointer aligned appropriately for its type.
+2015-11-18 Wolfgang Jenkner <wjenkner@inode.at>
-2015-11-17 Andreas Schwab <schwab@linux-m68k.org>
+ New test with a larger number of events.
- Do more checks on bytecode objects (Bug#21929)
+ * test/automated/file-notify-tests.el (file-notify--test-with-events):
+ Make timeout heuristically depend on the number of events.
- * src/eval.c (funcall_lambda): Check size of compiled function
- object.
- (Ffetch_bytecode): Likewise.
+ (file-notify-test06-many-events): Use it for new test.
-2015-11-16 Johan Bockgård <bojohan@gnu.org>
+2015-11-18 Michael Albinus <michael.albinus@gmx.de>
- pcase.el: Fix edebugging of backquoted cons patterns
+ Further fixes for kqueue.
- * lisp/emacs-lisp/pcase.el (pcase-QPAT): Fix edebugging of backquoted
- cons patterns. (Bug#21920)
+ * lisp/filenotify.el (file-notify-callback): Raise also event if
+ directory name matches.
+ (file-notify-add-watch): Add `create' to the flags for `kqueue'.
-2015-11-16 Paul Eggert <eggert@cs.ucla.edu>
+ * src/kqueue.c (kqueue_generate_event): Use watch_object as
+ argument instead of ident. Remove callback argument. Adapt
+ callees. Check actions whether they are monitored flags.
- Improve fix for regex reentrancy abort
+ * test/automated/file-notify-tests.el (file-notify--test-library):
+ New defun.
+ (file-notify-test00-availability, file-notify-test02-events)
+ (file-notify-test04-file-validity)
+ (file-notify-test05-dir-validity): Use it.
+ (file-notify-test02-events, file-notify-test04-file-validity): Add
+ `read-event' calls between different file actions, in order to
+ give the backends a chance to rais an event. Needed especially
+ for kqueue. In case of deleting a directory, there are two
+ `deleted' events.
- Suggested by Stefan Monnier (Bug#21688).
- * src/syntax.c (update_syntax_table_forward):
- Remove recently-added PROPERTIZE arg, and assume it is true.
- All callers changed.
- * src/syntax.h (UPDATE_SYNTAX_TABLE_FORWARD_FAST):
- Invoke update_syntax_table directly.
+2015-11-17 Michael Albinus <michael.albinus@gmx.de>
-2015-11-16 Artur Malabarba <bruce.connor.am@gmail.com>
+ Code cleanup of kqueue.c
- * lisp/faces.el (faces--attribute-at-point): Use `face-list-p'
+ * src/kqueue.c (kqueue_directory_listing): Skip "." and "..".
+ (kqueue_compare_dir_list): Do not loop when calling
+ directory_files_internal. Remove checks for "." and "..", this is
+ done in kqueue_directory_listing now.
+ (Fkqueue_add_watch): Check for proper emacs_open flags.
- * lisp/emacs-lisp/package.el (package--with-response-buffer): Missing require
+2015-11-16 Michael Albinus <michael.albinus@gmx.de>
- * lisp/emacs-lisp/nadvice.el (add-function): Escape quote
+ Doc changes for kqueue
-2015-11-16 Vasily Korytov <vasily.korytov@yahoo.com>
+ * doc/lispref/os.texi (File Notifications): Add kqueue as backend.
+ Fix some glitches in the example.
- Recognize .rbw and .pyw files (bug#18753)
+2015-11-16 Michael Albinus <michael.albinus@gmx.de>
- * lisp/progmodes/python.el (auto-mode-alist):
- Recognize .pyw files.
+ Finish implementation in kqueue.c
- * lisp/progmodes/ruby-mode.el (auto-mode-alist):
- Recognize .rbw files.
+ * src/kqueue.c (kqueue_directory_listing, kqueue_callback):
+ Simplify access to list.
+ (kqueue_compare_dir_list): Simplify access to list. Raise
+ `delete' event if directory does not exist any longer. Otherwise,
+ wait until directory contents has changed. Fix error in check.
-2015-11-16 Dmitry Gutov <dgutov@yandex.ru>
+2015-11-16 Michael Albinus <michael.albinus@gmx.de>
- Fix ruby-mode auto-mode-alist entry
+ * lisp/filenotify.el (file-notify-add-watch): Fix thinko.
- * lisp/progmodes/ruby-mode.el (auto-mode-alist): Add grouping
- around the extensions (bug#21257).
+2015-11-15 Michael Albinus <michael.albinus@gmx.de>
-2015-11-15 Dmitry Gutov <dgutov@yandex.ru>
+ More work on kqueue
- Fix etags completion near eob
+ * lisp/filenotify.el (file-notify-callback): Handle also the
+ `rename' event from kqueue.
+ (file-notify-add-watch): Do not register an entry twice.
- * lisp/progmodes/etags.el (tags-completion-at-point-function):
- Use `goto-char', to avoid the end-of-buffer error (bug#20061).
+ * src/kqueue.c (kqueue_directory_listing): New function.
+ (kqueue_generate_event): New argument FILE1. Adapt callees.
+ (kqueue_compare_dir_list): Rewrite in order to make it more robust.
-2015-11-15 Alan Mackenzie <acm@muc.de>
+2015-11-14 Michael Albinus <michael.albinus@gmx.de>
- De-pessimize detection of C++ member initialization lists.
+ Implement directory events
- list/progmodes/cc-engine.el (c-back-over-list-of-member-inits): New macro.
- (c-back-over-member-initializers): Reformulate such that c-at-toplevel-p
- is only called when a construct "looks right" rather than continually.
- (c-guess-basic-syntax, CASE 5R): Add a check for the mode being C++ Mode.
+ * lisp/filenotify.el (file-notify-handle-event)
+ (file-notify-callback): Remove traces.
-2015-11-15 Artur Malabarba <bruce.connor.am@gmail.com>
+ * src/kqueue.c: Include <sys/time.h>.
+ (kqueue_generate_event, kqueue_compare_dir_list): New functions.
+ (kqueue_callback): Use them. Call kevent() with a zero timeout.
+ (Fkqueue_add_watch): Adapt docstring. Support directory events.
+ Compute initial directory listing. Close file descriptor in case
+ of errors.
+ (syms_of_kqueue): Declare Qcreate.
- Backport: * lisp/emacs-lisp/package.el: Fix a decoding issue.
+2015-11-11 Wolfgang Jenkner <wjenkner@inode.at>
- * lisp/url/url-handlers.el (url-insert-file-contents): Move some code to
- `url-insert-buffer-contents'.
- (url-insert-buffer-contents): New function
+ Build fixes for kqueue support.
- (package--with-response-buffer): Use `url-insert-buffer-contents'.
- The previous code had some issues with decoding. Refactoring that
- function allows us to use the decoding from url-handlers while still
- treating both sync and async requests the same.
+ * src/kqueue.c (Fkqueue_add_watch): O_BINARY is not a POSIX open(3)
+ flag.
-2015-11-15 Stephen Leake <stephen_leake@stephe-leake.org>
+ * configure.ac (HAVE_KQUEUE): There is no pkg-config module for native
+ kqueue on *BSD.
- Improve a few doc strings, comments
+2015-11-11 Michael Albinus <michael.albinus@gmx.de>
- * lisp/cedet/cedet-global.el (cedet-gnu-global-expand-filename):
- * lisp/cedet/ede/locate.el (ede-locate-base):
- * lisp/cedet/semantic/symref.el (semantic-symref-calculate-rootdir):
- * src/fns.c (Fdelq): Improve doc string.
+ Continue kqueue implementation
- * lisp/progmodes/elisp-mode.el (elisp--xref-find-definitions): Add FIXME.
+ * lisp/filenotify.el (file-notify-handle-event)
+ (file-notify-callback): Enable trace messages.
-2015-11-15 Anders Lindgren <andlind@gmail.com>
+ * src/kqueue.c: Include also <sys/types.h>.
+ (kqueue_callback): Remove watch in case of NOTE_DELETE or NOTE_RENAME.
+ (Fkqueue_rm_watch, Fkqueue_valid_p): New functions.
+ (syms_of_kqueue): Add them.
- Enhance NSTRACE (trace output for NextStep).
+2015-11-11 Michael Albinus <michael.albinus@gmx.de>
- Trace can be disabled for groups of functions. By default, event
- functions and functions that generate lots of output are disabled.
+ Work on kqueue
- Trace output of Objective-C functions now use the "[ClassName
- parameter:]" form.
+ * lisp/filenotify.el (file-notify--library)
+ (file-notify-descriptors, file-notify-callback)
+ (file-notify-add-watch, file-notify-rm-watch)
+ (file-notify-valid-p): Add kqueue support.
- * src/nsterm.h (NSTRACE_ALL_GROUPS, NSTRACE_GROUP_EVENTS)
- (NSTRACE_GROUP_UPDATES, NSTRACE_GROUP_FRINGE, NSTRACE_GROUP_COLOR)
- (NSTRACE_GROUP_GLYPHS, NSTRACE_GROUP_FOCUS): New macros,
- controlling in which function groups trace should be active.
- (NSTRACE_WHEN): Support for silencing a function, this also
- silencing all called functions.
- (NSTRACE_UNSILENCE): New macro, used to re-enable trace.
- (NSTRACE_FMT_FSTYPE, NSTRACE_ARG_FSTYPE): New macros, used to
- print the full screen state in NSTRACE functions.
+ * src/keyboard.c (make_lispy_event): Check also for HAVE_KQUEUE.
- * src/nsterm.m (nstrace_depth, nstrace_num): Made volatile as they
- can be accessed from multiple threads.
- (nstrace_enabled_global): New variable, when FALSE, trace is
- silenced.
- (nstrace_restore_global_trace_state): New function, used to
- restore `nstrace_enabled_global' at end of block.
- ([EmacsView setFrame:], [EmacsWindow setFrame:display:])
- ([EmacsWindow setFrame:display:animation:])
- ([EmacsWindow setFrameTopLeftPoint:]): New functions, print trace
- and call corresponding super function.
- (Many functions): Add or enhance trace output.
+2015-11-11 Michael Albinus <michael.albinus@gmx.de>
- * src/nsimage.m (ns_image_from_file): Enhanced trace output.
+ Add kqueue support
- * src/nsfns.m (x_set_tool_bar_lines): Add trace output.
+ * configure.ac (--with-file-notification): Add kqueue.
+ (top): Remove special test for "${HAVE_NS}" and
+ ${with_file_notification}, this is handled inside gfilenotify
+ tests. Add kqueue tests. Use NOTIFY_CFLAGS and NOTIFY_LIBS
+ instead of library specific variables.
- * src/nsmenu.m ([EmacsToolbar setVisible:]): New function, print trace
- and call corresponding super function.
+ * src/Makefile.in: Use NOTIFY_CFLAGS and NOTIFY_LIBS.
-2015-11-15 Anders Lindgren <andlind@gmail.com>
+ * src/emacs.c (main): Call globals_of_kqueue and syms_of_kqueue.
- Fixed a toolbar related issue on OS X.
+ * src/kqueue.c: New file.
- Earlier, when toggling the tool-bar in a maximized frame, the
- frame size didn't match the number of text lines, leaving an
- unused area at the bottom of the frame.
+ * src/lisp.h: Declare extern globals_of_kqueue and syms_of_kqueue.
- * src/nsfns.m (x_set_tool_bar_lines): Exit maximized and full height
- fullscreen modes when tool bar is disabled.
+2015-11-21 Wilson Snyder <wsnyder@wsnyder.org>
-2015-11-15 Anders Lindgren <andlind@gmail.com>
+ verilog-mode.el: Commentary and fix pre-Emacs 21 behavior.
- Fixed OS X 10.6.8 build issue (bug#21862).
+ * verilog-mode.el (verilog-save-font-no-change-functions):
+ Commentary and fix pre-Emacs 21 behavior.
- * src/nsterm.h (EmacsView): Add missing declarations.
- * src/nsterm.m ([EmacsView windowDidBecomeKey]): New method, like
- the standard method but without the notification parameter.
- Intended to be used for direct calls.
- ([EmacsView windowDidEnterFullScreen]): Call the non-notification
- version of `windowDidBecomeKey'. Made the notification method call
- the non-notification method instead of the vice versa.
- (NSWindowDidEnterFullScreenNotification): Deleted, no longer
- needed.
+2015-11-19 Przemysław Wojnowski <esperanto@cumego.com>
-2015-11-15 Artur Malabarba <bruce.connor.am@gmail.com>
+ Use obarray functions from obarray.
- * lisp/faces.el (faces--attribute-at-point): Fix an issue
+ * lisp/abbrev.el (copy-abbrev-table, abbrev-table-p, make-abbrev-table,
+ abbrev-table-get, abbrev-table-put, abbrev-table-empty-p,
+ clear-abbrev-table, define-abbrev, abbrev--symbol, abbrev-table-menu):
+ delegate to obarray.el functions.
+ * lisp/loadup.el: load obarray before abbrev
+ * test/automated/abbrev-tests.el: new tests
+
+2015-11-18 Christian Schwarzgruber <c.schwarzgruber.cs@gmail.com> (tiny change)
+
+ epa.el: Add option to replace original text
+
+ * lisp/epa.el (epa-replace-original-text): New user option.
+ (Bug#21947)
+
+2015-11-18 Mark Oteiza <mvoteiza@udel.edu>
+
+ Add interactive seek command.
+
+ * lisp/mpc.el (mpc-cmd-seekcur): New function.
+ (mpc-seek-current): New command.
+ (mpc-mode-menu): Add entry for mpc-seek-current
+ (mpc-mode-map): Bind mpc-seek-current to "g"
- Previous code would signal an error when the face at point was
- a manually built list of attributes such as '(:foregroud "white").
+2015-11-18 Mark Oteiza <mvoteiza@udel.edu>
- * test/automated/faces-tests.el (faces--test-color-at-point): Add a test
+ Fix issue where a new tempfile was created every refresh
-2015-11-15 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/mpc.el (mpc-format): Leave dir as relative path
- Fix regex abort when it tries to reenter itself
+2015-11-18 Stefan Monnier <monnier@iro.umontreal.ca>
- Problem reported by Ken Raeburn.
- Solution suggested by Stefan Monnier (Bug#21688).
- * src/regex.c (re_match_2_internal):
- Use new _FAST functions to avoid regex code reentering itself.
- * src/syntax.c (update_syntax_table_forward): New arg PROPERTIZE.
- All callers changed.
- * src/syntax.h (UPDATE_SYNTAX_TABLE_FORWARD_FAST)
- (UPDATE_SYNTAX_TABLE_FAST): New inline functions.
+ * lisp/progmodes/cc-defs.el: Use with-silent-modifications
-2015-11-15 Dmitry Gutov <dgutov@yandex.ru>
+ (c-save-buffer-state): Use with-silent-modifications when available.
+ (c--macroexpand-all): Check macroexpand-all directly rather than
+ c--mapcan-status.
- Improve Ruby 1.9-style keyword keys highlighting
+2015-11-18 Stefan Monnier <monnier@iro.umontreal.ca>
- * lisp/progmodes/ruby-mode.el (ruby-font-lock-keywords):
- Handle required keyword arguments (bug#21367).
- And highlight the colon together with the name.
+ * lisp/loadup.el: Set max-lisp-eval-depth here
-2015-11-15 Dmitry Gutov <dgutov@yandex.ru>
+ * lisp/Makefile.in (BIG_STACK_DEPTH, BIG_STACK_OPTS): Remove.
+ (BYTE_COMPILE_FLAGS): Adjust accordingly.
- Unify the absolutely equal xref-backend-references implementations
+2015-11-17 João Távora <joaotavora@gmail.com>
- * lisp/progmodes/elisp-mode.el (xref-backend-references):
- Remove.
+ Minor fix to comment indentation and typo in last commit
- * lisp/progmodes/etags.el (xref-backend-references):
- Remove.
+ * linum.el (linum-update-window): Fix comment indentation and a
+ typo.
- * lisp/progmodes/xref.el (xref-backend-references):
- Define the default implementation.
+2015-11-17 João Távora <joaotavora@gmail.com>
-2015-11-15 Dmitry Gutov <dgutov@yandex.ru>
+ linum-mode plays more nicely with other margin-setting extensions
- Update project-find-regexp for the new xref API
+ linum.el will only modify the left margin if it needs to, and will
+ only reset the it back to 0 if it guesses that no-one has touched that
+ margin in the meantime.
- * lisp/progmodes/project.el (project--read-regexp):
- Update to use the new xref API methods.
+ As such, this is a more of a workaround than an actual fix, but fixes
+ the problems described in bug#20674 regarding the interaction with
+ modes such as darkroom-mode and olivetti-mode.
- * lisp/progmodes/xref.el (xref-find-backend): Autoload.
+ A similar fix was commited to nlinum.el in ELPA.git's
+ e7f5f549fbfb740b911fb7f33b42381ecece56d8
-2015-11-15 Dmitry Gutov <dgutov@yandex.ru>
+ * linum.el (linum-delete-overlays): Restore margins more
+ criteriously.
+ (linum-update-window): Set margins more criteriously.
- Fix replacing a match with a shorter string
+2015-11-16 Daiki Ueno <ueno@gnu.org>
- In effect, partially reverting fe973fc.
+ * lisp/image-mode.el: Support encrypted file
- * lisp/progmodes/xref.el (xref-query-replace): Store the end
- of each match as a marker again, instead of length.
- (xref--query-replace-1): Update accordingly.
+ (image-toggle-display-image): Read content from the buffer instead
+ of the file, if the buffer holds a decrypted data. (Bug#21870)
-2015-11-14 Artur Malabarba <bruce.connor.am@gmail.com>
+2015-11-15 Juanma Barranquero <lekktu@gmail.com>
- * lisp/progmodes/xref.el (xref-pop-marker-stack): Downgrade errors
+ * lisp/progmodes/verilog-mode.el (verilog-save-buffer-state): Add backquote
- Signal user-errors instead.
+2015-11-15 Artur Malabarba <bruce.connor.am@gmail.com>
-2015-11-14 Eli Zaretskii <eliz@gnu.org>
+ * lisp/emacs-lisp/package.el: Fix a decoding issue
- Document 'describe-symbol'
+ (package--with-response-buffer): Use `url-insert-buffer-contents'.
+ The previous code had some issues with decoding. Refactoring that
+ function allows us to use the decoding from url-handlers while still
+ treating both sync and async requests the same.
- * doc/emacs/help.texi (Help Summary): Mention "C-h o".
- (Name Help): Document "C-h o" and describe-symbol.
+ * lisp/url/url-handlers.el (url-insert-file-contents): Move some code to
+ `url-insert-buffer-contents'.
+ (url-insert-buffer-contents): New function
- * lisp/help-fns.el (describe-symbol): Doc fix.
+2015-11-15 Stefan Monnier <monnier@iro.umontreal.ca>
-2015-11-14 Paul Eggert <eggert@cs.ucla.edu>
+ * lisp/progmodes/verilog-mode.el: Use with-silent-modifications
- Change test name to avoid spellcheck issue.
+ (verilog-save-buffer-state): Use with-silent-modifications when available.
+ (verilog-save-font-no-change-functions): Don't bind
+ before/after-change-functions if it's not needed.
-2015-11-14 Eli Zaretskii <eliz@gnu.org>
+2015-11-14 Xue Fuqiao <xfq.free@gmail.com>
- Avoid signaling an error in 'describe-symbol'
+ * CONTRIBUTE: Remove information about feature freeze.
- * lisp/help-fns.el (describe-symbol): Avoid errors when the symbol
- exists as a function/variable/face/etc., but is undocumented.
+ Merge branch 'release-process-lowercase'
- * test/automated/help-fns.el (help-fns-test-describe-symbol): New
- test.
+2015-11-14 Xue Fuqiao <xfq.free@gmail.com>
-2015-11-14 Eli Zaretskii <eliz@gnu.org>
+ Document the release process
- * INSTALL (--with-cairo): Document this new configure option.
+ * admin/notes/versioning: Add information about RC releases.
+ * admin/release-process: Document the release process.
+ * admin/authors.el (authors-ignored-files):
+ * admin/README: Change FOR-RELEASE to release-process.
+ * CONTRIBUTE:
+ * admin/notes/bugtracker: Don't mention FOR-RELEASE.
-2015-11-14 Eli Zaretskii <eliz@gnu.org>
+2015-11-14 Xue Fuqiao <xfq.free@gmail.com>
- Document that GNU Make >= 3.81 is required to build Emacs
+ * admin/release-process: Rename from admin/FOR-RELEASE.
- * doc/lispref/internals.texi (Building Emacs): Document that GNU
- Make 3.81 or later is now required.
+2015-11-14 David Engster <deng@randomsample.de>
-2015-11-14 Artur Malabarba <bruce.connor.am@gmail.com>
+ gitmerge: Fix git log command
- Backport: * lisp/emacs-lisp/package.el: Refactor -with-work-buffer-async.
+ * admin/gitmerge.el (gitmerge-missing): Use '--left-only' since we
+ only want commits from the branch that is to be merged.
+ (gitmerge-setup-log-buffer): Use the same symmetric range as in
+ `gitmerge-missing'.
- (package--with-work-buffer-async): Reimplement as
- `package--with-response-buffer'.
- (package--with-work-buffer): Mark obsolete.
- (package--with-response-buffer): New macro. This is a more self
- contained and less contrived version of
- `package--with-work-buffer-async'. It uses keyword arguments,
- doesn't have async on the name, doesn't fallback on
- `package--with-work-buffer', and has _much_ simpler error
- handling. On master, this macro will soon be part of another
- library (either standalone or inside url.el), which is why this
- commit is not to be merged back.
+2015-11-14 David Engster <deng@randomsample.de>
- (package--check-signature, package--download-one-archive)
- (package-install-from-archive, describe-package-1): Use it.
+ gitmerge: Try to detect cherry-picks
- (package--download-and-read-archives): Let
- `package--download-one-archive' take care of calling
- `package--update-downloads-in-progress'.
+ * admin/gitmerge.el (gitmerge-default-branch): Change to
+ origin/emacs-25.
+ (gitmerge-missing): Use symmetric difference ('...') between
+ branch and master so that cherry-picks can be detected.
2015-11-14 Eli Zaretskii <eliz@gnu.org>
- * CONTRIBUTE (Branches): Improve wording for back-ported commits.
+ Increment Emacs version on master branch
-2015-11-14 Dmitry Gutov <dgutov@yandex.ru>
+ * lisp/cus-edit.el (customize-changed-options-previous-release):
+ Increase previous version to 24.5.
+
+ * configure.ac:
+ * msdos/sed2v2.inp: Bump version to 25.1.50.
- Merge branch 'master' into emacs-25
+2015-11-14 Xue Fuqiao <xfq.free@gmail.com>
-2015-11-14 Dmitry Gutov <dgutov@yandex.ru>
+ Mention CONTRIBUTE in README, since it was moved from etc/ to root.
+ * etc/TODO: Remove the reference to `etc/CONTRIBUTE'.
+ * README: Mention CONTRIBUTE.
+
+2015-11-13 Wilson Snyder <wsnyder@wsnyder.org>
+
+ Update verilog-mode.el to 2015-11-09-b121d60-vpo
+
+ * verilog-mode.el (verilog-auto, verilog-delete-auto)
+ (verilog-modi-cache-results, verilog-save-buffer-state)
+ (verilog-save-font-no-change-functions): When internally suppressing
+ change functions, use `inhibit-modification-hooks' and call
+ `after-change-funtions' to more nicely work with user hooks.
+ Reported by Stefan Monnier.
+ (verilog-auto, verilog-delete-auto, verilog-delete-auto-buffer):
+ Create `verilog-delete-auto-buffer' to avoid double-calling
+ fontification hooks.
+ (verilog-restore-buffer-modified-p, verilog-auto)
+ (verilog-save-buffer-state): Prefer restore-buffer-modified-p over
+ set-buffer-modified-p. Reported by Stefan Monnier.
+ (verilog-diff-auto, verilog-diff-buffers-p)
+ (verilog-diff-ignore-regexp): Add `verilog-diff-ignore-regexp'.
+ (verilog-auto-inst-port, verilog-read-sub-decls-expr): Fix
+ AUTOINST with unpacked dimensional parameters, bug981. Reported by
+ by Amol Nagapurkar.
+ (verilog-read-decls, verilog-read-sub-decls-line): Avoid unneeded
+ properties inside internal structures. No functional change
+ intended.
+
+2015-11-13 Dmitry Gutov <dgutov@yandex.ru>
Use generic dispatch for xref backends
(xref-backend-identifier-completion-table):
New generic functions.
- * lisp/progmodes/elisp-mode.el (emacs-lisp-mode): Add
- `elisp--xref-backend' to the beginning of
+ * lisp/progmodes/elisp-mode.el (emacs-lisp-mode):
+ Add `elisp--xref-backend' to the beginning of
`xref-backend-functions', locally. Delete references to
removed functions and vars.
(elisp-xref-find): Remove.
(xref-backend-references, xref-backend-definitions)
(xref-backend-apropos): New generic methods.
-2015-11-14 Juri Linkov <juri@linkov.net>
+2015-11-13 Juri Linkov <juri@linkov.net>
Support rectangular regions for more commands
- * lisp/simple.el (region-extract-function): Handle the arg value ‘bounds’.
+ * lisp/simple.el (region-extract-function): Handle the arg
+ value ‘bounds’.
(region-insert-function): New function.
(shell-command-on-region): Add arg ‘region-noncontiguous-p’.
If non-nil, operate on multiple chunks.
If non-nil, operate on multiple chunks.
* src/casefiddle.c (Fdowncase_region): Add arg ‘region-noncontiguous-p’.
- If non-nil, operate on multiple chunks. (Bug#19829)
+ If non-nil, operate on multiple chunks. (Bug#19829)
-2015-11-14 Dmitry Gutov <dgutov@yandex.ru>
+2015-11-13 Dmitry Gutov <dgutov@yandex.ru>
Handle multiple matches on the same line; add highlighting
Search for all matches in the hit line. Add `highlight' face to
the matched region in the summary. Update both callers.
-2015-11-14 Dmitry Gutov <dgutov@yandex.ru>
+2015-11-13 Dmitry Gutov <dgutov@yandex.ru>
Replace xref-match-bounds with xref-match-length
(xref-query-replace): Ditto. And check that the search results
are up-to-date.
-2015-11-13 John Wiegley <johnw@newartisans.com>
-
- Merge remote-tracking branch 'origin/master' into emacs-25
-
-2015-11-13 l3thal <kwhite@gnu.org>
-
- Merge branch 'erc-async-reconnect' into emacs-25
-
- Reconnect asynchronously.
-
2015-11-13 Paul Eggert <eggert@cs.ucla.edu>
Merge from gnulib
mflt_run to leave the output areas unchanged on failure, as
this isn’t part of its interface spec.
-2015-11-13 Eli Zaretskii <eliz@gnu.org>
-
- Merge branch 'emacs-25' of git.savannah.gnu.org:/srv/git/emacs into emacs-25
-
-2015-11-13 Paul Eggert <eggert@cs.ucla.edu>
-
- Port recent XCB changes to 64-bit ‘long int’
-
- For historical reasons, libX11 represents 32-bit values like Atoms as
- ‘long int’ even on platforms where ‘long int’ is 64 bits. XCB doesn’t
- do that, so adapt the recent XCB code to behave properly on 64-bit
- platforms. Also, fix what appears to be a bug in the interpretation
- of xcb_get_property_value_length, at least on my Fedora platform
- which is running libxcb-1.11-5.fc21.
- * src/xfns.c (x_real_pos_and_offsets):
- * src/xterm.c (get_current_wm_state):
- xcb_get_property_value_length returns a byte count, not a word count.
- For 32-bit quantities, xcb_get_property_value returns a vector
- of 32-bit words, not of (possibly 64-bit) long int.
-
- Backport.
-
-2015-11-13 Paul Eggert <eggert@cs.ucla.edu>
-
- * src/undo.c (run_undoable_change): Now static.
-
- Backport.
-
-2015-11-13 Eli Zaretskii <eliz@gnu.org>
-
- Remove support for ':timeout' from w32 tray notifications
-
- * src/w32fns.c (Fw32_notification_notify): Delete the code that
- supports ':timeout'.
- (syms_of_w32fns): Don't DEFSYM ':timeout'. This avoids clashes
- with dbusbind.c when D-Bus is compiled in.
-
- * doc/lispref/os.texi (Desktop Notifications): Don't mention
- ':timeout'.
-
- Backport.
-
-2015-11-13 Juanma Barranquero <lekktu@gmail.com>
-
- * test/automated/simple-test.el: Add test for bug#20698 (bug#21885)
-
- (simple-test--transpositions): New macro.
- (simple-transpose-subr): New test.
-
- Backport.
-
-2015-11-13 Juanma Barranquero <lekktu@gmail.com>
-
- * lisp/progmodes/elisp-mode.el: Declare function `project-roots'
-
- Backport.
-
-2015-11-13 Juanma Barranquero <lekktu@gmail.com>
-
- * src/undo.c: Small fixes for previous change
-
- (run_undoable_change): Mark void argument list.
- (record_property_change): Remove unused variable `boundary'.
-
- Backport.
-
-2015-11-13 Eli Zaretskii <eliz@gnu.org>
-
- Add a few more variables to redisplay--variables
-
- * lisp/frame.el (redisplay--variables): Add bidi-paragraph-direction
- and bidi-display-reordering to the list.
-
- Backport.
-
-2015-11-13 Eli Zaretskii <eliz@gnu.org>
-
- * lisp/loadup.el: Enlarge the size of the hash table to 80000.
-
- Backport.
-
-2015-11-13 Eli Barzilay <eli@barzilay.org>
-
- Fix point positioning after transposing with negative arg
-
- * lisp/simple.el (transpose-subr): When invoked with a negative
- argument, move point to after the transposed text, like we do
- when invoked with a positive argument. (Bug#21885)
-
- Backport.
-
-2015-11-13 Eli Zaretskii <eliz@gnu.org>
-
- Fix last change in shr.el
-
- * lisp/net/shr.el (shr--have-one-fringe-p): Rename from
- have-fringes-p. All callers changed. Doc fix. (Bug#21895)
-
- Backport.
-
-2015-11-13 Eli Zaretskii <eliz@gnu.org>
-
- Fix last change
-
- * src/w32fns.c (syms_of_w32fns) [WINDOWSNT && !HAVE_DBUS]:
- Don't DEFSYM tray notification symbols if D-Bus is being used.
-
- Backport.
-
-2015-11-13 Eli Zaretskii <eliz@gnu.org>
-
- Another fix for MinGW64 and Cygwin builds due to notifications
-
- * src/w32fns.c: Ifdef away tray notification code if D-Bus is
- being compiled into Emacs.
- (syms_of_w32fns) [WINDOWSNT && !HAVE_DBUS]: Don't defsubr
- Sw32_notification_notify and Sw32_notification_close if the code
- is not compiled. Reported by Andy Moreton <andrewjmoreton@gmail.com>.
-
- Backport.
-
-2015-11-13 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
-
- Remove intern calls and XXX comments from Fx_export_frames
-
- * src/xfns.c (Fx_export_frames): Use Qpdf, Qpng, Qpostscript, and
- Qsvg instead of intern calls. Use "postscript" instead of "ps"
- for consistency with image types. Remove XXX comments.
- (syms_of_xfns) <Qpdf>: DEFSYM it.
-
- Backport.
-
2015-11-13 Paul Eggert <eggert@cs.ucla.edu>
Port recent XCB changes to 64-bit ‘long int’
* src/undo.c (run_undoable_change): Now static.
-2015-11-13 Michael Albinus <michael.albinus@gmx.de>
+2016-01-30 Michael Albinus <michael.albinus@gmx.de>
Adapt Tramp version, do not merge with master
2015-11-13 Juanma Barranquero <lekktu@gmail.com>
* test/automated/simple-test.el: Add test for bug#20698 (bug#21885)
-
(simple-test--transpositions): New macro.
(simple-transpose-subr): New test.
2015-11-13 Juanma Barranquero <lekktu@gmail.com>
* src/undo.c: Small fixes for previous change
-
(run_undoable_change): Mark void argument list.
(record_property_change): Remove unused variable `boundary'.
Sw32_notification_notify and Sw32_notification_close if the code
is not compiled. Reported by Andy Moreton <andrewjmoreton@gmail.com>.
-2015-11-13 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+2016-01-30 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
+2015-11-12 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
Remove intern calls and XXX comments from Fx_export_frames
for consistency with image types. Remove XXX comments.
(syms_of_xfns) <Qpdf>: DEFSYM it.
-2015-11-13 Eric Hanchrow <eric.hanchrow@gmail.com>
+2016-01-30 Eric Hanchrow <eric.hanchrow@gmail.com>
+2015-11-12 Eric Hanchrow <eric.hanchrow@gmail.com>
shr: don't invoke unbound function (Bug#21895)
* lisp/net/shr.el (have-fringes-p): New function.
- (shr-insert-document, shr-fill-text): Use it.
+ (shr-insert-document, shr-fill-text): Use it.
2015-11-12 Juanma Barranquero <lekktu@gmail.com>
entry to its initial value to make the test repeatable in interactive
sessions (assuming it doesn't fail and crashes Emacs, of course).
-2015-11-13 Artur Malabarba <bruce.connor.am@gmail.com>
+2016-01-30 Artur Malabarba <bruce.connor.am@gmail.com>
* test/automated/cl-lib-tests.el (cl-lib-struct-constructors): Small fix
-201
5-11-12 Phillip Lord <phillip.lord@russet.org.uk>
+201
6-01-30 Phillip Lord <phillip.lord@russet.org.uk>
: Tests for undo-auto functionality.
+2015-11-12 Artur Malabarba <bruce.connor.am@gmail.com>
+
+ * test/automated/cl-lib-tests.el (cl-lib-struct-constructors):
+ Small fix.
2015-11-12 Phillip Lord <phillip.lord@newcastle.ac.uk>
Enable sorting of JSON object keys when encoding
- * lisp/json.el (json-encoding-object-sort-predicate): New variable for
- specifying a sorting predicate for JSON objects during encoding.
+ * lisp/json.el (json-encoding-object-sort-predicate): New variable
+ for specifying a sorting predicate for JSON objects during encoding.
(json--plist-to-alist): New utility function.
(json-encode-hash-table): Re-use `json-encode-alist' when object keys
are to be sorted.
to be sorted.
(json-pretty-print-buffer-ordered): New command to pretty print the
buffer with object keys sorted alphabetically.
- (json-pretty-print-ordered): New command to pretty print the region with
- object keys sorted alphabetically.
+ (json-pretty-print-ordered): New command to pretty print the region
+ with object keys sorted alphabetically.
* test/automated/json-tests.el (test-json-plist-to-alist)
(test-json-encode-plist, test-json-encode-hash-table)
2015-11-12 Juanma Barranquero <lekktu@gmail.com>
- * test/automated/keymap-tests.el: New test file
+ * test/automated/keymap-tests.el: New test file.
2015-11-12 Ken Raeburn <raeburn@raeburn.org>
Use color cache for creating bitmap
- * src/image.c (x_create_bitmap_from_xpm_data) [ALLOC_XPM_COLORS]: Set
- attributes to use the caching color allocator. Initialize and free
- the cache.
+ * src/image.c (x_create_bitmap_from_xpm_data) [ALLOC_XPM_COLORS]:
+ Set attributes to use the caching color allocator. Initialize and
+ free the cache.
2015-11-12 Eli Barzilay <eli@barzilay.org>
better with a "^" in the `interactive' declaration so selection works
as expected.
-2015-11-12 Thomas Fitzsimmons <fitzsim@fitzsim.org>
+2016-01-30 Thomas Fitzsimmons <fitzsim@fitzsim.org>
Sync with soap-client repository, version 3.0.2
* lisp/net/soap-inspect.el: Remove version header.
* lisp/net/soap-client.el, lisp/net/soap-inspect.el: Fix first line header
+2015-11-11 Thomas Fitzsimmons <fitzsim@fitzsim.org>
+
+ Sync with soap-client repository, version 3.0.2
+
+ * soap-client.el: Bump version to 3.0.2.
+
+ * soap-client.el (soap-warning): Use format, not format-message.
+
+ * soap-client.el: Add cl-lib to Package-Requires. Require cl-lib.
+ (soap-validate-xs-simple-type): Use cl-labels instead of cl-flet.
+
+ * soap-client.el: Support Emacs versions that do not have
+ define-error.
+
+ * soap-inspect.el: Remove version header.
+
+ * soap-client.el, soap-inspect.el, jira2.el: Fix first line header
format.
2015-11-11 Alan Mackenzie <acm@muc.de>
CC Mode: Respect users' settings of open-paren-in-column-0-is-defun-start.
- lisp/progmodes/cc-engine.el (c-backward-single-comment, c-backward-comments)
- (c-invalidate-state-cache-1, c-parse-state-1, c-guess-basic-syntax):
- remove bindings of open-paren-in-column-0-is-defun-start to nil.
+ * lisp/progmodes/cc-engine.el (c-backward-single-comment)
+ (c-backward-comments, c-invalidate-state-cache-1, c-parse-state-1)
+ (c-guess-basic-syntax):
+ Remove bindings of open-paren-in-column-0-is-defun-start to nil.
(c-get-fallback-scan-pos): "New" function (existed several years ago).
(c-parse-state-get-strategy): Reintroduce the 'BOD strategy, using
c-get-fallback-scan-pos.
(c-parse-state-1): Handle 'BOD strategy.
- lisp/progmodes/cc-mode.el (c-before-change, c-after-change)
- c-font-lock-fontify-region): remove bindings of
+ * lisp/progmodes/cc-mode.el (c-before-change, c-after-change)
+ (c-font-lock-fontify-region): Remove bindings of
open-paren-in-column-0-is-defun-start to nil.
- cc-mode.texi (Performance Issues, Limitations and Known Bugs): Fix mix up
- between @chapter and @appendix.
+ * doc/misc/cc-mode.texi (Performance Issues)
+ (Limitations and Known Bugs): Fix mix up between @chapter and @appendix.
2015-11-11 Artur Malabarba <bruce.connor.am@gmail.com>
- * lisp/obarray.el: Fix shadowed variables
-
+ * lisp/obarray.el: Fix shadowed variables.
(obarray-map, obarray-remove, obarray-put, obarray-get):
Change OBARRAY arg to OB to avoid shadowing ‘obarray’.
New file with obarray functions.
- * lisp/obarray.el: basic obarray functions extracted from abbrev.el
- * test/automated/obarray-tests.el: new file
+ * lisp/obarray.el: Basic obarray functions extracted from abbrev.el.
+ * test/automated/obarray-tests.el: New file.
2015-11-11 Eli Zaretskii <eliz@gnu.org>
* doc/lispref/os.texi (Desktop Notifications): Describe the native
w32 tray notifications.
-201
5-11-11 Alan Mackenzie <acm@muc.de>
+201
6-01-30 Alan Mackenzie <acm@muc.de>
First commit to scratch/follow. Make Isearch work with Follow Mode, etc.
* lisp/net/tramp.el (tramp-handle-file-equal-p)
(tramp-handle-file-in-directory-p): New defuns. Suggested by
- Harvey Chapman <hchapman@3gfp.com>
+ Harvey Chapman <hchapman@3gfp.com>.
* lisp/net/tramp-adb.el (tramp-adb-file-name-handler-alist):
* lisp/net/tramp-gvfs.el (tramp-gvfs-file-name-handler-alist):
Avoid creating notification objects when possible
- * src/nsterm.m (windowWillEnterFullScreen, windowWillExitFullScreen:,
- windowDidEnterFullScreen, windowDidExitFullScreen): provide
- convenience functions that do not require a notification object. When
- needed, define NSWindowDidEnterFullScreenNotification to allow for
- compilation on OS X 10.6.8.
+ * src/nsterm.m (windowWillEnterFullScreen, windowWillExitFullScreen:)
+ (windowDidEnterFullScreen, windowDidExitFullScreen): Provide convenience
+ functions that do not require a notification object. When needed,
+ define NSWindowDidEnterFullScreenNotification to allow for compilation
+ on OS X 10.6.8.
2015-11-10 Paul Eggert <eggert@cs.ucla.edu>
2015-11-10 Artur Malabarba <bruce.connor.am@gmail.com>
* doc/lispref/variables.texi (Directory Local Variables):
-
- Document dir-locals wildcards
+ Document dir-locals wildcards.
* lisp/files.el (dir-locals-file): Point to Info node.
2015-11-10 Artur Malabarba <bruce.connor.am@gmail.com>
- * lisp/files.el: Don't allow customization of dir-locals sorting
-
+ * lisp/files.el: Don't allow customization of dir-locals sorting.
In retrospect, this is not a good idea for the same reason that
`dir-locals-file' is a defconst, because it is important that this
behaviour be "uniform across different environments and users".
Sure, the user can still change the sorting with a hack, but we
shouldn't encourage them to change it.
-
(dir-locals--all-files): Return list in the order returned by
`file-expand-wildcards'.
(file-expand-wildcards): Document the sorting predicate used.
2015-11-10 Artur Malabarba <bruce.connor.am@gmail.com>
- * lisp/files.el (dir-locals-read-from-file): Better handle errors
+ * lisp/files.el (dir-locals-read-from-file): Better handle errors.
- * lisp/isearch.el (search-default-regexp-mode): change default value
+ * lisp/isearch.el (search-default-regexp-mode): Change default value.
2015-11-10 Artur Malabarba <bruce.connor.am@gmail.com>
- * lisp/files.el (dir-locals-find-file): Don't stop at unreadable files
-
+ * lisp/files.el (dir-locals-find-file): Don't stop at unreadable files.
`locate-dominating-file' will now keep looking if the files it finds in
a given directory are unreadable (or not files).
2015-11-10 Artur Malabarba <bruce.connor.am@gmail.com>
- * lisp/files.el (dir-locals-file): Allow wildcards
-
+ * lisp/files.el (dir-locals-file): Allow wildcards.
(dir-locals-find-file, dir-locals-collect-variables)
(dir-locals-read-from-file): Update accordingly.
(hack-dir-local-variables): Rename a local variable.
- * lisp/files-x.el (modify-dir-local-variable): Update accordingly
+ * lisp/files-x.el (modify-dir-local-variable): Update accordingly.
- * lisp/help-fns.el (describe-variable): Update accordingly
+ * lisp/help-fns.el (describe-variable): Update accordingly.
- * .gitignore: Add .dir-locals?.el
+ * .gitignore: Add .dir-locals?.el.
2015-11-10 Artur Malabarba <bruce.connor.am@gmail.com>
- * lisp/emacs-lisp/map.el (map-merge-with): New function
+ * lisp/emacs-lisp/map.el (map-merge-with): New function.
- * test/automated/map-tests.el (test-map-merge-with): New test
+ * test/automated/map-tests.el (test-map-merge-with): New test.
-2015-11-10 Karl Fogel <kfogel@red-bean.com>
+2015-11-09 Karl Fogel <kfogel@red-bean.com>
Fix some recently-perturbed bookmark autoloads
* lisp/bookmark.el (bookmark-set-internal): Remove unnecessary autoload.
- (bookmark-set): Restore autoload.
- (bookmark-set-no-overwrite): Add autoload.
+ (bookmark-set): Restore autoload.
+ (bookmark-set-no-overwrite): Add autoload.
Thanks to Juanma Barranquero for noticing the autoload problems
introduced by my recent commit adding/changing the above functions
(Sun Nov 8 14:16:43 2015 -0500, git commit 3812e17978).
-2015-11-10 Noah Friedman <friedman@splode.com>
+2016-01-30 Noah Friedman <friedman@splode.com>
(ydump-buffer): Handle case where gap is at the start of buffer.
I don't recall if older versions of gdb were less strict but you
cannot dump a 0-length range in gdb 7.9.1.
-2015-11-10 Dmitry Gutov <dgutov@yandex.ru>
+2016-01-30 Dmitry Gutov <dgutov@yandex.ru>
+2015-11-09 Noah Friedman <friedman@splode.com>
+
+ * etc/emacs-buffer.gdb (ydump-buffer): Handle case where gap is at
+ the start of buffer. I don't recall if older versions of gdb were
+ less strict but you cannot dump a 0-length range in gdb 7.9.1.
+
+2015-11-09 Dmitry Gutov <dgutov@yandex.ru>
* lisp/progmodes/project.el: Update Commentary.
Merge branch 'project-next'
-2015-11-10 Dmitry Gutov <dgutov@yandex.ru>
+2016-01-30 Dmitry Gutov <dgutov@yandex.ru>
Fold `project-ask-user' into `project-current'
* lisp/progmodes/project.el (project-find-functions): Remove
`project-ask-user'.
+2015-11-09 Dmitry Gutov <dgutov@yandex.ru>
+
+ Fold `project-ask-user' into `project-current'
+
+ * lisp/progmodes/project.el (project-find-functions):
+ Remove `project-ask-user'.
(project-ask-user): Remove function and the corresponding
`project-roots' implementation.
(project-current): Add a new argument, MAYBE-PROMPT. Prompt the
any Emacs integer.
* src/lisp.h (lisp_word_count): Remove; no longer used.
-2015-11-09 Dmitry Gutov <dgutov@yandex.ru>
+2016-01-30 Dmitry Gutov <dgutov@yandex.ru>
+2015-11-08 Dmitry Gutov <dgutov@yandex.ru>
Make sure that the ignore file exists
* lisp/vc/vc.el (vc-default-ignore-completion-table):
Make sure that the ignore file exists.
-2015-11-09 Michael Sperber <mike@xemacs.org>
+2016-01-30 Michael Sperber <mike@xemacs.org>
* lisp/gnus-sum.el (gnus-summary-backend-map): Bind B-backspace to
+2015-11-08 Michael Sperber <mike@xemacs.org>
+
+ * gnus-sum.el (gnus-summary-backend-map): Bind B-backspace to
`gnus-summary-delete-article` in a way that also works on XEmacs.
2015-11-08 Simen Heggestøyl <simenheg@gmail.com>
Offer non-overwrite bookmark setter (Bug#15746)
* lisp/bookmark.el (bookmark-set-internal): New helper function to do
- what `bookmark-set' used to do, but with more choices for overwrite
- vs push, and with minor changes to the interactive prompt format.
- (bookmark-set): Rewrite as wrapper around above.
- If overwriting, inform the user of that in the prompt.
- (bookmark-set-no-overwrite): New function, also done as wrapper.
- Bind to "M" in `ctl-x-r-map' autoloads.
- (bookmark-map): Similarly bind "M" here.
+ what `bookmark-set' used to do, but with more choices for overwrite
+ vs push, and with minor changes to the interactive prompt format.
+ (bookmark-set): Rewrite as wrapper around above.
+ If overwriting, inform the user of that in the prompt.
+ (bookmark-set-no-overwrite): New function, also done as wrapper.
+ Bind to "M" in `ctl-x-r-map' autoloads.
+ (bookmark-map): Similarly bind "M" here.
2015-11-08 Paul Eggert <eggert@cs.ucla.edu>
unchanged, in which case no clearing is needed (and sh_offset isn't
necessarily valid, which can lead to a wild memset).
- * src/unexelf.c (unexec): Properly handle _OBJC_ symbols in bss sections.
+ * src/unexelf.c (unexec): Properly handle _OBJC_ symbols in
+ bss sections.
2015-11-08 Alan Modra <amodra@gmail.com>
Remove dirs in vc project roots from the the vc project library roots
- * lisp/progmodes/project.el (project-library-roots): Remove
- directories inside the project roots from the result.
+ * lisp/progmodes/project.el (project-library-roots):
+ Remove directories inside the project roots from the result.
(http://lists.gnu.org/archive/html/emacs-devel/2015-11/msg00536.html)
-2015-11-08 Dmitry Gutov <dgutov@yandex.ru>
+2015-11-07 Dmitry Gutov <dgutov@yandex.ru>
Move and rename xref-find-regexp to the project package
This file records repository revisions from
commit 9d56a21e6a696ad19ac65c4b405aeca44785884a (exclusive) to
-commit 4feb9621980f9534e920a8438e5776e98eefb752 (inclusive).
+2016-02-04b6d89ff9288a49099f041752908b5eb9613e (inclusive).
+commit 53f3d4a94ac784da3fed3abc72766ecf698ab53c (inclusive).
See ChangeLog.1 for earlier changes.
;; Local Variables:
# Execute in sequence, so that multiple user goals don't conflict.
.NOTPARALLEL:
+# 'all' if a .git subdirectory is present, empty otherwise.
+ALL_IF_GIT = $(subst .git,all,$(wildcard .git))
+
configure:
@echo >&2 'There seems to be no "configure" file in this directory.'
- @echo >&2 'Running ./autogen.sh ...'
- ./autogen.sh
+ @echo >&2 Running ./autogen.sh $(ALL_IF_GIT) ...
+ ./autogen.sh $(ALL_IF_GIT)
@echo >&2 '"configure" file built.'
Makefile: configure
you can build the manuals.
To use the autotools, run the following shell command to generate the
-'configure' script and some related files:
+'configure' script and some related files, and to set up your git
+configuration:
- $ ./autogen.sh
+ $ ./autogen.sh all
You can then configure your build as follows:
TAGS tags: lib lib-src src
$(MAKE) -C src tags
-check check-expensive: all
- @if test ! -d test/automated; then \
+.PHONY: have-tests
+have-tests:
+ @if test ! -d test; then \
echo "You do not seem to have the test/ directory."; \
echo "Maybe you are using a release tarfile, rather than a repository checkout."; \
- else \
- $(MAKE) -C test/automated $@; \
+ exit 1; \
fi
+check check-maybe check-expensive: have-tests all
+ $(MAKE) -C test $@
+
dist:
cd ${srcdir}; ./make-dist
$(MAKE) -C doc/$(subst -, ,$@)
.PHONY: $(DOCS) docs pdf ps
-.PHONY: info dvi dist check check-expensive html info-real info-dir check-info
+.PHONY: info dvi dist check check-maybe check-expensive html info-real info-dir check-info
## TODO add etc/refcards.
docs: $(DOCS)
$(MAKE) all
.PHONY: ChangeLog change-history change-history-commit change-history-nocommit
-.PHONY: emacs-25-branch-is-current unchanged-history-files
+.PHONY: preferred-branch-is-current unchanged-history-files
CHANGELOG = ChangeLog
emacslog = build-aux/gitlog-to-emacslog
./$(emacslog) -o $(CHANGELOG) -n $(CHANGELOG_HISTORY_INDEX_MAX)
# Check that we are in a good state for changing history.
-emacs-25-branch-is-current:
- git branch | grep -q '^\* emacs-25$$'
+PREFERRED_BRANCH = master
+preferred-branch-is-current:
+ git branch | grep -q '^\* $(PREFERRED_BRANCH)$$'
unchanged-history-files:
x=$$(git diff-files --name-only $(CHANGELOG_N) $(emacslog)) && \
test -z "$$x"
# Copy newer commit messages to the start of the ChangeLog history file,
# and consider them to be older.
-change-history-nocommit: emacs-25-branch-is-current unchanged-history-files
+change-history-nocommit: preferred-branch-is-current unchanged-history-files
-rm -f ChangeLog.tmp
$(MAKE) ChangeLog CHANGELOG=ChangeLog.tmp
sed '/^This file records repository revisions/,$$d' \
See the end of the file for license conditions.
-This directory tree holds version 25.0.90 of GNU Emacs, the extensible,
+This directory tree holds version 25.1.50 of GNU Emacs, the extensible,
customizable, self-documenting real-time display editor.
The file INSTALL in this directory says how to build and install GNU
(require 'smerge-mode)
(defvar gitmerge-skip-regexp
- "back[- ]?port\\|merge\\|sync\\|re-?generate\\|bump version\\|from trunk\\|\
+ ;; We used to include "sync" in there, but in my experience it only
+ ;; caused false positives. --Stef
+ "back[- ]?port\\|merge\\|re-?generate\\|bump version\\|from trunk\\|\
Auto-commit"
"Regexp matching logs of revisions that might be skipped.
`gitmerge-missing' will ask you if it should skip any matches.")
'((t (:strike-through t)))
"Face for skipped commits.")
-(defconst gitmerge-default-branch "origin/emacs-24"
+(defconst gitmerge-default-branch "origin/emacs-25"
"Default for branch that should be merged.")
(defconst gitmerge-buffer "*gitmerge*"
;; Go through the log and remember all commits that match
;; `gitmerge-skip-regexp' or are marked by --cherry-mark.
(with-temp-buffer
- (call-process "git" nil t nil "log" "--cherry-mark" from
- (concat "^" (car (vc-git-branches))))
+ (call-process "git" nil t nil "log" "--cherry-mark" "--left-only"
+ (concat from "..." (car (vc-git-branches))))
(goto-char (point-max))
(while (re-search-backward "^commit \\(.+\\) \\([0-9a-f]+\\).*" nil t)
(let ((cherrymark (match-string 1))
"Create the buffer for choosing commits."
(with-current-buffer (get-buffer-create gitmerge-buffer)
(erase-buffer)
- (call-process "git" nil t nil "log"
+ (call-process "git" nil t nil "log" "--left-only"
"--pretty=format:%h %<(20,trunc) %an: %<(100,trunc) %s"
- from (concat "^" (car (vc-git-branches))))
+ (concat from "..." (car (vc-git-branches))))
(goto-char (point-min))
(while (looking-at "^\\([a-f0-9]+\\)")
(let ((skipreason (gitmerge-skip-commit-p (match-string 1) commits)))
(when mergehead
(with-current-buffer (get-buffer-create gitmerge-output-buffer)
(erase-buffer)
+ ;; FIXME: We add "-m-" because the default commit message
+ ;; apparently tickles our commit hook:
+ ;; Line longer than 78 characters in commit message
+ ;; Line longer than 78 characters in commit message
+ ;; Line longer than 78 characters in commit message
+ ;; Commit aborted; please see the file CONTRIBUTE
(unless (zerop (call-process "git" nil t nil
- "commit" "--no-edit"))
+ "commit" "--no-edit" "-m-"))
(error "Git error during merge - fix it manually"))))
;; Successfully resumed.
t))))
ignore-value intprops largefile lstat
manywarnings memrchr mkostemp mktime
pipe2 pselect pthread_sigmask putenv qcopy-acl readlink readlinkat
- sig2str socklen stat-time stdalign stddef stdio
+ sig2str socklen stat-time std-gnu11 stdalign stddef stdio
stpcpy strftime strtoimax strtoumax symlink sys_stat
sys_time time time_r time_rz timegm timer-time timespec-add timespec-sub
unsetenv update-copyright utimens
--- /dev/null
+HOW TO TRIAGE EMACS BUGS -*- outline -*-
+
+This document just describes the procedure of triaging bugs, for information on
+how to work with the bug tracker, see the bugtracker file in this same directory
+for the basics. You can also install the debbugs ELPA package for access to M-x
+debbugs-gnu, an emacs interface to debbugs, and M-x debbugs-org, an emacs
+interface via org-mode.
+
+* Bug backlog triage procedure
+
+The goal of this triage is to prune down the list of old bugs, closing
+the ones that are not reproducible on the current release.
+
+ 1. To start, enter debbugs mode (either debbugs-gnu, debbugs-org, or via the
+ web browser), and accept the default list option of bugs that have severity
+ serious, important, or normal.
+ 2. This will also show closed bugs that have yet to be archived. You can
+ filter these out in debbugs-gnu with "x" (debbugs-gnu-toggle-suppress).
+ 3. For each bug, we want to primarily make sure it is still
+ reproducible. A bug can and should stay open as long as it is
+ still a bug and no one has fixed it. The following is a
+ suggested checklist to follow for handling these bugs, along with
+ example replies. Closing, tagging, etc., are done
+ with debbugs control messages, which in debbugs-gnu is initiated
+ with a "C".
+ [ ] Read the mail thread for the bug. Find out if anyone has
+ been able to reproduce this on the current release. If
+ someone has been able to, then your work is finished for this
+ bug.
+ [ ] Make sure there's enough information to reproduce the bug.
+ It should be very clear how to reproduce. If not, please ask
+ for specific steps to reproduce. If you don't get them, and
+ you can't reproduce without them, you can close as
+ "doneunreproducible". Sometimes there is specific hardware
+ involved, such as particular models of keyboards, or it may
+ simply involve a platform you don't have access to. It's
+ fine to ignore those, and let a future triager that is better
+ equipped to reproduce it handle it.
+
+ An example reply asking for clear reproduction steps would be
+ something like: "Hi! In the interest of seeing whether this
+ is reproducible, and to aid anyone who will look at this bug
+ in the future, can you please give instructions on how to
+ reproduce this bug starting from an emacs without
+ configuration ("emacs -Q")?
+ [ ] If there is enough detail to reproduce, but no one has
+ mentioned being able to reproduce on the current release,
+ read the bug description and attempt to reproduce on an emacs
+ started with "emacs -Q" (the goal is to not let our personal
+ configs interfere with bug testing).
+
+ If you can reproduce, then reply on the thread (either on the
+ original message, or anywhere you find appropriate) that you
+ can reproduce this on the current release. If your
+ reproduction gives additional info (such as a backtrace),
+ then add that as well, since it will help whoever attempts to
+ fix it.
+
+ Example reply: "I'd just like to add that I can reproduce
+ this on the latest version of Emacs, Emacs 25."
+
+ If you can't reproduce, state that you can't reproduce it on
+ the current release, ask if they can try again against the
+ current release. Tag the bug as "unreproducable". Wait a
+ few weeks for their reply - if they can reproduce it, then
+ that's great, otherwise close as "doneunreproducible".
+
+ Example reply: "I've attempted to reproduce this on the
+ latest version of emacs, Emacs 25, but haven't been able to.
+ Can you try to reproduce this on this version, and let us
+ know if you are able to? If I don't hear back in a few
+ weeks, I'll just close this bug as unreproducible."
+ [ ] Check that the priority is reasonable. Most bugs should be
+ marked as normal, but crashers and security issues can be
+ marked as serious.
+ 4. Your changes will take some time to take effect. After a period of minutes
+ to hours, you will get a mail telling you the control message has been
+ processed. At this point, if there were no errors detected, you and
+ everyone else can see your changes. If there are errors, read the error
+ text - if you need help, consulting the bugtracker documentation in this
+ same directory.
+
+* New bug triage process
+
+The goal of the new bug triage process is similar to the backlog triage process,
+except that the focus is on prioritizing the bug, and making sure it is has
+necessary information for others to act on.
+
+For each new bug, ask the following questions:
+
+ 1. Is the bug report written in a way to be easy to reproduce (starts from
+ emacs -Q, etc.)? If not, ask the reporter to try and reproduce it on an
+ emacs without customization.
+ 2. Is the bug report written against the latest emacs? If not, try to
+ reproduce on the latest version, and if it can't be reproduced, ask the
+ reporter to try again with the latest version.
+ 3. Is the bug the same as another bug? If so, merge the bugs.
+ 4. What is the priority of the bug? Add a priority: serious, important,
+ normal, minor, or wishlist.
+ 5. Who should be the owner? This depends on what component the bug is part
+ of. You can look at the admin/MAINTAINERS file (then you can just search
+ emacs-devel to match the name with an email address).
+
+In the debbugs-gnu buffer, bugs are marked in the "State" column
+according to the communication flow. Red bugs mean that nobody has
+answered, these bugs need primary attention. Green bugs flag that
+there is a recent communication about, and orange bugs flag that the
+bug hasn't been touched for at least two weeks.
Emacs uses the "blocking bug(s)" feature of Debbugs for bugs need to
be addressed in the next release.
-Currently, bug#19759 is the tracking bug for release of 25.1. Say
-bug#123 needs to be fixed for Emacs 25.1. Send a message to
-control@debbugs.gnu.org that says:
+Currently, bug#19759 is the tracking bug for release of 25.1 and
+bug#21966 is the tracking bug for release of 25.2. Say bug#123 needs
+to be fixed for Emacs 25.1. Send a message to control@debbugs.gnu.org
+that says:
block 19759 by 123
return 2
}
+do_autoconf=false
+test $# -eq 0 && do_autoconf=true
+do_git=false
+
+for arg; do
+ case $arg in
+ --help)
+ exec echo "$0: usage: $0 [all|autoconf|git]";;
+ all)
+ do_autoconf=true do_git=true;;
+ autoconf)
+ do_autoconf=true;;
+ git)
+ do_git=true;;
+ *)
+ echo >&2 "$0: $arg: unknown argument"; exit 1;;
+ esac
+done
+
+
+# Generate Autoconf and Automake related files, if requested.
-cat <<EOF
-Checking whether you have the necessary tools...
-(Read INSTALL.REPO for more details on building Emacs)
+if $do_autoconf; then
-EOF
+ echo 'Checking whether you have the necessary tools...
+(Read INSTALL.REPO for more details on building Emacs)'
-missing=
+ missing=
-for prog in $progs; do
+ for prog in $progs; do
sprog=`echo "$prog" | sed 's/-/_/g'`
eval ${sprog}_why=\""$stat"\"
fi
-done
-
+ done
-if [ x"$missing" != x ]; then
- cat <<EOF
+ if [ x"$missing" != x ]; then
-Building Emacs from the repository requires the following specialized programs:
-EOF
+ echo '
+Building Emacs from the repository requires the following specialized programs:'
for prog in $progs; do
sprog=`echo "$prog" | sed 's/-/_/g'`
done
- cat <<EOF
-
-Your system seems to be missing the following tool(s):
-EOF
+ echo '
+Your system seems to be missing the following tool(s):'
for prog in $missing; do
sprog=`echo "$prog" | sed 's/-/_/g'`
echo "$prog ($why)"
done
- cat <<EOF
-
+ echo '
If you think you have the required tools, please add them to your PATH
and re-run this script.
instead of this script.
-Please report any problems with this script to bug-gnu-emacs@gnu.org .
-EOF
+Please report any problems with this script to bug-gnu-emacs@gnu.org .'
exit 1
+ fi
+
+ echo 'Your system has the required tools.'
+ echo "Running 'autoreconf -fi -I m4' ..."
+
+
+ ## Let autoreconf figure out what, if anything, needs doing.
+ ## Use autoreconf's -f option in case autoreconf itself has changed.
+ autoreconf -fi -I m4 || exit $?
+
+ ## Create a timestamp, so that './autogen.sh; make' doesn't
+ ## cause 'make' to needlessly run 'autoheader'.
+ echo timestamp > src/stamp-h.in || exit
fi
-echo 'Your system has the required tools.'
-echo "Running 'autoreconf -fi -I m4' ..."
+# True if the Git setup was OK before autogen.sh was run.
-## Let autoreconf figure out what, if anything, needs doing.
-## Use autoreconf's -f option in case autoreconf itself has changed.
-autoreconf -fi -I m4 || exit $?
+git_was_ok=true
-## Create a timestamp, so that './autogen.sh; make' doesn't
-## cause 'make' to needlessly run 'autoheader'.
-echo timestamp > src/stamp-h.in || exit
+if $do_git; then
+ case `cp --help 2>/dev/null` in
+ *--backup*--verbose*)
+ cp_options='--backup=numbered --verbose';;
+ *)
+ cp_options='-f';;
+ esac
+fi
-## Configure Git, if using Git.
-if test -d .git && (git status -s) >/dev/null 2>&1; then
+# Like 'git config NAME VALUE' but verbose on change and exiting on failure.
+# Also, do not configure unless requested.
- # Configure 'git diff' hunk header format.
+git_config ()
+{
+ name=$1
+ value=$2
+
+ ovalue=`git config --get "$name"` && test "$ovalue" = "$value" || {
+ if $do_git; then
+ if $git_was_ok; then
+ echo 'Configuring local git repository...'
+ case $cp_options in
+ --backup=*)
+ cp $cp_options --force .git/config .git/config || exit;;
+ esac
+ fi
+ echo "git config $name '$value'"
+ git config "$name" "$value" || exit
+ fi
+ git_was_ok=false
+ }
+}
+
+## Configure Git, if requested.
+
+# Check hashes when transferring objects among repositories.
+
+git_config transfer.fsckObjects true
+
+
+# Configure 'git diff' hunk header format.
- git config 'diff.elisp.xfuncname' \
- '^\(def[^[:space:]]+[[:space:]]+([^()[:space:]]+)' || exit
- git config 'diff.texinfo.xfuncname' \
- '^@node[[:space:]]+([^,[:space:]][^,]+)' || exit
+git_config diff.elisp.xfuncname \
+ '^\(def[^[:space:]]+[[:space:]]+([^()[:space:]]+)'
+git_config diff.texinfo.xfuncname \
+ '^@node[[:space:]]+([^,[:space:]][^,]+)'
- # Install Git hooks.
+# Install Git hooks.
- tailored_hooks=
- sample_hooks=
+tailored_hooks=
+sample_hooks=
- for hook in commit-msg pre-commit; do
- cmp build-aux/git-hooks/$hook .git/hooks/$hook >/dev/null 2>&1 ||
+for hook in commit-msg pre-commit; do
+ cmp build-aux/git-hooks/$hook .git/hooks/$hook >/dev/null 2>&1 ||
tailored_hooks="$tailored_hooks $hook"
- done
- for hook in applypatch-msg pre-applypatch; do
- test ! -r .git/hooks/$hook.sample ||
- cmp .git/hooks/$hook.sample .git/hooks/$hook >/dev/null 2>&1 ||
+done
+for hook in applypatch-msg pre-applypatch; do
+ src=.git/hooks/$hook.sample
+ cmp "$src" .git/hooks/$hook >/dev/null 2>&1 ||
sample_hooks="$sample_hooks $hook"
- done
+done
- if test -n "$tailored_hooks$sample_hooks"; then
+if test -n "$tailored_hooks$sample_hooks"; then
+ if $do_git; then
echo "Installing git hooks..."
- case `cp --help 2>/dev/null` in
- *--backup*--verbose*)
- cp_options='--backup=numbered --verbose';;
- *)
- cp_options='-f';;
- esac
-
if test -n "$tailored_hooks"; then
for hook in $tailored_hooks; do
- cp $cp_options build-aux/git-hooks/$hook .git/hooks || exit
- chmod a-w .git/hooks/$hook || exit
+ dst=.git/hooks/$hook
+ cp $cp_options build-aux/git-hooks/$hook "$dst" || exit
+ chmod a-w "$dst" || exit
done
fi
chmod a-w .git/hooks/$hook || exit
done
fi
+ else
+ git_was_ok=false
fi
fi
-echo "You can now run './configure'."
+if test ! -f configure; then
+ echo "You can now run '$0 autoconf'."
+elif test -d .git && test $git_was_ok = false && test $do_git = false; then
+ echo "You can now run '$0 git'."
+elif test ! -f config.status ||
+ test -n "`find src/stamp-h.in -newer config.status`"; then
+ echo "You can now run './configure'."
+fi
exit 0
AC_PREREQ(2.65)
dnl Note this is parsed by (at least) make-dist and lisp/cedet/ede/emacs.el.
-AC_INIT(GNU Emacs, 25.0.90, bug-gnu-emacs@gnu.org)
+AC_INIT(GNU Emacs, 25.1.50, bug-gnu-emacs@gnu.org)
dnl Set emacs_config_options to the options of 'configure', quoted for the shell,
dnl and then quoted again for a C string. Separate options with spaces.
dnl checks for header files
AC_CHECK_HEADERS_ONCE(
+ malloc.h
sys/systeminfo.h
sys/sysinfo.h
coff.h pty.h
cygwin) hybrid_malloc=yes;;
esac
+if test "${system_malloc}" != yes && test "${doug_lea_malloc}" != yes \
+ && test "${UNEXEC_OBJ}" = unexelf.o; then
+ hybrid_malloc=yes
+fi
+
GMALLOC_OBJ=
+HYBRID_MALLOC=
if test "${system_malloc}" = "yes"; then
AC_DEFINE([SYSTEM_MALLOC], 1,
[Define to 1 to use the system memory allocator, even if it is not
elif test "$hybrid_malloc" = yes; then
AC_DEFINE(HYBRID_MALLOC, 1,
[Define to use gmalloc before dumping and the system malloc after.])
+ HYBRID_MALLOC=1
GNU_MALLOC=
GNU_MALLOC_reason="only before dumping"
GMALLOC_OBJ=gmalloc.o
of the main data segment.])
fi
fi
+AC_SUBST([HYBRID_MALLOC])
+AM_CONDITIONAL([HYBRID_MALLOC_LIB], [test -n "$HYBRID_MALLOC"])
AC_SUBST(GMALLOC_OBJ)
AC_SUBST(VMLIMIT_OBJ)
-if test "$doug_lea_malloc" = "yes" ; then
+if test "$doug_lea_malloc" = "yes" && test "$hybrid_malloc" != yes; then
if test "$GNU_MALLOC" = yes ; then
GNU_MALLOC_reason="
(Using Doug Lea's new malloc from the GNU C Library.)"
use_mmap_for_buffers=no
case "$opsys" in
- cygwin|mingw32|freebsd|irix6-5) use_mmap_for_buffers=yes ;;
+ cygwin|mingw32|irix6-5) use_mmap_for_buffers=yes ;;
esac
AC_FUNC_MMAP
dnl No need to check for posix_memalign if aligned_alloc works.
AC_CHECK_FUNCS([aligned_alloc posix_memalign], [break])
+AC_CHECK_DECLS([aligned_alloc], [], [], [[#include <stdlib.h>]])
dnl Cannot use AC_CHECK_FUNCS
AC_CACHE_CHECK([for __builtin_unwind_init],
SEPCHAR=':'
fi
AC_DEFINE_UNQUOTED(SEPCHAR, ['$SEPCHAR'], [Character that separates PATH elements.])
-dnl This is for MinGW, and is used in test/automated/Makefile.in.
+dnl This is for MinGW, and is used in test/Makefile.in.
dnl The MSYS Bash has heuristics for replacing ':' with ';' when it
dnl decides that a command-line argument to be passed to a MinGW program
dnl is a PATH-style list of directories. But that heuristics plays it
AC_SUBST(RALLOC_OBJ)
if test "$opsys" = "cygwin"; then
- CYGWIN_OBJ="sheap.o cygw32.o"
+ CYGWIN_OBJ="cygw32.o"
## Cygwin differs because of its unexec().
PRE_ALLOC_OBJ=
POST_ALLOC_OBJ=lastfile.o
leim/Makefile nextstep/Makefile nt/Makefile])
dnl test/ is not present in release tarfiles.
-opt_makefile=test/automated/Makefile
+opt_makefile=test/Makefile
if test -f "$srcdir/$opt_makefile.in"; then
SUBDIR_MAKEFILES="$SUBDIR_MAKEFILES $opt_makefile"
dnl Again, it's best not to use a variable. Though you can add
dnl ", [], [opt_makefile='$opt_makefile']" and it should work.
- AC_CONFIG_FILES([test/automated/Makefile])
+ AC_CONFIG_FILES([test/Makefile])
fi
named @file{.dir-locals.el}@footnote{ On MS-DOS, the name of this file
should be @file{_dir-locals.el}, due to limitations of the DOS
filesystems. If the filesystem is limited to 8+3 file names, the name
-of the file will be truncated by the OS to @file{_dir-loc.el}. } in a
+of the file will be truncated by the OS to @file{_dir-loc.el}.
+}@footnote{ You can also use @file{.dir-locals-2.el}, which
+is loaded in addition. This is useful when @file{.dir-locals.el} is
+under version control in a shared repository and can't be used for
+personal customizations. } in a
directory. Whenever Emacs visits any file in that directory or any of
its subdirectories, it will apply the directory-local variables
specified in @file{.dir-locals.el}, as though they had been defined as
it added to the kill ring, so you can use it to display the list of
currently marked files in the echo area.
+@kindex W @r{(Dired)}
+@findex browse-url-of-dired-file
+ If you have an HTML file in the file listing, it can be useful to
+view that file with a browser. The @kbd{W}
+(@code{browse-url-of-dired-file}) command will use the standard
+configured browser to view that file.
+
@kindex ( @r{(Dired)}
@findex dired-hide-details-mode
@vindex dired-hide-details-hide-symlink-targets
can even guess the name of the function or other object that was
changed.
+@c Not worth it.
+@c @vindex change-log-directory-files
+To find the change log file, Emacs searches up the directory tree from
+the file you are editing. By default, it stops if it finds a
+directory that seems to be the root of a version-control repository.
+To change this, customize @code{change-log-directory-files}.
+
@vindex add-log-keep-changes-together
When the variable @code{add-log-keep-changes-together} is
non-@code{nil}, @kbd{C-x 4 a} adds to any existing item for the file
shell.
When you resume Emacs after a suspension caused by emergency escape,
-it asks two questions before going back to what it had been doing:
+it reports the resumption and asks a question or two before going back
+to what it had been doing:
@example
+Emacs is resuming after an emergency escape.
Auto-save? (y or n)
Abort (and dump core)? (y or n)
@end example
@noindent
-Answer each one with @kbd{y} or @kbd{n} followed by @key{RET}.
+Answer each question with @kbd{y} or @kbd{n} followed by @key{RET}.
Saying @kbd{y} to @samp{Auto-save?} causes immediate auto-saving of
all modified buffers in which auto-saving is enabled. Saying @kbd{n}
-skips this.
+skips this. This question is omitted if Emacs is in a state where
+auto-saving cannot be done safely.
Saying @kbd{y} to @samp{Abort (and dump core)?} causes Emacs to
crash, dumping core. This is to enable a wizard to figure out why
then continues to wait for a valid input character, or keyboard-quit.
@end defun
+@defun read-multiple-choice prompt choices
+Ask user a multiple choice question. @var{prompt} should be a string
+that will be displayed as the prompt.
+
+@var{choices} is an alist where the first element in each entry is a
+character to be entered, the second element is a short name for the
+entry to be displayed while prompting (if there's room, it might be
+shortened), and the third, optional entry is a longer explanation that
+will be displayed in a help buffer if the user requests more help.
+
+The return value is the matching value from @var{choices}.
+
+@lisp
+(read-multiple-choice
+ "Continue connecting?"
+ '((?a "always" "Accept this certificate this session and for all future sessions.")
+ (?s "session only" "Accept this certificate this session only.")
+ (?n "no" "Refuse to use this certificate, and close the connection.")))
+@end lisp
+
+The @code{read-multiple-choice-face} face is used to highlight the
+matching characters in the name string on graphical terminals.
+
+@end defun
+
@node Event Mod
@subsection Modifying and Translating Input Events
@cindex modifiers of events
wish. @code{:max-width} and @code{:max-height} will always preserve
the aspect ratio.
+@item :scale @var{scale}
+This should be a number, where values higher than 1 means to increase
+the size, and lower means to decrease the size. For instance, a value
+of 0.25 will make the image a quarter size of what it originally was.
+If the scaling makes the image larger than specified by
+@code{:max-width} or @code{:max-height}, the resulting size will not
+exceed those two values.
+
@item :format @var{type}
The value, @var{type}, should be a symbol specifying the type of the
image data, as found in @code{image-format-suffixes}. This is used
@end example
@end defun
+@vindex image-scaling-factor
+Images are automatically scaled when created based on the
+@code{image-scaling-factor} variable. The value is either a floating
+point number (where numbers higher than 1 means to increase the size
+and lower means to shrink the size), or the symbol @code{auto}, which
+will compute a scaling factor based on the font pixel size.
+
@node Showing Images
@subsection Showing Images
@cindex show image
(@pxref{Integer Basics}).
If @var{limit} is @code{t}, it means to choose a new seed as if Emacs
-were restarting, typically from the system entropy. On systems
-lacking entropy pools, choose the seed from less-random volatile data
-such as the current time.
+were restarting.
If @var{limit} is a string, it means to choose a new seed based on the
string's contents.
cause anything special to happen.
@end defun
+@findex timer-list
+The @code{timer-list} command lists all the currently active timers.
+There's only one command available in the buffer displayed: @kbd{c}
+(@code{timer-list-cancel}) that will cancel the timer on the line
+under point.
+
@node Idle Timers
@section Idle Timers
@cindex idle timers
@node Word Motion
@subsection Motion by Words
- The functions for parsing words described below use the syntax table
-to decide whether a given character is part of a word. @xref{Syntax
-Tables}.
+ These functions for parsing words use the syntax table to decide
+whether a given character is part of a word. @xref{Syntax Tables}.
@deffn Command forward-word &optional count
This function moves point forward @var{count} words (or backward if
@var{count} is negative). If @var{count} is omitted or @code{nil}, it
-defaults to 1. In an interactive call, @var{count} is specified by
-the numeric prefix argument.
+defaults to 1.
``Moving one word'' means moving until point crosses a
-word-constituent character, which indicates the beginning of a word,
-and then continue moving until the word ends. By default, characters
-that begin and end words, known as @dfn{word boundaries}, are defined
-by the current buffer's syntax table (@pxref{Syntax Class Table}), but
-modes can override that by setting up a suitable
-@code{find-word-boundary-function-table}, described below. In any
-case, this function cannot move point past the boundary of the
-accessible portion of the buffer, or across a field boundary
+word-constituent character and then encounters a word-separator
+character. However, this function cannot move point past the boundary
+of the accessible portion of the buffer, or across a field boundary
(@pxref{Fields}). The most common case of a field boundary is the end
of the prompt in the minibuffer.
If @code{inhibit-field-text-motion} is non-@code{nil},
this function ignores field boundaries.
+In an interactive call, @var{count} is specified by the numeric prefix
+argument.
@end deffn
@deffn Command backward-word &optional count
@defopt words-include-escapes
@c Emacs 19 feature
-This variable affects the behavior of @code{forward-word} and
-@code{backward-word}, and everything that uses them. If it is
-non-@code{nil}, then characters in the escape and character-quote
-syntax classes count as part of words. Otherwise, they do not.
+This variable affects the behavior of @code{forward-word} and everything
+that uses it. If it is non-@code{nil}, then characters in the
+escape and character-quote syntax classes count as part of
+words. Otherwise, they do not.
@end defopt
@defvar inhibit-field-text-motion
@code{forward-paragraph} ignore field boundaries.
@end defvar
-@defvar find-word-boundary-function-table
-This variable affects the behavior of @code{forward-word} and
-@code{backward-word}, and everything that uses them. Its value is a
-char-table (@pxref{Char-Tables}) of functions to search for word
-boundaries. If a character has a non-@code{nil} entry in this table,
-then when a word starts or ends with that character, the corresponding
-function will be called with 2 arguments: @var{pos} and @var{limit}.
-The function should return the position of the other word boundary.
-Specifically, if @var{pos} is smaller than @var{limit}, then @var{pos}
-is at the beginning of a word, and the function should return the
-position after the last character of the word; otherwise, @var{pos} is
-at the last character of a word, and the function should return the
-position of that word's first character.
-@end defvar
-
-@defun forward-word-strictly &optional count
-This function is like @code{forward-word}, but it is not affected by
-@code{find-word-boundary-function-table}. Lisp programs that should
-not change behavior when word movement is modified by modes which set
-that table, such as @code{subword-mode}, should use this function
-instead of @code{forward-word}.
-@end defun
-
-@defun backward-word-strictly &optional count
-This function is like @code{backward-word}, but it is not affected by
-@code{find-word-boundary-function-table}. Like with
-@code{forward-word-strictly}, use this function instead of
-@code{backward-word} when movement by words should only consider
-syntax tables.
-@end defun
-
@node Buffer End Motion
@subsection Motion to an End of the Buffer
@cindex move to beginning or end of buffer
[\|\-\-parse\-stdin=\fIfile\fP\|]
.br
[\|\-\-append\|] [\|\-\-no\-defines\|] [\|\-\-globals\|]
-[\|\-\-no\-globals\|] [\|\-\-no\-line\-directive\|] [\|\-\-include=\fIfile\fP\|]
+[\|\-\-no\-globals\|] [\|\-\-include=\fIfile\fP\|]
[\|\-\-ignore\-indentation\|] [\|\-\-language=\fIlanguage\fP\|]
[\|\-\-members\|] [\|\-\-no\-members\|] [\|\-\-output=\fItagfile\fP\|]
[\|\-\-class\-qualify\|]
[\|\-\-parse\-stdin=\fIfile\fP\|]
.br
[\|\-\-append\|] [\|\-\-backward\-search\|]
-[\|\-\-cxref\|] [\|\-\-no\-defines\|] [\|\-\-globals\|]
-[\|\-\-no\-globals\|] [\|\-\-no\-line\-directive\|] [\|\-\-ignore\-indentation\|]
+[\|\-\-cxref\|] [\|\-\-no\-defines\|]
+[\|\-\-globals\|] [\|\-\-no\-globals\|] [\|\-\-ignore\-indentation\|]
[\|\-\-language=\fIlanguage\fP\|] [\|\-\-members\|] [\|\-\-no\-members\|]
[\|\-\-class\-qualify\|]
[\|\-\-output=\fItagfile\fP\|] [\|\-\-regex=\fIregexp\fP\|]
Do not tag global variables in C and derived languages. Typically this
reduces the file size by one fourth.
.TP
-.B \-\-no\-line\-directive
-Ignore \fB#line\fP preprocessor directives in C and derived languages. The
-default is to honor those directives, and record the tags as if the
-file scanned was the one named in the \fB#line\fP directive. This switch is
-useful when the original file named by \fB#line\fP is no longer available.
-.TP
\fB\-i\fP \fIfile\fP, \fB\-\-include=\fIfile\fP
Include a note in the tag file indicating that, when searching for a
tag, one should also consult the tags file \fIfile\fP after checking the
cp gnustmppdf.pdf $@
rm gnustmppdf.*
-${buildinfodir}/tramp.info tramp.html: EXTRA_OPTS = -D emacs
${buildinfodir}/tramp.info tramp.html: ${srcdir}/trampver.texi
The @kbd{F} command (@code{eww-toggle-fonts}) toggles whether to use
variable-pitch fonts or not. This sets the @code{shr-use-fonts} variable.
+@findex eww-toggle-colors
+@findex shr-use-colors
+@kindex F
+ The @kbd{C} command (@code{eww-toggle-colors}) toggles whether to use
+HTML-specified colors or not. This sets the @code{shr-use-colors} variable.
+
@findex eww-download
@vindex eww-download-directory
@kindex d
(@code{eww-list-bookmarks}). This will open the bookmark buffer
@file{*eww bookmarks*}.
+@findex eww-switch-to-buffer
@findex eww-list-buffers
+@kindex s
@kindex S
@cindex Multiple Buffers
To get summary of currently opened EWW buffers, press @kbd{S}
(@code{eww-list-buffers}). The @file{*eww buffers*} buffer allows you
-to quickly kill, flip through and switch to specific EWW buffer.
+to quickly kill, flip through and switch to specific EWW buffer. To
+switch EWW buffers through a minibuffer prompt, press @kbd{s}
+(@code{eww-switch-to-buffer}).
@findex eww-browse-with-external-browser
@vindex shr-external-browser
@item
@vindex gnus-ignored-from-addresses
-The @code{gnus-ignored-from-addresses} variable says when the @samp{%f}
-summary line spec returns the @code{To}, @code{Newsreader} or
-@code{From} header. If this regexp matches the contents of the
-@code{From} header, the value of the @code{To} or @code{Newsreader}
-headers are used instead.
+The @code{gnus-ignored-from-addresses} variable says when the
+@samp{%f} summary line spec returns the @code{To}, @code{Newsreader}
+or @code{From} header. The variable may be a regexp or a predicate
+function. If this matches the contents of the @code{From}
+header, the value of the @code{To} or @code{Newsreader} headers are
+used instead.
To distinguish regular articles from those where the @code{From} field
has been swapped, a string is prefixed to the @code{To} or
@vindex message-dont-reply-to-names
Addresses that match the @code{message-dont-reply-to-names} regular
-expression (or list of regular expressions) will be removed from the
-@code{Cc} header. A value of @code{nil} means exclude your name only.
+expression (or list of regular expressions or a predicate function)
+will be removed from the @code{Cc} header. A value of @code{nil} means
+exclude your name only.
@vindex message-prune-recipient-rules
@code{message-prune-recipient-rules} is used to prune the addresses
@item message-alternative-emails
@vindex message-alternative-emails
-Regexp matching alternative email addresses. The first address in the
-To, Cc or From headers of the original article matching this variable is
-used as the From field of outgoing messages, replacing the default From
-value.
+Regexp or predicate function matching alternative email addresses.
+The first address in the To, Cc or From headers of the original
+article matching this variable is used as the From field of outgoing
+messages, replacing the default From value.
For example, if you have two secondary email addresses john@@home.net
and john.doe@@work.com and want to use them in the From field when
@code{"%.3f"}, all the cells using printer @samp{foo} will be
reprinted accordingly.
+When you define a printer function with a lambda expression taking one
+argument, please take care that the returned value is a string, or a
+list containing a string, even when the input argument has an
+unexpected value. Here is an example:
+
+@example
+(lambda (val)
+ (cond
+ ((null val) "")
+ ((and (numberp val) (>= val 0)) (format "%.1f" val))
+ (t (ses-center-span (format "%S" val) ?#))))
+@end example
+
+This example will:
+@itemize
+@item
+When the cell is empty (ie.@: when @code{val} is @code{nil}), print an
+empty string @code{""}
+@item
+When the cell value is a non negative number, format the the value in
+fixed-point notation with one decimal after point
+@item
+Otherwise, handle the value as erroneous by printing it as an
+s-expression (using @code{prin1}), centered and surrounded by @code{#}
+filling.
+@end itemize
+
+
+
+
@node Clearing cells
@section Clearing cells
@cindex clearing commands
% Load plain if necessary, i.e., if running under initex.
\expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi
%
-\def\texinfoversion{2016-01-20.20}
+\def\texinfoversion{2016-02-02.07}
%
% Copyright 1985, 1986, 1988, 1990, 1991, 1992, 1993, 1994, 1995,
% 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
%
\uccode`\1=`\{ \uppercase{\def\{{1}}%
\uccode`\1=`\} \uppercase{\def\}{1}}%
- \let\lbracechar\{
- \let\rbracechar\}
+ \let\lbracechar\{%
+ \let\rbracechar\}%
%
% Non-English letters.
\def\AA{AA}%
%
% output the `page 3'.
\turnoffactive \putwordpage\tie\refx{#1-pg}{}%
- \ifx,\tokenafterxref
- \else\ifx.\tokenafterxref
- \else\ifx;\tokenafterxref
- \else\ifx)\tokenafterxref
- \else,% add a , if xref not followed by punctuation
- \fi\fi\fi\fi
+ \if\noexpand\tokenafterxref\space
+ ,% add a , if xref not followed by punctuation
+ \fi
\fi\fi
\fi
\endlink
\DeclareUnicodeCharacter{00AD}{\-}
\DeclareUnicodeCharacter{00AE}{\registeredsymbol}
\DeclareUnicodeCharacter{00AF}{\={ }}
-
+ %
\DeclareUnicodeCharacter{00B0}{\ringaccent{ }}
\DeclareUnicodeCharacter{00B1}{\ensuremath\pm}
\DeclareUnicodeCharacter{00B2}{$^2$}
\DeclareUnicodeCharacter{00BD}{$1\over2$}
\DeclareUnicodeCharacter{00BE}{$3\over4$}
\DeclareUnicodeCharacter{00BF}{\questiondown}
-
+ %
\DeclareUnicodeCharacter{00C0}{\`A}
\DeclareUnicodeCharacter{00C1}{\'A}
\DeclareUnicodeCharacter{00C2}{\^A}
\DeclareUnicodeCharacter{00CD}{\'I}
\DeclareUnicodeCharacter{00CE}{\^I}
\DeclareUnicodeCharacter{00CF}{\"I}
-
+ %
\DeclareUnicodeCharacter{00D0}{\DH}
\DeclareUnicodeCharacter{00D1}{\~N}
\DeclareUnicodeCharacter{00D2}{\`O}
\DeclareUnicodeCharacter{00DD}{\'Y}
\DeclareUnicodeCharacter{00DE}{\TH}
\DeclareUnicodeCharacter{00DF}{\ss}
-
+ %
\DeclareUnicodeCharacter{00E0}{\`a}
\DeclareUnicodeCharacter{00E1}{\'a}
\DeclareUnicodeCharacter{00E2}{\^a}
\DeclareUnicodeCharacter{00ED}{\'{\dotless{i}}}
\DeclareUnicodeCharacter{00EE}{\^{\dotless{i}}}
\DeclareUnicodeCharacter{00EF}{\"{\dotless{i}}}
-
+ %
\DeclareUnicodeCharacter{00F0}{\dh}
\DeclareUnicodeCharacter{00F1}{\~n}
\DeclareUnicodeCharacter{00F2}{\`o}
\DeclareUnicodeCharacter{00FD}{\'y}
\DeclareUnicodeCharacter{00FE}{\th}
\DeclareUnicodeCharacter{00FF}{\"y}
-
+ %
\DeclareUnicodeCharacter{0100}{\=A}
\DeclareUnicodeCharacter{0101}{\=a}
\DeclareUnicodeCharacter{0102}{\u{A}}
\DeclareUnicodeCharacter{010D}{\v{c}}
\DeclareUnicodeCharacter{010E}{\v{D}}
\DeclareUnicodeCharacter{010F}{d'}
-
+ %
\DeclareUnicodeCharacter{0110}{\DH}
\DeclareUnicodeCharacter{0111}{\dh}
\DeclareUnicodeCharacter{0112}{\=E}
\DeclareUnicodeCharacter{011D}{\^g}
\DeclareUnicodeCharacter{011E}{\u{G}}
\DeclareUnicodeCharacter{011F}{\u{g}}
-
+ %
\DeclareUnicodeCharacter{0120}{\dotaccent{G}}
\DeclareUnicodeCharacter{0121}{\dotaccent{g}}
\DeclareUnicodeCharacter{0122}{\cedilla{G}}
\DeclareUnicodeCharacter{012D}{\u{\dotless{i}}}
\DeclareUnicodeCharacter{012E}{\ogonek{I}}
\DeclareUnicodeCharacter{012F}{\ogonek{i}}
-
+ %
\DeclareUnicodeCharacter{0130}{\dotaccent{I}}
\DeclareUnicodeCharacter{0131}{\dotless{i}}
\DeclareUnicodeCharacter{0132}{IJ}
\DeclareUnicodeCharacter{013D}{L'}% should kern
\DeclareUnicodeCharacter{013E}{l'}% should kern
\DeclareUnicodeCharacter{013F}{L\U{00B7}}
-
+ %
\DeclareUnicodeCharacter{0140}{l\U{00B7}}
\DeclareUnicodeCharacter{0141}{\L}
\DeclareUnicodeCharacter{0142}{\l}
\DeclareUnicodeCharacter{014D}{\=o}
\DeclareUnicodeCharacter{014E}{\u{O}}
\DeclareUnicodeCharacter{014F}{\u{o}}
-
+ %
\DeclareUnicodeCharacter{0150}{\H{O}}
\DeclareUnicodeCharacter{0151}{\H{o}}
\DeclareUnicodeCharacter{0152}{\OE}
\DeclareUnicodeCharacter{015D}{\^s}
\DeclareUnicodeCharacter{015E}{\cedilla{S}}
\DeclareUnicodeCharacter{015F}{\cedilla{s}}
-
+ %
\DeclareUnicodeCharacter{0160}{\v{S}}
\DeclareUnicodeCharacter{0161}{\v{s}}
\DeclareUnicodeCharacter{0162}{\cedilla{T}}
\DeclareUnicodeCharacter{016D}{\u{u}}
\DeclareUnicodeCharacter{016E}{\ringaccent{U}}
\DeclareUnicodeCharacter{016F}{\ringaccent{u}}
-
+ %
\DeclareUnicodeCharacter{0170}{\H{U}}
\DeclareUnicodeCharacter{0171}{\H{u}}
\DeclareUnicodeCharacter{0172}{\ogonek{U}}
\DeclareUnicodeCharacter{017D}{\v{Z}}
\DeclareUnicodeCharacter{017E}{\v{z}}
\DeclareUnicodeCharacter{017F}{\missingcharmsg{LONG S}}
-
+ %
\DeclareUnicodeCharacter{01C4}{D\v{Z}}
\DeclareUnicodeCharacter{01C5}{D\v{z}}
\DeclareUnicodeCharacter{01C6}{d\v{z}}
\DeclareUnicodeCharacter{01CD}{\v{A}}
\DeclareUnicodeCharacter{01CE}{\v{a}}
\DeclareUnicodeCharacter{01CF}{\v{I}}
-
+ %
\DeclareUnicodeCharacter{01D0}{\v{\dotless{i}}}
\DeclareUnicodeCharacter{01D1}{\v{O}}
\DeclareUnicodeCharacter{01D2}{\v{o}}
\DeclareUnicodeCharacter{01D3}{\v{U}}
\DeclareUnicodeCharacter{01D4}{\v{u}}
-
+ %
\DeclareUnicodeCharacter{01E2}{\={\AE}}
\DeclareUnicodeCharacter{01E3}{\={\ae}}
\DeclareUnicodeCharacter{01E6}{\v{G}}
\DeclareUnicodeCharacter{01E7}{\v{g}}
\DeclareUnicodeCharacter{01E8}{\v{K}}
\DeclareUnicodeCharacter{01E9}{\v{k}}
-
+ %
\DeclareUnicodeCharacter{01F0}{\v{\dotless{j}}}
\DeclareUnicodeCharacter{01F1}{DZ}
\DeclareUnicodeCharacter{01F2}{Dz}
\DeclareUnicodeCharacter{01FD}{\'{\ae}}
\DeclareUnicodeCharacter{01FE}{\'{\O}}
\DeclareUnicodeCharacter{01FF}{\'{\o}}
-
+ %
\DeclareUnicodeCharacter{021E}{\v{H}}
\DeclareUnicodeCharacter{021F}{\v{h}}
-
+ %
\DeclareUnicodeCharacter{0226}{\dotaccent{A}}
\DeclareUnicodeCharacter{0227}{\dotaccent{a}}
\DeclareUnicodeCharacter{0228}{\cedilla{E}}
\DeclareUnicodeCharacter{0229}{\cedilla{e}}
\DeclareUnicodeCharacter{022E}{\dotaccent{O}}
\DeclareUnicodeCharacter{022F}{\dotaccent{o}}
-
+ %
\DeclareUnicodeCharacter{0232}{\=Y}
\DeclareUnicodeCharacter{0233}{\=y}
\DeclareUnicodeCharacter{0237}{\dotless{j}}
-
+ %
\DeclareUnicodeCharacter{02DB}{\ogonek{ }}
-
+ %
% Greek letters upper case
\DeclareUnicodeCharacter{0391}{{\it A}}
\DeclareUnicodeCharacter{0392}{{\it B}}
\DeclareUnicodeCharacter{03A7}{{\it X}}
\DeclareUnicodeCharacter{03A8}{\ensuremath{\mit\Psi}}
\DeclareUnicodeCharacter{03A9}{\ensuremath{\mit\Omega}}
-
+ %
% Vowels with accents
\DeclareUnicodeCharacter{0390}{\ensuremath{\ddot{\acute\iota}}}
\DeclareUnicodeCharacter{03AC}{\ensuremath{\acute\alpha}}
\DeclareUnicodeCharacter{03AE}{\ensuremath{\acute\eta}}
\DeclareUnicodeCharacter{03AF}{\ensuremath{\acute\iota}}
\DeclareUnicodeCharacter{03B0}{\ensuremath{\acute{\ddot\upsilon}}}
-
+ %
% Standalone accent
\DeclareUnicodeCharacter{0384}{\ensuremath{\acute{\ }}}
-
+ %
% Greek letters lower case
\DeclareUnicodeCharacter{03B1}{\ensuremath\alpha}
\DeclareUnicodeCharacter{03B2}{\ensuremath\beta}
\DeclareUnicodeCharacter{03C7}{\ensuremath\chi}
\DeclareUnicodeCharacter{03C8}{\ensuremath\psi}
\DeclareUnicodeCharacter{03C9}{\ensuremath\omega}
-
+ %
% More Greek vowels with accents
\DeclareUnicodeCharacter{03CA}{\ensuremath{\ddot\iota}}
\DeclareUnicodeCharacter{03CB}{\ensuremath{\ddot\upsilon}}
\DeclareUnicodeCharacter{03CC}{\ensuremath{\acute o}}
\DeclareUnicodeCharacter{03CD}{\ensuremath{\acute\upsilon}}
\DeclareUnicodeCharacter{03CE}{\ensuremath{\acute\omega}}
-
+ %
% Variant Greek letters
\DeclareUnicodeCharacter{03D1}{\ensuremath\vartheta}
\DeclareUnicodeCharacter{03D6}{\ensuremath\varpi}
\DeclareUnicodeCharacter{03F1}{\ensuremath\varrho}
-
+ %
\DeclareUnicodeCharacter{1E02}{\dotaccent{B}}
\DeclareUnicodeCharacter{1E03}{\dotaccent{b}}
\DeclareUnicodeCharacter{1E04}{\udotaccent{B}}
\DeclareUnicodeCharacter{1E0D}{\udotaccent{d}}
\DeclareUnicodeCharacter{1E0E}{\ubaraccent{D}}
\DeclareUnicodeCharacter{1E0F}{\ubaraccent{d}}
-
+ %
\DeclareUnicodeCharacter{1E1E}{\dotaccent{F}}
\DeclareUnicodeCharacter{1E1F}{\dotaccent{f}}
-
+ %
\DeclareUnicodeCharacter{1E20}{\=G}
\DeclareUnicodeCharacter{1E21}{\=g}
\DeclareUnicodeCharacter{1E22}{\dotaccent{H}}
\DeclareUnicodeCharacter{1E25}{\udotaccent{h}}
\DeclareUnicodeCharacter{1E26}{\"H}
\DeclareUnicodeCharacter{1E27}{\"h}
-
+ %
\DeclareUnicodeCharacter{1E30}{\'K}
\DeclareUnicodeCharacter{1E31}{\'k}
\DeclareUnicodeCharacter{1E32}{\udotaccent{K}}
\DeclareUnicodeCharacter{1E3B}{\ubaraccent{l}}
\DeclareUnicodeCharacter{1E3E}{\'M}
\DeclareUnicodeCharacter{1E3F}{\'m}
-
+ %
\DeclareUnicodeCharacter{1E40}{\dotaccent{M}}
\DeclareUnicodeCharacter{1E41}{\dotaccent{m}}
\DeclareUnicodeCharacter{1E42}{\udotaccent{M}}
\DeclareUnicodeCharacter{1E47}{\udotaccent{n}}
\DeclareUnicodeCharacter{1E48}{\ubaraccent{N}}
\DeclareUnicodeCharacter{1E49}{\ubaraccent{n}}
-
+ %
\DeclareUnicodeCharacter{1E54}{\'P}
\DeclareUnicodeCharacter{1E55}{\'p}
\DeclareUnicodeCharacter{1E56}{\dotaccent{P}}
\DeclareUnicodeCharacter{1E5B}{\udotaccent{r}}
\DeclareUnicodeCharacter{1E5E}{\ubaraccent{R}}
\DeclareUnicodeCharacter{1E5F}{\ubaraccent{r}}
-
+ %
\DeclareUnicodeCharacter{1E60}{\dotaccent{S}}
\DeclareUnicodeCharacter{1E61}{\dotaccent{s}}
\DeclareUnicodeCharacter{1E62}{\udotaccent{S}}
\DeclareUnicodeCharacter{1E6D}{\udotaccent{t}}
\DeclareUnicodeCharacter{1E6E}{\ubaraccent{T}}
\DeclareUnicodeCharacter{1E6F}{\ubaraccent{t}}
-
+ %
\DeclareUnicodeCharacter{1E7C}{\~V}
\DeclareUnicodeCharacter{1E7D}{\~v}
\DeclareUnicodeCharacter{1E7E}{\udotaccent{V}}
\DeclareUnicodeCharacter{1E7F}{\udotaccent{v}}
-
+ %
\DeclareUnicodeCharacter{1E80}{\`W}
\DeclareUnicodeCharacter{1E81}{\`w}
\DeclareUnicodeCharacter{1E82}{\'W}
\DeclareUnicodeCharacter{1E8D}{\"x}
\DeclareUnicodeCharacter{1E8E}{\dotaccent{Y}}
\DeclareUnicodeCharacter{1E8F}{\dotaccent{y}}
-
+ %
\DeclareUnicodeCharacter{1E90}{\^Z}
\DeclareUnicodeCharacter{1E91}{\^z}
\DeclareUnicodeCharacter{1E92}{\udotaccent{Z}}
\DeclareUnicodeCharacter{1E97}{\"t}
\DeclareUnicodeCharacter{1E98}{\ringaccent{w}}
\DeclareUnicodeCharacter{1E99}{\ringaccent{y}}
-
+ %
\DeclareUnicodeCharacter{1EA0}{\udotaccent{A}}
\DeclareUnicodeCharacter{1EA1}{\udotaccent{a}}
-
+ %
\DeclareUnicodeCharacter{1EB8}{\udotaccent{E}}
\DeclareUnicodeCharacter{1EB9}{\udotaccent{e}}
\DeclareUnicodeCharacter{1EBC}{\~E}
\DeclareUnicodeCharacter{1EBD}{\~e}
-
+ %
\DeclareUnicodeCharacter{1ECA}{\udotaccent{I}}
\DeclareUnicodeCharacter{1ECB}{\udotaccent{i}}
\DeclareUnicodeCharacter{1ECC}{\udotaccent{O}}
\DeclareUnicodeCharacter{1ECD}{\udotaccent{o}}
-
+ %
\DeclareUnicodeCharacter{1EE4}{\udotaccent{U}}
\DeclareUnicodeCharacter{1EE5}{\udotaccent{u}}
-
+ %
\DeclareUnicodeCharacter{1EF2}{\`Y}
\DeclareUnicodeCharacter{1EF3}{\`y}
\DeclareUnicodeCharacter{1EF4}{\udotaccent{Y}}
-
+ %
\DeclareUnicodeCharacter{1EF8}{\~Y}
\DeclareUnicodeCharacter{1EF9}{\~y}
-
+ %
% Punctuation
\DeclareUnicodeCharacter{2013}{--}
\DeclareUnicodeCharacter{2014}{---}
\DeclareUnicodeCharacter{2026}{\dots}
\DeclareUnicodeCharacter{2039}{\guilsinglleft}
\DeclareUnicodeCharacter{203A}{\guilsinglright}
-
+ %
\DeclareUnicodeCharacter{20AC}{\euro}
-
+ %
\DeclareUnicodeCharacter{2192}{\expansion}
\DeclareUnicodeCharacter{21D2}{\result}
-
+ %
% Mathematical symbols
\DeclareUnicodeCharacter{2200}{\ensuremath\forall}
\DeclareUnicodeCharacter{2203}{\ensuremath\exists}
\DeclareUnicodeCharacter{2265}{\ensuremath\geq}
\DeclareUnicodeCharacter{2282}{\ensuremath\subset}
\DeclareUnicodeCharacter{2287}{\ensuremath\supseteq}
-
+ %
\DeclareUnicodeCharacter{2016}{\ensuremath\Vert}
\DeclareUnicodeCharacter{2032}{\ensuremath\prime}
\DeclareUnicodeCharacter{210F}{\ensuremath\hbar}
\DeclareUnicodeCharacter{230B}{\ensuremath\rfloor}
\DeclareUnicodeCharacter{2322}{\ensuremath\frown}
\DeclareUnicodeCharacter{2323}{\ensuremath\smile}
-
+ %
\DeclareUnicodeCharacter{25A1}{\ensuremath\Box}
\DeclareUnicodeCharacter{25B3}{\ensuremath\triangle}
\DeclareUnicodeCharacter{25B7}{\ensuremath\triangleright}
\DeclareUnicodeCharacter{2A3F}{\ensuremath\amalg}
\DeclareUnicodeCharacter{2AAF}{\ensuremath\preceq}
\DeclareUnicodeCharacter{2AB0}{\ensuremath\succeq}
-
+ %
\global\mathchardef\checkmark="1370 % actually the square root sign
\DeclareUnicodeCharacter{2713}{\ensuremath\checkmark}
}% end of \utfeightchardefs
@include trampver.texi
-@c Macro for formatting a file name according to the respective syntax.
-@c Macro arguments should not have any leading or
-@c trailing whitespace. Not very elegant, but I don't know it better.
+@c Macro for formatting a file name according to the respective
+@c syntax. Macro arguments should not have any leading or trailing
+@c whitespace. Not very elegant, but I don't know it better.
@macro trampfn {method, userhost, localname}
@value{prefix}@c
@end copying
@c Entries for @command{install-info} to use
-@dircategory @value{emacsname} network features
+@dircategory Emacs network features
@direntry
* TRAMP: (tramp). Transparent Remote Access, Multiple Protocol
- @value{emacsname} remote file access via ssh and scp.
+ Emacs remote file access via ssh and scp.
@end direntry
@titlepage
@contents
-@ifnottex
@node Top, Overview, (dir), (dir)
@top @value{tramp} version @value{trampver} User Manual
+@ifnottex
This file documents @value{tramp} version @value{trampver}, a remote file
-editing package for @value{emacsname}.
+editing package for Emacs.
@value{tramp} stands for ``Transparent Remote (file) Access, Multiple
Protocol''. This package provides remote file editing, similar to
-@value{ftppackagename}.
+Ange FTP.
-The difference is that @value{ftppackagename} uses FTP to transfer
-files between the local and the remote host, whereas @value{tramp} uses a
-combination of @command{rsh} and @command{rcp} or other work-alike
-programs, such as @command{ssh}/@command{scp}.
+The difference is that Ange FTP uses FTP to transfer files between the
+local and the remote host, whereas @value{tramp} uses a combination of
+@command{rsh} and @command{rcp} or other work-alike programs, such as
+@command{ssh}/@command{scp}.
You can find the latest version of this document on the web at
@uref{http://www.gnu.org/software/tramp/}.
-@c Pointer to the other Emacs flavor is necessary only in case of
-@c standalone installation.
-@ifset installchapter
-The manual has been generated for @value{emacsname}.
-@ifinfo
-If you want to read the info pages for @value{emacsothername}, you
-should read in @ref{Installation} how to create them.
-@end ifinfo
-@ifhtml
-If you're using the other Emacs flavor, you should read the
-@uref{@value{emacsotherfilename}, @value{emacsothername}} pages.
-@end ifhtml
-@end ifset
-
@ifhtml
The latest release of @value{tramp} is available for
@uref{ftp://ftp.gnu.org/gnu/tramp/, download}, or you may see
@end ifhtml
@insertcopying
-
@end ifnottex
@menu
* Obtaining Tramp:: How to obtain @value{tramp}.
* History:: History of @value{tramp}.
@ifset installchapter
-* Installation:: Installing @value{tramp} with your @value{emacsname}.
+* Installation:: Installing @value{tramp} with your Emacs.
@end ifset
* Configuration:: Configuring @value{tramp} for use.
* Usage:: An overview of the operation of @value{tramp}.
How file names, directories and localnames
are mangled and managed.
* Traces and Profiles:: How to Customize Traces.
-* Issues:: Debatable Issues and What Was Decided.
* GNU Free Documentation License:: The license for this documentation.
* Function Index:: @value{tramp} functions.
--- The Detailed Node Listing ---
@c
@ifset installchapter
-Installing @value{tramp} with your @value{emacsname}
+Installing @value{tramp} with your Emacs
* Installation parameters:: Parameters in order to control installation.
* Load paths:: How to plug-in @value{tramp} into your environment.
* Connection types:: Types of connections to remote hosts.
* Inline methods:: Inline methods.
* External methods:: External methods.
-@ifset emacsgvfs
* GVFS based methods:: GVFS based external methods.
-@end ifset
-@ifset emacsgw
* Gateway methods:: Gateway methods.
-@end ifset
* Default Method:: Selecting a default method.
* Default User:: Selecting a default user.
* Default Host:: Selecting a default host.
* File name Syntax:: @value{tramp} file name conventions.
* File name completion:: File name completion.
* Ad-hoc multi-hops:: Declaring multiple hops in the file name.
-* Remote processes:: Integration with other @value{emacsname} packages.
+* Remote processes:: Integration with other Emacs packages.
* Cleanup remote connections:: Cleanup remote connections.
How file names, directories and localnames are mangled and managed
* Localname deconstruction:: Breaking a localname into its components.
-@ifset emacs
* External packages:: Integration with external Lisp packages.
-@end ifset
@end detailmenu
@end menu
@cindex overview
@value{tramp} is for transparently accessing remote files from within
-@value{emacsname}. @value{tramp} enables an easy, convenient, and
-consistent interface to remote files as if they are local files.
-@value{tramp}'s transparency extends to editing, version control, and
-@code{dired}.
+Emacs. @value{tramp} enables an easy, convenient, and consistent
+interface to remote files as if they are local files. @value{tramp}'s
+transparency extends to editing, version control, and @code{dired}.
@value{tramp} can access remote hosts using any number of access
methods, such as @command{rsh}, @command{rlogin}, @command{telnet},
@value{tramp} temporarily transfers a remote file's contents to the
local host editing and related operations. @value{tramp} can also
transfer files between hosts using standard Emacs interfaces, a
-benefit of direct integration of @value{tramp} in @value{emacsname}.
+benefit of direct integration of @value{tramp} in Emacs.
@value{tramp} can transfer files using any number of available host
programs for remote files, such as @command{rcp}, @command{scp},
@value{tramp} invokes @samp{telnet @var{host}} or @samp{rsh @var{host}
-l @var{user}} and establishes an external process to connect to the
remote host. @value{tramp} communicates with the process through an
-@value{emacsname} buffer, which also shows output from the remote
-host.
+Emacs buffer, which also shows output from the remote host.
@item
The remote host may prompt for a login name (for @command{telnet}, for
@c For the end user
@node Obtaining Tramp
-@chapter Obtaining Tramp.
+@chapter Obtaining @value{tramp}
@cindex obtaining Tramp
@value{tramp} is included as part of Emacs (since Emacs version 22.1).
Another way is to follow the terminal session below:
@example
-] @strong{cd ~/@value{emacsdir}}
+] @strong{cd ~/emacs}
] @strong{git clone git://git.savannah.gnu.org/tramp.git}
@end example
@end example
@noindent
-After one of the above commands, @file{~/@value{emacsdir}/tramp} will
+After one of the above commands, @file{~/emacs/tramp} will
containing the latest version of @value{tramp}.
@noindent
To fetch updates from the repository, use git pull:
@example
-] @strong{cd ~/@value{emacsdir}/tramp}
+] @strong{cd ~/emacs/tramp}
] @strong{git pull}
@end example
@file{configure} script:
@example
-] @strong{cd ~/@value{emacsdir}/tramp}
+] @strong{cd ~/emacs/tramp}
] @strong{autoconf}
@end example
April 2000 was the first time when multi-hop methods were added. In
July 2002, @value{tramp} unified file names with Ange-FTP@. In July
2004, proxy hosts replaced multi-hop methods. Running commands on
-remote hosts was introduced in December 2005.
-@ifset emacsgw
-Support for gateways since April 2007.
-@end ifset
-@ifset emacsgvfs
-GVFS integration started in February 2009.
-@end ifset
-@ifset emacs
-Remote commands on Windows hosts since September 2011.
-@end ifset
-Ad-hoc multi-hop methods (with a changed syntax) re-enabled in November
-2011.
-
-In November 2012, added Juergen Hoetzel's @file{tramp-adb.el}.
-
-In December 2001, XEmacs package repository adds @value{tramp}.
+remote hosts was introduced in December 2005. Support for gateways
+since April 2007. GVFS integration started in February 2009. Remote
+commands on Windows hosts since September 2011. Ad-hoc multi-hop
+methods (with a changed syntax) re-enabled in November 2011. In
+November 2012, added Juergen Hoetzel's @file{tramp-adb.el}.
+XEmacs support has been stopped in January 2016.
@c Installation chapter is necessary only in case of standalone
@c installation. Text taken from trampinst.texi.
@value{tramp} is initially configured to use the @command{scp} program
to connect to the remote host. Just type @kbd{C-x C-f} and then enter
-file name @file{@trampf{user@@host,/path/to.file}}. For details,
-see @xref{Default Method}.
+file name @file{@trampf{user@@host,/path/to.file}}. For details, see
+@xref{Default Method}.
For problems related to the behavior of remote shell, see @ref{Remote
shell setup} for details.
types}).
@strong{Note} that some user options and variables described in these
-examples are not auto loaded by @value{emacsname}. All examples
-require @value{tramp} is installed and loaded:
+examples are not auto loaded by Emacs. All examples require
+@value{tramp} is installed and loaded:
@lisp
(require 'tramp)
* Connection types:: Types of connections to remote hosts.
* Inline methods:: Inline methods.
* External methods:: External methods.
-@ifset emacsgvfs
* GVFS based methods:: GVFS based external methods.
-@end ifset
-@ifset emacsgw
* Gateway methods:: Gateway methods.
-@end ifset
* Default Method:: Selecting a default method.
Here we also try to help those who
don't have the foggiest which method
contents. Inline methods are quick and easy for small files. They
depend on the availability of suitable encoding and decoding programs
on the remote host. For local source and destination, @value{tramp}
-may use built-in equivalents of such programs in @value{emacsname}.
+may use built-in equivalents of such programs in Emacs.
Inline methods can work in situations where an external transfer
program is unavailable. Inline methods also work when transferring
@command{rsh} is an option for connecting to hosts within local
networks since @command{rsh} is not as secure as other methods.
-
@item @option{ssh}
@cindex method ssh
@cindex ssh method
Connecting to a remote host with @command{telnet} is as insecure
as the @option{rsh} method.
-
@item @option{su}
@cindex method su
@cindex su method
Similar to @option{su} method, @option{sudo} uses @command{sudo}.
@command{sudo} must have sufficient rights to start a shell.
+@item @option{doas}
+@cindex method doas
+@cindex doas method
+
+This method is used on OpenBSD like the @command{sudo} command.
+
+@item @option{sg}
+@cindex method sg
+@cindex sg method
+
+The @command{sg} program allows editing as different group. The host
+can be either @samp{localhost} or the host returned by the function
+@command{(system-name)}. The user name must be specified, but it
+denotes a group name. See @ref{Multi-hops} for an exception to this
+behavior.
+
@item @option{sshx}
@cindex method sshx
@cindex sshx method
This is another method from the Kerberos suite. It behaves like @option{su}.
-
@item @option{plink}
@cindex method plink
@cindex plink method
@option{plink} method supports the @samp{-P} argument.
-
@item @option{plinkx}
@cindex method plinkx
@cindex plinkx method
This method supports the @samp{-p} argument.
-
@item @option{scpx}---@command{ssh} and @command{scp}
@cindex method scpx
@cindex scpx method
This method supports the @samp{-p} argument.
-
@item @option{pscp}---@command{plink} and @command{pscp}
@item @option{psftp}---@command{plink} and @command{psftp}
@cindex method pscp
These methods support the @samp{-P} argument.
-
@item @option{fcp}---@command{fsh} and @command{fcp}
@cindex method fcp
@cindex fcp method
@cindex ftp method
When @value{tramp} uses @option{ftp}, it forwards requests to whatever
-ftp program is specified by @value{ftppackagename}. This external
-program must be capable of servicing requests from @value{tramp}.
-
-@ifset xemacs
-This method works only for unified file names, see @ref{Issues}.
-@end ifset
-
+ftp program is specified by Ange FTP. This external program must be
+capable of servicing requests from @value{tramp}.
@item @option{smb}---@command{smbclient}
@cindex method smb
behavior is unlike other @value{tramp} methods, where local user name
is substituted.
-The @option{smb} method is unavailable if @value{emacsname} is run under a
-local user authentication context in MS Windows. However such users
-can still access remote files using UNC file names instead of @value{tramp}:
+The @option{smb} method is unavailable if Emacs is run under a local
+user authentication context in MS Windows. However such users can
+still access remote files using UNC file names instead of @value{tramp}:
@example
//melancholia/daniel$$/.emacs
@value{tramp} connects to Android devices with @option{adb} only when
the custom option @option{tramp-adb-connect-if-not-connected} is not
@code{nil}. Otherwise, the connection must be established outside
-@value{emacsname}.
+Emacs.
@value{tramp} does not require a host name part of the remote file
name when a single Android device is connected to @command{adb}.
-@value{tramp} instead uses @file{@trampfn{adb,,}} as the default
-name. @command{adb devices} shows available host names.
+@value{tramp} instead uses @file{@trampfn{adb,,}} as the default name.
+@command{adb devices} shows available host names.
@option{adb} method normally does not need user name to authenticate
on the Android device because it runs under the @command{adbd}
@end table
-@ifset emacsgvfs
@node GVFS based methods
@section GVFS based external methods
@cindex methods, gvfs
mounted locally through FUSE and @value{tramp} uses this locally
mounted directory internally.
-@value{emacsname} uses the D-Bus mechanism to communicate with GVFS@.
-@value{emacsname} must have the message bus system, D-Bus integration
-active, @pxref{Top, , D-Bus, dbus}.
+Emacs uses the D-Bus mechanism to communicate with GVFS@. Emacs must
+have the message bus system, D-Bus integration active, @pxref{Top, ,
+D-Bus, dbus}.
@table @asis
@item @option{afp}
OBEX is an FTP-like access protocol for cell phones and similar simple
devices. @value{tramp} supports OBEX over Bluetooth.
-
@item @option{sftp}
@cindex method sftp
@cindex sftp method
@option{obex}, @option{sftp} and @option{synce}. Other methods to
include are: @option{ftp} and @option{smb}.
@end defopt
-@end ifset
-@ifset emacsgw
@node Gateway methods
@section Gateway methods
@cindex methods, gateway
Authentication} (see RFC 2617). When no port number is specified, this
protocol defaults to @option{8080}.
-
@item @option{socks}
@cindex method socks
@cindex socks method
specified otherwise.
@end table
-@end ifset
@node Default Method
for more details.
A Caution: @value{tramp} will override any default user specified in
-the configuration files outside @value{emacsname}, such as
-@file{~/.ssh/config}. To stop @value{tramp} from applying the default
-value, set the corresponding alist entry to nil:
+the configuration files outside Emacs, such as @file{~/.ssh/config}.
+To stop @value{tramp} from applying the default value, set the
+corresponding alist entry to nil:
@lisp
(add-to-list 'tramp-default-user-alist
@vindex tramp-default-host-alist
When host name is omitted, @value{tramp} substitutes the value from
-the @code{tramp-default-host} variable. It is initially populated with
-the local hostname where @value{emacsname} is running. Both the
-default user and default host can be overridden as follows:
+the @code{tramp-default-host} variable. It is initially populated
+with the local hostname where Emacs is running. Both the default user
+and default host can be overridden as follows:
@lisp
(setq tramp-default-user "john"
With both defaults set, @samp{@trampfn{ssh,,}} will connect
@value{tramp} to John's home directory on target.
-@ifset emacs
@strong{Note} @samp{/::} won't work, because @samp{/:} is the prefix
for quoted file names.
-@end ifset
Instead of a single default host, @code{tramp-default-host-alist}
allows multiple default host values based on access method or user
@var{proxy} is a literal @value{tramp} file name whose local name part
is ignored, and the method and user name parts are optional.
-@ifset emacsgw
The method must be an inline or gateway method (@pxref{Inline
methods}, @pxref{Gateway methods}).
-@end ifset
-@ifclear emacsgw
-The method must be an inline method (@pxref{Inline methods}).
-@end ifclear
If @var{proxy} is @code{nil}, no additional hop is required reaching
@var{user}@@@var{host}.
'("\\.your\\.domain\\'" "\\`root\\'" "@trampfn{ssh,%h,}"))
@end lisp
-Opening @file{@trampfn{sudo,randomhost.your.domain,}} first
-connects to @samp{randomhost.your.domain} via @code{ssh} under your
-account name, and then perform @code{sudo -u root} on that host.
+Opening @file{@trampfn{sudo,randomhost.your.domain,}} first connects
+to @samp{randomhost.your.domain} via @code{ssh} under your account
+name, and then perform @code{sudo -u root} on that host.
It is key for the sudo method in the above example to be applied on
the host after reaching it and not on the local host.
The above configuration allows @value{tramp} connection as @samp{root}
to remote Ubuntu hosts.
-@ifset emacsgw
@code{tramp-default-proxies-alist} is also used for passing through
firewalls or proxy servers.
@end lisp
Gateway methods in a multiple hop chain can be declared only as the first hop.
-@end ifset
@end defopt
Passing through hops involves dealing with restricted shells, such as
A function which parses @file{/etc/passwd} files for user names.
+@item @code{tramp-parse-etc-group}
+@findex tramp-parse-etc-group
+
+A function which parses @file{/etc/group} files for group names.
+
@item @code{tramp-parse-netrc}
@findex tramp-parse-netrc
@code{password-cache-expiry} sets the duration (in seconds) the
passwords are remembered. Passwords are never saved permanently nor
-can they extend beyond the lifetime of the current @value{emacsname}
-session. Set @code{password-cache-expiry} to @code{nil} to disable
-expiration.
+can they extend beyond the lifetime of the current Emacs session. Set
+@code{password-cache-expiry} to @code{nil} to disable expiration.
@vindex password-cache
@strong{Implementation Note}: password caching depends on
@file{password-cache.el} package. @value{tramp} activates password
-caching only if @value{tramp} can discover, while @value{emacsname} is
-loading, the package through @code{load-path}.
+caching only if @value{tramp} can discover, while Emacs is loading,
+the package through @code{load-path}.
@ifset installchapter
@file{password.el} is available from No Gnus or from the @value{tramp}
connection properties in a file specified by the variable
@code{tramp-persistency-file-name}.
-The default file name for @code{tramp-persistency-file-name} is:
-@ifset emacs
+The default file name for @code{tramp-persistency-file-name} is
@file{~/.emacs.d/tramp}.
-@end ifset
-@ifset xemacs
-@file{~/.xemacs/tramp}.
-@end ifset
-@value{tramp} reads this file during @value{emacsname} startup, and
-writes to it when exiting @value{emacsname}. Delete this file for
-@value{tramp} to recreate a new one on next @value{emacsname} startup.
+@value{tramp} reads this file during Emacs startup, and writes to it
+when exiting Emacs. Delete this file for @value{tramp} to recreate a
+new one on next Emacs startup.
Set @code{tramp-persistency-file-name} to @code{nil} to disable
storing connections persistently.
When remote search paths are changed, local @value{tramp} caches must
be recomputed. To force @value{tramp} to recompute afresh, exit
-@value{emacsname}, remove the persistent file (@pxref{Connection
-caching}), and restart @value{emacsname}.
+Emacs, remove the persistent file (@pxref{Connection caching}), and
+restart Emacs.
@node Remote shell setup
@end example
@ifinfo
-@ifset emacs
-@xref{Interactive Shell, , , @value{emacsdir}}.
-@end ifset
+@xref{Interactive Shell, , , emacs}.
@end ifinfo
@item @command{busybox} / @command{nc}
@noindent
Open a remote connection with the command @kbd{C-x C-f
-@trampfn{ssh,192.168.0.26#2222,}}, where @command{sshd} is listening on port
-@samp{2222}.
+@trampfn{ssh,192.168.0.26#2222,}}, where @command{sshd} is listening
+on port @samp{2222}.
To add a corresponding entry to the @file{~/.ssh/config} file
(recommended), use this:
@section Auto-save and Backup configuration
@cindex auto-save
@cindex backup
-@ifset emacs
@vindex backup-directory-alist
-@end ifset
-@ifset xemacs
-@vindex bkup-backup-directory-info
-@end ifset
-To avoid @value{tramp} from saving backup files owned by root to
-locations accessible to others, default backup settings in
-@ifset emacs
-@code{backup-directory-alist}
-@end ifset
-@ifset xemacs
-@code{bkup-backup-directory-info}
-@end ifset
-have to be altered.
+To avoid @value{tramp} from saving backup files owned by @samp{root}
+to locations accessible to others, default backup settings in
+@code{backup-directory-alist} have to be altered.
-Here's a scenario where files could be inadvertently
-exposed. @value{emacsname} by default writes backup files to the same
-directory as the original files unless changed to another location,
-such as @file{~/.emacs.d/backups/}. Such a directory will also be used
-by default by @value{tramp} when using, say, a restricted file
+Here's a scenario where files could be inadvertently exposed. Emacs
+by default writes backup files to the same directory as the original
+files unless changed to another location, such as
+@file{~/.emacs.d/backups/}. Such a directory will also be used by
+default by @value{tramp} when using, say, a restricted file
@file{@trampfn{su,root@@localhost,/etc/secretfile}}. The backup file
-of the secretfile is now owned by the user logged in from tramp and
-not root.
+of the secretfile is now owned by the user logged in from
+@value{tramp} and not @samp{root}.
-When
-@ifset emacs
-@code{backup-directory-alist}
-@end ifset
-@ifset xemacs
-@code{bkup-backup-directory-info}
-@end ifset
-is @code{nil} (the default), such problems do not occur.
+When @code{backup-directory-alist} is @code{nil} (the default), such
+problems do not occur.
To ``turn off'' the backup feature for @value{tramp} files and stop
@value{tramp} from saving to the backup directory, use this:
-@ifset emacs
@lisp
(add-to-list 'backup-directory-alist
(cons tramp-file-name-regexp nil))
@end lisp
-@end ifset
-@ifset xemacs
-@lisp
-(require 'backup-dir)
-(add-to-list 'bkup-backup-directory-info
- (list tramp-file-name-regexp ""))
-@end lisp
-@end ifset
-@ifset emacs
@noindent
Disabling backups can be targeted to just the @option{su} and
@option{sudo} methods:
(when (stringp method)
(member method '("su" "sudo"))))))))
@end lisp
-@end ifset
Another option is to create better backup file naming with user and
host names prefixed to the file name. For example, transforming
@file{/etc/secretfile} to
@file{~/.emacs.d/backups/!su:root@@localhost:!etc!secretfile}, set the
-@value{tramp} variable
-@ifset emacs
-@code{tramp-backup-directory-alist}
-@end ifset
-@ifset xemacs
-@code{tramp-bkup-backup-directory-info}
-@end ifset
-from the existing variable
-@ifset emacs
-@code{backup-directory-alist}.
-@end ifset
-@ifset xemacs
-@code{bkup-backup-directory-info}.
-@end ifset
+@value{tramp} variable @code{tramp-backup-directory-alist} from the
+existing variable @code{backup-directory-alist}.
Then @value{tramp} backs up to a file name that is transformed with a
prefix consisting of the DIRECTORY name. This file name prefixing
@noindent
Example:
-@ifset emacs
@lisp
(add-to-list 'backup-directory-alist
(cons "." "~/.emacs.d/backups/"))
(setq tramp-backup-directory-alist backup-directory-alist)
@end lisp
-@end ifset
-@ifset xemacs
-@lisp
-(require 'backup-dir)
-(add-to-list 'bkup-backup-directory-info
- (list "." "~/.emacs.d/backups/" 'full-path))
-(setq tramp-bkup-backup-directory-info bkup-backup-directory-info)
-@end lisp
-@end ifset
@noindent
The backup file name of
@file{@trampfn{su,root@@localhost,/etc/secretfile}} would be
-@ifset emacs
+@ifset unified
@file{@trampfn{su,root@@localhost,~/.emacs.d/backups/!su:root@@localhost:!etc!secretfile~}}
@end ifset
-@ifset xemacs
+@ifset separate
@file{@trampfn{su,root@@localhost,~/.emacs.d/backups/![su!root@@localhost]!etc!secretfile~}}
@end ifset
Just as for backup files, similar issues of file naming affect
-auto-saving @value{tramp} files.
-@ifset emacs
-Auto-saved files are saved in the directory specified by the variable
+auto-saving @value{tramp} files. Auto-saved files are saved in the
+directory specified by the variable
@code{auto-save-file-name-transforms}. By default this is set to the
local temporary directory. But in some versions of Debian GNU/Linux,
-this points to the source directory where the @value{emacsname} was
-compiled. Reset such values to a valid directory.
+this points to the source directory where the Emacs was compiled.
+Reset such values to a valid directory.
Set @code{auto-save-file-name-transforms} to @code{nil} to save
auto-saved files to the same directory as the original file.
Alternatively, set the variable @code{tramp-auto-save-directory} to
direct all auto saves to that location.
-@end ifset
-@ifset xemacs
-@code{auto-save-directory} can also be used here instead of other
-locations specified above.
-@end ifset
@node Windows setup hints
@section Issues with Cygwin ssh
@cindex method sshx with Cygwin
@cindex sshx method with Cygwin
-Cygwin's @command{ssh} works only with a Cygwin version of
-@value{emacsname}. To check for compatibility: type @kbd{M-x eshell}, and
-start @kbd{ssh test.host}. Incompatibilities trigger this message:
+Cygwin's @command{ssh} works only with a Cygwin version of Emacs. To
+check for compatibility: type @kbd{M-x eshell}, and start @kbd{ssh
+test.host}. Incompatibilities trigger this message:
@example
Pseudo-terminal will not be allocated because stdin is not a terminal.
@cindex method scpx with Cygwin
@cindex scpx method with Cygwin
-When using the @option{scpx} access method, @value{emacsname} may call
+When using the @option{scpx} access method, Emacs may call
@command{scp} with Windows file naming, such as @code{c:/foo}. But
the version of @command{scp} that is installed with Cygwin does not
know about Windows file naming, which causes it to incorrectly look
Windows file names to Cygwin file names.
@cindex Cygwin and ssh-agent
-@cindex SSH_AUTH_SOCK and @value{emacsname} on Windows
+@cindex SSH_AUTH_SOCK and Emacs on Windows
When using the @command{ssh-agent} on Windows for password-less
interaction, @option{ssh} methods depend on the environment variable
-@env{SSH_AUTH_SOCK}. But this variable is not set when
-@value{emacsname} is started from a Desktop shortcut and
-authentication fails.
+@env{SSH_AUTH_SOCK}. But this variable is not set when Emacs is
+started from a Desktop shortcut and authentication fails.
One workaround is to use a Windows based SSH Agent, such as
Pageant. It is part of the Putty Suite of tools.
-The fallback is to start @value{emacsname} from a shell.
+The fallback is to start Emacs from a shell.
@node Usage
they are local. However, @value{tramp} employs a formalized remote
file naming syntax to perform its functions transparently. This
syntax consists of many parts specifying access methods,
-authentication, host names, and file names.
-@ifset emacs
-@value{ftppackagename} uses a similar syntax.
-@end ifset
+authentication, host names, and file names. Ange FTP uses a similar
+syntax.
@cindex type-ahead
-Unlike opening local files in @value{emacsname}, which are
-instantaneous, opening remote files in @value{tramp} is slower at
-first. Sometimes there is a noticeable delay before the prompts for
-passwords or authentication appear in the minibuffer. Hitting
-@kbd{@key{RET}} or other keys during this gap will be processed by
-@value{emacsname}. This type-ahead facility is a feature of
-@value{emacsname} that may cause missed prompts when using
+Unlike opening local files in Emacs, which are instantaneous, opening
+remote files in @value{tramp} is slower at first. Sometimes there is
+a noticeable delay before the prompts for passwords or authentication
+appear in the minibuffer. Hitting @kbd{@key{RET}} or other keys
+during this gap will be processed by Emacs. This type-ahead facility
+is a feature of Emacs that may cause missed prompts when using
@value{tramp}.
@menu
* File name Syntax:: @value{tramp} file name conventions.
* File name completion:: File name completion.
* Ad-hoc multi-hops:: Declaring multiple hops in the file name.
-* Remote processes:: Integration with other @value{emacsname} packages.
+* Remote processes:: Integration with other Emacs packages.
* Cleanup remote connections:: Cleanup remote connections.
@end menu
@cindex file name syntax
@cindex file name examples
-@file{@trampf{host,localfilename}}
-opens file @var{localfilename} on the remote host @var{host}, using
-the default method. @xref{Default Method}.
+@file{@trampf{host,localfilename}} opens file @var{localfilename} on
+the remote host @var{host}, using the default method. @xref{Default
+Method}.
@table @file
@item @value{prefix}melancholia@value{postfix}.emacs
@var{host} can take IPv4 or IPv6 address, as in
@file{@trampf{127.0.0.1,.emacs}} or
@file{@trampf{@value{ipv6prefix}::1@value{ipv6postfix},.emacs}}.
-@ifset emacs
+@ifset unified
For syntactical reasons, IPv6 addresses must be embedded in square
brackets @file{@value{ipv6prefix}} and @file{@value{ipv6postfix}}.
@end ifset
@trampf{user@@host,path/to.file}
@end example
-@file{@trampf{daniel@@melancholia,.emacs}} is for file
-@file{.emacs} in @code{daniel}'s home directory on the host,
-@code{melancholia}.
+@file{@trampf{daniel@@melancholia,.emacs}} is for file @file{.emacs}
+in @code{daniel}'s home directory on the host, @code{melancholia}.
Specify other file access methods (@pxref{Inline methods},
@pxref{External methods}) as part of the file name.
-@ifset emacs
Method name comes before user name, as in
@file{@value{prefix}@var{method}@value{postfixhop}} (Note the trailing
-colon).
-@end ifset
-@ifset xemacs
-This is done by replacing the initial @file{@value{prefix}} with
-@file{@value{prefix}@var{method}@value{postfixhop}} (Note the trailing
-slash!).
-@end ifset
-The syntax specifications for user, host, and file do not change.
+colon). The syntax specifications for user, host, and file do not
+change.
To connect to the host @code{melancholia} as @code{daniel}, using
@option{ssh} method for @file{.emacs} in @code{daniel}'s home
@value{tramp} can complete the following @value{tramp} file name
components: method names, user names, host names, and file names
-located on remote hosts.
-@ifset emacs
-Enable this by activating partial completion in @file{.emacs}.
+located on remote hosts. Enable this by activating partial completion
+in @file{.emacs}.
@ifinfo
-@xref{Completion Options, , , @value{emacsdir}}.
+@xref{Completion Options, , , emacs}.
@end ifinfo
-@end ifset
For example, type @kbd{C-x C-f @value{prefix}t @key{TAB}},
@value{tramp} completion choices show up as
@example
@c @multitable {@trampfn{telnet,melancholia.danann.net,}} {@trampfn{telnet,192.168.0.1,}}
@multitable @columnfractions .5 .5
-@ifset emacs
@item @value{prefixhop}telnet@value{postfixhop} @tab tmp/
@item @value{prefixhop}toto@value{postfix} @tab
-@end ifset
-@ifset xemacs
-@item @value{prefixhop}telnet@value{postfixhop} @tab @value{prefixhop}toto@value{postfix}
-@end ifset
@end multitable
@end example
-@samp{@value{prefixhop}telnet@value{postfixhop}}
-is a possible completion for the respective method,
-@ifset emacs
-@samp{tmp/} stands for the directory @file{/tmp} on your local host,
-@end ifset
-and @samp{@value{prefixhop}toto@value{postfix}}
-might be a host @value{tramp} has detected in your @file{~/.ssh/known_hosts}
-file (when using @option{ssh} as default method).
+@samp{@value{prefixhop}telnet@value{postfixhop}} is a possible
+completion for the respective method, @samp{tmp/} stands for the
+directory @file{/tmp} on your local host, and
+@samp{@value{prefixhop}toto@value{postfix}} might be a host
+@value{tramp} has detected in your @file{~/.ssh/known_hosts} file
+(when using @option{ssh} as default method).
Type @kbd{e @key{TAB}} for the minibuffer completion to
@samp{@value{prefix}telnet@value{postfixhop}}. Typing @kbd{@key{TAB}}
@multitable @columnfractions .5 .5
@c @multitable {@trampfn{telnet,melancholia.danann.net,}} {@trampfn{telnet,192.168.0.1,}}
@item @trampfn{telnet,127.0.0.1,} @tab @trampfn{telnet,192.168.0.1,}
-@c @item @trampfn{telnet,@value{ipv6prefix}::1@value{ipv6postfix},} @tab @trampfn{telnet,localhost,}
-@item @value{prefix}telnet@value{postfixhop}@value{ipv6prefix}::1@value{ipv6postfix}@value{postfix} @tab @trampfn{telnet,localhost,}
+@item @trampfn{telnet,@value{ipv6prefix}::1@value{ipv6postfix},} @tab @trampfn{telnet,localhost,}
@item @trampfn{telnet,melancholia.danann.net,} @tab @trampfn{telnet,melancholia,}
@end multitable
@end example
completion lists.
After remote host name completion comes completion of file names on
-the remote host. It works the same as with local host file completion,
+the remote host. It works the same as with local host file completion
except that killing with double-slash @file{//} kills only the file
-name part of the @value{tramp} file name syntax.
-@ifset emacs
-A triple-slash stands for the default behavior.
-@end ifset
+name part of the @value{tramp} file name syntax. A triple-slash
+stands for the default behavior.
@ifinfo
-@xref{Minibuffer File, , , @value{emacsdir}}.
+@xref{Minibuffer File, , , emacs}.
@end ifinfo
@noindent
Example:
@example
-@ifset emacs
@kbd{C-x C-f @trampfn{telnet,melancholia,/usr/local/bin//etc} @key{TAB}}
@print{} @trampfn{telnet,melancholia,/etc}
@kbd{C-x C-f @trampfn{telnet,melancholia,/usr/local/bin///etc} @key{TAB}}
@print{} /etc
-@end ifset
-
-@ifset xemacs
-@kbd{C-x C-f @trampfn{telnet,melancholia,/usr/local/bin//}}
- @print{} @trampfn{telnet,melancholia,/}
-
-@kbd{C-x C-f @trampfn{telnet,melancholia,//}}
- @print{} /
-@end ifset
@end example
During file name completion, remote directory contents are re-read
regularly to account for any changes in the filesystem that may affect
the completion candidates. Such re-reads can account for changes to
-the file system by applications outside @value{emacsname}
-(@pxref{Connection caching}).
+the file system by applications outside Emacs (@pxref{Connection
+caching}).
@defopt tramp-completion-reread-directory-timeout
@vindex tramp-completion-reread-directory-timeout
@value{tramp} adds the ad-hoc definitions on the fly to
@code{tramp-default-proxies-alist} and is available for re-use during
-that @value{emacsname} session. Subsequent @value{tramp} connections
-to the same remote host can then use the shortcut form:
+that Emacs session. Subsequent @value{tramp} connections to the same
+remote host can then use the shortcut form:
@samp{@trampfn{ssh,you@@remotehost,/path}}.
@defopt tramp-save-ad-hoc-proxies
@vindex tramp-save-ad-hoc-proxies
For ad-hoc definitions to be saved automatically in
-@option{tramp-default-proxies-alist} for future @value{emacsname}
-sessions, set @option{tramp-save-ad-hoc-proxies}.
+@option{tramp-default-proxies-alist} for future Emacs sessions, set
+@option{tramp-save-ad-hoc-proxies}.
@lisp
(setq tramp-save-ad-hoc-proxies t)
@node Remote processes
-@section Integration with other @value{emacsname} packages
+@section Integration with other Emacs packages
@cindex compile
@cindex recompile
@value{tramp} supports starting new running processes on the remote
-host for discovering remote file names. @value{emacsname} packages on
-the remote host need no specific modifications for @value{tramp}'s
-use.
+host for discovering remote file names. Emacs packages on the remote
+host need no specific modifications for @value{tramp}'s use.
This type of integration does not work with the @option{ftp} method,
and does not support the pty association as specified in
"/bin/sh" "-c" "grep -e tramp *"))
@end lisp
-
-@ifset emacsgvfs
Remote processes do not apply to GVFS (see @ref{GVFS based methods})
because the remote file system is mounted on the local host and
@value{tramp} just accesses by changing the @code{default-directory}.
-@end ifset
@value{tramp} starts a remote process when a command is executed in a
remote file or directory buffer. As of now, these packages have been
This works only for environment variables not already set in the
@code{process-environment}.
-For integrating other @value{emacsname} packages so @value{tramp} can
-execute remotely, please file a bug report. @xref{Bug Reports}.
+For integrating other Emacs packages so @value{tramp} can execute
+remotely, please file a bug report. @xref{Bug Reports}.
@subsection Running remote programs that create local X11 windows
systems, such as @samp{windows-nt} and @samp{gnu/linux}. This option
ensures the correct name of the remote shell program.
-@ifset emacs
Starting with Emacs 24, when @option{explicit-shell-file-name} is
equal to @code{nil}, calling @code{shell} interactively will prompt
for a shell name.
-@end ifset
@subsection Running @code{shell-command} on a remote host
@command{tail} command outputs continuously to the local buffer,
@file{*Async Shell Command*}
-@ifset emacs
@kbd{M-x auto-revert-tail-mode} runs similarly showing continuous output.
-@end ifset
@subsection Running @code{eshell} on a remote host
@b{@trampfn{sudo,root@@host,/etc} $}
@end example
-@ifset emacs
-@code{eshell} in @value{emacsname} 23.2 added custom @code{su} and
-@code{sudo} commands that set the default directory correctly for the
+@code{eshell} in Emacs 23.2 added custom @code{su} and @code{sudo}
+commands that set the default directory correctly for the
@file{*eshell*} buffer. @value{tramp} silently updates
@code{tramp-default-proxies-alist} with an entry for this directory
(@pxref{Multi-hops}):
uid=0(root) gid=0(root) groups=0(root)
@b{@trampfn{su,root@@remotehost,/root} $}
@end example
-@end ifset
@anchor{Running a debugger on a remote host}
@cindex perldb
@file{gud.el} provides a unified interface to symbolic debuggers
-@ifset emacs
@ifinfo
-(@ref{Debuggers, , , @value{emacsdir}}).
+(@ref{Debuggers, , , emacs}).
@end ifinfo
-@end ifset
@value{tramp} can run debug on remote hosts by calling @code{gdb}
with a remote file name:
@end example
Relative file names are based on the remote default directory. When
-@file{myprog.pl} exists in @file{@trampfn{ssh,host,/home/user}},
-valid calls include:
+@file{myprog.pl} exists in @file{@trampfn{ssh,host,/home/user}}, valid
+calls include:
@example
@kbd{M-x perldb @key{RET}}
interactively, this command lists active remote connections in the
minibuffer. Each connection is of the format
@file{@trampfn{method,user@@host,}}. Flushing remote connections also
-cleans the password
-cache (@pxref{Password handling}), file cache, connection cache
-(@pxref{Connection caching}), and connection buffers.
+cleans the password cache (@pxref{Password handling}), file cache,
+connection cache (@pxref{Connection caching}), and connection buffers.
@end deffn
@deffn Command tramp-cleanup-this-connection
@uref{http://lists.gnu.org/mailman/listinfo/tramp-devel/, the
@value{tramp} Mail Subscription Page}.
-@ifset emacs
@ifset installchapter
Before sending a bug report, run the test suite first @ref{Testing}.
@end ifset
-@end ifset
@findex tramp-bug
Check if the bug or problem is already addressed in @xref{Frequently
@item
Which systems does it work on?
-The package works successfully on Emacs 22, Emacs 23, Emacs 24, Emacs
-25, XEmacs 21 (starting with 21.4), and SXEmacs 22.
+The package works successfully on Emacs 23, Emacs 24, and Emacs 25.
While Unix and Unix-like systems are the primary remote targets,
@value{tramp} has equal success connecting to other platforms, such as
@value{tramp} overwrites @code{ControlPath} settings when initiating
@command{ssh} sessions. @value{tramp} does this to fend off a stall
-if a master session opened outside the @value{emacsname} session is no
-longer open. That is why @value{tramp} prompts for the password again
-even if there is an @command{ssh} already open.
+if a master session opened outside the Emacs session is no longer
+open. That is why @value{tramp} prompts for the password again even
+if there is an @command{ssh} already open.
Some @command{ssh} versions support a @code{ControlPersist} option,
which allows you to set the @code{ControlPath} provided the variable
@item
How to get notified after @value{tramp} completes file transfers?
-Make @value{emacsname} beep after reading from or writing to the
-remote host with the following code in @file{~/.emacs} file.
+Make Emacs beep after reading from or writing to the remote host with
+the following code in @file{~/.emacs} file.
@lisp
(defadvice tramp-handle-write-region
@end lisp
-@ifset emacs
@item
How to get a Visual Warning when working with @samp{root} privileges
Get a modeline indication when working with @samp{root} privileges
-with the following code (tested with @value{emacsname} 22.1) in
-@file{~/.emacs} file:
+with the following code (tested with Emacs 22.1) in @file{~/.emacs}
+file:
@lisp
(defun my-mode-line-function ()
(add-hook 'find-file-hook 'my-mode-line-function)
(add-hook 'dired-mode-hook 'my-mode-line-function)
@end lisp
-@end ifset
-@ifset emacs
@item
How to get host indication in the mode line?
-The following code (tested with @value{emacsname} 22.1) in
-@file{~/.emacs} file shows it:
+The following code (tested with Emacs 22.1) in @file{~/.emacs} file
+shows it:
@lisp
(defconst my-mode-line-buffer-identification
my-mode-line-buffer-identification)))
@end lisp
-The mode line in @value{emacsname} 23.1 and later versions now
-contains an indication if @code{default-directory} for the current
-buffer is on a remote host. Moreover, the corresponding tool-tip
-shows the remote host name. The above @code{:eval} clause can also be
-simplified to show the host name in the mode line:
+The mode line in Emacs 23.1 and later versions now contains an
+indication if @code{default-directory} for the current buffer is on a
+remote host. Moreover, the corresponding tool-tip shows the remote
+host name. The above @code{:eval} clause can also be simplified to
+show the host name in the mode line:
@lisp
'(:eval
(substring host-name 0 (match-beginning 1))
host-name)))
@end lisp
-@end ifset
-@ifset emacs
@item
Remote host does not understand default options for directory listing
-@value{emacsname} computes the @command{dired} options based on the
-local host but if the remote host cannot understand the same
-@command{ls} command, then set them with a hook as follows:
+Emacs computes the @command{dired} options based on the local host but
+if the remote host cannot understand the same @command{ls} command,
+then set them with a hook as follows:
@lisp
(add-hook
(when (file-remote-p default-directory)
(setq dired-actual-switches "-al"))))
@end lisp
-@end ifset
@item
Use environment variables to expand long strings
For long file names, set up environment variables that are expanded in
-the minibuffer. Environment variables are set either outside
-@value{emacsname} or inside @value{emacsname} with Lisp:
+the minibuffer. Environment variables are set either outside Emacs or
+inside Emacs with Lisp:
@lisp
(setenv "xy" "@trampfn{ssh,news@@news.my.domain,/opt/news/etc/}")
@item Define own keys:
-Redefine another key sequence in @value{emacsname} for @kbd{C-x C-f}:
+Redefine another key sequence in Emacs for @kbd{C-x C-f}:
@lisp
(global-set-key
Use bookmarks to save Tramp file names.
@ifinfo
-@pxref{Bookmarks, , , @value{emacsdir}}.
+@pxref{Bookmarks, , , emacs}.
@end ifinfo
Upon visiting a location with @value{tramp}, save it as a bookmark with
-@ifset emacs
@kbd{@key{menu-bar} @key{edit} @key{bookmarks} @key{set}}.
-@end ifset
-@ifset xemacs
-@kbd{@key{menu-bar} @key{view} @key{bookmarks} @key{set}}.
-@end ifset
To revisit that bookmark:
-@ifset emacs
@kbd{@key{menu-bar} @key{edit} @key{bookmarks} @key{jump}}.
-@end ifset
-@ifset xemacs
-@kbd{@key{menu-bar} @key{view} @key{bookmarks} @key{jump}}.
-@end ifset
@item Use recent files:
-@ifset emacs
-@file{recentf}
-@end ifset
-@ifset xemacs
-@file{recent-files}
-@end ifset
-remembers visited places.
+@file{recentf} remembers visited places.
@ifinfo
-@ifset emacs
-@pxref{File Conveniences, , , @value{emacsdir}}.
-@end ifset
-@ifset xemacs
-@pxref{recent-files, , , edit-utils}.
-@end ifset
+@pxref{File Conveniences, , , emacs}.
@end ifinfo
Keep remote file names in the recent list without have to check for
their accessibility through remote access:
@lisp
-@ifset emacs
(recentf-mode 1)
-@end ifset
-@ifset xemacs
-(recent-files-initialize)
-(add-hook
- 'find-file-hook
- (lambda ()
- (when (file-remote-p (buffer-file-name))
- (recent-files-make-permanent)))
- 'append)
-@end ifset
@end lisp
-Reaching recently opened files:
-@ifset emacs
-@kbd{@key{menu-bar} @key{file} @key{Open Recent}}.
-@end ifset
-@ifset xemacs
-@kbd{@key{menu-bar} @key{Recent Files}}.
-@end ifset
+Reaching recently opened files: @kbd{@key{menu-bar} @key{file}
+@key{Open Recent}}.
-@ifset emacs
@item Use filecache:
Since @file{filecache} remembers visited places, add the remote
Then use directory completion in the minibuffer with @kbd{C-x C-f
C-@key{TAB}}.
-@end ifset
-@ifset emacs
@item Use bbdb:
-@file{bbdb} has a built-in feature for @value{ftppackagename} files,
-which also works for @value{tramp} file names.
+@file{bbdb} has a built-in feature for Ange FTP files, which also
+works for @value{tramp} file names.
@ifinfo
@pxref{bbdb-ftp, Storing FTP sites in the BBDB, , bbdb}.
@end ifinfo
-Load @file{bbdb} in @value{emacs}:
+Load @file{bbdb} in Emacs:
@lisp
(require 'bbdb)
@end example
In BBDB buffer, access an entry by pressing the key @key{F}.
-@end ifset
@end enumerate
Thanks to @value{tramp} users for contributing to these recipes.
@item
-Why saved multi-hop file names do not work in a new @value{emacsname}
-session?
+Why saved multi-hop file names do not work in a new Emacs session?
When saving ad-hoc multi-hop @value{tramp} file names (@pxref{Ad-hoc
-multi-hops}) via bookmarks, recent files,
-@ifset emacs
-filecache, bbdb,
-@end ifset
-or another package, use the full ad-hoc file name including all hops,
-like
+multi-hops}) via bookmarks, recent files, filecache, bbdb, or another
+package, use the full ad-hoc file name including all hops, like
@file{@trampfn{ssh,bird@@bastion|ssh@value{postfixhop}news.my.domain,/opt/news/etc}}.
Alternatively, when saving abbreviated multi-hop file names
value.
-@ifset emacs
@item
-How to connect to a remote @value{emacsname} session using @value{tramp}?
+How to connect to a remote Emacs session using @value{tramp}?
Configure Emacs Client
@ifinfo
-(@pxref{Emacs Server, , , @value{emacsdir}}).
+(@pxref{Emacs Server, , , emacs}).
@end ifinfo
Then on the remote host, start the Emacs Server:
@example
export EDITOR=/path/to/emacsclient.sh
@end example
-@end ifset
@item
How to disable @value{tramp}?
@itemize @minus
-@ifset emacs
@item
-To keep @value{ftppackagename} as default the remote files access
-package, set this in @file{.emacs}:
+To keep Ange FTP as default the remote files access package, set this
+in @file{.emacs}:
@lisp
(setq tramp-default-method "ftp")
@end lisp
-@end ifset
@item
-To disable both
-@ifset emacs
-@value{tramp} (and @value{ftppackagename}),
-@end ifset
-@ifset xemacs
-@value{tramp},
-@end ifset
-set @code{tramp-mode} to @code{nil} in @file{.emacs}.
+To disable both @value{tramp} (and Ange FTP), set @code{tramp-mode} to
+@code{nil} in @file{.emacs}.
@lisp
(setq tramp-mode nil)
@end lisp
@item
-To unload @value{tramp}, type @kbd{M-x tramp-unload-tramp}.
-@ifset emacs
-Unloading @value{tramp} resets @value{ftppackagename} plugins also.
-@end ifset
+To unload @value{tramp}, type @kbd{M-x tramp-unload-tramp}. Unloading
+@value{tramp} resets Ange FTP plugins also.
@end itemize
@end itemize
@menu
* Localname deconstruction:: Splitting a localname into its component parts.
-@ifset emacs
* External packages:: Integrating with external Lisp packages.
-@end ifset
@end menu
handlers.
-@ifset emacs
@node External packages
@section Integrating with external Lisp packages
@subsection File name completion.
Since @value{tramp} traverses subdirectories starting with the
root-directory, it is most likely sufficient to make the
@code{default-directory} of the process buffer as the root directory.
-@end ifset
@node Traces and Profiles
The debug buffer is in
@ifinfo
-@ref{Outline Mode, , , @value{emacsdir}}.
+@ref{Outline Mode, , , emacs}.
@end ifinfo
@ifnotinfo
Outline Mode.
messages up to verbosity level 5, enter @kbd{C-u 6 C-c C-q}.
@ifinfo
Other navigation keys are described in
-@ref{Outline Visibility, , , @value{emacsdir}}.
+@ref{Outline Visibility, , , emacs}.
@end ifinfo
@value{tramp} handles errors internally. But to get a Lisp backtrace,
being written to @file{*trace-output*}.
-@node Issues
-@chapter Debatable Issues and What Was Decided
-
-@itemize @bullet
-@item The uuencode method does not always work.
-
-@command{uudecode} on some systems cannot write to stdout, but
-@value{tramp} depends on encoding and decoding programs to be able to
-read from stdin and write to stdout.
-
-We can find ways to circumvent @command{uudecode}'s ability to write
-to stdout, such as writing to a temporary file and then piping that to
-stdout.
-
-But I have decided not to implement workarounds as they are too
-fragile to work reliably. Some on systems, @value{tramp} will not have
-uuencode method.
-
-@item The @value{tramp} file name syntax differs between Emacs and XEmacs.
-
-The Emacs maintainers wish to use a unified file name syntax for
-Ange-FTP and @value{tramp} so that users don't have to learn yet
-another syntax though it is okay to learn new extensions.
-
-For the XEmacs maintainers, the disruption from a unified file name
-syntax are not worth the gains. Firstly, the XEmacs package system
-relies on EFS for downloading new packages and therefore is already
-installed. On the other hand, @value{tramp} is not installed by
-default in XEmacs. Unifying will require @value{tramp} installed from
-the start.
-
-@ifset xemacs
-@strong{Note:} To make the syntax similar to @value{ftppackagename},
-make this change to the init file:
-
-@lisp
-(setq tramp-unified-filenames t)
-(require 'tramp)
-@end lisp
-
-To disable auto loading @value{emacsname} @value{tramp} package, set
-file permissions of
-@file{@dots{}/xemacs-packages/lisp/tramp/auto-autoloads.el*} to
-@code{000}.
-
-When using unified file names, @value{emacsname} download sites are
-added to @code{tramp-default-method-alist} with default method of
-@option{ftp} @xref{Default Method} for proper working of the
-@value{emacsname} package system.
-
-The syntax for unified file names is described in the @value{tramp} manual
-for @value{emacsothername}.
-@end ifset
-@end itemize
-
-
@node GNU Free Documentation License
@appendix GNU Free Documentation License
@include doclicense.texi
@c In the Tramp GIT, the version number is auto-frobbed from
@c configure.ac, so you should edit that file and run
@c "autoconf && ./configure" to change the version number.
-@set trampver 2.2.13.25.1
+@set trampver 2.3.0-pre
@c Other flags from configuration
@set instprefix /usr/local
@set infodir /usr/local/share/info
@c Formatting of the tramp program name consistent.
-@set tramp @sc{tramp}
+@set tramp @sc{Tramp}
-@c Whether or not describe GVFS integration.
-@ifclear noemacsgvfs
-@set emacsgvfs
-@end ifclear
-
-@c Whether or not describe gateway methods.
-@ifclear noemacsgw
-@set emacsgw
-@end ifclear
-
-@c Some flags which make the text independent on the (X)Emacs flavor.
-@c "emacs" resp "xemacs" are set in the Makefile. Default is "emacs".
-@ifclear emacs
-@ifclear xemacs
-@set emacs
+@c Some flags which define the remote file name syntax.
+@ifclear unified
+@ifclear separate
+@set unified
@end ifclear
@end ifclear
-@c Emacs values.
-@ifset emacs
-@set emacsname Emacs
-@set emacsdir emacs
-@set ftppackagename Ange-FTP
+@ifset unified
@set prefix /
@set prefixhop
@set postfix :
@set postfixhop :
@set ipv6prefix [
@set ipv6postfix ]
-@set emacsothername XEmacs
-@set emacsotherdir xemacs
-@set emacsotherfilename tramp-xemacs.html
@end ifset
-@c XEmacs counterparts.
-@ifset xemacs
-@set emacsname XEmacs
-@set emacsdir xemacs
-@set ftppackagename EFS
+@ifset separate
@set prefix /[
@set prefixhop [
@set postfix ]
@set postfixhop /
@set ipv6prefix
@set ipv6postfix
-@set emacsothername Emacs
-@set emacsotherdir emacs
-@set emacsotherfilename tramp-emacs.html
@end ifset
\f
* New features
+** message-alternative-emails can take a function as a value.
+
** nnimap can request and use the Gmail "X-GM-LABELS".
** New package `gnus-notifications.el' can send notifications when you
When you add a new item, use the appropriate mark if you are sure it applies,
otherwise leave it unmarked.
+\f
+* Installation Changes in Emacs 25.2
+
+\f
+* Startup Changes in Emacs 25.2
+
+\f
+* Changes in Emacs 25.2
+
+** It is possible to disable attempted recovery on fatal signals
+
+Two new variables allow to disable attempts to recover from stack
+overflow and to avoid automatic auto-save when Emacs is delivered a
+fatal signal. `attempt-stack-overflow-recovery', if set to `nil',
+will disable attempts to recover from C stack overflows; Emacs will
+then crash as with any other fatal signal.
+`attempt-orderly-shutdown-on-fatal-signal', if set to `nil', will
+disable attempts to auto-save the session and shut down in an orderly
+fashion when Emacs receives a fatal signal; instead, Emacs will
+terminate immediately. Both variables are non-`nil' by default.
+These variables are for users who would like to avoid the small
+probability of data corruption due to techniques Emacs uses to recover
+in these situations.
+
+\f
+* Editing Changes in Emacs 25.2
+
+\f
+* Changes in Specialized Modes and Packages in Emacs 25.2
+
+** eww
+
++++
+*** A new `s' command for switching to another eww buffer via the minibuffer.
+
++++
+** The commands that add ChangeLog entries now prefer a VCS root directory
+for the ChangeLog file, if none already exists. Customize
+`change-log-directory-files' to nil for the old behavior.
+
+---
+** Support for non-string values of `time-stamp-format' has been removed.
+
+** Tramp
+
++++
+*** New connection method "sg", which allows to edit files under
+different group ID.
+
++++
+*** New connection method "doas" for OpenBSD hosts.
+
+\f
+* New Modes and Packages in Emacs 25.2
+
+\f
+* Incompatible Lisp Changes in Emacs 25.2
+
+\f
+* Lisp Changes in Emacs 25.2
+
+** New var syntax-ppss-table to control the syntax-table used in syntax-ppss
+
+** Autoload files can be generated without timestamps,
+by setting `autoload-timestamps' to nil.
+
+\f
+* Changes in Emacs 25.2 on Non-Free Operating Systems
+
\f
* Installation Changes in Emacs 25.1
by default, and must be enabled by using the `--with-modules' option
at configure time.
++++
+** A second dir-local file (.dir-locals-2.el) is now accepted.
+See the variable `dir-locals-file-2' for more information.
+
+++
** Network security (TLS/SSL certificate validity and the like) is
added via the new Network Security Manager (NSM) and controlled via
the `network-security-level' variable.
+---
+** International domain names (IDNA) are now encoded via the new
+puny.el library, so that one can visit web sites like
+"http://méxico.icom.museum".
+
+++
** C-h l now also lists the commands that were run.
+** The new M-s M-w key binding uses eww to search the web for the
+text in the region.
+
+++
-** x-select-enable-clipboard is renamed select-enable-clipboard
-and x-select-enable-primary is renamed select-enable-primary.
+** The new `timer-list' command lists all active timers in a buffer
+where you can cancel them with the `c' command.
+
+** M-x suggests shorthands and ignores obsolete commands for completion.
+** x-select-enable-clipboard is renamed select-enable-clipboard.
+x-select-enable-primary and renamed select-enable-primary.
Additionally they both now apply to all systems (OSX, GNUstep, Windows, you
name it), with the proviso that on some systems (e.g. Windows)
select-enable-primary is ineffective since the system doesn't
** The option `even-window-heights' has been renamed to
`even-window-sizes' and now handles window widths as well.
++++
+** New function `read-multiple-choice' use to prompt for
+multiple-choice questions, with a handy way to display help texts.
+
+++
** terpri gets an optional arg ENSURE to conditionally output a newline.
hiding character but the default `.' can be used by let-binding the
variable `read-hide-char'.
-+++
-** The Emacs pseudo-random number generator can be securely seeded.
-On system where Emacs can access the system entropy or some other
-cryptographically secure random stream, it now uses that when `random'
-is called with its argument `t'. This allows cryptographically strong
-random values; in particular, the Emacs server now uses this facility
-to produce its authentication key.
-
---
** New input methods: `tamil-dvorak' and `programmer-dvorak'.
`erc-network-hide-list' and `erc-channel-hide-list' will only hide the
specified message types for the respective specified targets.
+*** New variable `erc-default-port-tls' used to connect to TLS IRC
+servers.
+
---
*** Reconnection is now asynchronous.
whether to use variable-pitch fonts or not. The user can also
customize the `shr-use-fonts' variable.
++++
+*** A new command `C' (`eww-toggle-colors') can be used to toggle
+whether to use the HTML-specified colors or not. The user can also
+customize the `shr-use-colors' variable.
+
+++
*** A new command `R' (`eww-readable') will try do identify the main
textual parts of a web page and display only that, leaving menus and
*** text/html messages that contain inline image parts will be
transformed into multipart/related messages before sending.
+---
+*** The `message-valid-fqdn-regexp' variable has been removed, since
+there are now top-level domains added all the time. Message will no
+longer warn about sending emails to top-level domains it hasn't heard
+about.
+
+*** `message-beginning-of-line' (bound to C-a) understands folded headers.
+In `visual-line-mode' it will look for the true beginning of a header
+while in non-`visual-line-mode' it will move the point to the indented
+header’s value.
+
++++
+** Images are automatically scaled before displaying based on the
+`image-scaling-factor' variable (if Emacs supports scaling the images
+in question).
+
+++
** In Show Paren Mode, a parenthesis can be highlighted when point
stands inside it, and certain parens can be highlighted when point is
---
** New js.el option `js-indent-first-init'.
+It was renamed from `js-indent-first-initialiser', to avoid issues
+with American vs British spelling.
** Info
`dired-compress-files-alist' variable.
+++
+*** `W' is now bound to `browse-url-of-dired-file', and is useful for
+viewing HTML files and the like.
+
*** New user interface for the `A' and `Q' commands.
These keys, now bound to `dired-do-find-regexp' and
`dired-do-find-regexp-and-replace', work similarly to `xref-find-apropos'
Removed font-lock-beginning-of-syntax-function and the SYNTAX-BEGIN
slot in font-lock-defaults.
-+++
-** The new implementation of Subword mode affects word movement everywhere.
-When Subword mode is turned on, `forward-word', `backward-word', and
-everything that uses them will move by sub-words, effectively
-overriding the buffer's syntax table. Lisp programs that shouldn't be
-affected by Subword mode should call the new functions
-`forward-word-strictly' and `backward-word-strictly' instead.
-
+++
** `package-initialize' now sets `package-enable-at-startup' to nil if
called during startup. Users who call this function in their init
+++ /dev/null
-(nxml-define-char-name-set 'basic-latin
- '(("SPACE" #x0020)
- ("EXCLAMATION MARK" #x0021)
- ("QUOTATION MARK" #x0022)
- ("NUMBER SIGN" #x0023)
- ("DOLLAR SIGN" #x0024)
- ("PERCENT SIGN" #x0025)
- ("AMPERSAND" #x0026)
- ("APOSTROPHE" #x0027)
- ("LEFT PARENTHESIS" #x0028)
- ("RIGHT PARENTHESIS" #x0029)
- ("ASTERISK" #x002A)
- ("PLUS SIGN" #x002B)
- ("COMMA" #x002C)
- ("HYPHEN-MINUS" #x002D)
- ("FULL STOP" #x002E)
- ("SOLIDUS" #x002F)
- ("DIGIT ZERO" #x0030)
- ("DIGIT ONE" #x0031)
- ("DIGIT TWO" #x0032)
- ("DIGIT THREE" #x0033)
- ("DIGIT FOUR" #x0034)
- ("DIGIT FIVE" #x0035)
- ("DIGIT SIX" #x0036)
- ("DIGIT SEVEN" #x0037)
- ("DIGIT EIGHT" #x0038)
- ("DIGIT NINE" #x0039)
- ("COLON" #x003A)
- ("SEMICOLON" #x003B)
- ("LESS-THAN SIGN" #x003C)
- ("EQUALS SIGN" #x003D)
- ("GREATER-THAN SIGN" #x003E)
- ("QUESTION MARK" #x003F)
- ("COMMERCIAL AT" #x0040)
- ("LATIN CAPITAL LETTER A" #x0041)
- ("LATIN CAPITAL LETTER B" #x0042)
- ("LATIN CAPITAL LETTER C" #x0043)
- ("LATIN CAPITAL LETTER D" #x0044)
- ("LATIN CAPITAL LETTER E" #x0045)
- ("LATIN CAPITAL LETTER F" #x0046)
- ("LATIN CAPITAL LETTER G" #x0047)
- ("LATIN CAPITAL LETTER H" #x0048)
- ("LATIN CAPITAL LETTER I" #x0049)
- ("LATIN CAPITAL LETTER J" #x004A)
- ("LATIN CAPITAL LETTER K" #x004B)
- ("LATIN CAPITAL LETTER L" #x004C)
- ("LATIN CAPITAL LETTER M" #x004D)
- ("LATIN CAPITAL LETTER N" #x004E)
- ("LATIN CAPITAL LETTER O" #x004F)
- ("LATIN CAPITAL LETTER P" #x0050)
- ("LATIN CAPITAL LETTER Q" #x0051)
- ("LATIN CAPITAL LETTER R" #x0052)
- ("LATIN CAPITAL LETTER S" #x0053)
- ("LATIN CAPITAL LETTER T" #x0054)
- ("LATIN CAPITAL LETTER U" #x0055)
- ("LATIN CAPITAL LETTER V" #x0056)
- ("LATIN CAPITAL LETTER W" #x0057)
- ("LATIN CAPITAL LETTER X" #x0058)
- ("LATIN CAPITAL LETTER Y" #x0059)
- ("LATIN CAPITAL LETTER Z" #x005A)
- ("LEFT SQUARE BRACKET" #x005B)
- ("REVERSE SOLIDUS" #x005C)
- ("RIGHT SQUARE BRACKET" #x005D)
- ("CIRCUMFLEX ACCENT" #x005E)
- ("LOW LINE" #x005F)
- ("GRAVE ACCENT" #x0060)
- ("LATIN SMALL LETTER A" #x0061)
- ("LATIN SMALL LETTER B" #x0062)
- ("LATIN SMALL LETTER C" #x0063)
- ("LATIN SMALL LETTER D" #x0064)
- ("LATIN SMALL LETTER E" #x0065)
- ("LATIN SMALL LETTER F" #x0066)
- ("LATIN SMALL LETTER G" #x0067)
- ("LATIN SMALL LETTER H" #x0068)
- ("LATIN SMALL LETTER I" #x0069)
- ("LATIN SMALL LETTER J" #x006A)
- ("LATIN SMALL LETTER K" #x006B)
- ("LATIN SMALL LETTER L" #x006C)
- ("LATIN SMALL LETTER M" #x006D)
- ("LATIN SMALL LETTER N" #x006E)
- ("LATIN SMALL LETTER O" #x006F)
- ("LATIN SMALL LETTER P" #x0070)
- ("LATIN SMALL LETTER Q" #x0071)
- ("LATIN SMALL LETTER R" #x0072)
- ("LATIN SMALL LETTER S" #x0073)
- ("LATIN SMALL LETTER T" #x0074)
- ("LATIN SMALL LETTER U" #x0075)
- ("LATIN SMALL LETTER V" #x0076)
- ("LATIN SMALL LETTER W" #x0077)
- ("LATIN SMALL LETTER X" #x0078)
- ("LATIN SMALL LETTER Y" #x0079)
- ("LATIN SMALL LETTER Z" #x007A)
- ("LEFT CURLY BRACKET" #x007B)
- ("VERTICAL LINE" #x007C)
- ("RIGHT CURLY BRACKET" #x007D)
- ("TILDE" #x007E)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'latin-1-supplement
- '(("NO-BREAK SPACE" #x00A0)
- ("INVERTED EXCLAMATION MARK" #x00A1)
- ("CENT SIGN" #x00A2)
- ("POUND SIGN" #x00A3)
- ("CURRENCY SIGN" #x00A4)
- ("YEN SIGN" #x00A5)
- ("BROKEN BAR" #x00A6)
- ("SECTION SIGN" #x00A7)
- ("DIAERESIS" #x00A8)
- ("COPYRIGHT SIGN" #x00A9)
- ("FEMININE ORDINAL INDICATOR" #x00AA)
- ("LEFT-POINTING DOUBLE ANGLE QUOTATION MARK" #x00AB)
- ("NOT SIGN" #x00AC)
- ("SOFT HYPHEN" #x00AD)
- ("REGISTERED SIGN" #x00AE)
- ("MACRON" #x00AF)
- ("DEGREE SIGN" #x00B0)
- ("PLUS-MINUS SIGN" #x00B1)
- ("SUPERSCRIPT TWO" #x00B2)
- ("SUPERSCRIPT THREE" #x00B3)
- ("ACUTE ACCENT" #x00B4)
- ("MICRO SIGN" #x00B5)
- ("PILCROW SIGN" #x00B6)
- ("MIDDLE DOT" #x00B7)
- ("CEDILLA" #x00B8)
- ("SUPERSCRIPT ONE" #x00B9)
- ("MASCULINE ORDINAL INDICATOR" #x00BA)
- ("RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK" #x00BB)
- ("VULGAR FRACTION ONE QUARTER" #x00BC)
- ("VULGAR FRACTION ONE HALF" #x00BD)
- ("VULGAR FRACTION THREE QUARTERS" #x00BE)
- ("INVERTED QUESTION MARK" #x00BF)
- ("LATIN CAPITAL LETTER A WITH GRAVE" #x00C0)
- ("LATIN CAPITAL LETTER A WITH ACUTE" #x00C1)
- ("LATIN CAPITAL LETTER A WITH CIRCUMFLEX" #x00C2)
- ("LATIN CAPITAL LETTER A WITH TILDE" #x00C3)
- ("LATIN CAPITAL LETTER A WITH DIAERESIS" #x00C4)
- ("LATIN CAPITAL LETTER A WITH RING ABOVE" #x00C5)
- ("LATIN CAPITAL LETTER AE" #x00C6)
- ("LATIN CAPITAL LETTER C WITH CEDILLA" #x00C7)
- ("LATIN CAPITAL LETTER E WITH GRAVE" #x00C8)
- ("LATIN CAPITAL LETTER E WITH ACUTE" #x00C9)
- ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX" #x00CA)
- ("LATIN CAPITAL LETTER E WITH DIAERESIS" #x00CB)
- ("LATIN CAPITAL LETTER I WITH GRAVE" #x00CC)
- ("LATIN CAPITAL LETTER I WITH ACUTE" #x00CD)
- ("LATIN CAPITAL LETTER I WITH CIRCUMFLEX" #x00CE)
- ("LATIN CAPITAL LETTER I WITH DIAERESIS" #x00CF)
- ("LATIN CAPITAL LETTER ETH" #x00D0)
- ("LATIN CAPITAL LETTER N WITH TILDE" #x00D1)
- ("LATIN CAPITAL LETTER O WITH GRAVE" #x00D2)
- ("LATIN CAPITAL LETTER O WITH ACUTE" #x00D3)
- ("LATIN CAPITAL LETTER O WITH CIRCUMFLEX" #x00D4)
- ("LATIN CAPITAL LETTER O WITH TILDE" #x00D5)
- ("LATIN CAPITAL LETTER O WITH DIAERESIS" #x00D6)
- ("MULTIPLICATION SIGN" #x00D7)
- ("LATIN CAPITAL LETTER O WITH STROKE" #x00D8)
- ("LATIN CAPITAL LETTER U WITH GRAVE" #x00D9)
- ("LATIN CAPITAL LETTER U WITH ACUTE" #x00DA)
- ("LATIN CAPITAL LETTER U WITH CIRCUMFLEX" #x00DB)
- ("LATIN CAPITAL LETTER U WITH DIAERESIS" #x00DC)
- ("LATIN CAPITAL LETTER Y WITH ACUTE" #x00DD)
- ("LATIN CAPITAL LETTER THORN" #x00DE)
- ("LATIN SMALL LETTER SHARP S" #x00DF)
- ("LATIN SMALL LETTER A WITH GRAVE" #x00E0)
- ("LATIN SMALL LETTER A WITH ACUTE" #x00E1)
- ("LATIN SMALL LETTER A WITH CIRCUMFLEX" #x00E2)
- ("LATIN SMALL LETTER A WITH TILDE" #x00E3)
- ("LATIN SMALL LETTER A WITH DIAERESIS" #x00E4)
- ("LATIN SMALL LETTER A WITH RING ABOVE" #x00E5)
- ("LATIN SMALL LETTER AE" #x00E6)
- ("LATIN SMALL LETTER C WITH CEDILLA" #x00E7)
- ("LATIN SMALL LETTER E WITH GRAVE" #x00E8)
- ("LATIN SMALL LETTER E WITH ACUTE" #x00E9)
- ("LATIN SMALL LETTER E WITH CIRCUMFLEX" #x00EA)
- ("LATIN SMALL LETTER E WITH DIAERESIS" #x00EB)
- ("LATIN SMALL LETTER I WITH GRAVE" #x00EC)
- ("LATIN SMALL LETTER I WITH ACUTE" #x00ED)
- ("LATIN SMALL LETTER I WITH CIRCUMFLEX" #x00EE)
- ("LATIN SMALL LETTER I WITH DIAERESIS" #x00EF)
- ("LATIN SMALL LETTER ETH" #x00F0)
- ("LATIN SMALL LETTER N WITH TILDE" #x00F1)
- ("LATIN SMALL LETTER O WITH GRAVE" #x00F2)
- ("LATIN SMALL LETTER O WITH ACUTE" #x00F3)
- ("LATIN SMALL LETTER O WITH CIRCUMFLEX" #x00F4)
- ("LATIN SMALL LETTER O WITH TILDE" #x00F5)
- ("LATIN SMALL LETTER O WITH DIAERESIS" #x00F6)
- ("DIVISION SIGN" #x00F7)
- ("LATIN SMALL LETTER O WITH STROKE" #x00F8)
- ("LATIN SMALL LETTER U WITH GRAVE" #x00F9)
- ("LATIN SMALL LETTER U WITH ACUTE" #x00FA)
- ("LATIN SMALL LETTER U WITH CIRCUMFLEX" #x00FB)
- ("LATIN SMALL LETTER U WITH DIAERESIS" #x00FC)
- ("LATIN SMALL LETTER Y WITH ACUTE" #x00FD)
- ("LATIN SMALL LETTER THORN" #x00FE)
- ("LATIN SMALL LETTER Y WITH DIAERESIS" #x00FF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'latin-extended-a
- '(("LATIN CAPITAL LETTER A WITH MACRON" #x0100)
- ("LATIN SMALL LETTER A WITH MACRON" #x0101)
- ("LATIN CAPITAL LETTER A WITH BREVE" #x0102)
- ("LATIN SMALL LETTER A WITH BREVE" #x0103)
- ("LATIN CAPITAL LETTER A WITH OGONEK" #x0104)
- ("LATIN SMALL LETTER A WITH OGONEK" #x0105)
- ("LATIN CAPITAL LETTER C WITH ACUTE" #x0106)
- ("LATIN SMALL LETTER C WITH ACUTE" #x0107)
- ("LATIN CAPITAL LETTER C WITH CIRCUMFLEX" #x0108)
- ("LATIN SMALL LETTER C WITH CIRCUMFLEX" #x0109)
- ("LATIN CAPITAL LETTER C WITH DOT ABOVE" #x010A)
- ("LATIN SMALL LETTER C WITH DOT ABOVE" #x010B)
- ("LATIN CAPITAL LETTER C WITH CARON" #x010C)
- ("LATIN SMALL LETTER C WITH CARON" #x010D)
- ("LATIN CAPITAL LETTER D WITH CARON" #x010E)
- ("LATIN SMALL LETTER D WITH CARON" #x010F)
- ("LATIN CAPITAL LETTER D WITH STROKE" #x0110)
- ("LATIN SMALL LETTER D WITH STROKE" #x0111)
- ("LATIN CAPITAL LETTER E WITH MACRON" #x0112)
- ("LATIN SMALL LETTER E WITH MACRON" #x0113)
- ("LATIN CAPITAL LETTER E WITH BREVE" #x0114)
- ("LATIN SMALL LETTER E WITH BREVE" #x0115)
- ("LATIN CAPITAL LETTER E WITH DOT ABOVE" #x0116)
- ("LATIN SMALL LETTER E WITH DOT ABOVE" #x0117)
- ("LATIN CAPITAL LETTER E WITH OGONEK" #x0118)
- ("LATIN SMALL LETTER E WITH OGONEK" #x0119)
- ("LATIN CAPITAL LETTER E WITH CARON" #x011A)
- ("LATIN SMALL LETTER E WITH CARON" #x011B)
- ("LATIN CAPITAL LETTER G WITH CIRCUMFLEX" #x011C)
- ("LATIN SMALL LETTER G WITH CIRCUMFLEX" #x011D)
- ("LATIN CAPITAL LETTER G WITH BREVE" #x011E)
- ("LATIN SMALL LETTER G WITH BREVE" #x011F)
- ("LATIN CAPITAL LETTER G WITH DOT ABOVE" #x0120)
- ("LATIN SMALL LETTER G WITH DOT ABOVE" #x0121)
- ("LATIN CAPITAL LETTER G WITH CEDILLA" #x0122)
- ("LATIN SMALL LETTER G WITH CEDILLA" #x0123)
- ("LATIN CAPITAL LETTER H WITH CIRCUMFLEX" #x0124)
- ("LATIN SMALL LETTER H WITH CIRCUMFLEX" #x0125)
- ("LATIN CAPITAL LETTER H WITH STROKE" #x0126)
- ("LATIN SMALL LETTER H WITH STROKE" #x0127)
- ("LATIN CAPITAL LETTER I WITH TILDE" #x0128)
- ("LATIN SMALL LETTER I WITH TILDE" #x0129)
- ("LATIN CAPITAL LETTER I WITH MACRON" #x012A)
- ("LATIN SMALL LETTER I WITH MACRON" #x012B)
- ("LATIN CAPITAL LETTER I WITH BREVE" #x012C)
- ("LATIN SMALL LETTER I WITH BREVE" #x012D)
- ("LATIN CAPITAL LETTER I WITH OGONEK" #x012E)
- ("LATIN SMALL LETTER I WITH OGONEK" #x012F)
- ("LATIN CAPITAL LETTER I WITH DOT ABOVE" #x0130)
- ("LATIN SMALL LETTER DOTLESS I" #x0131)
- ("LATIN CAPITAL LIGATURE IJ" #x0132)
- ("LATIN SMALL LIGATURE IJ" #x0133)
- ("LATIN CAPITAL LETTER J WITH CIRCUMFLEX" #x0134)
- ("LATIN SMALL LETTER J WITH CIRCUMFLEX" #x0135)
- ("LATIN CAPITAL LETTER K WITH CEDILLA" #x0136)
- ("LATIN SMALL LETTER K WITH CEDILLA" #x0137)
- ("LATIN SMALL LETTER KRA" #x0138)
- ("LATIN CAPITAL LETTER L WITH ACUTE" #x0139)
- ("LATIN SMALL LETTER L WITH ACUTE" #x013A)
- ("LATIN CAPITAL LETTER L WITH CEDILLA" #x013B)
- ("LATIN SMALL LETTER L WITH CEDILLA" #x013C)
- ("LATIN CAPITAL LETTER L WITH CARON" #x013D)
- ("LATIN SMALL LETTER L WITH CARON" #x013E)
- ("LATIN CAPITAL LETTER L WITH MIDDLE DOT" #x013F)
- ("LATIN SMALL LETTER L WITH MIDDLE DOT" #x0140)
- ("LATIN CAPITAL LETTER L WITH STROKE" #x0141)
- ("LATIN SMALL LETTER L WITH STROKE" #x0142)
- ("LATIN CAPITAL LETTER N WITH ACUTE" #x0143)
- ("LATIN SMALL LETTER N WITH ACUTE" #x0144)
- ("LATIN CAPITAL LETTER N WITH CEDILLA" #x0145)
- ("LATIN SMALL LETTER N WITH CEDILLA" #x0146)
- ("LATIN CAPITAL LETTER N WITH CARON" #x0147)
- ("LATIN SMALL LETTER N WITH CARON" #x0148)
- ("LATIN SMALL LETTER N PRECEDED BY APOSTROPHE" #x0149)
- ("LATIN CAPITAL LETTER ENG" #x014A)
- ("LATIN SMALL LETTER ENG" #x014B)
- ("LATIN CAPITAL LETTER O WITH MACRON" #x014C)
- ("LATIN SMALL LETTER O WITH MACRON" #x014D)
- ("LATIN CAPITAL LETTER O WITH BREVE" #x014E)
- ("LATIN SMALL LETTER O WITH BREVE" #x014F)
- ("LATIN CAPITAL LETTER O WITH DOUBLE ACUTE" #x0150)
- ("LATIN SMALL LETTER O WITH DOUBLE ACUTE" #x0151)
- ("LATIN CAPITAL LIGATURE OE" #x0152)
- ("LATIN SMALL LIGATURE OE" #x0153)
- ("LATIN CAPITAL LETTER R WITH ACUTE" #x0154)
- ("LATIN SMALL LETTER R WITH ACUTE" #x0155)
- ("LATIN CAPITAL LETTER R WITH CEDILLA" #x0156)
- ("LATIN SMALL LETTER R WITH CEDILLA" #x0157)
- ("LATIN CAPITAL LETTER R WITH CARON" #x0158)
- ("LATIN SMALL LETTER R WITH CARON" #x0159)
- ("LATIN CAPITAL LETTER S WITH ACUTE" #x015A)
- ("LATIN SMALL LETTER S WITH ACUTE" #x015B)
- ("LATIN CAPITAL LETTER S WITH CIRCUMFLEX" #x015C)
- ("LATIN SMALL LETTER S WITH CIRCUMFLEX" #x015D)
- ("LATIN CAPITAL LETTER S WITH CEDILLA" #x015E)
- ("LATIN SMALL LETTER S WITH CEDILLA" #x015F)
- ("LATIN CAPITAL LETTER S WITH CARON" #x0160)
- ("LATIN SMALL LETTER S WITH CARON" #x0161)
- ("LATIN CAPITAL LETTER T WITH CEDILLA" #x0162)
- ("LATIN SMALL LETTER T WITH CEDILLA" #x0163)
- ("LATIN CAPITAL LETTER T WITH CARON" #x0164)
- ("LATIN SMALL LETTER T WITH CARON" #x0165)
- ("LATIN CAPITAL LETTER T WITH STROKE" #x0166)
- ("LATIN SMALL LETTER T WITH STROKE" #x0167)
- ("LATIN CAPITAL LETTER U WITH TILDE" #x0168)
- ("LATIN SMALL LETTER U WITH TILDE" #x0169)
- ("LATIN CAPITAL LETTER U WITH MACRON" #x016A)
- ("LATIN SMALL LETTER U WITH MACRON" #x016B)
- ("LATIN CAPITAL LETTER U WITH BREVE" #x016C)
- ("LATIN SMALL LETTER U WITH BREVE" #x016D)
- ("LATIN CAPITAL LETTER U WITH RING ABOVE" #x016E)
- ("LATIN SMALL LETTER U WITH RING ABOVE" #x016F)
- ("LATIN CAPITAL LETTER U WITH DOUBLE ACUTE" #x0170)
- ("LATIN SMALL LETTER U WITH DOUBLE ACUTE" #x0171)
- ("LATIN CAPITAL LETTER U WITH OGONEK" #x0172)
- ("LATIN SMALL LETTER U WITH OGONEK" #x0173)
- ("LATIN CAPITAL LETTER W WITH CIRCUMFLEX" #x0174)
- ("LATIN SMALL LETTER W WITH CIRCUMFLEX" #x0175)
- ("LATIN CAPITAL LETTER Y WITH CIRCUMFLEX" #x0176)
- ("LATIN SMALL LETTER Y WITH CIRCUMFLEX" #x0177)
- ("LATIN CAPITAL LETTER Y WITH DIAERESIS" #x0178)
- ("LATIN CAPITAL LETTER Z WITH ACUTE" #x0179)
- ("LATIN SMALL LETTER Z WITH ACUTE" #x017A)
- ("LATIN CAPITAL LETTER Z WITH DOT ABOVE" #x017B)
- ("LATIN SMALL LETTER Z WITH DOT ABOVE" #x017C)
- ("LATIN CAPITAL LETTER Z WITH CARON" #x017D)
- ("LATIN SMALL LETTER Z WITH CARON" #x017E)
- ("LATIN SMALL LETTER LONG S" #x017F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'latin-extended-b
- '(("LATIN SMALL LETTER B WITH STROKE" #x0180)
- ("LATIN CAPITAL LETTER B WITH HOOK" #x0181)
- ("LATIN CAPITAL LETTER B WITH TOPBAR" #x0182)
- ("LATIN SMALL LETTER B WITH TOPBAR" #x0183)
- ("LATIN CAPITAL LETTER TONE SIX" #x0184)
- ("LATIN SMALL LETTER TONE SIX" #x0185)
- ("LATIN CAPITAL LETTER OPEN O" #x0186)
- ("LATIN CAPITAL LETTER C WITH HOOK" #x0187)
- ("LATIN SMALL LETTER C WITH HOOK" #x0188)
- ("LATIN CAPITAL LETTER AFRICAN D" #x0189)
- ("LATIN CAPITAL LETTER D WITH HOOK" #x018A)
- ("LATIN CAPITAL LETTER D WITH TOPBAR" #x018B)
- ("LATIN SMALL LETTER D WITH TOPBAR" #x018C)
- ("LATIN SMALL LETTER TURNED DELTA" #x018D)
- ("LATIN CAPITAL LETTER REVERSED E" #x018E)
- ("LATIN CAPITAL LETTER SCHWA" #x018F)
- ("LATIN CAPITAL LETTER OPEN E" #x0190)
- ("LATIN CAPITAL LETTER F WITH HOOK" #x0191)
- ("LATIN SMALL LETTER F WITH HOOK" #x0192)
- ("LATIN CAPITAL LETTER G WITH HOOK" #x0193)
- ("LATIN CAPITAL LETTER GAMMA" #x0194)
- ("LATIN SMALL LETTER HV" #x0195)
- ("LATIN CAPITAL LETTER IOTA" #x0196)
- ("LATIN CAPITAL LETTER I WITH STROKE" #x0197)
- ("LATIN CAPITAL LETTER K WITH HOOK" #x0198)
- ("LATIN SMALL LETTER K WITH HOOK" #x0199)
- ("LATIN SMALL LETTER L WITH BAR" #x019A)
- ("LATIN SMALL LETTER LAMBDA WITH STROKE" #x019B)
- ("LATIN CAPITAL LETTER TURNED M" #x019C)
- ("LATIN CAPITAL LETTER N WITH LEFT HOOK" #x019D)
- ("LATIN SMALL LETTER N WITH LONG RIGHT LEG" #x019E)
- ("LATIN CAPITAL LETTER O WITH MIDDLE TILDE" #x019F)
- ("LATIN CAPITAL LETTER O WITH HORN" #x01A0)
- ("LATIN SMALL LETTER O WITH HORN" #x01A1)
- ("LATIN CAPITAL LETTER OI" #x01A2)
- ("LATIN SMALL LETTER OI" #x01A3)
- ("LATIN CAPITAL LETTER P WITH HOOK" #x01A4)
- ("LATIN SMALL LETTER P WITH HOOK" #x01A5)
- ("LATIN LETTER YR" #x01A6)
- ("LATIN CAPITAL LETTER TONE TWO" #x01A7)
- ("LATIN SMALL LETTER TONE TWO" #x01A8)
- ("LATIN CAPITAL LETTER ESH" #x01A9)
- ("LATIN LETTER REVERSED ESH LOOP" #x01AA)
- ("LATIN SMALL LETTER T WITH PALATAL HOOK" #x01AB)
- ("LATIN CAPITAL LETTER T WITH HOOK" #x01AC)
- ("LATIN SMALL LETTER T WITH HOOK" #x01AD)
- ("LATIN CAPITAL LETTER T WITH RETROFLEX HOOK" #x01AE)
- ("LATIN CAPITAL LETTER U WITH HORN" #x01AF)
- ("LATIN SMALL LETTER U WITH HORN" #x01B0)
- ("LATIN CAPITAL LETTER UPSILON" #x01B1)
- ("LATIN CAPITAL LETTER V WITH HOOK" #x01B2)
- ("LATIN CAPITAL LETTER Y WITH HOOK" #x01B3)
- ("LATIN SMALL LETTER Y WITH HOOK" #x01B4)
- ("LATIN CAPITAL LETTER Z WITH STROKE" #x01B5)
- ("LATIN SMALL LETTER Z WITH STROKE" #x01B6)
- ("LATIN CAPITAL LETTER EZH" #x01B7)
- ("LATIN CAPITAL LETTER EZH REVERSED" #x01B8)
- ("LATIN SMALL LETTER EZH REVERSED" #x01B9)
- ("LATIN SMALL LETTER EZH WITH TAIL" #x01BA)
- ("LATIN LETTER TWO WITH STROKE" #x01BB)
- ("LATIN CAPITAL LETTER TONE FIVE" #x01BC)
- ("LATIN SMALL LETTER TONE FIVE" #x01BD)
- ("LATIN LETTER INVERTED GLOTTAL STOP WITH STROKE" #x01BE)
- ("LATIN LETTER WYNN" #x01BF)
- ("LATIN LETTER DENTAL CLICK" #x01C0)
- ("LATIN LETTER LATERAL CLICK" #x01C1)
- ("LATIN LETTER ALVEOLAR CLICK" #x01C2)
- ("LATIN LETTER RETROFLEX CLICK" #x01C3)
- ("LATIN CAPITAL LETTER DZ WITH CARON" #x01C4)
- ("LATIN CAPITAL LETTER D WITH SMALL LETTER Z WITH CARON" #x01C5)
- ("LATIN SMALL LETTER DZ WITH CARON" #x01C6)
- ("LATIN CAPITAL LETTER LJ" #x01C7)
- ("LATIN CAPITAL LETTER L WITH SMALL LETTER J" #x01C8)
- ("LATIN SMALL LETTER LJ" #x01C9)
- ("LATIN CAPITAL LETTER NJ" #x01CA)
- ("LATIN CAPITAL LETTER N WITH SMALL LETTER J" #x01CB)
- ("LATIN SMALL LETTER NJ" #x01CC)
- ("LATIN CAPITAL LETTER A WITH CARON" #x01CD)
- ("LATIN SMALL LETTER A WITH CARON" #x01CE)
- ("LATIN CAPITAL LETTER I WITH CARON" #x01CF)
- ("LATIN SMALL LETTER I WITH CARON" #x01D0)
- ("LATIN CAPITAL LETTER O WITH CARON" #x01D1)
- ("LATIN SMALL LETTER O WITH CARON" #x01D2)
- ("LATIN CAPITAL LETTER U WITH CARON" #x01D3)
- ("LATIN SMALL LETTER U WITH CARON" #x01D4)
- ("LATIN CAPITAL LETTER U WITH DIAERESIS AND MACRON" #x01D5)
- ("LATIN SMALL LETTER U WITH DIAERESIS AND MACRON" #x01D6)
- ("LATIN CAPITAL LETTER U WITH DIAERESIS AND ACUTE" #x01D7)
- ("LATIN SMALL LETTER U WITH DIAERESIS AND ACUTE" #x01D8)
- ("LATIN CAPITAL LETTER U WITH DIAERESIS AND CARON" #x01D9)
- ("LATIN SMALL LETTER U WITH DIAERESIS AND CARON" #x01DA)
- ("LATIN CAPITAL LETTER U WITH DIAERESIS AND GRAVE" #x01DB)
- ("LATIN SMALL LETTER U WITH DIAERESIS AND GRAVE" #x01DC)
- ("LATIN SMALL LETTER TURNED E" #x01DD)
- ("LATIN CAPITAL LETTER A WITH DIAERESIS AND MACRON" #x01DE)
- ("LATIN SMALL LETTER A WITH DIAERESIS AND MACRON" #x01DF)
- ("LATIN CAPITAL LETTER A WITH DOT ABOVE AND MACRON" #x01E0)
- ("LATIN SMALL LETTER A WITH DOT ABOVE AND MACRON" #x01E1)
- ("LATIN CAPITAL LETTER AE WITH MACRON" #x01E2)
- ("LATIN SMALL LETTER AE WITH MACRON" #x01E3)
- ("LATIN CAPITAL LETTER G WITH STROKE" #x01E4)
- ("LATIN SMALL LETTER G WITH STROKE" #x01E5)
- ("LATIN CAPITAL LETTER G WITH CARON" #x01E6)
- ("LATIN SMALL LETTER G WITH CARON" #x01E7)
- ("LATIN CAPITAL LETTER K WITH CARON" #x01E8)
- ("LATIN SMALL LETTER K WITH CARON" #x01E9)
- ("LATIN CAPITAL LETTER O WITH OGONEK" #x01EA)
- ("LATIN SMALL LETTER O WITH OGONEK" #x01EB)
- ("LATIN CAPITAL LETTER O WITH OGONEK AND MACRON" #x01EC)
- ("LATIN SMALL LETTER O WITH OGONEK AND MACRON" #x01ED)
- ("LATIN CAPITAL LETTER EZH WITH CARON" #x01EE)
- ("LATIN SMALL LETTER EZH WITH CARON" #x01EF)
- ("LATIN SMALL LETTER J WITH CARON" #x01F0)
- ("LATIN CAPITAL LETTER DZ" #x01F1)
- ("LATIN CAPITAL LETTER D WITH SMALL LETTER Z" #x01F2)
- ("LATIN SMALL LETTER DZ" #x01F3)
- ("LATIN CAPITAL LETTER G WITH ACUTE" #x01F4)
- ("LATIN SMALL LETTER G WITH ACUTE" #x01F5)
- ("LATIN CAPITAL LETTER HWAIR" #x01F6)
- ("LATIN CAPITAL LETTER WYNN" #x01F7)
- ("LATIN CAPITAL LETTER N WITH GRAVE" #x01F8)
- ("LATIN SMALL LETTER N WITH GRAVE" #x01F9)
- ("LATIN CAPITAL LETTER A WITH RING ABOVE AND ACUTE" #x01FA)
- ("LATIN SMALL LETTER A WITH RING ABOVE AND ACUTE" #x01FB)
- ("LATIN CAPITAL LETTER AE WITH ACUTE" #x01FC)
- ("LATIN SMALL LETTER AE WITH ACUTE" #x01FD)
- ("LATIN CAPITAL LETTER O WITH STROKE AND ACUTE" #x01FE)
- ("LATIN SMALL LETTER O WITH STROKE AND ACUTE" #x01FF)
- ("LATIN CAPITAL LETTER A WITH DOUBLE GRAVE" #x0200)
- ("LATIN SMALL LETTER A WITH DOUBLE GRAVE" #x0201)
- ("LATIN CAPITAL LETTER A WITH INVERTED BREVE" #x0202)
- ("LATIN SMALL LETTER A WITH INVERTED BREVE" #x0203)
- ("LATIN CAPITAL LETTER E WITH DOUBLE GRAVE" #x0204)
- ("LATIN SMALL LETTER E WITH DOUBLE GRAVE" #x0205)
- ("LATIN CAPITAL LETTER E WITH INVERTED BREVE" #x0206)
- ("LATIN SMALL LETTER E WITH INVERTED BREVE" #x0207)
- ("LATIN CAPITAL LETTER I WITH DOUBLE GRAVE" #x0208)
- ("LATIN SMALL LETTER I WITH DOUBLE GRAVE" #x0209)
- ("LATIN CAPITAL LETTER I WITH INVERTED BREVE" #x020A)
- ("LATIN SMALL LETTER I WITH INVERTED BREVE" #x020B)
- ("LATIN CAPITAL LETTER O WITH DOUBLE GRAVE" #x020C)
- ("LATIN SMALL LETTER O WITH DOUBLE GRAVE" #x020D)
- ("LATIN CAPITAL LETTER O WITH INVERTED BREVE" #x020E)
- ("LATIN SMALL LETTER O WITH INVERTED BREVE" #x020F)
- ("LATIN CAPITAL LETTER R WITH DOUBLE GRAVE" #x0210)
- ("LATIN SMALL LETTER R WITH DOUBLE GRAVE" #x0211)
- ("LATIN CAPITAL LETTER R WITH INVERTED BREVE" #x0212)
- ("LATIN SMALL LETTER R WITH INVERTED BREVE" #x0213)
- ("LATIN CAPITAL LETTER U WITH DOUBLE GRAVE" #x0214)
- ("LATIN SMALL LETTER U WITH DOUBLE GRAVE" #x0215)
- ("LATIN CAPITAL LETTER U WITH INVERTED BREVE" #x0216)
- ("LATIN SMALL LETTER U WITH INVERTED BREVE" #x0217)
- ("LATIN CAPITAL LETTER S WITH COMMA BELOW" #x0218)
- ("LATIN SMALL LETTER S WITH COMMA BELOW" #x0219)
- ("LATIN CAPITAL LETTER T WITH COMMA BELOW" #x021A)
- ("LATIN SMALL LETTER T WITH COMMA BELOW" #x021B)
- ("LATIN CAPITAL LETTER YOGH" #x021C)
- ("LATIN SMALL LETTER YOGH" #x021D)
- ("LATIN CAPITAL LETTER H WITH CARON" #x021E)
- ("LATIN SMALL LETTER H WITH CARON" #x021F)
- ("LATIN CAPITAL LETTER N WITH LONG RIGHT LEG" #x0220)
- ("LATIN CAPITAL LETTER OU" #x0222)
- ("LATIN SMALL LETTER OU" #x0223)
- ("LATIN CAPITAL LETTER Z WITH HOOK" #x0224)
- ("LATIN SMALL LETTER Z WITH HOOK" #x0225)
- ("LATIN CAPITAL LETTER A WITH DOT ABOVE" #x0226)
- ("LATIN SMALL LETTER A WITH DOT ABOVE" #x0227)
- ("LATIN CAPITAL LETTER E WITH CEDILLA" #x0228)
- ("LATIN SMALL LETTER E WITH CEDILLA" #x0229)
- ("LATIN CAPITAL LETTER O WITH DIAERESIS AND MACRON" #x022A)
- ("LATIN SMALL LETTER O WITH DIAERESIS AND MACRON" #x022B)
- ("LATIN CAPITAL LETTER O WITH TILDE AND MACRON" #x022C)
- ("LATIN SMALL LETTER O WITH TILDE AND MACRON" #x022D)
- ("LATIN CAPITAL LETTER O WITH DOT ABOVE" #x022E)
- ("LATIN SMALL LETTER O WITH DOT ABOVE" #x022F)
- ("LATIN CAPITAL LETTER O WITH DOT ABOVE AND MACRON" #x0230)
- ("LATIN SMALL LETTER O WITH DOT ABOVE AND MACRON" #x0231)
- ("LATIN CAPITAL LETTER Y WITH MACRON" #x0232)
- ("LATIN SMALL LETTER Y WITH MACRON" #x0233)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'ipa-extensions
- '(("LATIN SMALL LETTER TURNED A" #x0250)
- ("LATIN SMALL LETTER ALPHA" #x0251)
- ("LATIN SMALL LETTER TURNED ALPHA" #x0252)
- ("LATIN SMALL LETTER B WITH HOOK" #x0253)
- ("LATIN SMALL LETTER OPEN O" #x0254)
- ("LATIN SMALL LETTER C WITH CURL" #x0255)
- ("LATIN SMALL LETTER D WITH TAIL" #x0256)
- ("LATIN SMALL LETTER D WITH HOOK" #x0257)
- ("LATIN SMALL LETTER REVERSED E" #x0258)
- ("LATIN SMALL LETTER SCHWA" #x0259)
- ("LATIN SMALL LETTER SCHWA WITH HOOK" #x025A)
- ("LATIN SMALL LETTER OPEN E" #x025B)
- ("LATIN SMALL LETTER REVERSED OPEN E" #x025C)
- ("LATIN SMALL LETTER REVERSED OPEN E WITH HOOK" #x025D)
- ("LATIN SMALL LETTER CLOSED REVERSED OPEN E" #x025E)
- ("LATIN SMALL LETTER DOTLESS J WITH STROKE" #x025F)
- ("LATIN SMALL LETTER G WITH HOOK" #x0260)
- ("LATIN SMALL LETTER SCRIPT G" #x0261)
- ("LATIN LETTER SMALL CAPITAL G" #x0262)
- ("LATIN SMALL LETTER GAMMA" #x0263)
- ("LATIN SMALL LETTER RAMS HORN" #x0264)
- ("LATIN SMALL LETTER TURNED H" #x0265)
- ("LATIN SMALL LETTER H WITH HOOK" #x0266)
- ("LATIN SMALL LETTER HENG WITH HOOK" #x0267)
- ("LATIN SMALL LETTER I WITH STROKE" #x0268)
- ("LATIN SMALL LETTER IOTA" #x0269)
- ("LATIN LETTER SMALL CAPITAL I" #x026A)
- ("LATIN SMALL LETTER L WITH MIDDLE TILDE" #x026B)
- ("LATIN SMALL LETTER L WITH BELT" #x026C)
- ("LATIN SMALL LETTER L WITH RETROFLEX HOOK" #x026D)
- ("LATIN SMALL LETTER LEZH" #x026E)
- ("LATIN SMALL LETTER TURNED M" #x026F)
- ("LATIN SMALL LETTER TURNED M WITH LONG LEG" #x0270)
- ("LATIN SMALL LETTER M WITH HOOK" #x0271)
- ("LATIN SMALL LETTER N WITH LEFT HOOK" #x0272)
- ("LATIN SMALL LETTER N WITH RETROFLEX HOOK" #x0273)
- ("LATIN LETTER SMALL CAPITAL N" #x0274)
- ("LATIN SMALL LETTER BARRED O" #x0275)
- ("LATIN LETTER SMALL CAPITAL OE" #x0276)
- ("LATIN SMALL LETTER CLOSED OMEGA" #x0277)
- ("LATIN SMALL LETTER PHI" #x0278)
- ("LATIN SMALL LETTER TURNED R" #x0279)
- ("LATIN SMALL LETTER TURNED R WITH LONG LEG" #x027A)
- ("LATIN SMALL LETTER TURNED R WITH HOOK" #x027B)
- ("LATIN SMALL LETTER R WITH LONG LEG" #x027C)
- ("LATIN SMALL LETTER R WITH TAIL" #x027D)
- ("LATIN SMALL LETTER R WITH FISHHOOK" #x027E)
- ("LATIN SMALL LETTER REVERSED R WITH FISHHOOK" #x027F)
- ("LATIN LETTER SMALL CAPITAL R" #x0280)
- ("LATIN LETTER SMALL CAPITAL INVERTED R" #x0281)
- ("LATIN SMALL LETTER S WITH HOOK" #x0282)
- ("LATIN SMALL LETTER ESH" #x0283)
- ("LATIN SMALL LETTER DOTLESS J WITH STROKE AND HOOK" #x0284)
- ("LATIN SMALL LETTER SQUAT REVERSED ESH" #x0285)
- ("LATIN SMALL LETTER ESH WITH CURL" #x0286)
- ("LATIN SMALL LETTER TURNED T" #x0287)
- ("LATIN SMALL LETTER T WITH RETROFLEX HOOK" #x0288)
- ("LATIN SMALL LETTER U BAR" #x0289)
- ("LATIN SMALL LETTER UPSILON" #x028A)
- ("LATIN SMALL LETTER V WITH HOOK" #x028B)
- ("LATIN SMALL LETTER TURNED V" #x028C)
- ("LATIN SMALL LETTER TURNED W" #x028D)
- ("LATIN SMALL LETTER TURNED Y" #x028E)
- ("LATIN LETTER SMALL CAPITAL Y" #x028F)
- ("LATIN SMALL LETTER Z WITH RETROFLEX HOOK" #x0290)
- ("LATIN SMALL LETTER Z WITH CURL" #x0291)
- ("LATIN SMALL LETTER EZH" #x0292)
- ("LATIN SMALL LETTER EZH WITH CURL" #x0293)
- ("LATIN LETTER GLOTTAL STOP" #x0294)
- ("LATIN LETTER PHARYNGEAL VOICED FRICATIVE" #x0295)
- ("LATIN LETTER INVERTED GLOTTAL STOP" #x0296)
- ("LATIN LETTER STRETCHED C" #x0297)
- ("LATIN LETTER BILABIAL CLICK" #x0298)
- ("LATIN LETTER SMALL CAPITAL B" #x0299)
- ("LATIN SMALL LETTER CLOSED OPEN E" #x029A)
- ("LATIN LETTER SMALL CAPITAL G WITH HOOK" #x029B)
- ("LATIN LETTER SMALL CAPITAL H" #x029C)
- ("LATIN SMALL LETTER J WITH CROSSED-TAIL" #x029D)
- ("LATIN SMALL LETTER TURNED K" #x029E)
- ("LATIN LETTER SMALL CAPITAL L" #x029F)
- ("LATIN SMALL LETTER Q WITH HOOK" #x02A0)
- ("LATIN LETTER GLOTTAL STOP WITH STROKE" #x02A1)
- ("LATIN LETTER REVERSED GLOTTAL STOP WITH STROKE" #x02A2)
- ("LATIN SMALL LETTER DZ DIGRAPH" #x02A3)
- ("LATIN SMALL LETTER DEZH DIGRAPH" #x02A4)
- ("LATIN SMALL LETTER DZ DIGRAPH WITH CURL" #x02A5)
- ("LATIN SMALL LETTER TS DIGRAPH" #x02A6)
- ("LATIN SMALL LETTER TESH DIGRAPH" #x02A7)
- ("LATIN SMALL LETTER TC DIGRAPH WITH CURL" #x02A8)
- ("LATIN SMALL LETTER FENG DIGRAPH" #x02A9)
- ("LATIN SMALL LETTER LS DIGRAPH" #x02AA)
- ("LATIN SMALL LETTER LZ DIGRAPH" #x02AB)
- ("LATIN LETTER BILABIAL PERCUSSIVE" #x02AC)
- ("LATIN LETTER BIDENTAL PERCUSSIVE" #x02AD)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'spacing-modifier-letters
- '(("MODIFIER LETTER SMALL H" #x02B0)
- ("MODIFIER LETTER SMALL H WITH HOOK" #x02B1)
- ("MODIFIER LETTER SMALL J" #x02B2)
- ("MODIFIER LETTER SMALL R" #x02B3)
- ("MODIFIER LETTER SMALL TURNED R" #x02B4)
- ("MODIFIER LETTER SMALL TURNED R WITH HOOK" #x02B5)
- ("MODIFIER LETTER SMALL CAPITAL INVERTED R" #x02B6)
- ("MODIFIER LETTER SMALL W" #x02B7)
- ("MODIFIER LETTER SMALL Y" #x02B8)
- ("MODIFIER LETTER PRIME" #x02B9)
- ("MODIFIER LETTER DOUBLE PRIME" #x02BA)
- ("MODIFIER LETTER TURNED COMMA" #x02BB)
- ("MODIFIER LETTER APOSTROPHE" #x02BC)
- ("MODIFIER LETTER REVERSED COMMA" #x02BD)
- ("MODIFIER LETTER RIGHT HALF RING" #x02BE)
- ("MODIFIER LETTER LEFT HALF RING" #x02BF)
- ("MODIFIER LETTER GLOTTAL STOP" #x02C0)
- ("MODIFIER LETTER REVERSED GLOTTAL STOP" #x02C1)
- ("MODIFIER LETTER LEFT ARROWHEAD" #x02C2)
- ("MODIFIER LETTER RIGHT ARROWHEAD" #x02C3)
- ("MODIFIER LETTER UP ARROWHEAD" #x02C4)
- ("MODIFIER LETTER DOWN ARROWHEAD" #x02C5)
- ("MODIFIER LETTER CIRCUMFLEX ACCENT" #x02C6)
- ("CARON" #x02C7)
- ("MODIFIER LETTER VERTICAL LINE" #x02C8)
- ("MODIFIER LETTER MACRON" #x02C9)
- ("MODIFIER LETTER ACUTE ACCENT" #x02CA)
- ("MODIFIER LETTER GRAVE ACCENT" #x02CB)
- ("MODIFIER LETTER LOW VERTICAL LINE" #x02CC)
- ("MODIFIER LETTER LOW MACRON" #x02CD)
- ("MODIFIER LETTER LOW GRAVE ACCENT" #x02CE)
- ("MODIFIER LETTER LOW ACUTE ACCENT" #x02CF)
- ("MODIFIER LETTER TRIANGULAR COLON" #x02D0)
- ("MODIFIER LETTER HALF TRIANGULAR COLON" #x02D1)
- ("MODIFIER LETTER CENTRED RIGHT HALF RING" #x02D2)
- ("MODIFIER LETTER CENTRED LEFT HALF RING" #x02D3)
- ("MODIFIER LETTER UP TACK" #x02D4)
- ("MODIFIER LETTER DOWN TACK" #x02D5)
- ("MODIFIER LETTER PLUS SIGN" #x02D6)
- ("MODIFIER LETTER MINUS SIGN" #x02D7)
- ("BREVE" #x02D8)
- ("DOT ABOVE" #x02D9)
- ("RING ABOVE" #x02DA)
- ("OGONEK" #x02DB)
- ("SMALL TILDE" #x02DC)
- ("DOUBLE ACUTE ACCENT" #x02DD)
- ("MODIFIER LETTER RHOTIC HOOK" #x02DE)
- ("MODIFIER LETTER CROSS ACCENT" #x02DF)
- ("MODIFIER LETTER SMALL GAMMA" #x02E0)
- ("MODIFIER LETTER SMALL L" #x02E1)
- ("MODIFIER LETTER SMALL S" #x02E2)
- ("MODIFIER LETTER SMALL X" #x02E3)
- ("MODIFIER LETTER SMALL REVERSED GLOTTAL STOP" #x02E4)
- ("MODIFIER LETTER EXTRA-HIGH TONE BAR" #x02E5)
- ("MODIFIER LETTER HIGH TONE BAR" #x02E6)
- ("MODIFIER LETTER MID TONE BAR" #x02E7)
- ("MODIFIER LETTER LOW TONE BAR" #x02E8)
- ("MODIFIER LETTER EXTRA-LOW TONE BAR" #x02E9)
- ("MODIFIER LETTER YIN DEPARTING TONE MARK" #x02EA)
- ("MODIFIER LETTER YANG DEPARTING TONE MARK" #x02EB)
- ("MODIFIER LETTER VOICING" #x02EC)
- ("MODIFIER LETTER UNASPIRATED" #x02ED)
- ("MODIFIER LETTER DOUBLE APOSTROPHE" #x02EE)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'combining-diacritical-marks
- '(("COMBINING GRAVE ACCENT" #x0300)
- ("COMBINING ACUTE ACCENT" #x0301)
- ("COMBINING CIRCUMFLEX ACCENT" #x0302)
- ("COMBINING TILDE" #x0303)
- ("COMBINING MACRON" #x0304)
- ("COMBINING OVERLINE" #x0305)
- ("COMBINING BREVE" #x0306)
- ("COMBINING DOT ABOVE" #x0307)
- ("COMBINING DIAERESIS" #x0308)
- ("COMBINING HOOK ABOVE" #x0309)
- ("COMBINING RING ABOVE" #x030A)
- ("COMBINING DOUBLE ACUTE ACCENT" #x030B)
- ("COMBINING CARON" #x030C)
- ("COMBINING VERTICAL LINE ABOVE" #x030D)
- ("COMBINING DOUBLE VERTICAL LINE ABOVE" #x030E)
- ("COMBINING DOUBLE GRAVE ACCENT" #x030F)
- ("COMBINING CANDRABINDU" #x0310)
- ("COMBINING INVERTED BREVE" #x0311)
- ("COMBINING TURNED COMMA ABOVE" #x0312)
- ("COMBINING COMMA ABOVE" #x0313)
- ("COMBINING REVERSED COMMA ABOVE" #x0314)
- ("COMBINING COMMA ABOVE RIGHT" #x0315)
- ("COMBINING GRAVE ACCENT BELOW" #x0316)
- ("COMBINING ACUTE ACCENT BELOW" #x0317)
- ("COMBINING LEFT TACK BELOW" #x0318)
- ("COMBINING RIGHT TACK BELOW" #x0319)
- ("COMBINING LEFT ANGLE ABOVE" #x031A)
- ("COMBINING HORN" #x031B)
- ("COMBINING LEFT HALF RING BELOW" #x031C)
- ("COMBINING UP TACK BELOW" #x031D)
- ("COMBINING DOWN TACK BELOW" #x031E)
- ("COMBINING PLUS SIGN BELOW" #x031F)
- ("COMBINING MINUS SIGN BELOW" #x0320)
- ("COMBINING PALATALIZED HOOK BELOW" #x0321)
- ("COMBINING RETROFLEX HOOK BELOW" #x0322)
- ("COMBINING DOT BELOW" #x0323)
- ("COMBINING DIAERESIS BELOW" #x0324)
- ("COMBINING RING BELOW" #x0325)
- ("COMBINING COMMA BELOW" #x0326)
- ("COMBINING CEDILLA" #x0327)
- ("COMBINING OGONEK" #x0328)
- ("COMBINING VERTICAL LINE BELOW" #x0329)
- ("COMBINING BRIDGE BELOW" #x032A)
- ("COMBINING INVERTED DOUBLE ARCH BELOW" #x032B)
- ("COMBINING CARON BELOW" #x032C)
- ("COMBINING CIRCUMFLEX ACCENT BELOW" #x032D)
- ("COMBINING BREVE BELOW" #x032E)
- ("COMBINING INVERTED BREVE BELOW" #x032F)
- ("COMBINING TILDE BELOW" #x0330)
- ("COMBINING MACRON BELOW" #x0331)
- ("COMBINING LOW LINE" #x0332)
- ("COMBINING DOUBLE LOW LINE" #x0333)
- ("COMBINING TILDE OVERLAY" #x0334)
- ("COMBINING SHORT STROKE OVERLAY" #x0335)
- ("COMBINING LONG STROKE OVERLAY" #x0336)
- ("COMBINING SHORT SOLIDUS OVERLAY" #x0337)
- ("COMBINING LONG SOLIDUS OVERLAY" #x0338)
- ("COMBINING RIGHT HALF RING BELOW" #x0339)
- ("COMBINING INVERTED BRIDGE BELOW" #x033A)
- ("COMBINING SQUARE BELOW" #x033B)
- ("COMBINING SEAGULL BELOW" #x033C)
- ("COMBINING X ABOVE" #x033D)
- ("COMBINING VERTICAL TILDE" #x033E)
- ("COMBINING DOUBLE OVERLINE" #x033F)
- ("COMBINING GRAVE TONE MARK" #x0340)
- ("COMBINING ACUTE TONE MARK" #x0341)
- ("COMBINING GREEK PERISPOMENI" #x0342)
- ("COMBINING GREEK KORONIS" #x0343)
- ("COMBINING GREEK DIALYTIKA TONOS" #x0344)
- ("COMBINING GREEK YPOGEGRAMMENI" #x0345)
- ("COMBINING BRIDGE ABOVE" #x0346)
- ("COMBINING EQUALS SIGN BELOW" #x0347)
- ("COMBINING DOUBLE VERTICAL LINE BELOW" #x0348)
- ("COMBINING LEFT ANGLE BELOW" #x0349)
- ("COMBINING NOT TILDE ABOVE" #x034A)
- ("COMBINING HOMOTHETIC ABOVE" #x034B)
- ("COMBINING ALMOST EQUAL TO ABOVE" #x034C)
- ("COMBINING LEFT RIGHT ARROW BELOW" #x034D)
- ("COMBINING UPWARDS ARROW BELOW" #x034E)
- ("COMBINING GRAPHEME JOINER" #x034F)
- ("COMBINING DOUBLE TILDE" #x0360)
- ("COMBINING DOUBLE INVERTED BREVE" #x0361)
- ("COMBINING DOUBLE RIGHTWARDS ARROW BELOW" #x0362)
- ("COMBINING LATIN SMALL LETTER A" #x0363)
- ("COMBINING LATIN SMALL LETTER E" #x0364)
- ("COMBINING LATIN SMALL LETTER I" #x0365)
- ("COMBINING LATIN SMALL LETTER O" #x0366)
- ("COMBINING LATIN SMALL LETTER U" #x0367)
- ("COMBINING LATIN SMALL LETTER C" #x0368)
- ("COMBINING LATIN SMALL LETTER D" #x0369)
- ("COMBINING LATIN SMALL LETTER H" #x036A)
- ("COMBINING LATIN SMALL LETTER M" #x036B)
- ("COMBINING LATIN SMALL LETTER R" #x036C)
- ("COMBINING LATIN SMALL LETTER T" #x036D)
- ("COMBINING LATIN SMALL LETTER V" #x036E)
- ("COMBINING LATIN SMALL LETTER X" #x036F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'greek-and-coptic
- '(("GREEK NUMERAL SIGN" #x0374)
- ("GREEK LOWER NUMERAL SIGN" #x0375)
- ("GREEK YPOGEGRAMMENI" #x037A)
- ("GREEK QUESTION MARK" #x037E)
- ("GREEK TONOS" #x0384)
- ("GREEK DIALYTIKA TONOS" #x0385)
- ("GREEK CAPITAL LETTER ALPHA WITH TONOS" #x0386)
- ("GREEK ANO TELEIA" #x0387)
- ("GREEK CAPITAL LETTER EPSILON WITH TONOS" #x0388)
- ("GREEK CAPITAL LETTER ETA WITH TONOS" #x0389)
- ("GREEK CAPITAL LETTER IOTA WITH TONOS" #x038A)
- ("GREEK CAPITAL LETTER OMICRON WITH TONOS" #x038C)
- ("GREEK CAPITAL LETTER UPSILON WITH TONOS" #x038E)
- ("GREEK CAPITAL LETTER OMEGA WITH TONOS" #x038F)
- ("GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS" #x0390)
- ("GREEK CAPITAL LETTER ALPHA" #x0391)
- ("GREEK CAPITAL LETTER BETA" #x0392)
- ("GREEK CAPITAL LETTER GAMMA" #x0393)
- ("GREEK CAPITAL LETTER DELTA" #x0394)
- ("GREEK CAPITAL LETTER EPSILON" #x0395)
- ("GREEK CAPITAL LETTER ZETA" #x0396)
- ("GREEK CAPITAL LETTER ETA" #x0397)
- ("GREEK CAPITAL LETTER THETA" #x0398)
- ("GREEK CAPITAL LETTER IOTA" #x0399)
- ("GREEK CAPITAL LETTER KAPPA" #x039A)
- ("GREEK CAPITAL LETTER LAMDA" #x039B)
- ("GREEK CAPITAL LETTER MU" #x039C)
- ("GREEK CAPITAL LETTER NU" #x039D)
- ("GREEK CAPITAL LETTER XI" #x039E)
- ("GREEK CAPITAL LETTER OMICRON" #x039F)
- ("GREEK CAPITAL LETTER PI" #x03A0)
- ("GREEK CAPITAL LETTER RHO" #x03A1)
- ("GREEK CAPITAL LETTER SIGMA" #x03A3)
- ("GREEK CAPITAL LETTER TAU" #x03A4)
- ("GREEK CAPITAL LETTER UPSILON" #x03A5)
- ("GREEK CAPITAL LETTER PHI" #x03A6)
- ("GREEK CAPITAL LETTER CHI" #x03A7)
- ("GREEK CAPITAL LETTER PSI" #x03A8)
- ("GREEK CAPITAL LETTER OMEGA" #x03A9)
- ("GREEK CAPITAL LETTER IOTA WITH DIALYTIKA" #x03AA)
- ("GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA" #x03AB)
- ("GREEK SMALL LETTER ALPHA WITH TONOS" #x03AC)
- ("GREEK SMALL LETTER EPSILON WITH TONOS" #x03AD)
- ("GREEK SMALL LETTER ETA WITH TONOS" #x03AE)
- ("GREEK SMALL LETTER IOTA WITH TONOS" #x03AF)
- ("GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS" #x03B0)
- ("GREEK SMALL LETTER ALPHA" #x03B1)
- ("GREEK SMALL LETTER BETA" #x03B2)
- ("GREEK SMALL LETTER GAMMA" #x03B3)
- ("GREEK SMALL LETTER DELTA" #x03B4)
- ("GREEK SMALL LETTER EPSILON" #x03B5)
- ("GREEK SMALL LETTER ZETA" #x03B6)
- ("GREEK SMALL LETTER ETA" #x03B7)
- ("GREEK SMALL LETTER THETA" #x03B8)
- ("GREEK SMALL LETTER IOTA" #x03B9)
- ("GREEK SMALL LETTER KAPPA" #x03BA)
- ("GREEK SMALL LETTER LAMDA" #x03BB)
- ("GREEK SMALL LETTER MU" #x03BC)
- ("GREEK SMALL LETTER NU" #x03BD)
- ("GREEK SMALL LETTER XI" #x03BE)
- ("GREEK SMALL LETTER OMICRON" #x03BF)
- ("GREEK SMALL LETTER PI" #x03C0)
- ("GREEK SMALL LETTER RHO" #x03C1)
- ("GREEK SMALL LETTER FINAL SIGMA" #x03C2)
- ("GREEK SMALL LETTER SIGMA" #x03C3)
- ("GREEK SMALL LETTER TAU" #x03C4)
- ("GREEK SMALL LETTER UPSILON" #x03C5)
- ("GREEK SMALL LETTER PHI" #x03C6)
- ("GREEK SMALL LETTER CHI" #x03C7)
- ("GREEK SMALL LETTER PSI" #x03C8)
- ("GREEK SMALL LETTER OMEGA" #x03C9)
- ("GREEK SMALL LETTER IOTA WITH DIALYTIKA" #x03CA)
- ("GREEK SMALL LETTER UPSILON WITH DIALYTIKA" #x03CB)
- ("GREEK SMALL LETTER OMICRON WITH TONOS" #x03CC)
- ("GREEK SMALL LETTER UPSILON WITH TONOS" #x03CD)
- ("GREEK SMALL LETTER OMEGA WITH TONOS" #x03CE)
- ("GREEK BETA SYMBOL" #x03D0)
- ("GREEK THETA SYMBOL" #x03D1)
- ("GREEK UPSILON WITH HOOK SYMBOL" #x03D2)
- ("GREEK UPSILON WITH ACUTE AND HOOK SYMBOL" #x03D3)
- ("GREEK UPSILON WITH DIAERESIS AND HOOK SYMBOL" #x03D4)
- ("GREEK PHI SYMBOL" #x03D5)
- ("GREEK PI SYMBOL" #x03D6)
- ("GREEK KAI SYMBOL" #x03D7)
- ("GREEK LETTER ARCHAIC KOPPA" #x03D8)
- ("GREEK SMALL LETTER ARCHAIC KOPPA" #x03D9)
- ("GREEK LETTER STIGMA" #x03DA)
- ("GREEK SMALL LETTER STIGMA" #x03DB)
- ("GREEK LETTER DIGAMMA" #x03DC)
- ("GREEK SMALL LETTER DIGAMMA" #x03DD)
- ("GREEK LETTER KOPPA" #x03DE)
- ("GREEK SMALL LETTER KOPPA" #x03DF)
- ("GREEK LETTER SAMPI" #x03E0)
- ("GREEK SMALL LETTER SAMPI" #x03E1)
- ("COPTIC CAPITAL LETTER SHEI" #x03E2)
- ("COPTIC SMALL LETTER SHEI" #x03E3)
- ("COPTIC CAPITAL LETTER FEI" #x03E4)
- ("COPTIC SMALL LETTER FEI" #x03E5)
- ("COPTIC CAPITAL LETTER KHEI" #x03E6)
- ("COPTIC SMALL LETTER KHEI" #x03E7)
- ("COPTIC CAPITAL LETTER HORI" #x03E8)
- ("COPTIC SMALL LETTER HORI" #x03E9)
- ("COPTIC CAPITAL LETTER GANGIA" #x03EA)
- ("COPTIC SMALL LETTER GANGIA" #x03EB)
- ("COPTIC CAPITAL LETTER SHIMA" #x03EC)
- ("COPTIC SMALL LETTER SHIMA" #x03ED)
- ("COPTIC CAPITAL LETTER DEI" #x03EE)
- ("COPTIC SMALL LETTER DEI" #x03EF)
- ("GREEK KAPPA SYMBOL" #x03F0)
- ("GREEK RHO SYMBOL" #x03F1)
- ("GREEK LUNATE SIGMA SYMBOL" #x03F2)
- ("GREEK LETTER YOT" #x03F3)
- ("GREEK CAPITAL THETA SYMBOL" #x03F4)
- ("GREEK LUNATE EPSILON SYMBOL" #x03F5)
- ("GREEK REVERSED LUNATE EPSILON SYMBOL" #x03F6)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'cyrillic
- '(("CYRILLIC CAPITAL LETTER IE WITH GRAVE" #x0400)
- ("CYRILLIC CAPITAL LETTER IO" #x0401)
- ("CYRILLIC CAPITAL LETTER DJE" #x0402)
- ("CYRILLIC CAPITAL LETTER GJE" #x0403)
- ("CYRILLIC CAPITAL LETTER UKRAINIAN IE" #x0404)
- ("CYRILLIC CAPITAL LETTER DZE" #x0405)
- ("CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I" #x0406)
- ("CYRILLIC CAPITAL LETTER YI" #x0407)
- ("CYRILLIC CAPITAL LETTER JE" #x0408)
- ("CYRILLIC CAPITAL LETTER LJE" #x0409)
- ("CYRILLIC CAPITAL LETTER NJE" #x040A)
- ("CYRILLIC CAPITAL LETTER TSHE" #x040B)
- ("CYRILLIC CAPITAL LETTER KJE" #x040C)
- ("CYRILLIC CAPITAL LETTER I WITH GRAVE" #x040D)
- ("CYRILLIC CAPITAL LETTER SHORT U" #x040E)
- ("CYRILLIC CAPITAL LETTER DZHE" #x040F)
- ("CYRILLIC CAPITAL LETTER A" #x0410)
- ("CYRILLIC CAPITAL LETTER BE" #x0411)
- ("CYRILLIC CAPITAL LETTER VE" #x0412)
- ("CYRILLIC CAPITAL LETTER GHE" #x0413)
- ("CYRILLIC CAPITAL LETTER DE" #x0414)
- ("CYRILLIC CAPITAL LETTER IE" #x0415)
- ("CYRILLIC CAPITAL LETTER ZHE" #x0416)
- ("CYRILLIC CAPITAL LETTER ZE" #x0417)
- ("CYRILLIC CAPITAL LETTER I" #x0418)
- ("CYRILLIC CAPITAL LETTER SHORT I" #x0419)
- ("CYRILLIC CAPITAL LETTER KA" #x041A)
- ("CYRILLIC CAPITAL LETTER EL" #x041B)
- ("CYRILLIC CAPITAL LETTER EM" #x041C)
- ("CYRILLIC CAPITAL LETTER EN" #x041D)
- ("CYRILLIC CAPITAL LETTER O" #x041E)
- ("CYRILLIC CAPITAL LETTER PE" #x041F)
- ("CYRILLIC CAPITAL LETTER ER" #x0420)
- ("CYRILLIC CAPITAL LETTER ES" #x0421)
- ("CYRILLIC CAPITAL LETTER TE" #x0422)
- ("CYRILLIC CAPITAL LETTER U" #x0423)
- ("CYRILLIC CAPITAL LETTER EF" #x0424)
- ("CYRILLIC CAPITAL LETTER HA" #x0425)
- ("CYRILLIC CAPITAL LETTER TSE" #x0426)
- ("CYRILLIC CAPITAL LETTER CHE" #x0427)
- ("CYRILLIC CAPITAL LETTER SHA" #x0428)
- ("CYRILLIC CAPITAL LETTER SHCHA" #x0429)
- ("CYRILLIC CAPITAL LETTER HARD SIGN" #x042A)
- ("CYRILLIC CAPITAL LETTER YERU" #x042B)
- ("CYRILLIC CAPITAL LETTER SOFT SIGN" #x042C)
- ("CYRILLIC CAPITAL LETTER E" #x042D)
- ("CYRILLIC CAPITAL LETTER YU" #x042E)
- ("CYRILLIC CAPITAL LETTER YA" #x042F)
- ("CYRILLIC SMALL LETTER A" #x0430)
- ("CYRILLIC SMALL LETTER BE" #x0431)
- ("CYRILLIC SMALL LETTER VE" #x0432)
- ("CYRILLIC SMALL LETTER GHE" #x0433)
- ("CYRILLIC SMALL LETTER DE" #x0434)
- ("CYRILLIC SMALL LETTER IE" #x0435)
- ("CYRILLIC SMALL LETTER ZHE" #x0436)
- ("CYRILLIC SMALL LETTER ZE" #x0437)
- ("CYRILLIC SMALL LETTER I" #x0438)
- ("CYRILLIC SMALL LETTER SHORT I" #x0439)
- ("CYRILLIC SMALL LETTER KA" #x043A)
- ("CYRILLIC SMALL LETTER EL" #x043B)
- ("CYRILLIC SMALL LETTER EM" #x043C)
- ("CYRILLIC SMALL LETTER EN" #x043D)
- ("CYRILLIC SMALL LETTER O" #x043E)
- ("CYRILLIC SMALL LETTER PE" #x043F)
- ("CYRILLIC SMALL LETTER ER" #x0440)
- ("CYRILLIC SMALL LETTER ES" #x0441)
- ("CYRILLIC SMALL LETTER TE" #x0442)
- ("CYRILLIC SMALL LETTER U" #x0443)
- ("CYRILLIC SMALL LETTER EF" #x0444)
- ("CYRILLIC SMALL LETTER HA" #x0445)
- ("CYRILLIC SMALL LETTER TSE" #x0446)
- ("CYRILLIC SMALL LETTER CHE" #x0447)
- ("CYRILLIC SMALL LETTER SHA" #x0448)
- ("CYRILLIC SMALL LETTER SHCHA" #x0449)
- ("CYRILLIC SMALL LETTER HARD SIGN" #x044A)
- ("CYRILLIC SMALL LETTER YERU" #x044B)
- ("CYRILLIC SMALL LETTER SOFT SIGN" #x044C)
- ("CYRILLIC SMALL LETTER E" #x044D)
- ("CYRILLIC SMALL LETTER YU" #x044E)
- ("CYRILLIC SMALL LETTER YA" #x044F)
- ("CYRILLIC SMALL LETTER IE WITH GRAVE" #x0450)
- ("CYRILLIC SMALL LETTER IO" #x0451)
- ("CYRILLIC SMALL LETTER DJE" #x0452)
- ("CYRILLIC SMALL LETTER GJE" #x0453)
- ("CYRILLIC SMALL LETTER UKRAINIAN IE" #x0454)
- ("CYRILLIC SMALL LETTER DZE" #x0455)
- ("CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I" #x0456)
- ("CYRILLIC SMALL LETTER YI" #x0457)
- ("CYRILLIC SMALL LETTER JE" #x0458)
- ("CYRILLIC SMALL LETTER LJE" #x0459)
- ("CYRILLIC SMALL LETTER NJE" #x045A)
- ("CYRILLIC SMALL LETTER TSHE" #x045B)
- ("CYRILLIC SMALL LETTER KJE" #x045C)
- ("CYRILLIC SMALL LETTER I WITH GRAVE" #x045D)
- ("CYRILLIC SMALL LETTER SHORT U" #x045E)
- ("CYRILLIC SMALL LETTER DZHE" #x045F)
- ("CYRILLIC CAPITAL LETTER OMEGA" #x0460)
- ("CYRILLIC SMALL LETTER OMEGA" #x0461)
- ("CYRILLIC CAPITAL LETTER YAT" #x0462)
- ("CYRILLIC SMALL LETTER YAT" #x0463)
- ("CYRILLIC CAPITAL LETTER IOTIFIED E" #x0464)
- ("CYRILLIC SMALL LETTER IOTIFIED E" #x0465)
- ("CYRILLIC CAPITAL LETTER LITTLE YUS" #x0466)
- ("CYRILLIC SMALL LETTER LITTLE YUS" #x0467)
- ("CYRILLIC CAPITAL LETTER IOTIFIED LITTLE YUS" #x0468)
- ("CYRILLIC SMALL LETTER IOTIFIED LITTLE YUS" #x0469)
- ("CYRILLIC CAPITAL LETTER BIG YUS" #x046A)
- ("CYRILLIC SMALL LETTER BIG YUS" #x046B)
- ("CYRILLIC CAPITAL LETTER IOTIFIED BIG YUS" #x046C)
- ("CYRILLIC SMALL LETTER IOTIFIED BIG YUS" #x046D)
- ("CYRILLIC CAPITAL LETTER KSI" #x046E)
- ("CYRILLIC SMALL LETTER KSI" #x046F)
- ("CYRILLIC CAPITAL LETTER PSI" #x0470)
- ("CYRILLIC SMALL LETTER PSI" #x0471)
- ("CYRILLIC CAPITAL LETTER FITA" #x0472)
- ("CYRILLIC SMALL LETTER FITA" #x0473)
- ("CYRILLIC CAPITAL LETTER IZHITSA" #x0474)
- ("CYRILLIC SMALL LETTER IZHITSA" #x0475)
- ("CYRILLIC CAPITAL LETTER IZHITSA WITH DOUBLE GRAVE ACCENT" #x0476)
- ("CYRILLIC SMALL LETTER IZHITSA WITH DOUBLE GRAVE ACCENT" #x0477)
- ("CYRILLIC CAPITAL LETTER UK" #x0478)
- ("CYRILLIC SMALL LETTER UK" #x0479)
- ("CYRILLIC CAPITAL LETTER ROUND OMEGA" #x047A)
- ("CYRILLIC SMALL LETTER ROUND OMEGA" #x047B)
- ("CYRILLIC CAPITAL LETTER OMEGA WITH TITLO" #x047C)
- ("CYRILLIC SMALL LETTER OMEGA WITH TITLO" #x047D)
- ("CYRILLIC CAPITAL LETTER OT" #x047E)
- ("CYRILLIC SMALL LETTER OT" #x047F)
- ("CYRILLIC CAPITAL LETTER KOPPA" #x0480)
- ("CYRILLIC SMALL LETTER KOPPA" #x0481)
- ("CYRILLIC THOUSANDS SIGN" #x0482)
- ("COMBINING CYRILLIC TITLO" #x0483)
- ("COMBINING CYRILLIC PALATALIZATION" #x0484)
- ("COMBINING CYRILLIC DASIA PNEUMATA" #x0485)
- ("COMBINING CYRILLIC PSILI PNEUMATA" #x0486)
- ("COMBINING CYRILLIC HUNDRED THOUSANDS SIGN" #x0488)
- ("COMBINING CYRILLIC MILLIONS SIGN" #x0489)
- ("CYRILLIC CAPITAL LETTER SHORT I WITH TAIL" #x048A)
- ("CYRILLIC SMALL LETTER SHORT I WITH TAIL" #x048B)
- ("CYRILLIC CAPITAL LETTER SEMISOFT SIGN" #x048C)
- ("CYRILLIC SMALL LETTER SEMISOFT SIGN" #x048D)
- ("CYRILLIC CAPITAL LETTER ER WITH TICK" #x048E)
- ("CYRILLIC SMALL LETTER ER WITH TICK" #x048F)
- ("CYRILLIC CAPITAL LETTER GHE WITH UPTURN" #x0490)
- ("CYRILLIC SMALL LETTER GHE WITH UPTURN" #x0491)
- ("CYRILLIC CAPITAL LETTER GHE WITH STROKE" #x0492)
- ("CYRILLIC SMALL LETTER GHE WITH STROKE" #x0493)
- ("CYRILLIC CAPITAL LETTER GHE WITH MIDDLE HOOK" #x0494)
- ("CYRILLIC SMALL LETTER GHE WITH MIDDLE HOOK" #x0495)
- ("CYRILLIC CAPITAL LETTER ZHE WITH DESCENDER" #x0496)
- ("CYRILLIC SMALL LETTER ZHE WITH DESCENDER" #x0497)
- ("CYRILLIC CAPITAL LETTER ZE WITH DESCENDER" #x0498)
- ("CYRILLIC SMALL LETTER ZE WITH DESCENDER" #x0499)
- ("CYRILLIC CAPITAL LETTER KA WITH DESCENDER" #x049A)
- ("CYRILLIC SMALL LETTER KA WITH DESCENDER" #x049B)
- ("CYRILLIC CAPITAL LETTER KA WITH VERTICAL STROKE" #x049C)
- ("CYRILLIC SMALL LETTER KA WITH VERTICAL STROKE" #x049D)
- ("CYRILLIC CAPITAL LETTER KA WITH STROKE" #x049E)
- ("CYRILLIC SMALL LETTER KA WITH STROKE" #x049F)
- ("CYRILLIC CAPITAL LETTER BASHKIR KA" #x04A0)
- ("CYRILLIC SMALL LETTER BASHKIR KA" #x04A1)
- ("CYRILLIC CAPITAL LETTER EN WITH DESCENDER" #x04A2)
- ("CYRILLIC SMALL LETTER EN WITH DESCENDER" #x04A3)
- ("CYRILLIC CAPITAL LIGATURE EN GHE" #x04A4)
- ("CYRILLIC SMALL LIGATURE EN GHE" #x04A5)
- ("CYRILLIC CAPITAL LETTER PE WITH MIDDLE HOOK" #x04A6)
- ("CYRILLIC SMALL LETTER PE WITH MIDDLE HOOK" #x04A7)
- ("CYRILLIC CAPITAL LETTER ABKHASIAN HA" #x04A8)
- ("CYRILLIC SMALL LETTER ABKHASIAN HA" #x04A9)
- ("CYRILLIC CAPITAL LETTER ES WITH DESCENDER" #x04AA)
- ("CYRILLIC SMALL LETTER ES WITH DESCENDER" #x04AB)
- ("CYRILLIC CAPITAL LETTER TE WITH DESCENDER" #x04AC)
- ("CYRILLIC SMALL LETTER TE WITH DESCENDER" #x04AD)
- ("CYRILLIC CAPITAL LETTER STRAIGHT U" #x04AE)
- ("CYRILLIC SMALL LETTER STRAIGHT U" #x04AF)
- ("CYRILLIC CAPITAL LETTER STRAIGHT U WITH STROKE" #x04B0)
- ("CYRILLIC SMALL LETTER STRAIGHT U WITH STROKE" #x04B1)
- ("CYRILLIC CAPITAL LETTER HA WITH DESCENDER" #x04B2)
- ("CYRILLIC SMALL LETTER HA WITH DESCENDER" #x04B3)
- ("CYRILLIC CAPITAL LIGATURE TE TSE" #x04B4)
- ("CYRILLIC SMALL LIGATURE TE TSE" #x04B5)
- ("CYRILLIC CAPITAL LETTER CHE WITH DESCENDER" #x04B6)
- ("CYRILLIC SMALL LETTER CHE WITH DESCENDER" #x04B7)
- ("CYRILLIC CAPITAL LETTER CHE WITH VERTICAL STROKE" #x04B8)
- ("CYRILLIC SMALL LETTER CHE WITH VERTICAL STROKE" #x04B9)
- ("CYRILLIC CAPITAL LETTER SHHA" #x04BA)
- ("CYRILLIC SMALL LETTER SHHA" #x04BB)
- ("CYRILLIC CAPITAL LETTER ABKHASIAN CHE" #x04BC)
- ("CYRILLIC SMALL LETTER ABKHASIAN CHE" #x04BD)
- ("CYRILLIC CAPITAL LETTER ABKHASIAN CHE WITH DESCENDER" #x04BE)
- ("CYRILLIC SMALL LETTER ABKHASIAN CHE WITH DESCENDER" #x04BF)
- ("CYRILLIC LETTER PALOCHKA" #x04C0)
- ("CYRILLIC CAPITAL LETTER ZHE WITH BREVE" #x04C1)
- ("CYRILLIC SMALL LETTER ZHE WITH BREVE" #x04C2)
- ("CYRILLIC CAPITAL LETTER KA WITH HOOK" #x04C3)
- ("CYRILLIC SMALL LETTER KA WITH HOOK" #x04C4)
- ("CYRILLIC CAPITAL LETTER EL WITH TAIL" #x04C5)
- ("CYRILLIC SMALL LETTER EL WITH TAIL" #x04C6)
- ("CYRILLIC CAPITAL LETTER EN WITH HOOK" #x04C7)
- ("CYRILLIC SMALL LETTER EN WITH HOOK" #x04C8)
- ("CYRILLIC CAPITAL LETTER EN WITH TAIL" #x04C9)
- ("CYRILLIC SMALL LETTER EN WITH TAIL" #x04CA)
- ("CYRILLIC CAPITAL LETTER KHAKASSIAN CHE" #x04CB)
- ("CYRILLIC SMALL LETTER KHAKASSIAN CHE" #x04CC)
- ("CYRILLIC CAPITAL LETTER EM WITH TAIL" #x04CD)
- ("CYRILLIC SMALL LETTER EM WITH TAIL" #x04CE)
- ("CYRILLIC CAPITAL LETTER A WITH BREVE" #x04D0)
- ("CYRILLIC SMALL LETTER A WITH BREVE" #x04D1)
- ("CYRILLIC CAPITAL LETTER A WITH DIAERESIS" #x04D2)
- ("CYRILLIC SMALL LETTER A WITH DIAERESIS" #x04D3)
- ("CYRILLIC CAPITAL LIGATURE A IE" #x04D4)
- ("CYRILLIC SMALL LIGATURE A IE" #x04D5)
- ("CYRILLIC CAPITAL LETTER IE WITH BREVE" #x04D6)
- ("CYRILLIC SMALL LETTER IE WITH BREVE" #x04D7)
- ("CYRILLIC CAPITAL LETTER SCHWA" #x04D8)
- ("CYRILLIC SMALL LETTER SCHWA" #x04D9)
- ("CYRILLIC CAPITAL LETTER SCHWA WITH DIAERESIS" #x04DA)
- ("CYRILLIC SMALL LETTER SCHWA WITH DIAERESIS" #x04DB)
- ("CYRILLIC CAPITAL LETTER ZHE WITH DIAERESIS" #x04DC)
- ("CYRILLIC SMALL LETTER ZHE WITH DIAERESIS" #x04DD)
- ("CYRILLIC CAPITAL LETTER ZE WITH DIAERESIS" #x04DE)
- ("CYRILLIC SMALL LETTER ZE WITH DIAERESIS" #x04DF)
- ("CYRILLIC CAPITAL LETTER ABKHASIAN DZE" #x04E0)
- ("CYRILLIC SMALL LETTER ABKHASIAN DZE" #x04E1)
- ("CYRILLIC CAPITAL LETTER I WITH MACRON" #x04E2)
- ("CYRILLIC SMALL LETTER I WITH MACRON" #x04E3)
- ("CYRILLIC CAPITAL LETTER I WITH DIAERESIS" #x04E4)
- ("CYRILLIC SMALL LETTER I WITH DIAERESIS" #x04E5)
- ("CYRILLIC CAPITAL LETTER O WITH DIAERESIS" #x04E6)
- ("CYRILLIC SMALL LETTER O WITH DIAERESIS" #x04E7)
- ("CYRILLIC CAPITAL LETTER BARRED O" #x04E8)
- ("CYRILLIC SMALL LETTER BARRED O" #x04E9)
- ("CYRILLIC CAPITAL LETTER BARRED O WITH DIAERESIS" #x04EA)
- ("CYRILLIC SMALL LETTER BARRED O WITH DIAERESIS" #x04EB)
- ("CYRILLIC CAPITAL LETTER E WITH DIAERESIS" #x04EC)
- ("CYRILLIC SMALL LETTER E WITH DIAERESIS" #x04ED)
- ("CYRILLIC CAPITAL LETTER U WITH MACRON" #x04EE)
- ("CYRILLIC SMALL LETTER U WITH MACRON" #x04EF)
- ("CYRILLIC CAPITAL LETTER U WITH DIAERESIS" #x04F0)
- ("CYRILLIC SMALL LETTER U WITH DIAERESIS" #x04F1)
- ("CYRILLIC CAPITAL LETTER U WITH DOUBLE ACUTE" #x04F2)
- ("CYRILLIC SMALL LETTER U WITH DOUBLE ACUTE" #x04F3)
- ("CYRILLIC CAPITAL LETTER CHE WITH DIAERESIS" #x04F4)
- ("CYRILLIC SMALL LETTER CHE WITH DIAERESIS" #x04F5)
- ("CYRILLIC CAPITAL LETTER YERU WITH DIAERESIS" #x04F8)
- ("CYRILLIC SMALL LETTER YERU WITH DIAERESIS" #x04F9)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'cyrillic-supplementary
- '(("CYRILLIC CAPITAL LETTER KOMI DE" #x0500)
- ("CYRILLIC SMALL LETTER KOMI DE" #x0501)
- ("CYRILLIC CAPITAL LETTER KOMI DJE" #x0502)
- ("CYRILLIC SMALL LETTER KOMI DJE" #x0503)
- ("CYRILLIC CAPITAL LETTER KOMI ZJE" #x0504)
- ("CYRILLIC SMALL LETTER KOMI ZJE" #x0505)
- ("CYRILLIC CAPITAL LETTER KOMI DZJE" #x0506)
- ("CYRILLIC SMALL LETTER KOMI DZJE" #x0507)
- ("CYRILLIC CAPITAL LETTER KOMI LJE" #x0508)
- ("CYRILLIC SMALL LETTER KOMI LJE" #x0509)
- ("CYRILLIC CAPITAL LETTER KOMI NJE" #x050A)
- ("CYRILLIC SMALL LETTER KOMI NJE" #x050B)
- ("CYRILLIC CAPITAL LETTER KOMI SJE" #x050C)
- ("CYRILLIC SMALL LETTER KOMI SJE" #x050D)
- ("CYRILLIC CAPITAL LETTER KOMI TJE" #x050E)
- ("CYRILLIC SMALL LETTER KOMI TJE" #x050F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'armenian
- '(("ARMENIAN CAPITAL LETTER AYB" #x0531)
- ("ARMENIAN CAPITAL LETTER BEN" #x0532)
- ("ARMENIAN CAPITAL LETTER GIM" #x0533)
- ("ARMENIAN CAPITAL LETTER DA" #x0534)
- ("ARMENIAN CAPITAL LETTER ECH" #x0535)
- ("ARMENIAN CAPITAL LETTER ZA" #x0536)
- ("ARMENIAN CAPITAL LETTER EH" #x0537)
- ("ARMENIAN CAPITAL LETTER ET" #x0538)
- ("ARMENIAN CAPITAL LETTER TO" #x0539)
- ("ARMENIAN CAPITAL LETTER ZHE" #x053A)
- ("ARMENIAN CAPITAL LETTER INI" #x053B)
- ("ARMENIAN CAPITAL LETTER LIWN" #x053C)
- ("ARMENIAN CAPITAL LETTER XEH" #x053D)
- ("ARMENIAN CAPITAL LETTER CA" #x053E)
- ("ARMENIAN CAPITAL LETTER KEN" #x053F)
- ("ARMENIAN CAPITAL LETTER HO" #x0540)
- ("ARMENIAN CAPITAL LETTER JA" #x0541)
- ("ARMENIAN CAPITAL LETTER GHAD" #x0542)
- ("ARMENIAN CAPITAL LETTER CHEH" #x0543)
- ("ARMENIAN CAPITAL LETTER MEN" #x0544)
- ("ARMENIAN CAPITAL LETTER YI" #x0545)
- ("ARMENIAN CAPITAL LETTER NOW" #x0546)
- ("ARMENIAN CAPITAL LETTER SHA" #x0547)
- ("ARMENIAN CAPITAL LETTER VO" #x0548)
- ("ARMENIAN CAPITAL LETTER CHA" #x0549)
- ("ARMENIAN CAPITAL LETTER PEH" #x054A)
- ("ARMENIAN CAPITAL LETTER JHEH" #x054B)
- ("ARMENIAN CAPITAL LETTER RA" #x054C)
- ("ARMENIAN CAPITAL LETTER SEH" #x054D)
- ("ARMENIAN CAPITAL LETTER VEW" #x054E)
- ("ARMENIAN CAPITAL LETTER TIWN" #x054F)
- ("ARMENIAN CAPITAL LETTER REH" #x0550)
- ("ARMENIAN CAPITAL LETTER CO" #x0551)
- ("ARMENIAN CAPITAL LETTER YIWN" #x0552)
- ("ARMENIAN CAPITAL LETTER PIWR" #x0553)
- ("ARMENIAN CAPITAL LETTER KEH" #x0554)
- ("ARMENIAN CAPITAL LETTER OH" #x0555)
- ("ARMENIAN CAPITAL LETTER FEH" #x0556)
- ("ARMENIAN MODIFIER LETTER LEFT HALF RING" #x0559)
- ("ARMENIAN APOSTROPHE" #x055A)
- ("ARMENIAN EMPHASIS MARK" #x055B)
- ("ARMENIAN EXCLAMATION MARK" #x055C)
- ("ARMENIAN COMMA" #x055D)
- ("ARMENIAN QUESTION MARK" #x055E)
- ("ARMENIAN ABBREVIATION MARK" #x055F)
- ("ARMENIAN SMALL LETTER AYB" #x0561)
- ("ARMENIAN SMALL LETTER BEN" #x0562)
- ("ARMENIAN SMALL LETTER GIM" #x0563)
- ("ARMENIAN SMALL LETTER DA" #x0564)
- ("ARMENIAN SMALL LETTER ECH" #x0565)
- ("ARMENIAN SMALL LETTER ZA" #x0566)
- ("ARMENIAN SMALL LETTER EH" #x0567)
- ("ARMENIAN SMALL LETTER ET" #x0568)
- ("ARMENIAN SMALL LETTER TO" #x0569)
- ("ARMENIAN SMALL LETTER ZHE" #x056A)
- ("ARMENIAN SMALL LETTER INI" #x056B)
- ("ARMENIAN SMALL LETTER LIWN" #x056C)
- ("ARMENIAN SMALL LETTER XEH" #x056D)
- ("ARMENIAN SMALL LETTER CA" #x056E)
- ("ARMENIAN SMALL LETTER KEN" #x056F)
- ("ARMENIAN SMALL LETTER HO" #x0570)
- ("ARMENIAN SMALL LETTER JA" #x0571)
- ("ARMENIAN SMALL LETTER GHAD" #x0572)
- ("ARMENIAN SMALL LETTER CHEH" #x0573)
- ("ARMENIAN SMALL LETTER MEN" #x0574)
- ("ARMENIAN SMALL LETTER YI" #x0575)
- ("ARMENIAN SMALL LETTER NOW" #x0576)
- ("ARMENIAN SMALL LETTER SHA" #x0577)
- ("ARMENIAN SMALL LETTER VO" #x0578)
- ("ARMENIAN SMALL LETTER CHA" #x0579)
- ("ARMENIAN SMALL LETTER PEH" #x057A)
- ("ARMENIAN SMALL LETTER JHEH" #x057B)
- ("ARMENIAN SMALL LETTER RA" #x057C)
- ("ARMENIAN SMALL LETTER SEH" #x057D)
- ("ARMENIAN SMALL LETTER VEW" #x057E)
- ("ARMENIAN SMALL LETTER TIWN" #x057F)
- ("ARMENIAN SMALL LETTER REH" #x0580)
- ("ARMENIAN SMALL LETTER CO" #x0581)
- ("ARMENIAN SMALL LETTER YIWN" #x0582)
- ("ARMENIAN SMALL LETTER PIWR" #x0583)
- ("ARMENIAN SMALL LETTER KEH" #x0584)
- ("ARMENIAN SMALL LETTER OH" #x0585)
- ("ARMENIAN SMALL LETTER FEH" #x0586)
- ("ARMENIAN SMALL LIGATURE ECH YIWN" #x0587)
- ("ARMENIAN FULL STOP" #x0589)
- ("ARMENIAN HYPHEN" #x058A)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'hebrew
- '(("HEBREW ACCENT ETNAHTA" #x0591)
- ("HEBREW ACCENT SEGOL" #x0592)
- ("HEBREW ACCENT SHALSHELET" #x0593)
- ("HEBREW ACCENT ZAQEF QATAN" #x0594)
- ("HEBREW ACCENT ZAQEF GADOL" #x0595)
- ("HEBREW ACCENT TIPEHA" #x0596)
- ("HEBREW ACCENT REVIA" #x0597)
- ("HEBREW ACCENT ZARQA" #x0598)
- ("HEBREW ACCENT PASHTA" #x0599)
- ("HEBREW ACCENT YETIV" #x059A)
- ("HEBREW ACCENT TEVIR" #x059B)
- ("HEBREW ACCENT GERESH" #x059C)
- ("HEBREW ACCENT GERESH MUQDAM" #x059D)
- ("HEBREW ACCENT GERSHAYIM" #x059E)
- ("HEBREW ACCENT QARNEY PARA" #x059F)
- ("HEBREW ACCENT TELISHA GEDOLA" #x05A0)
- ("HEBREW ACCENT PAZER" #x05A1)
- ("HEBREW ACCENT MUNAH" #x05A3)
- ("HEBREW ACCENT MAHAPAKH" #x05A4)
- ("HEBREW ACCENT MERKHA" #x05A5)
- ("HEBREW ACCENT MERKHA KEFULA" #x05A6)
- ("HEBREW ACCENT DARGA" #x05A7)
- ("HEBREW ACCENT QADMA" #x05A8)
- ("HEBREW ACCENT TELISHA QETANA" #x05A9)
- ("HEBREW ACCENT YERAH BEN YOMO" #x05AA)
- ("HEBREW ACCENT OLE" #x05AB)
- ("HEBREW ACCENT ILUY" #x05AC)
- ("HEBREW ACCENT DEHI" #x05AD)
- ("HEBREW ACCENT ZINOR" #x05AE)
- ("HEBREW MARK MASORA CIRCLE" #x05AF)
- ("HEBREW POINT SHEVA" #x05B0)
- ("HEBREW POINT HATAF SEGOL" #x05B1)
- ("HEBREW POINT HATAF PATAH" #x05B2)
- ("HEBREW POINT HATAF QAMATS" #x05B3)
- ("HEBREW POINT HIRIQ" #x05B4)
- ("HEBREW POINT TSERE" #x05B5)
- ("HEBREW POINT SEGOL" #x05B6)
- ("HEBREW POINT PATAH" #x05B7)
- ("HEBREW POINT QAMATS" #x05B8)
- ("HEBREW POINT HOLAM" #x05B9)
- ("HEBREW POINT QUBUTS" #x05BB)
- ("HEBREW POINT DAGESH OR MAPIQ" #x05BC)
- ("HEBREW POINT METEG" #x05BD)
- ("HEBREW PUNCTUATION MAQAF" #x05BE)
- ("HEBREW POINT RAFE" #x05BF)
- ("HEBREW PUNCTUATION PASEQ" #x05C0)
- ("HEBREW POINT SHIN DOT" #x05C1)
- ("HEBREW POINT SIN DOT" #x05C2)
- ("HEBREW PUNCTUATION SOF PASUQ" #x05C3)
- ("HEBREW MARK UPPER DOT" #x05C4)
- ("HEBREW LETTER ALEF" #x05D0)
- ("HEBREW LETTER BET" #x05D1)
- ("HEBREW LETTER GIMEL" #x05D2)
- ("HEBREW LETTER DALET" #x05D3)
- ("HEBREW LETTER HE" #x05D4)
- ("HEBREW LETTER VAV" #x05D5)
- ("HEBREW LETTER ZAYIN" #x05D6)
- ("HEBREW LETTER HET" #x05D7)
- ("HEBREW LETTER TET" #x05D8)
- ("HEBREW LETTER YOD" #x05D9)
- ("HEBREW LETTER FINAL KAF" #x05DA)
- ("HEBREW LETTER KAF" #x05DB)
- ("HEBREW LETTER LAMED" #x05DC)
- ("HEBREW LETTER FINAL MEM" #x05DD)
- ("HEBREW LETTER MEM" #x05DE)
- ("HEBREW LETTER FINAL NUN" #x05DF)
- ("HEBREW LETTER NUN" #x05E0)
- ("HEBREW LETTER SAMEKH" #x05E1)
- ("HEBREW LETTER AYIN" #x05E2)
- ("HEBREW LETTER FINAL PE" #x05E3)
- ("HEBREW LETTER PE" #x05E4)
- ("HEBREW LETTER FINAL TSADI" #x05E5)
- ("HEBREW LETTER TSADI" #x05E6)
- ("HEBREW LETTER QOF" #x05E7)
- ("HEBREW LETTER RESH" #x05E8)
- ("HEBREW LETTER SHIN" #x05E9)
- ("HEBREW LETTER TAV" #x05EA)
- ("HEBREW LIGATURE YIDDISH DOUBLE VAV" #x05F0)
- ("HEBREW LIGATURE YIDDISH VAV YOD" #x05F1)
- ("HEBREW LIGATURE YIDDISH DOUBLE YOD" #x05F2)
- ("HEBREW PUNCTUATION GERESH" #x05F3)
- ("HEBREW PUNCTUATION GERSHAYIM" #x05F4)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'arabic
- '(("ARABIC COMMA" #x060C)
- ("ARABIC SEMICOLON" #x061B)
- ("ARABIC QUESTION MARK" #x061F)
- ("ARABIC LETTER HAMZA" #x0621)
- ("ARABIC LETTER ALEF WITH MADDA ABOVE" #x0622)
- ("ARABIC LETTER ALEF WITH HAMZA ABOVE" #x0623)
- ("ARABIC LETTER WAW WITH HAMZA ABOVE" #x0624)
- ("ARABIC LETTER ALEF WITH HAMZA BELOW" #x0625)
- ("ARABIC LETTER YEH WITH HAMZA ABOVE" #x0626)
- ("ARABIC LETTER ALEF" #x0627)
- ("ARABIC LETTER BEH" #x0628)
- ("ARABIC LETTER TEH MARBUTA" #x0629)
- ("ARABIC LETTER TEH" #x062A)
- ("ARABIC LETTER THEH" #x062B)
- ("ARABIC LETTER JEEM" #x062C)
- ("ARABIC LETTER HAH" #x062D)
- ("ARABIC LETTER KHAH" #x062E)
- ("ARABIC LETTER DAL" #x062F)
- ("ARABIC LETTER THAL" #x0630)
- ("ARABIC LETTER REH" #x0631)
- ("ARABIC LETTER ZAIN" #x0632)
- ("ARABIC LETTER SEEN" #x0633)
- ("ARABIC LETTER SHEEN" #x0634)
- ("ARABIC LETTER SAD" #x0635)
- ("ARABIC LETTER DAD" #x0636)
- ("ARABIC LETTER TAH" #x0637)
- ("ARABIC LETTER ZAH" #x0638)
- ("ARABIC LETTER AIN" #x0639)
- ("ARABIC LETTER GHAIN" #x063A)
- ("ARABIC TATWEEL" #x0640)
- ("ARABIC LETTER FEH" #x0641)
- ("ARABIC LETTER QAF" #x0642)
- ("ARABIC LETTER KAF" #x0643)
- ("ARABIC LETTER LAM" #x0644)
- ("ARABIC LETTER MEEM" #x0645)
- ("ARABIC LETTER NOON" #x0646)
- ("ARABIC LETTER HEH" #x0647)
- ("ARABIC LETTER WAW" #x0648)
- ("ARABIC LETTER ALEF MAKSURA" #x0649)
- ("ARABIC LETTER YEH" #x064A)
- ("ARABIC FATHATAN" #x064B)
- ("ARABIC DAMMATAN" #x064C)
- ("ARABIC KASRATAN" #x064D)
- ("ARABIC FATHA" #x064E)
- ("ARABIC DAMMA" #x064F)
- ("ARABIC KASRA" #x0650)
- ("ARABIC SHADDA" #x0651)
- ("ARABIC SUKUN" #x0652)
- ("ARABIC MADDAH ABOVE" #x0653)
- ("ARABIC HAMZA ABOVE" #x0654)
- ("ARABIC HAMZA BELOW" #x0655)
- ("ARABIC-INDIC DIGIT ZERO" #x0660)
- ("ARABIC-INDIC DIGIT ONE" #x0661)
- ("ARABIC-INDIC DIGIT TWO" #x0662)
- ("ARABIC-INDIC DIGIT THREE" #x0663)
- ("ARABIC-INDIC DIGIT FOUR" #x0664)
- ("ARABIC-INDIC DIGIT FIVE" #x0665)
- ("ARABIC-INDIC DIGIT SIX" #x0666)
- ("ARABIC-INDIC DIGIT SEVEN" #x0667)
- ("ARABIC-INDIC DIGIT EIGHT" #x0668)
- ("ARABIC-INDIC DIGIT NINE" #x0669)
- ("ARABIC PERCENT SIGN" #x066A)
- ("ARABIC DECIMAL SEPARATOR" #x066B)
- ("ARABIC THOUSANDS SEPARATOR" #x066C)
- ("ARABIC FIVE POINTED STAR" #x066D)
- ("ARABIC LETTER DOTLESS BEH" #x066E)
- ("ARABIC LETTER DOTLESS QAF" #x066F)
- ("ARABIC LETTER SUPERSCRIPT ALEF" #x0670)
- ("ARABIC LETTER ALEF WASLA" #x0671)
- ("ARABIC LETTER ALEF WITH WAVY HAMZA ABOVE" #x0672)
- ("ARABIC LETTER ALEF WITH WAVY HAMZA BELOW" #x0673)
- ("ARABIC LETTER HIGH HAMZA" #x0674)
- ("ARABIC LETTER HIGH HAMZA ALEF" #x0675)
- ("ARABIC LETTER HIGH HAMZA WAW" #x0676)
- ("ARABIC LETTER U WITH HAMZA ABOVE" #x0677)
- ("ARABIC LETTER HIGH HAMZA YEH" #x0678)
- ("ARABIC LETTER TTEH" #x0679)
- ("ARABIC LETTER TTEHEH" #x067A)
- ("ARABIC LETTER BEEH" #x067B)
- ("ARABIC LETTER TEH WITH RING" #x067C)
- ("ARABIC LETTER TEH WITH THREE DOTS ABOVE DOWNWARDS" #x067D)
- ("ARABIC LETTER PEH" #x067E)
- ("ARABIC LETTER TEHEH" #x067F)
- ("ARABIC LETTER BEHEH" #x0680)
- ("ARABIC LETTER HAH WITH HAMZA ABOVE" #x0681)
- ("ARABIC LETTER HAH WITH TWO DOTS VERTICAL ABOVE" #x0682)
- ("ARABIC LETTER NYEH" #x0683)
- ("ARABIC LETTER DYEH" #x0684)
- ("ARABIC LETTER HAH WITH THREE DOTS ABOVE" #x0685)
- ("ARABIC LETTER TCHEH" #x0686)
- ("ARABIC LETTER TCHEHEH" #x0687)
- ("ARABIC LETTER DDAL" #x0688)
- ("ARABIC LETTER DAL WITH RING" #x0689)
- ("ARABIC LETTER DAL WITH DOT BELOW" #x068A)
- ("ARABIC LETTER DAL WITH DOT BELOW AND SMALL TAH" #x068B)
- ("ARABIC LETTER DAHAL" #x068C)
- ("ARABIC LETTER DDAHAL" #x068D)
- ("ARABIC LETTER DUL" #x068E)
- ("ARABIC LETTER DAL WITH THREE DOTS ABOVE DOWNWARDS" #x068F)
- ("ARABIC LETTER DAL WITH FOUR DOTS ABOVE" #x0690)
- ("ARABIC LETTER RREH" #x0691)
- ("ARABIC LETTER REH WITH SMALL V" #x0692)
- ("ARABIC LETTER REH WITH RING" #x0693)
- ("ARABIC LETTER REH WITH DOT BELOW" #x0694)
- ("ARABIC LETTER REH WITH SMALL V BELOW" #x0695)
- ("ARABIC LETTER REH WITH DOT BELOW AND DOT ABOVE" #x0696)
- ("ARABIC LETTER REH WITH TWO DOTS ABOVE" #x0697)
- ("ARABIC LETTER JEH" #x0698)
- ("ARABIC LETTER REH WITH FOUR DOTS ABOVE" #x0699)
- ("ARABIC LETTER SEEN WITH DOT BELOW AND DOT ABOVE" #x069A)
- ("ARABIC LETTER SEEN WITH THREE DOTS BELOW" #x069B)
- ("ARABIC LETTER SEEN WITH THREE DOTS BELOW AND THREE DOTS ABOVE" #x069C)
- ("ARABIC LETTER SAD WITH TWO DOTS BELOW" #x069D)
- ("ARABIC LETTER SAD WITH THREE DOTS ABOVE" #x069E)
- ("ARABIC LETTER TAH WITH THREE DOTS ABOVE" #x069F)
- ("ARABIC LETTER AIN WITH THREE DOTS ABOVE" #x06A0)
- ("ARABIC LETTER DOTLESS FEH" #x06A1)
- ("ARABIC LETTER FEH WITH DOT MOVED BELOW" #x06A2)
- ("ARABIC LETTER FEH WITH DOT BELOW" #x06A3)
- ("ARABIC LETTER VEH" #x06A4)
- ("ARABIC LETTER FEH WITH THREE DOTS BELOW" #x06A5)
- ("ARABIC LETTER PEHEH" #x06A6)
- ("ARABIC LETTER QAF WITH DOT ABOVE" #x06A7)
- ("ARABIC LETTER QAF WITH THREE DOTS ABOVE" #x06A8)
- ("ARABIC LETTER KEHEH" #x06A9)
- ("ARABIC LETTER SWASH KAF" #x06AA)
- ("ARABIC LETTER KAF WITH RING" #x06AB)
- ("ARABIC LETTER KAF WITH DOT ABOVE" #x06AC)
- ("ARABIC LETTER NG" #x06AD)
- ("ARABIC LETTER KAF WITH THREE DOTS BELOW" #x06AE)
- ("ARABIC LETTER GAF" #x06AF)
- ("ARABIC LETTER GAF WITH RING" #x06B0)
- ("ARABIC LETTER NGOEH" #x06B1)
- ("ARABIC LETTER GAF WITH TWO DOTS BELOW" #x06B2)
- ("ARABIC LETTER GUEH" #x06B3)
- ("ARABIC LETTER GAF WITH THREE DOTS ABOVE" #x06B4)
- ("ARABIC LETTER LAM WITH SMALL V" #x06B5)
- ("ARABIC LETTER LAM WITH DOT ABOVE" #x06B6)
- ("ARABIC LETTER LAM WITH THREE DOTS ABOVE" #x06B7)
- ("ARABIC LETTER LAM WITH THREE DOTS BELOW" #x06B8)
- ("ARABIC LETTER NOON WITH DOT BELOW" #x06B9)
- ("ARABIC LETTER NOON GHUNNA" #x06BA)
- ("ARABIC LETTER RNOON" #x06BB)
- ("ARABIC LETTER NOON WITH RING" #x06BC)
- ("ARABIC LETTER NOON WITH THREE DOTS ABOVE" #x06BD)
- ("ARABIC LETTER HEH DOACHASHMEE" #x06BE)
- ("ARABIC LETTER TCHEH WITH DOT ABOVE" #x06BF)
- ("ARABIC LETTER HEH WITH YEH ABOVE" #x06C0)
- ("ARABIC LETTER HEH GOAL" #x06C1)
- ("ARABIC LETTER HEH GOAL WITH HAMZA ABOVE" #x06C2)
- ("ARABIC LETTER TEH MARBUTA GOAL" #x06C3)
- ("ARABIC LETTER WAW WITH RING" #x06C4)
- ("ARABIC LETTER KIRGHIZ OE" #x06C5)
- ("ARABIC LETTER OE" #x06C6)
- ("ARABIC LETTER U" #x06C7)
- ("ARABIC LETTER YU" #x06C8)
- ("ARABIC LETTER KIRGHIZ YU" #x06C9)
- ("ARABIC LETTER WAW WITH TWO DOTS ABOVE" #x06CA)
- ("ARABIC LETTER VE" #x06CB)
- ("ARABIC LETTER FARSI YEH" #x06CC)
- ("ARABIC LETTER YEH WITH TAIL" #x06CD)
- ("ARABIC LETTER YEH WITH SMALL V" #x06CE)
- ("ARABIC LETTER WAW WITH DOT ABOVE" #x06CF)
- ("ARABIC LETTER E" #x06D0)
- ("ARABIC LETTER YEH WITH THREE DOTS BELOW" #x06D1)
- ("ARABIC LETTER YEH BARREE" #x06D2)
- ("ARABIC LETTER YEH BARREE WITH HAMZA ABOVE" #x06D3)
- ("ARABIC FULL STOP" #x06D4)
- ("ARABIC LETTER AE" #x06D5)
- ("ARABIC SMALL HIGH LIGATURE SAD WITH LAM WITH ALEF MAKSURA" #x06D6)
- ("ARABIC SMALL HIGH LIGATURE QAF WITH LAM WITH ALEF MAKSURA" #x06D7)
- ("ARABIC SMALL HIGH MEEM INITIAL FORM" #x06D8)
- ("ARABIC SMALL HIGH LAM ALEF" #x06D9)
- ("ARABIC SMALL HIGH JEEM" #x06DA)
- ("ARABIC SMALL HIGH THREE DOTS" #x06DB)
- ("ARABIC SMALL HIGH SEEN" #x06DC)
- ("ARABIC END OF AYAH" #x06DD)
- ("ARABIC START OF RUB EL HIZB" #x06DE)
- ("ARABIC SMALL HIGH ROUNDED ZERO" #x06DF)
- ("ARABIC SMALL HIGH UPRIGHT RECTANGULAR ZERO" #x06E0)
- ("ARABIC SMALL HIGH DOTLESS HEAD OF KHAH" #x06E1)
- ("ARABIC SMALL HIGH MEEM ISOLATED FORM" #x06E2)
- ("ARABIC SMALL LOW SEEN" #x06E3)
- ("ARABIC SMALL HIGH MADDA" #x06E4)
- ("ARABIC SMALL WAW" #x06E5)
- ("ARABIC SMALL YEH" #x06E6)
- ("ARABIC SMALL HIGH YEH" #x06E7)
- ("ARABIC SMALL HIGH NOON" #x06E8)
- ("ARABIC PLACE OF SAJDAH" #x06E9)
- ("ARABIC EMPTY CENTRE LOW STOP" #x06EA)
- ("ARABIC EMPTY CENTRE HIGH STOP" #x06EB)
- ("ARABIC ROUNDED HIGH STOP WITH FILLED CENTRE" #x06EC)
- ("ARABIC SMALL LOW MEEM" #x06ED)
- ("EXTENDED ARABIC-INDIC DIGIT ZERO" #x06F0)
- ("EXTENDED ARABIC-INDIC DIGIT ONE" #x06F1)
- ("EXTENDED ARABIC-INDIC DIGIT TWO" #x06F2)
- ("EXTENDED ARABIC-INDIC DIGIT THREE" #x06F3)
- ("EXTENDED ARABIC-INDIC DIGIT FOUR" #x06F4)
- ("EXTENDED ARABIC-INDIC DIGIT FIVE" #x06F5)
- ("EXTENDED ARABIC-INDIC DIGIT SIX" #x06F6)
- ("EXTENDED ARABIC-INDIC DIGIT SEVEN" #x06F7)
- ("EXTENDED ARABIC-INDIC DIGIT EIGHT" #x06F8)
- ("EXTENDED ARABIC-INDIC DIGIT NINE" #x06F9)
- ("ARABIC LETTER SHEEN WITH DOT BELOW" #x06FA)
- ("ARABIC LETTER DAD WITH DOT BELOW" #x06FB)
- ("ARABIC LETTER GHAIN WITH DOT BELOW" #x06FC)
- ("ARABIC SIGN SINDHI AMPERSAND" #x06FD)
- ("ARABIC SIGN SINDHI POSTPOSITION MEN" #x06FE)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'syriac
- '(("SYRIAC END OF PARAGRAPH" #x0700)
- ("SYRIAC SUPRALINEAR FULL STOP" #x0701)
- ("SYRIAC SUBLINEAR FULL STOP" #x0702)
- ("SYRIAC SUPRALINEAR COLON" #x0703)
- ("SYRIAC SUBLINEAR COLON" #x0704)
- ("SYRIAC HORIZONTAL COLON" #x0705)
- ("SYRIAC COLON SKEWED LEFT" #x0706)
- ("SYRIAC COLON SKEWED RIGHT" #x0707)
- ("SYRIAC SUPRALINEAR COLON SKEWED LEFT" #x0708)
- ("SYRIAC SUBLINEAR COLON SKEWED RIGHT" #x0709)
- ("SYRIAC CONTRACTION" #x070A)
- ("SYRIAC HARKLEAN OBELUS" #x070B)
- ("SYRIAC HARKLEAN METOBELUS" #x070C)
- ("SYRIAC HARKLEAN ASTERISCUS" #x070D)
- ("SYRIAC ABBREVIATION MARK" #x070F)
- ("SYRIAC LETTER ALAPH" #x0710)
- ("SYRIAC LETTER SUPERSCRIPT ALAPH" #x0711)
- ("SYRIAC LETTER BETH" #x0712)
- ("SYRIAC LETTER GAMAL" #x0713)
- ("SYRIAC LETTER GAMAL GARSHUNI" #x0714)
- ("SYRIAC LETTER DALATH" #x0715)
- ("SYRIAC LETTER DOTLESS DALATH RISH" #x0716)
- ("SYRIAC LETTER HE" #x0717)
- ("SYRIAC LETTER WAW" #x0718)
- ("SYRIAC LETTER ZAIN" #x0719)
- ("SYRIAC LETTER HETH" #x071A)
- ("SYRIAC LETTER TETH" #x071B)
- ("SYRIAC LETTER TETH GARSHUNI" #x071C)
- ("SYRIAC LETTER YUDH" #x071D)
- ("SYRIAC LETTER YUDH HE" #x071E)
- ("SYRIAC LETTER KAPH" #x071F)
- ("SYRIAC LETTER LAMADH" #x0720)
- ("SYRIAC LETTER MIM" #x0721)
- ("SYRIAC LETTER NUN" #x0722)
- ("SYRIAC LETTER SEMKATH" #x0723)
- ("SYRIAC LETTER FINAL SEMKATH" #x0724)
- ("SYRIAC LETTER E" #x0725)
- ("SYRIAC LETTER PE" #x0726)
- ("SYRIAC LETTER REVERSED PE" #x0727)
- ("SYRIAC LETTER SADHE" #x0728)
- ("SYRIAC LETTER QAPH" #x0729)
- ("SYRIAC LETTER RISH" #x072A)
- ("SYRIAC LETTER SHIN" #x072B)
- ("SYRIAC LETTER TAW" #x072C)
- ("SYRIAC PTHAHA ABOVE" #x0730)
- ("SYRIAC PTHAHA BELOW" #x0731)
- ("SYRIAC PTHAHA DOTTED" #x0732)
- ("SYRIAC ZQAPHA ABOVE" #x0733)
- ("SYRIAC ZQAPHA BELOW" #x0734)
- ("SYRIAC ZQAPHA DOTTED" #x0735)
- ("SYRIAC RBASA ABOVE" #x0736)
- ("SYRIAC RBASA BELOW" #x0737)
- ("SYRIAC DOTTED ZLAMA HORIZONTAL" #x0738)
- ("SYRIAC DOTTED ZLAMA ANGULAR" #x0739)
- ("SYRIAC HBASA ABOVE" #x073A)
- ("SYRIAC HBASA BELOW" #x073B)
- ("SYRIAC HBASA-ESASA DOTTED" #x073C)
- ("SYRIAC ESASA ABOVE" #x073D)
- ("SYRIAC ESASA BELOW" #x073E)
- ("SYRIAC RWAHA" #x073F)
- ("SYRIAC FEMININE DOT" #x0740)
- ("SYRIAC QUSHSHAYA" #x0741)
- ("SYRIAC RUKKAKHA" #x0742)
- ("SYRIAC TWO VERTICAL DOTS ABOVE" #x0743)
- ("SYRIAC TWO VERTICAL DOTS BELOW" #x0744)
- ("SYRIAC THREE DOTS ABOVE" #x0745)
- ("SYRIAC THREE DOTS BELOW" #x0746)
- ("SYRIAC OBLIQUE LINE ABOVE" #x0747)
- ("SYRIAC OBLIQUE LINE BELOW" #x0748)
- ("SYRIAC MUSIC" #x0749)
- ("SYRIAC BARREKH" #x074A)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'thaana
- '(("THAANA LETTER HAA" #x0780)
- ("THAANA LETTER SHAVIYANI" #x0781)
- ("THAANA LETTER NOONU" #x0782)
- ("THAANA LETTER RAA" #x0783)
- ("THAANA LETTER BAA" #x0784)
- ("THAANA LETTER LHAVIYANI" #x0785)
- ("THAANA LETTER KAAFU" #x0786)
- ("THAANA LETTER ALIFU" #x0787)
- ("THAANA LETTER VAAVU" #x0788)
- ("THAANA LETTER MEEMU" #x0789)
- ("THAANA LETTER FAAFU" #x078A)
- ("THAANA LETTER DHAALU" #x078B)
- ("THAANA LETTER THAA" #x078C)
- ("THAANA LETTER LAAMU" #x078D)
- ("THAANA LETTER GAAFU" #x078E)
- ("THAANA LETTER GNAVIYANI" #x078F)
- ("THAANA LETTER SEENU" #x0790)
- ("THAANA LETTER DAVIYANI" #x0791)
- ("THAANA LETTER ZAVIYANI" #x0792)
- ("THAANA LETTER TAVIYANI" #x0793)
- ("THAANA LETTER YAA" #x0794)
- ("THAANA LETTER PAVIYANI" #x0795)
- ("THAANA LETTER JAVIYANI" #x0796)
- ("THAANA LETTER CHAVIYANI" #x0797)
- ("THAANA LETTER TTAA" #x0798)
- ("THAANA LETTER HHAA" #x0799)
- ("THAANA LETTER KHAA" #x079A)
- ("THAANA LETTER THAALU" #x079B)
- ("THAANA LETTER ZAA" #x079C)
- ("THAANA LETTER SHEENU" #x079D)
- ("THAANA LETTER SAADHU" #x079E)
- ("THAANA LETTER DAADHU" #x079F)
- ("THAANA LETTER TO" #x07A0)
- ("THAANA LETTER ZO" #x07A1)
- ("THAANA LETTER AINU" #x07A2)
- ("THAANA LETTER GHAINU" #x07A3)
- ("THAANA LETTER QAAFU" #x07A4)
- ("THAANA LETTER WAAVU" #x07A5)
- ("THAANA ABAFILI" #x07A6)
- ("THAANA AABAAFILI" #x07A7)
- ("THAANA IBIFILI" #x07A8)
- ("THAANA EEBEEFILI" #x07A9)
- ("THAANA UBUFILI" #x07AA)
- ("THAANA OOBOOFILI" #x07AB)
- ("THAANA EBEFILI" #x07AC)
- ("THAANA EYBEYFILI" #x07AD)
- ("THAANA OBOFILI" #x07AE)
- ("THAANA OABOAFILI" #x07AF)
- ("THAANA SUKUN" #x07B0)
- ("THAANA LETTER NAA" #x07B1)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'devanagari
- '(("DEVANAGARI SIGN CANDRABINDU" #x0901)
- ("DEVANAGARI SIGN ANUSVARA" #x0902)
- ("DEVANAGARI SIGN VISARGA" #x0903)
- ("DEVANAGARI LETTER A" #x0905)
- ("DEVANAGARI LETTER AA" #x0906)
- ("DEVANAGARI LETTER I" #x0907)
- ("DEVANAGARI LETTER II" #x0908)
- ("DEVANAGARI LETTER U" #x0909)
- ("DEVANAGARI LETTER UU" #x090A)
- ("DEVANAGARI LETTER VOCALIC R" #x090B)
- ("DEVANAGARI LETTER VOCALIC L" #x090C)
- ("DEVANAGARI LETTER CANDRA E" #x090D)
- ("DEVANAGARI LETTER SHORT E" #x090E)
- ("DEVANAGARI LETTER E" #x090F)
- ("DEVANAGARI LETTER AI" #x0910)
- ("DEVANAGARI LETTER CANDRA O" #x0911)
- ("DEVANAGARI LETTER SHORT O" #x0912)
- ("DEVANAGARI LETTER O" #x0913)
- ("DEVANAGARI LETTER AU" #x0914)
- ("DEVANAGARI LETTER KA" #x0915)
- ("DEVANAGARI LETTER KHA" #x0916)
- ("DEVANAGARI LETTER GA" #x0917)
- ("DEVANAGARI LETTER GHA" #x0918)
- ("DEVANAGARI LETTER NGA" #x0919)
- ("DEVANAGARI LETTER CA" #x091A)
- ("DEVANAGARI LETTER CHA" #x091B)
- ("DEVANAGARI LETTER JA" #x091C)
- ("DEVANAGARI LETTER JHA" #x091D)
- ("DEVANAGARI LETTER NYA" #x091E)
- ("DEVANAGARI LETTER TTA" #x091F)
- ("DEVANAGARI LETTER TTHA" #x0920)
- ("DEVANAGARI LETTER DDA" #x0921)
- ("DEVANAGARI LETTER DDHA" #x0922)
- ("DEVANAGARI LETTER NNA" #x0923)
- ("DEVANAGARI LETTER TA" #x0924)
- ("DEVANAGARI LETTER THA" #x0925)
- ("DEVANAGARI LETTER DA" #x0926)
- ("DEVANAGARI LETTER DHA" #x0927)
- ("DEVANAGARI LETTER NA" #x0928)
- ("DEVANAGARI LETTER NNNA" #x0929)
- ("DEVANAGARI LETTER PA" #x092A)
- ("DEVANAGARI LETTER PHA" #x092B)
- ("DEVANAGARI LETTER BA" #x092C)
- ("DEVANAGARI LETTER BHA" #x092D)
- ("DEVANAGARI LETTER MA" #x092E)
- ("DEVANAGARI LETTER YA" #x092F)
- ("DEVANAGARI LETTER RA" #x0930)
- ("DEVANAGARI LETTER RRA" #x0931)
- ("DEVANAGARI LETTER LA" #x0932)
- ("DEVANAGARI LETTER LLA" #x0933)
- ("DEVANAGARI LETTER LLLA" #x0934)
- ("DEVANAGARI LETTER VA" #x0935)
- ("DEVANAGARI LETTER SHA" #x0936)
- ("DEVANAGARI LETTER SSA" #x0937)
- ("DEVANAGARI LETTER SA" #x0938)
- ("DEVANAGARI LETTER HA" #x0939)
- ("DEVANAGARI SIGN NUKTA" #x093C)
- ("DEVANAGARI SIGN AVAGRAHA" #x093D)
- ("DEVANAGARI VOWEL SIGN AA" #x093E)
- ("DEVANAGARI VOWEL SIGN I" #x093F)
- ("DEVANAGARI VOWEL SIGN II" #x0940)
- ("DEVANAGARI VOWEL SIGN U" #x0941)
- ("DEVANAGARI VOWEL SIGN UU" #x0942)
- ("DEVANAGARI VOWEL SIGN VOCALIC R" #x0943)
- ("DEVANAGARI VOWEL SIGN VOCALIC RR" #x0944)
- ("DEVANAGARI VOWEL SIGN CANDRA E" #x0945)
- ("DEVANAGARI VOWEL SIGN SHORT E" #x0946)
- ("DEVANAGARI VOWEL SIGN E" #x0947)
- ("DEVANAGARI VOWEL SIGN AI" #x0948)
- ("DEVANAGARI VOWEL SIGN CANDRA O" #x0949)
- ("DEVANAGARI VOWEL SIGN SHORT O" #x094A)
- ("DEVANAGARI VOWEL SIGN O" #x094B)
- ("DEVANAGARI VOWEL SIGN AU" #x094C)
- ("DEVANAGARI SIGN VIRAMA" #x094D)
- ("DEVANAGARI OM" #x0950)
- ("DEVANAGARI STRESS SIGN UDATTA" #x0951)
- ("DEVANAGARI STRESS SIGN ANUDATTA" #x0952)
- ("DEVANAGARI GRAVE ACCENT" #x0953)
- ("DEVANAGARI ACUTE ACCENT" #x0954)
- ("DEVANAGARI LETTER QA" #x0958)
- ("DEVANAGARI LETTER KHHA" #x0959)
- ("DEVANAGARI LETTER GHHA" #x095A)
- ("DEVANAGARI LETTER ZA" #x095B)
- ("DEVANAGARI LETTER DDDHA" #x095C)
- ("DEVANAGARI LETTER RHA" #x095D)
- ("DEVANAGARI LETTER FA" #x095E)
- ("DEVANAGARI LETTER YYA" #x095F)
- ("DEVANAGARI LETTER VOCALIC RR" #x0960)
- ("DEVANAGARI LETTER VOCALIC LL" #x0961)
- ("DEVANAGARI VOWEL SIGN VOCALIC L" #x0962)
- ("DEVANAGARI VOWEL SIGN VOCALIC LL" #x0963)
- ("DEVANAGARI DANDA" #x0964)
- ("DEVANAGARI DOUBLE DANDA" #x0965)
- ("DEVANAGARI DIGIT ZERO" #x0966)
- ("DEVANAGARI DIGIT ONE" #x0967)
- ("DEVANAGARI DIGIT TWO" #x0968)
- ("DEVANAGARI DIGIT THREE" #x0969)
- ("DEVANAGARI DIGIT FOUR" #x096A)
- ("DEVANAGARI DIGIT FIVE" #x096B)
- ("DEVANAGARI DIGIT SIX" #x096C)
- ("DEVANAGARI DIGIT SEVEN" #x096D)
- ("DEVANAGARI DIGIT EIGHT" #x096E)
- ("DEVANAGARI DIGIT NINE" #x096F)
- ("DEVANAGARI ABBREVIATION SIGN" #x0970)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'bengali
- '(("BENGALI SIGN CANDRABINDU" #x0981)
- ("BENGALI SIGN ANUSVARA" #x0982)
- ("BENGALI SIGN VISARGA" #x0983)
- ("BENGALI LETTER A" #x0985)
- ("BENGALI LETTER AA" #x0986)
- ("BENGALI LETTER I" #x0987)
- ("BENGALI LETTER II" #x0988)
- ("BENGALI LETTER U" #x0989)
- ("BENGALI LETTER UU" #x098A)
- ("BENGALI LETTER VOCALIC R" #x098B)
- ("BENGALI LETTER VOCALIC L" #x098C)
- ("BENGALI LETTER E" #x098F)
- ("BENGALI LETTER AI" #x0990)
- ("BENGALI LETTER O" #x0993)
- ("BENGALI LETTER AU" #x0994)
- ("BENGALI LETTER KA" #x0995)
- ("BENGALI LETTER KHA" #x0996)
- ("BENGALI LETTER GA" #x0997)
- ("BENGALI LETTER GHA" #x0998)
- ("BENGALI LETTER NGA" #x0999)
- ("BENGALI LETTER CA" #x099A)
- ("BENGALI LETTER CHA" #x099B)
- ("BENGALI LETTER JA" #x099C)
- ("BENGALI LETTER JHA" #x099D)
- ("BENGALI LETTER NYA" #x099E)
- ("BENGALI LETTER TTA" #x099F)
- ("BENGALI LETTER TTHA" #x09A0)
- ("BENGALI LETTER DDA" #x09A1)
- ("BENGALI LETTER DDHA" #x09A2)
- ("BENGALI LETTER NNA" #x09A3)
- ("BENGALI LETTER TA" #x09A4)
- ("BENGALI LETTER THA" #x09A5)
- ("BENGALI LETTER DA" #x09A6)
- ("BENGALI LETTER DHA" #x09A7)
- ("BENGALI LETTER NA" #x09A8)
- ("BENGALI LETTER PA" #x09AA)
- ("BENGALI LETTER PHA" #x09AB)
- ("BENGALI LETTER BA" #x09AC)
- ("BENGALI LETTER BHA" #x09AD)
- ("BENGALI LETTER MA" #x09AE)
- ("BENGALI LETTER YA" #x09AF)
- ("BENGALI LETTER RA" #x09B0)
- ("BENGALI LETTER LA" #x09B2)
- ("BENGALI LETTER SHA" #x09B6)
- ("BENGALI LETTER SSA" #x09B7)
- ("BENGALI LETTER SA" #x09B8)
- ("BENGALI LETTER HA" #x09B9)
- ("BENGALI SIGN NUKTA" #x09BC)
- ("BENGALI VOWEL SIGN AA" #x09BE)
- ("BENGALI VOWEL SIGN I" #x09BF)
- ("BENGALI VOWEL SIGN II" #x09C0)
- ("BENGALI VOWEL SIGN U" #x09C1)
- ("BENGALI VOWEL SIGN UU" #x09C2)
- ("BENGALI VOWEL SIGN VOCALIC R" #x09C3)
- ("BENGALI VOWEL SIGN VOCALIC RR" #x09C4)
- ("BENGALI VOWEL SIGN E" #x09C7)
- ("BENGALI VOWEL SIGN AI" #x09C8)
- ("BENGALI VOWEL SIGN O" #x09CB)
- ("BENGALI VOWEL SIGN AU" #x09CC)
- ("BENGALI SIGN VIRAMA" #x09CD)
- ("BENGALI AU LENGTH MARK" #x09D7)
- ("BENGALI LETTER RRA" #x09DC)
- ("BENGALI LETTER RHA" #x09DD)
- ("BENGALI LETTER YYA" #x09DF)
- ("BENGALI LETTER VOCALIC RR" #x09E0)
- ("BENGALI LETTER VOCALIC LL" #x09E1)
- ("BENGALI VOWEL SIGN VOCALIC L" #x09E2)
- ("BENGALI VOWEL SIGN VOCALIC LL" #x09E3)
- ("BENGALI DIGIT ZERO" #x09E6)
- ("BENGALI DIGIT ONE" #x09E7)
- ("BENGALI DIGIT TWO" #x09E8)
- ("BENGALI DIGIT THREE" #x09E9)
- ("BENGALI DIGIT FOUR" #x09EA)
- ("BENGALI DIGIT FIVE" #x09EB)
- ("BENGALI DIGIT SIX" #x09EC)
- ("BENGALI DIGIT SEVEN" #x09ED)
- ("BENGALI DIGIT EIGHT" #x09EE)
- ("BENGALI DIGIT NINE" #x09EF)
- ("BENGALI LETTER RA WITH MIDDLE DIAGONAL" #x09F0)
- ("BENGALI LETTER RA WITH LOWER DIAGONAL" #x09F1)
- ("BENGALI RUPEE MARK" #x09F2)
- ("BENGALI RUPEE SIGN" #x09F3)
- ("BENGALI CURRENCY NUMERATOR ONE" #x09F4)
- ("BENGALI CURRENCY NUMERATOR TWO" #x09F5)
- ("BENGALI CURRENCY NUMERATOR THREE" #x09F6)
- ("BENGALI CURRENCY NUMERATOR FOUR" #x09F7)
- ("BENGALI CURRENCY NUMERATOR ONE LESS THAN THE DENOMINATOR" #x09F8)
- ("BENGALI CURRENCY DENOMINATOR SIXTEEN" #x09F9)
- ("BENGALI ISSHAR" #x09FA)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'gurmukhi
- '(("GURMUKHI SIGN BINDI" #x0A02)
- ("GURMUKHI LETTER A" #x0A05)
- ("GURMUKHI LETTER AA" #x0A06)
- ("GURMUKHI LETTER I" #x0A07)
- ("GURMUKHI LETTER II" #x0A08)
- ("GURMUKHI LETTER U" #x0A09)
- ("GURMUKHI LETTER UU" #x0A0A)
- ("GURMUKHI LETTER EE" #x0A0F)
- ("GURMUKHI LETTER AI" #x0A10)
- ("GURMUKHI LETTER OO" #x0A13)
- ("GURMUKHI LETTER AU" #x0A14)
- ("GURMUKHI LETTER KA" #x0A15)
- ("GURMUKHI LETTER KHA" #x0A16)
- ("GURMUKHI LETTER GA" #x0A17)
- ("GURMUKHI LETTER GHA" #x0A18)
- ("GURMUKHI LETTER NGA" #x0A19)
- ("GURMUKHI LETTER CA" #x0A1A)
- ("GURMUKHI LETTER CHA" #x0A1B)
- ("GURMUKHI LETTER JA" #x0A1C)
- ("GURMUKHI LETTER JHA" #x0A1D)
- ("GURMUKHI LETTER NYA" #x0A1E)
- ("GURMUKHI LETTER TTA" #x0A1F)
- ("GURMUKHI LETTER TTHA" #x0A20)
- ("GURMUKHI LETTER DDA" #x0A21)
- ("GURMUKHI LETTER DDHA" #x0A22)
- ("GURMUKHI LETTER NNA" #x0A23)
- ("GURMUKHI LETTER TA" #x0A24)
- ("GURMUKHI LETTER THA" #x0A25)
- ("GURMUKHI LETTER DA" #x0A26)
- ("GURMUKHI LETTER DHA" #x0A27)
- ("GURMUKHI LETTER NA" #x0A28)
- ("GURMUKHI LETTER PA" #x0A2A)
- ("GURMUKHI LETTER PHA" #x0A2B)
- ("GURMUKHI LETTER BA" #x0A2C)
- ("GURMUKHI LETTER BHA" #x0A2D)
- ("GURMUKHI LETTER MA" #x0A2E)
- ("GURMUKHI LETTER YA" #x0A2F)
- ("GURMUKHI LETTER RA" #x0A30)
- ("GURMUKHI LETTER LA" #x0A32)
- ("GURMUKHI LETTER LLA" #x0A33)
- ("GURMUKHI LETTER VA" #x0A35)
- ("GURMUKHI LETTER SHA" #x0A36)
- ("GURMUKHI LETTER SA" #x0A38)
- ("GURMUKHI LETTER HA" #x0A39)
- ("GURMUKHI SIGN NUKTA" #x0A3C)
- ("GURMUKHI VOWEL SIGN AA" #x0A3E)
- ("GURMUKHI VOWEL SIGN I" #x0A3F)
- ("GURMUKHI VOWEL SIGN II" #x0A40)
- ("GURMUKHI VOWEL SIGN U" #x0A41)
- ("GURMUKHI VOWEL SIGN UU" #x0A42)
- ("GURMUKHI VOWEL SIGN EE" #x0A47)
- ("GURMUKHI VOWEL SIGN AI" #x0A48)
- ("GURMUKHI VOWEL SIGN OO" #x0A4B)
- ("GURMUKHI VOWEL SIGN AU" #x0A4C)
- ("GURMUKHI SIGN VIRAMA" #x0A4D)
- ("GURMUKHI LETTER KHHA" #x0A59)
- ("GURMUKHI LETTER GHHA" #x0A5A)
- ("GURMUKHI LETTER ZA" #x0A5B)
- ("GURMUKHI LETTER RRA" #x0A5C)
- ("GURMUKHI LETTER FA" #x0A5E)
- ("GURMUKHI DIGIT ZERO" #x0A66)
- ("GURMUKHI DIGIT ONE" #x0A67)
- ("GURMUKHI DIGIT TWO" #x0A68)
- ("GURMUKHI DIGIT THREE" #x0A69)
- ("GURMUKHI DIGIT FOUR" #x0A6A)
- ("GURMUKHI DIGIT FIVE" #x0A6B)
- ("GURMUKHI DIGIT SIX" #x0A6C)
- ("GURMUKHI DIGIT SEVEN" #x0A6D)
- ("GURMUKHI DIGIT EIGHT" #x0A6E)
- ("GURMUKHI DIGIT NINE" #x0A6F)
- ("GURMUKHI TIPPI" #x0A70)
- ("GURMUKHI ADDAK" #x0A71)
- ("GURMUKHI IRI" #x0A72)
- ("GURMUKHI URA" #x0A73)
- ("GURMUKHI EK ONKAR" #x0A74)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'gujarati
- '(("GUJARATI SIGN CANDRABINDU" #x0A81)
- ("GUJARATI SIGN ANUSVARA" #x0A82)
- ("GUJARATI SIGN VISARGA" #x0A83)
- ("GUJARATI LETTER A" #x0A85)
- ("GUJARATI LETTER AA" #x0A86)
- ("GUJARATI LETTER I" #x0A87)
- ("GUJARATI LETTER II" #x0A88)
- ("GUJARATI LETTER U" #x0A89)
- ("GUJARATI LETTER UU" #x0A8A)
- ("GUJARATI LETTER VOCALIC R" #x0A8B)
- ("GUJARATI VOWEL CANDRA E" #x0A8D)
- ("GUJARATI LETTER E" #x0A8F)
- ("GUJARATI LETTER AI" #x0A90)
- ("GUJARATI VOWEL CANDRA O" #x0A91)
- ("GUJARATI LETTER O" #x0A93)
- ("GUJARATI LETTER AU" #x0A94)
- ("GUJARATI LETTER KA" #x0A95)
- ("GUJARATI LETTER KHA" #x0A96)
- ("GUJARATI LETTER GA" #x0A97)
- ("GUJARATI LETTER GHA" #x0A98)
- ("GUJARATI LETTER NGA" #x0A99)
- ("GUJARATI LETTER CA" #x0A9A)
- ("GUJARATI LETTER CHA" #x0A9B)
- ("GUJARATI LETTER JA" #x0A9C)
- ("GUJARATI LETTER JHA" #x0A9D)
- ("GUJARATI LETTER NYA" #x0A9E)
- ("GUJARATI LETTER TTA" #x0A9F)
- ("GUJARATI LETTER TTHA" #x0AA0)
- ("GUJARATI LETTER DDA" #x0AA1)
- ("GUJARATI LETTER DDHA" #x0AA2)
- ("GUJARATI LETTER NNA" #x0AA3)
- ("GUJARATI LETTER TA" #x0AA4)
- ("GUJARATI LETTER THA" #x0AA5)
- ("GUJARATI LETTER DA" #x0AA6)
- ("GUJARATI LETTER DHA" #x0AA7)
- ("GUJARATI LETTER NA" #x0AA8)
- ("GUJARATI LETTER PA" #x0AAA)
- ("GUJARATI LETTER PHA" #x0AAB)
- ("GUJARATI LETTER BA" #x0AAC)
- ("GUJARATI LETTER BHA" #x0AAD)
- ("GUJARATI LETTER MA" #x0AAE)
- ("GUJARATI LETTER YA" #x0AAF)
- ("GUJARATI LETTER RA" #x0AB0)
- ("GUJARATI LETTER LA" #x0AB2)
- ("GUJARATI LETTER LLA" #x0AB3)
- ("GUJARATI LETTER VA" #x0AB5)
- ("GUJARATI LETTER SHA" #x0AB6)
- ("GUJARATI LETTER SSA" #x0AB7)
- ("GUJARATI LETTER SA" #x0AB8)
- ("GUJARATI LETTER HA" #x0AB9)
- ("GUJARATI SIGN NUKTA" #x0ABC)
- ("GUJARATI SIGN AVAGRAHA" #x0ABD)
- ("GUJARATI VOWEL SIGN AA" #x0ABE)
- ("GUJARATI VOWEL SIGN I" #x0ABF)
- ("GUJARATI VOWEL SIGN II" #x0AC0)
- ("GUJARATI VOWEL SIGN U" #x0AC1)
- ("GUJARATI VOWEL SIGN UU" #x0AC2)
- ("GUJARATI VOWEL SIGN VOCALIC R" #x0AC3)
- ("GUJARATI VOWEL SIGN VOCALIC RR" #x0AC4)
- ("GUJARATI VOWEL SIGN CANDRA E" #x0AC5)
- ("GUJARATI VOWEL SIGN E" #x0AC7)
- ("GUJARATI VOWEL SIGN AI" #x0AC8)
- ("GUJARATI VOWEL SIGN CANDRA O" #x0AC9)
- ("GUJARATI VOWEL SIGN O" #x0ACB)
- ("GUJARATI VOWEL SIGN AU" #x0ACC)
- ("GUJARATI SIGN VIRAMA" #x0ACD)
- ("GUJARATI OM" #x0AD0)
- ("GUJARATI LETTER VOCALIC RR" #x0AE0)
- ("GUJARATI DIGIT ZERO" #x0AE6)
- ("GUJARATI DIGIT ONE" #x0AE7)
- ("GUJARATI DIGIT TWO" #x0AE8)
- ("GUJARATI DIGIT THREE" #x0AE9)
- ("GUJARATI DIGIT FOUR" #x0AEA)
- ("GUJARATI DIGIT FIVE" #x0AEB)
- ("GUJARATI DIGIT SIX" #x0AEC)
- ("GUJARATI DIGIT SEVEN" #x0AED)
- ("GUJARATI DIGIT EIGHT" #x0AEE)
- ("GUJARATI DIGIT NINE" #x0AEF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'oriya
- '(("ORIYA SIGN CANDRABINDU" #x0B01)
- ("ORIYA SIGN ANUSVARA" #x0B02)
- ("ORIYA SIGN VISARGA" #x0B03)
- ("ORIYA LETTER A" #x0B05)
- ("ORIYA LETTER AA" #x0B06)
- ("ORIYA LETTER I" #x0B07)
- ("ORIYA LETTER II" #x0B08)
- ("ORIYA LETTER U" #x0B09)
- ("ORIYA LETTER UU" #x0B0A)
- ("ORIYA LETTER VOCALIC R" #x0B0B)
- ("ORIYA LETTER VOCALIC L" #x0B0C)
- ("ORIYA LETTER E" #x0B0F)
- ("ORIYA LETTER AI" #x0B10)
- ("ORIYA LETTER O" #x0B13)
- ("ORIYA LETTER AU" #x0B14)
- ("ORIYA LETTER KA" #x0B15)
- ("ORIYA LETTER KHA" #x0B16)
- ("ORIYA LETTER GA" #x0B17)
- ("ORIYA LETTER GHA" #x0B18)
- ("ORIYA LETTER NGA" #x0B19)
- ("ORIYA LETTER CA" #x0B1A)
- ("ORIYA LETTER CHA" #x0B1B)
- ("ORIYA LETTER JA" #x0B1C)
- ("ORIYA LETTER JHA" #x0B1D)
- ("ORIYA LETTER NYA" #x0B1E)
- ("ORIYA LETTER TTA" #x0B1F)
- ("ORIYA LETTER TTHA" #x0B20)
- ("ORIYA LETTER DDA" #x0B21)
- ("ORIYA LETTER DDHA" #x0B22)
- ("ORIYA LETTER NNA" #x0B23)
- ("ORIYA LETTER TA" #x0B24)
- ("ORIYA LETTER THA" #x0B25)
- ("ORIYA LETTER DA" #x0B26)
- ("ORIYA LETTER DHA" #x0B27)
- ("ORIYA LETTER NA" #x0B28)
- ("ORIYA LETTER PA" #x0B2A)
- ("ORIYA LETTER PHA" #x0B2B)
- ("ORIYA LETTER BA" #x0B2C)
- ("ORIYA LETTER BHA" #x0B2D)
- ("ORIYA LETTER MA" #x0B2E)
- ("ORIYA LETTER YA" #x0B2F)
- ("ORIYA LETTER RA" #x0B30)
- ("ORIYA LETTER LA" #x0B32)
- ("ORIYA LETTER LLA" #x0B33)
- ("ORIYA LETTER SHA" #x0B36)
- ("ORIYA LETTER SSA" #x0B37)
- ("ORIYA LETTER SA" #x0B38)
- ("ORIYA LETTER HA" #x0B39)
- ("ORIYA SIGN NUKTA" #x0B3C)
- ("ORIYA SIGN AVAGRAHA" #x0B3D)
- ("ORIYA VOWEL SIGN AA" #x0B3E)
- ("ORIYA VOWEL SIGN I" #x0B3F)
- ("ORIYA VOWEL SIGN II" #x0B40)
- ("ORIYA VOWEL SIGN U" #x0B41)
- ("ORIYA VOWEL SIGN UU" #x0B42)
- ("ORIYA VOWEL SIGN VOCALIC R" #x0B43)
- ("ORIYA VOWEL SIGN E" #x0B47)
- ("ORIYA VOWEL SIGN AI" #x0B48)
- ("ORIYA VOWEL SIGN O" #x0B4B)
- ("ORIYA VOWEL SIGN AU" #x0B4C)
- ("ORIYA SIGN VIRAMA" #x0B4D)
- ("ORIYA AI LENGTH MARK" #x0B56)
- ("ORIYA AU LENGTH MARK" #x0B57)
- ("ORIYA LETTER RRA" #x0B5C)
- ("ORIYA LETTER RHA" #x0B5D)
- ("ORIYA LETTER YYA" #x0B5F)
- ("ORIYA LETTER VOCALIC RR" #x0B60)
- ("ORIYA LETTER VOCALIC LL" #x0B61)
- ("ORIYA DIGIT ZERO" #x0B66)
- ("ORIYA DIGIT ONE" #x0B67)
- ("ORIYA DIGIT TWO" #x0B68)
- ("ORIYA DIGIT THREE" #x0B69)
- ("ORIYA DIGIT FOUR" #x0B6A)
- ("ORIYA DIGIT FIVE" #x0B6B)
- ("ORIYA DIGIT SIX" #x0B6C)
- ("ORIYA DIGIT SEVEN" #x0B6D)
- ("ORIYA DIGIT EIGHT" #x0B6E)
- ("ORIYA DIGIT NINE" #x0B6F)
- ("ORIYA ISSHAR" #x0B70)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'tamil
- '(("TAMIL SIGN ANUSVARA" #x0B82)
- ("TAMIL SIGN VISARGA" #x0B83)
- ("TAMIL LETTER A" #x0B85)
- ("TAMIL LETTER AA" #x0B86)
- ("TAMIL LETTER I" #x0B87)
- ("TAMIL LETTER II" #x0B88)
- ("TAMIL LETTER U" #x0B89)
- ("TAMIL LETTER UU" #x0B8A)
- ("TAMIL LETTER E" #x0B8E)
- ("TAMIL LETTER EE" #x0B8F)
- ("TAMIL LETTER AI" #x0B90)
- ("TAMIL LETTER O" #x0B92)
- ("TAMIL LETTER OO" #x0B93)
- ("TAMIL LETTER AU" #x0B94)
- ("TAMIL LETTER KA" #x0B95)
- ("TAMIL LETTER NGA" #x0B99)
- ("TAMIL LETTER CA" #x0B9A)
- ("TAMIL LETTER JA" #x0B9C)
- ("TAMIL LETTER NYA" #x0B9E)
- ("TAMIL LETTER TTA" #x0B9F)
- ("TAMIL LETTER NNA" #x0BA3)
- ("TAMIL LETTER TA" #x0BA4)
- ("TAMIL LETTER NA" #x0BA8)
- ("TAMIL LETTER NNNA" #x0BA9)
- ("TAMIL LETTER PA" #x0BAA)
- ("TAMIL LETTER MA" #x0BAE)
- ("TAMIL LETTER YA" #x0BAF)
- ("TAMIL LETTER RA" #x0BB0)
- ("TAMIL LETTER RRA" #x0BB1)
- ("TAMIL LETTER LA" #x0BB2)
- ("TAMIL LETTER LLA" #x0BB3)
- ("TAMIL LETTER LLLA" #x0BB4)
- ("TAMIL LETTER VA" #x0BB5)
- ("TAMIL LETTER SSA" #x0BB7)
- ("TAMIL LETTER SA" #x0BB8)
- ("TAMIL LETTER HA" #x0BB9)
- ("TAMIL VOWEL SIGN AA" #x0BBE)
- ("TAMIL VOWEL SIGN I" #x0BBF)
- ("TAMIL VOWEL SIGN II" #x0BC0)
- ("TAMIL VOWEL SIGN U" #x0BC1)
- ("TAMIL VOWEL SIGN UU" #x0BC2)
- ("TAMIL VOWEL SIGN E" #x0BC6)
- ("TAMIL VOWEL SIGN EE" #x0BC7)
- ("TAMIL VOWEL SIGN AI" #x0BC8)
- ("TAMIL VOWEL SIGN O" #x0BCA)
- ("TAMIL VOWEL SIGN OO" #x0BCB)
- ("TAMIL VOWEL SIGN AU" #x0BCC)
- ("TAMIL SIGN VIRAMA" #x0BCD)
- ("TAMIL AU LENGTH MARK" #x0BD7)
- ("TAMIL DIGIT ONE" #x0BE7)
- ("TAMIL DIGIT TWO" #x0BE8)
- ("TAMIL DIGIT THREE" #x0BE9)
- ("TAMIL DIGIT FOUR" #x0BEA)
- ("TAMIL DIGIT FIVE" #x0BEB)
- ("TAMIL DIGIT SIX" #x0BEC)
- ("TAMIL DIGIT SEVEN" #x0BED)
- ("TAMIL DIGIT EIGHT" #x0BEE)
- ("TAMIL DIGIT NINE" #x0BEF)
- ("TAMIL NUMBER TEN" #x0BF0)
- ("TAMIL NUMBER ONE HUNDRED" #x0BF1)
- ("TAMIL NUMBER ONE THOUSAND" #x0BF2)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'telugu
- '(("TELUGU SIGN CANDRABINDU" #x0C01)
- ("TELUGU SIGN ANUSVARA" #x0C02)
- ("TELUGU SIGN VISARGA" #x0C03)
- ("TELUGU LETTER A" #x0C05)
- ("TELUGU LETTER AA" #x0C06)
- ("TELUGU LETTER I" #x0C07)
- ("TELUGU LETTER II" #x0C08)
- ("TELUGU LETTER U" #x0C09)
- ("TELUGU LETTER UU" #x0C0A)
- ("TELUGU LETTER VOCALIC R" #x0C0B)
- ("TELUGU LETTER VOCALIC L" #x0C0C)
- ("TELUGU LETTER E" #x0C0E)
- ("TELUGU LETTER EE" #x0C0F)
- ("TELUGU LETTER AI" #x0C10)
- ("TELUGU LETTER O" #x0C12)
- ("TELUGU LETTER OO" #x0C13)
- ("TELUGU LETTER AU" #x0C14)
- ("TELUGU LETTER KA" #x0C15)
- ("TELUGU LETTER KHA" #x0C16)
- ("TELUGU LETTER GA" #x0C17)
- ("TELUGU LETTER GHA" #x0C18)
- ("TELUGU LETTER NGA" #x0C19)
- ("TELUGU LETTER CA" #x0C1A)
- ("TELUGU LETTER CHA" #x0C1B)
- ("TELUGU LETTER JA" #x0C1C)
- ("TELUGU LETTER JHA" #x0C1D)
- ("TELUGU LETTER NYA" #x0C1E)
- ("TELUGU LETTER TTA" #x0C1F)
- ("TELUGU LETTER TTHA" #x0C20)
- ("TELUGU LETTER DDA" #x0C21)
- ("TELUGU LETTER DDHA" #x0C22)
- ("TELUGU LETTER NNA" #x0C23)
- ("TELUGU LETTER TA" #x0C24)
- ("TELUGU LETTER THA" #x0C25)
- ("TELUGU LETTER DA" #x0C26)
- ("TELUGU LETTER DHA" #x0C27)
- ("TELUGU LETTER NA" #x0C28)
- ("TELUGU LETTER PA" #x0C2A)
- ("TELUGU LETTER PHA" #x0C2B)
- ("TELUGU LETTER BA" #x0C2C)
- ("TELUGU LETTER BHA" #x0C2D)
- ("TELUGU LETTER MA" #x0C2E)
- ("TELUGU LETTER YA" #x0C2F)
- ("TELUGU LETTER RA" #x0C30)
- ("TELUGU LETTER RRA" #x0C31)
- ("TELUGU LETTER LA" #x0C32)
- ("TELUGU LETTER LLA" #x0C33)
- ("TELUGU LETTER VA" #x0C35)
- ("TELUGU LETTER SHA" #x0C36)
- ("TELUGU LETTER SSA" #x0C37)
- ("TELUGU LETTER SA" #x0C38)
- ("TELUGU LETTER HA" #x0C39)
- ("TELUGU VOWEL SIGN AA" #x0C3E)
- ("TELUGU VOWEL SIGN I" #x0C3F)
- ("TELUGU VOWEL SIGN II" #x0C40)
- ("TELUGU VOWEL SIGN U" #x0C41)
- ("TELUGU VOWEL SIGN UU" #x0C42)
- ("TELUGU VOWEL SIGN VOCALIC R" #x0C43)
- ("TELUGU VOWEL SIGN VOCALIC RR" #x0C44)
- ("TELUGU VOWEL SIGN E" #x0C46)
- ("TELUGU VOWEL SIGN EE" #x0C47)
- ("TELUGU VOWEL SIGN AI" #x0C48)
- ("TELUGU VOWEL SIGN O" #x0C4A)
- ("TELUGU VOWEL SIGN OO" #x0C4B)
- ("TELUGU VOWEL SIGN AU" #x0C4C)
- ("TELUGU SIGN VIRAMA" #x0C4D)
- ("TELUGU LENGTH MARK" #x0C55)
- ("TELUGU AI LENGTH MARK" #x0C56)
- ("TELUGU LETTER VOCALIC RR" #x0C60)
- ("TELUGU LETTER VOCALIC LL" #x0C61)
- ("TELUGU DIGIT ZERO" #x0C66)
- ("TELUGU DIGIT ONE" #x0C67)
- ("TELUGU DIGIT TWO" #x0C68)
- ("TELUGU DIGIT THREE" #x0C69)
- ("TELUGU DIGIT FOUR" #x0C6A)
- ("TELUGU DIGIT FIVE" #x0C6B)
- ("TELUGU DIGIT SIX" #x0C6C)
- ("TELUGU DIGIT SEVEN" #x0C6D)
- ("TELUGU DIGIT EIGHT" #x0C6E)
- ("TELUGU DIGIT NINE" #x0C6F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'kannada
- '(("KANNADA SIGN ANUSVARA" #x0C82)
- ("KANNADA SIGN VISARGA" #x0C83)
- ("KANNADA LETTER A" #x0C85)
- ("KANNADA LETTER AA" #x0C86)
- ("KANNADA LETTER I" #x0C87)
- ("KANNADA LETTER II" #x0C88)
- ("KANNADA LETTER U" #x0C89)
- ("KANNADA LETTER UU" #x0C8A)
- ("KANNADA LETTER VOCALIC R" #x0C8B)
- ("KANNADA LETTER VOCALIC L" #x0C8C)
- ("KANNADA LETTER E" #x0C8E)
- ("KANNADA LETTER EE" #x0C8F)
- ("KANNADA LETTER AI" #x0C90)
- ("KANNADA LETTER O" #x0C92)
- ("KANNADA LETTER OO" #x0C93)
- ("KANNADA LETTER AU" #x0C94)
- ("KANNADA LETTER KA" #x0C95)
- ("KANNADA LETTER KHA" #x0C96)
- ("KANNADA LETTER GA" #x0C97)
- ("KANNADA LETTER GHA" #x0C98)
- ("KANNADA LETTER NGA" #x0C99)
- ("KANNADA LETTER CA" #x0C9A)
- ("KANNADA LETTER CHA" #x0C9B)
- ("KANNADA LETTER JA" #x0C9C)
- ("KANNADA LETTER JHA" #x0C9D)
- ("KANNADA LETTER NYA" #x0C9E)
- ("KANNADA LETTER TTA" #x0C9F)
- ("KANNADA LETTER TTHA" #x0CA0)
- ("KANNADA LETTER DDA" #x0CA1)
- ("KANNADA LETTER DDHA" #x0CA2)
- ("KANNADA LETTER NNA" #x0CA3)
- ("KANNADA LETTER TA" #x0CA4)
- ("KANNADA LETTER THA" #x0CA5)
- ("KANNADA LETTER DA" #x0CA6)
- ("KANNADA LETTER DHA" #x0CA7)
- ("KANNADA LETTER NA" #x0CA8)
- ("KANNADA LETTER PA" #x0CAA)
- ("KANNADA LETTER PHA" #x0CAB)
- ("KANNADA LETTER BA" #x0CAC)
- ("KANNADA LETTER BHA" #x0CAD)
- ("KANNADA LETTER MA" #x0CAE)
- ("KANNADA LETTER YA" #x0CAF)
- ("KANNADA LETTER RA" #x0CB0)
- ("KANNADA LETTER RRA" #x0CB1)
- ("KANNADA LETTER LA" #x0CB2)
- ("KANNADA LETTER LLA" #x0CB3)
- ("KANNADA LETTER VA" #x0CB5)
- ("KANNADA LETTER SHA" #x0CB6)
- ("KANNADA LETTER SSA" #x0CB7)
- ("KANNADA LETTER SA" #x0CB8)
- ("KANNADA LETTER HA" #x0CB9)
- ("KANNADA VOWEL SIGN AA" #x0CBE)
- ("KANNADA VOWEL SIGN I" #x0CBF)
- ("KANNADA VOWEL SIGN II" #x0CC0)
- ("KANNADA VOWEL SIGN U" #x0CC1)
- ("KANNADA VOWEL SIGN UU" #x0CC2)
- ("KANNADA VOWEL SIGN VOCALIC R" #x0CC3)
- ("KANNADA VOWEL SIGN VOCALIC RR" #x0CC4)
- ("KANNADA VOWEL SIGN E" #x0CC6)
- ("KANNADA VOWEL SIGN EE" #x0CC7)
- ("KANNADA VOWEL SIGN AI" #x0CC8)
- ("KANNADA VOWEL SIGN O" #x0CCA)
- ("KANNADA VOWEL SIGN OO" #x0CCB)
- ("KANNADA VOWEL SIGN AU" #x0CCC)
- ("KANNADA SIGN VIRAMA" #x0CCD)
- ("KANNADA LENGTH MARK" #x0CD5)
- ("KANNADA AI LENGTH MARK" #x0CD6)
- ("KANNADA LETTER FA" #x0CDE)
- ("KANNADA LETTER VOCALIC RR" #x0CE0)
- ("KANNADA LETTER VOCALIC LL" #x0CE1)
- ("KANNADA DIGIT ZERO" #x0CE6)
- ("KANNADA DIGIT ONE" #x0CE7)
- ("KANNADA DIGIT TWO" #x0CE8)
- ("KANNADA DIGIT THREE" #x0CE9)
- ("KANNADA DIGIT FOUR" #x0CEA)
- ("KANNADA DIGIT FIVE" #x0CEB)
- ("KANNADA DIGIT SIX" #x0CEC)
- ("KANNADA DIGIT SEVEN" #x0CED)
- ("KANNADA DIGIT EIGHT" #x0CEE)
- ("KANNADA DIGIT NINE" #x0CEF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'malayalam
- '(("MALAYALAM SIGN ANUSVARA" #x0D02)
- ("MALAYALAM SIGN VISARGA" #x0D03)
- ("MALAYALAM LETTER A" #x0D05)
- ("MALAYALAM LETTER AA" #x0D06)
- ("MALAYALAM LETTER I" #x0D07)
- ("MALAYALAM LETTER II" #x0D08)
- ("MALAYALAM LETTER U" #x0D09)
- ("MALAYALAM LETTER UU" #x0D0A)
- ("MALAYALAM LETTER VOCALIC R" #x0D0B)
- ("MALAYALAM LETTER VOCALIC L" #x0D0C)
- ("MALAYALAM LETTER E" #x0D0E)
- ("MALAYALAM LETTER EE" #x0D0F)
- ("MALAYALAM LETTER AI" #x0D10)
- ("MALAYALAM LETTER O" #x0D12)
- ("MALAYALAM LETTER OO" #x0D13)
- ("MALAYALAM LETTER AU" #x0D14)
- ("MALAYALAM LETTER KA" #x0D15)
- ("MALAYALAM LETTER KHA" #x0D16)
- ("MALAYALAM LETTER GA" #x0D17)
- ("MALAYALAM LETTER GHA" #x0D18)
- ("MALAYALAM LETTER NGA" #x0D19)
- ("MALAYALAM LETTER CA" #x0D1A)
- ("MALAYALAM LETTER CHA" #x0D1B)
- ("MALAYALAM LETTER JA" #x0D1C)
- ("MALAYALAM LETTER JHA" #x0D1D)
- ("MALAYALAM LETTER NYA" #x0D1E)
- ("MALAYALAM LETTER TTA" #x0D1F)
- ("MALAYALAM LETTER TTHA" #x0D20)
- ("MALAYALAM LETTER DDA" #x0D21)
- ("MALAYALAM LETTER DDHA" #x0D22)
- ("MALAYALAM LETTER NNA" #x0D23)
- ("MALAYALAM LETTER TA" #x0D24)
- ("MALAYALAM LETTER THA" #x0D25)
- ("MALAYALAM LETTER DA" #x0D26)
- ("MALAYALAM LETTER DHA" #x0D27)
- ("MALAYALAM LETTER NA" #x0D28)
- ("MALAYALAM LETTER PA" #x0D2A)
- ("MALAYALAM LETTER PHA" #x0D2B)
- ("MALAYALAM LETTER BA" #x0D2C)
- ("MALAYALAM LETTER BHA" #x0D2D)
- ("MALAYALAM LETTER MA" #x0D2E)
- ("MALAYALAM LETTER YA" #x0D2F)
- ("MALAYALAM LETTER RA" #x0D30)
- ("MALAYALAM LETTER RRA" #x0D31)
- ("MALAYALAM LETTER LA" #x0D32)
- ("MALAYALAM LETTER LLA" #x0D33)
- ("MALAYALAM LETTER LLLA" #x0D34)
- ("MALAYALAM LETTER VA" #x0D35)
- ("MALAYALAM LETTER SHA" #x0D36)
- ("MALAYALAM LETTER SSA" #x0D37)
- ("MALAYALAM LETTER SA" #x0D38)
- ("MALAYALAM LETTER HA" #x0D39)
- ("MALAYALAM VOWEL SIGN AA" #x0D3E)
- ("MALAYALAM VOWEL SIGN I" #x0D3F)
- ("MALAYALAM VOWEL SIGN II" #x0D40)
- ("MALAYALAM VOWEL SIGN U" #x0D41)
- ("MALAYALAM VOWEL SIGN UU" #x0D42)
- ("MALAYALAM VOWEL SIGN VOCALIC R" #x0D43)
- ("MALAYALAM VOWEL SIGN E" #x0D46)
- ("MALAYALAM VOWEL SIGN EE" #x0D47)
- ("MALAYALAM VOWEL SIGN AI" #x0D48)
- ("MALAYALAM VOWEL SIGN O" #x0D4A)
- ("MALAYALAM VOWEL SIGN OO" #x0D4B)
- ("MALAYALAM VOWEL SIGN AU" #x0D4C)
- ("MALAYALAM SIGN VIRAMA" #x0D4D)
- ("MALAYALAM AU LENGTH MARK" #x0D57)
- ("MALAYALAM LETTER VOCALIC RR" #x0D60)
- ("MALAYALAM LETTER VOCALIC LL" #x0D61)
- ("MALAYALAM DIGIT ZERO" #x0D66)
- ("MALAYALAM DIGIT ONE" #x0D67)
- ("MALAYALAM DIGIT TWO" #x0D68)
- ("MALAYALAM DIGIT THREE" #x0D69)
- ("MALAYALAM DIGIT FOUR" #x0D6A)
- ("MALAYALAM DIGIT FIVE" #x0D6B)
- ("MALAYALAM DIGIT SIX" #x0D6C)
- ("MALAYALAM DIGIT SEVEN" #x0D6D)
- ("MALAYALAM DIGIT EIGHT" #x0D6E)
- ("MALAYALAM DIGIT NINE" #x0D6F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'sinhala
- '(("SINHALA SIGN ANUSVARAYA" #x0D82)
- ("SINHALA SIGN VISARGAYA" #x0D83)
- ("SINHALA LETTER AYANNA" #x0D85)
- ("SINHALA LETTER AAYANNA" #x0D86)
- ("SINHALA LETTER AEYANNA" #x0D87)
- ("SINHALA LETTER AEEYANNA" #x0D88)
- ("SINHALA LETTER IYANNA" #x0D89)
- ("SINHALA LETTER IIYANNA" #x0D8A)
- ("SINHALA LETTER UYANNA" #x0D8B)
- ("SINHALA LETTER UUYANNA" #x0D8C)
- ("SINHALA LETTER IRUYANNA" #x0D8D)
- ("SINHALA LETTER IRUUYANNA" #x0D8E)
- ("SINHALA LETTER ILUYANNA" #x0D8F)
- ("SINHALA LETTER ILUUYANNA" #x0D90)
- ("SINHALA LETTER EYANNA" #x0D91)
- ("SINHALA LETTER EEYANNA" #x0D92)
- ("SINHALA LETTER AIYANNA" #x0D93)
- ("SINHALA LETTER OYANNA" #x0D94)
- ("SINHALA LETTER OOYANNA" #x0D95)
- ("SINHALA LETTER AUYANNA" #x0D96)
- ("SINHALA LETTER ALPAPRAANA KAYANNA" #x0D9A)
- ("SINHALA LETTER MAHAAPRAANA KAYANNA" #x0D9B)
- ("SINHALA LETTER ALPAPRAANA GAYANNA" #x0D9C)
- ("SINHALA LETTER MAHAAPRAANA GAYANNA" #x0D9D)
- ("SINHALA LETTER KANTAJA NAASIKYAYA" #x0D9E)
- ("SINHALA LETTER SANYAKA GAYANNA" #x0D9F)
- ("SINHALA LETTER ALPAPRAANA CAYANNA" #x0DA0)
- ("SINHALA LETTER MAHAAPRAANA CAYANNA" #x0DA1)
- ("SINHALA LETTER ALPAPRAANA JAYANNA" #x0DA2)
- ("SINHALA LETTER MAHAAPRAANA JAYANNA" #x0DA3)
- ("SINHALA LETTER TAALUJA NAASIKYAYA" #x0DA4)
- ("SINHALA LETTER TAALUJA SANYOOGA NAAKSIKYAYA" #x0DA5)
- ("SINHALA LETTER SANYAKA JAYANNA" #x0DA6)
- ("SINHALA LETTER ALPAPRAANA TTAYANNA" #x0DA7)
- ("SINHALA LETTER MAHAAPRAANA TTAYANNA" #x0DA8)
- ("SINHALA LETTER ALPAPRAANA DDAYANNA" #x0DA9)
- ("SINHALA LETTER MAHAAPRAANA DDAYANNA" #x0DAA)
- ("SINHALA LETTER MUURDHAJA NAYANNA" #x0DAB)
- ("SINHALA LETTER SANYAKA DDAYANNA" #x0DAC)
- ("SINHALA LETTER ALPAPRAANA TAYANNA" #x0DAD)
- ("SINHALA LETTER MAHAAPRAANA TAYANNA" #x0DAE)
- ("SINHALA LETTER ALPAPRAANA DAYANNA" #x0DAF)
- ("SINHALA LETTER MAHAAPRAANA DAYANNA" #x0DB0)
- ("SINHALA LETTER DANTAJA NAYANNA" #x0DB1)
- ("SINHALA LETTER SANYAKA DAYANNA" #x0DB3)
- ("SINHALA LETTER ALPAPRAANA PAYANNA" #x0DB4)
- ("SINHALA LETTER MAHAAPRAANA PAYANNA" #x0DB5)
- ("SINHALA LETTER ALPAPRAANA BAYANNA" #x0DB6)
- ("SINHALA LETTER MAHAAPRAANA BAYANNA" #x0DB7)
- ("SINHALA LETTER MAYANNA" #x0DB8)
- ("SINHALA LETTER AMBA BAYANNA" #x0DB9)
- ("SINHALA LETTER YAYANNA" #x0DBA)
- ("SINHALA LETTER RAYANNA" #x0DBB)
- ("SINHALA LETTER DANTAJA LAYANNA" #x0DBD)
- ("SINHALA LETTER VAYANNA" #x0DC0)
- ("SINHALA LETTER TAALUJA SAYANNA" #x0DC1)
- ("SINHALA LETTER MUURDHAJA SAYANNA" #x0DC2)
- ("SINHALA LETTER DANTAJA SAYANNA" #x0DC3)
- ("SINHALA LETTER HAYANNA" #x0DC4)
- ("SINHALA LETTER MUURDHAJA LAYANNA" #x0DC5)
- ("SINHALA LETTER FAYANNA" #x0DC6)
- ("SINHALA SIGN AL-LAKUNA" #x0DCA)
- ("SINHALA VOWEL SIGN AELA-PILLA" #x0DCF)
- ("SINHALA VOWEL SIGN KETTI AEDA-PILLA" #x0DD0)
- ("SINHALA VOWEL SIGN DIGA AEDA-PILLA" #x0DD1)
- ("SINHALA VOWEL SIGN KETTI IS-PILLA" #x0DD2)
- ("SINHALA VOWEL SIGN DIGA IS-PILLA" #x0DD3)
- ("SINHALA VOWEL SIGN KETTI PAA-PILLA" #x0DD4)
- ("SINHALA VOWEL SIGN DIGA PAA-PILLA" #x0DD6)
- ("SINHALA VOWEL SIGN GAETTA-PILLA" #x0DD8)
- ("SINHALA VOWEL SIGN KOMBUVA" #x0DD9)
- ("SINHALA VOWEL SIGN DIGA KOMBUVA" #x0DDA)
- ("SINHALA VOWEL SIGN KOMBU DEKA" #x0DDB)
- ("SINHALA VOWEL SIGN KOMBUVA HAA AELA-PILLA" #x0DDC)
- ("SINHALA VOWEL SIGN KOMBUVA HAA DIGA AELA-PILLA" #x0DDD)
- ("SINHALA VOWEL SIGN KOMBUVA HAA GAYANUKITTA" #x0DDE)
- ("SINHALA VOWEL SIGN GAYANUKITTA" #x0DDF)
- ("SINHALA VOWEL SIGN DIGA GAETTA-PILLA" #x0DF2)
- ("SINHALA VOWEL SIGN DIGA GAYANUKITTA" #x0DF3)
- ("SINHALA PUNCTUATION KUNDDALIYA" #x0DF4)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'thai
- '(("THAI CHARACTER KO KAI" #x0E01)
- ("THAI CHARACTER KHO KHAI" #x0E02)
- ("THAI CHARACTER KHO KHUAT" #x0E03)
- ("THAI CHARACTER KHO KHWAI" #x0E04)
- ("THAI CHARACTER KHO KHON" #x0E05)
- ("THAI CHARACTER KHO RAKHANG" #x0E06)
- ("THAI CHARACTER NGO NGU" #x0E07)
- ("THAI CHARACTER CHO CHAN" #x0E08)
- ("THAI CHARACTER CHO CHING" #x0E09)
- ("THAI CHARACTER CHO CHANG" #x0E0A)
- ("THAI CHARACTER SO SO" #x0E0B)
- ("THAI CHARACTER CHO CHOE" #x0E0C)
- ("THAI CHARACTER YO YING" #x0E0D)
- ("THAI CHARACTER DO CHADA" #x0E0E)
- ("THAI CHARACTER TO PATAK" #x0E0F)
- ("THAI CHARACTER THO THAN" #x0E10)
- ("THAI CHARACTER THO NANGMONTHO" #x0E11)
- ("THAI CHARACTER THO PHUTHAO" #x0E12)
- ("THAI CHARACTER NO NEN" #x0E13)
- ("THAI CHARACTER DO DEK" #x0E14)
- ("THAI CHARACTER TO TAO" #x0E15)
- ("THAI CHARACTER THO THUNG" #x0E16)
- ("THAI CHARACTER THO THAHAN" #x0E17)
- ("THAI CHARACTER THO THONG" #x0E18)
- ("THAI CHARACTER NO NU" #x0E19)
- ("THAI CHARACTER BO BAIMAI" #x0E1A)
- ("THAI CHARACTER PO PLA" #x0E1B)
- ("THAI CHARACTER PHO PHUNG" #x0E1C)
- ("THAI CHARACTER FO FA" #x0E1D)
- ("THAI CHARACTER PHO PHAN" #x0E1E)
- ("THAI CHARACTER FO FAN" #x0E1F)
- ("THAI CHARACTER PHO SAMPHAO" #x0E20)
- ("THAI CHARACTER MO MA" #x0E21)
- ("THAI CHARACTER YO YAK" #x0E22)
- ("THAI CHARACTER RO RUA" #x0E23)
- ("THAI CHARACTER RU" #x0E24)
- ("THAI CHARACTER LO LING" #x0E25)
- ("THAI CHARACTER LU" #x0E26)
- ("THAI CHARACTER WO WAEN" #x0E27)
- ("THAI CHARACTER SO SALA" #x0E28)
- ("THAI CHARACTER SO RUSI" #x0E29)
- ("THAI CHARACTER SO SUA" #x0E2A)
- ("THAI CHARACTER HO HIP" #x0E2B)
- ("THAI CHARACTER LO CHULA" #x0E2C)
- ("THAI CHARACTER O ANG" #x0E2D)
- ("THAI CHARACTER HO NOKHUK" #x0E2E)
- ("THAI CHARACTER PAIYANNOI" #x0E2F)
- ("THAI CHARACTER SARA A" #x0E30)
- ("THAI CHARACTER MAI HAN-AKAT" #x0E31)
- ("THAI CHARACTER SARA AA" #x0E32)
- ("THAI CHARACTER SARA AM" #x0E33)
- ("THAI CHARACTER SARA I" #x0E34)
- ("THAI CHARACTER SARA II" #x0E35)
- ("THAI CHARACTER SARA UE" #x0E36)
- ("THAI CHARACTER SARA UEE" #x0E37)
- ("THAI CHARACTER SARA U" #x0E38)
- ("THAI CHARACTER SARA UU" #x0E39)
- ("THAI CHARACTER PHINTHU" #x0E3A)
- ("THAI CURRENCY SYMBOL BAHT" #x0E3F)
- ("THAI CHARACTER SARA E" #x0E40)
- ("THAI CHARACTER SARA AE" #x0E41)
- ("THAI CHARACTER SARA O" #x0E42)
- ("THAI CHARACTER SARA AI MAIMUAN" #x0E43)
- ("THAI CHARACTER SARA AI MAIMALAI" #x0E44)
- ("THAI CHARACTER LAKKHANGYAO" #x0E45)
- ("THAI CHARACTER MAIYAMOK" #x0E46)
- ("THAI CHARACTER MAITAIKHU" #x0E47)
- ("THAI CHARACTER MAI EK" #x0E48)
- ("THAI CHARACTER MAI THO" #x0E49)
- ("THAI CHARACTER MAI TRI" #x0E4A)
- ("THAI CHARACTER MAI CHATTAWA" #x0E4B)
- ("THAI CHARACTER THANTHAKHAT" #x0E4C)
- ("THAI CHARACTER NIKHAHIT" #x0E4D)
- ("THAI CHARACTER YAMAKKAN" #x0E4E)
- ("THAI CHARACTER FONGMAN" #x0E4F)
- ("THAI DIGIT ZERO" #x0E50)
- ("THAI DIGIT ONE" #x0E51)
- ("THAI DIGIT TWO" #x0E52)
- ("THAI DIGIT THREE" #x0E53)
- ("THAI DIGIT FOUR" #x0E54)
- ("THAI DIGIT FIVE" #x0E55)
- ("THAI DIGIT SIX" #x0E56)
- ("THAI DIGIT SEVEN" #x0E57)
- ("THAI DIGIT EIGHT" #x0E58)
- ("THAI DIGIT NINE" #x0E59)
- ("THAI CHARACTER ANGKHANKHU" #x0E5A)
- ("THAI CHARACTER KHOMUT" #x0E5B)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'lao
- '(("LAO LETTER KO" #x0E81)
- ("LAO LETTER KHO SUNG" #x0E82)
- ("LAO LETTER KHO TAM" #x0E84)
- ("LAO LETTER NGO" #x0E87)
- ("LAO LETTER CO" #x0E88)
- ("LAO LETTER SO TAM" #x0E8A)
- ("LAO LETTER NYO" #x0E8D)
- ("LAO LETTER DO" #x0E94)
- ("LAO LETTER TO" #x0E95)
- ("LAO LETTER THO SUNG" #x0E96)
- ("LAO LETTER THO TAM" #x0E97)
- ("LAO LETTER NO" #x0E99)
- ("LAO LETTER BO" #x0E9A)
- ("LAO LETTER PO" #x0E9B)
- ("LAO LETTER PHO SUNG" #x0E9C)
- ("LAO LETTER FO TAM" #x0E9D)
- ("LAO LETTER PHO TAM" #x0E9E)
- ("LAO LETTER FO SUNG" #x0E9F)
- ("LAO LETTER MO" #x0EA1)
- ("LAO LETTER YO" #x0EA2)
- ("LAO LETTER LO LING" #x0EA3)
- ("LAO LETTER LO LOOT" #x0EA5)
- ("LAO LETTER WO" #x0EA7)
- ("LAO LETTER SO SUNG" #x0EAA)
- ("LAO LETTER HO SUNG" #x0EAB)
- ("LAO LETTER O" #x0EAD)
- ("LAO LETTER HO TAM" #x0EAE)
- ("LAO ELLIPSIS" #x0EAF)
- ("LAO VOWEL SIGN A" #x0EB0)
- ("LAO VOWEL SIGN MAI KAN" #x0EB1)
- ("LAO VOWEL SIGN AA" #x0EB2)
- ("LAO VOWEL SIGN AM" #x0EB3)
- ("LAO VOWEL SIGN I" #x0EB4)
- ("LAO VOWEL SIGN II" #x0EB5)
- ("LAO VOWEL SIGN Y" #x0EB6)
- ("LAO VOWEL SIGN YY" #x0EB7)
- ("LAO VOWEL SIGN U" #x0EB8)
- ("LAO VOWEL SIGN UU" #x0EB9)
- ("LAO VOWEL SIGN MAI KON" #x0EBB)
- ("LAO SEMIVOWEL SIGN LO" #x0EBC)
- ("LAO SEMIVOWEL SIGN NYO" #x0EBD)
- ("LAO VOWEL SIGN E" #x0EC0)
- ("LAO VOWEL SIGN EI" #x0EC1)
- ("LAO VOWEL SIGN O" #x0EC2)
- ("LAO VOWEL SIGN AY" #x0EC3)
- ("LAO VOWEL SIGN AI" #x0EC4)
- ("LAO KO LA" #x0EC6)
- ("LAO TONE MAI EK" #x0EC8)
- ("LAO TONE MAI THO" #x0EC9)
- ("LAO TONE MAI TI" #x0ECA)
- ("LAO TONE MAI CATAWA" #x0ECB)
- ("LAO CANCELLATION MARK" #x0ECC)
- ("LAO NIGGAHITA" #x0ECD)
- ("LAO DIGIT ZERO" #x0ED0)
- ("LAO DIGIT ONE" #x0ED1)
- ("LAO DIGIT TWO" #x0ED2)
- ("LAO DIGIT THREE" #x0ED3)
- ("LAO DIGIT FOUR" #x0ED4)
- ("LAO DIGIT FIVE" #x0ED5)
- ("LAO DIGIT SIX" #x0ED6)
- ("LAO DIGIT SEVEN" #x0ED7)
- ("LAO DIGIT EIGHT" #x0ED8)
- ("LAO DIGIT NINE" #x0ED9)
- ("LAO HO NO" #x0EDC)
- ("LAO HO MO" #x0EDD)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'tibetan
- '(("TIBETAN SYLLABLE OM" #x0F00)
- ("TIBETAN MARK GTER YIG MGO TRUNCATED A" #x0F01)
- ("TIBETAN MARK GTER YIG MGO -UM RNAM BCAD MA" #x0F02)
- ("TIBETAN MARK GTER YIG MGO -UM GTER TSHEG MA" #x0F03)
- ("TIBETAN MARK INITIAL YIG MGO MDUN MA" #x0F04)
- ("TIBETAN MARK CLOSING YIG MGO SGAB MA" #x0F05)
- ("TIBETAN MARK CARET YIG MGO PHUR SHAD MA" #x0F06)
- ("TIBETAN MARK YIG MGO TSHEG SHAD MA" #x0F07)
- ("TIBETAN MARK SBRUL SHAD" #x0F08)
- ("TIBETAN MARK BSKUR YIG MGO" #x0F09)
- ("TIBETAN MARK BKA- SHOG YIG MGO" #x0F0A)
- ("TIBETAN MARK INTERSYLLABIC TSHEG" #x0F0B)
- ("TIBETAN MARK DELIMITER TSHEG BSTAR" #x0F0C)
- ("TIBETAN MARK SHAD" #x0F0D)
- ("TIBETAN MARK NYIS SHAD" #x0F0E)
- ("TIBETAN MARK TSHEG SHAD" #x0F0F)
- ("TIBETAN MARK NYIS TSHEG SHAD" #x0F10)
- ("TIBETAN MARK RIN CHEN SPUNGS SHAD" #x0F11)
- ("TIBETAN MARK RGYA GRAM SHAD" #x0F12)
- ("TIBETAN MARK CARET -DZUD RTAGS ME LONG CAN" #x0F13)
- ("TIBETAN MARK GTER TSHEG" #x0F14)
- ("TIBETAN LOGOTYPE SIGN CHAD RTAGS" #x0F15)
- ("TIBETAN LOGOTYPE SIGN LHAG RTAGS" #x0F16)
- ("TIBETAN ASTROLOGICAL SIGN SGRA GCAN -CHAR RTAGS" #x0F17)
- ("TIBETAN ASTROLOGICAL SIGN -KHYUD PA" #x0F18)
- ("TIBETAN ASTROLOGICAL SIGN SDONG TSHUGS" #x0F19)
- ("TIBETAN SIGN RDEL DKAR GCIG" #x0F1A)
- ("TIBETAN SIGN RDEL DKAR GNYIS" #x0F1B)
- ("TIBETAN SIGN RDEL DKAR GSUM" #x0F1C)
- ("TIBETAN SIGN RDEL NAG GCIG" #x0F1D)
- ("TIBETAN SIGN RDEL NAG GNYIS" #x0F1E)
- ("TIBETAN SIGN RDEL DKAR RDEL NAG" #x0F1F)
- ("TIBETAN DIGIT ZERO" #x0F20)
- ("TIBETAN DIGIT ONE" #x0F21)
- ("TIBETAN DIGIT TWO" #x0F22)
- ("TIBETAN DIGIT THREE" #x0F23)
- ("TIBETAN DIGIT FOUR" #x0F24)
- ("TIBETAN DIGIT FIVE" #x0F25)
- ("TIBETAN DIGIT SIX" #x0F26)
- ("TIBETAN DIGIT SEVEN" #x0F27)
- ("TIBETAN DIGIT EIGHT" #x0F28)
- ("TIBETAN DIGIT NINE" #x0F29)
- ("TIBETAN DIGIT HALF ONE" #x0F2A)
- ("TIBETAN DIGIT HALF TWO" #x0F2B)
- ("TIBETAN DIGIT HALF THREE" #x0F2C)
- ("TIBETAN DIGIT HALF FOUR" #x0F2D)
- ("TIBETAN DIGIT HALF FIVE" #x0F2E)
- ("TIBETAN DIGIT HALF SIX" #x0F2F)
- ("TIBETAN DIGIT HALF SEVEN" #x0F30)
- ("TIBETAN DIGIT HALF EIGHT" #x0F31)
- ("TIBETAN DIGIT HALF NINE" #x0F32)
- ("TIBETAN DIGIT HALF ZERO" #x0F33)
- ("TIBETAN MARK BSDUS RTAGS" #x0F34)
- ("TIBETAN MARK NGAS BZUNG NYI ZLA" #x0F35)
- ("TIBETAN MARK CARET -DZUD RTAGS BZHI MIG CAN" #x0F36)
- ("TIBETAN MARK NGAS BZUNG SGOR RTAGS" #x0F37)
- ("TIBETAN MARK CHE MGO" #x0F38)
- ("TIBETAN MARK TSA -PHRU" #x0F39)
- ("TIBETAN MARK GUG RTAGS GYON" #x0F3A)
- ("TIBETAN MARK GUG RTAGS GYAS" #x0F3B)
- ("TIBETAN MARK ANG KHANG GYON" #x0F3C)
- ("TIBETAN MARK ANG KHANG GYAS" #x0F3D)
- ("TIBETAN SIGN YAR TSHES" #x0F3E)
- ("TIBETAN SIGN MAR TSHES" #x0F3F)
- ("TIBETAN LETTER KA" #x0F40)
- ("TIBETAN LETTER KHA" #x0F41)
- ("TIBETAN LETTER GA" #x0F42)
- ("TIBETAN LETTER GHA" #x0F43)
- ("TIBETAN LETTER NGA" #x0F44)
- ("TIBETAN LETTER CA" #x0F45)
- ("TIBETAN LETTER CHA" #x0F46)
- ("TIBETAN LETTER JA" #x0F47)
- ("TIBETAN LETTER NYA" #x0F49)
- ("TIBETAN LETTER TTA" #x0F4A)
- ("TIBETAN LETTER TTHA" #x0F4B)
- ("TIBETAN LETTER DDA" #x0F4C)
- ("TIBETAN LETTER DDHA" #x0F4D)
- ("TIBETAN LETTER NNA" #x0F4E)
- ("TIBETAN LETTER TA" #x0F4F)
- ("TIBETAN LETTER THA" #x0F50)
- ("TIBETAN LETTER DA" #x0F51)
- ("TIBETAN LETTER DHA" #x0F52)
- ("TIBETAN LETTER NA" #x0F53)
- ("TIBETAN LETTER PA" #x0F54)
- ("TIBETAN LETTER PHA" #x0F55)
- ("TIBETAN LETTER BA" #x0F56)
- ("TIBETAN LETTER BHA" #x0F57)
- ("TIBETAN LETTER MA" #x0F58)
- ("TIBETAN LETTER TSA" #x0F59)
- ("TIBETAN LETTER TSHA" #x0F5A)
- ("TIBETAN LETTER DZA" #x0F5B)
- ("TIBETAN LETTER DZHA" #x0F5C)
- ("TIBETAN LETTER WA" #x0F5D)
- ("TIBETAN LETTER ZHA" #x0F5E)
- ("TIBETAN LETTER ZA" #x0F5F)
- ("TIBETAN LETTER -A" #x0F60)
- ("TIBETAN LETTER YA" #x0F61)
- ("TIBETAN LETTER RA" #x0F62)
- ("TIBETAN LETTER LA" #x0F63)
- ("TIBETAN LETTER SHA" #x0F64)
- ("TIBETAN LETTER SSA" #x0F65)
- ("TIBETAN LETTER SA" #x0F66)
- ("TIBETAN LETTER HA" #x0F67)
- ("TIBETAN LETTER A" #x0F68)
- ("TIBETAN LETTER KSSA" #x0F69)
- ("TIBETAN LETTER FIXED-FORM RA" #x0F6A)
- ("TIBETAN VOWEL SIGN AA" #x0F71)
- ("TIBETAN VOWEL SIGN I" #x0F72)
- ("TIBETAN VOWEL SIGN II" #x0F73)
- ("TIBETAN VOWEL SIGN U" #x0F74)
- ("TIBETAN VOWEL SIGN UU" #x0F75)
- ("TIBETAN VOWEL SIGN VOCALIC R" #x0F76)
- ("TIBETAN VOWEL SIGN VOCALIC RR" #x0F77)
- ("TIBETAN VOWEL SIGN VOCALIC L" #x0F78)
- ("TIBETAN VOWEL SIGN VOCALIC LL" #x0F79)
- ("TIBETAN VOWEL SIGN E" #x0F7A)
- ("TIBETAN VOWEL SIGN EE" #x0F7B)
- ("TIBETAN VOWEL SIGN O" #x0F7C)
- ("TIBETAN VOWEL SIGN OO" #x0F7D)
- ("TIBETAN SIGN RJES SU NGA RO" #x0F7E)
- ("TIBETAN SIGN RNAM BCAD" #x0F7F)
- ("TIBETAN VOWEL SIGN REVERSED I" #x0F80)
- ("TIBETAN VOWEL SIGN REVERSED II" #x0F81)
- ("TIBETAN SIGN NYI ZLA NAA DA" #x0F82)
- ("TIBETAN SIGN SNA LDAN" #x0F83)
- ("TIBETAN MARK HALANTA" #x0F84)
- ("TIBETAN MARK PALUTA" #x0F85)
- ("TIBETAN SIGN LCI RTAGS" #x0F86)
- ("TIBETAN SIGN YANG RTAGS" #x0F87)
- ("TIBETAN SIGN LCE TSA CAN" #x0F88)
- ("TIBETAN SIGN MCHU CAN" #x0F89)
- ("TIBETAN SIGN GRU CAN RGYINGS" #x0F8A)
- ("TIBETAN SIGN GRU MED RGYINGS" #x0F8B)
- ("TIBETAN SUBJOINED LETTER KA" #x0F90)
- ("TIBETAN SUBJOINED LETTER KHA" #x0F91)
- ("TIBETAN SUBJOINED LETTER GA" #x0F92)
- ("TIBETAN SUBJOINED LETTER GHA" #x0F93)
- ("TIBETAN SUBJOINED LETTER NGA" #x0F94)
- ("TIBETAN SUBJOINED LETTER CA" #x0F95)
- ("TIBETAN SUBJOINED LETTER CHA" #x0F96)
- ("TIBETAN SUBJOINED LETTER JA" #x0F97)
- ("TIBETAN SUBJOINED LETTER NYA" #x0F99)
- ("TIBETAN SUBJOINED LETTER TTA" #x0F9A)
- ("TIBETAN SUBJOINED LETTER TTHA" #x0F9B)
- ("TIBETAN SUBJOINED LETTER DDA" #x0F9C)
- ("TIBETAN SUBJOINED LETTER DDHA" #x0F9D)
- ("TIBETAN SUBJOINED LETTER NNA" #x0F9E)
- ("TIBETAN SUBJOINED LETTER TA" #x0F9F)
- ("TIBETAN SUBJOINED LETTER THA" #x0FA0)
- ("TIBETAN SUBJOINED LETTER DA" #x0FA1)
- ("TIBETAN SUBJOINED LETTER DHA" #x0FA2)
- ("TIBETAN SUBJOINED LETTER NA" #x0FA3)
- ("TIBETAN SUBJOINED LETTER PA" #x0FA4)
- ("TIBETAN SUBJOINED LETTER PHA" #x0FA5)
- ("TIBETAN SUBJOINED LETTER BA" #x0FA6)
- ("TIBETAN SUBJOINED LETTER BHA" #x0FA7)
- ("TIBETAN SUBJOINED LETTER MA" #x0FA8)
- ("TIBETAN SUBJOINED LETTER TSA" #x0FA9)
- ("TIBETAN SUBJOINED LETTER TSHA" #x0FAA)
- ("TIBETAN SUBJOINED LETTER DZA" #x0FAB)
- ("TIBETAN SUBJOINED LETTER DZHA" #x0FAC)
- ("TIBETAN SUBJOINED LETTER WA" #x0FAD)
- ("TIBETAN SUBJOINED LETTER ZHA" #x0FAE)
- ("TIBETAN SUBJOINED LETTER ZA" #x0FAF)
- ("TIBETAN SUBJOINED LETTER -A" #x0FB0)
- ("TIBETAN SUBJOINED LETTER YA" #x0FB1)
- ("TIBETAN SUBJOINED LETTER RA" #x0FB2)
- ("TIBETAN SUBJOINED LETTER LA" #x0FB3)
- ("TIBETAN SUBJOINED LETTER SHA" #x0FB4)
- ("TIBETAN SUBJOINED LETTER SSA" #x0FB5)
- ("TIBETAN SUBJOINED LETTER SA" #x0FB6)
- ("TIBETAN SUBJOINED LETTER HA" #x0FB7)
- ("TIBETAN SUBJOINED LETTER A" #x0FB8)
- ("TIBETAN SUBJOINED LETTER KSSA" #x0FB9)
- ("TIBETAN SUBJOINED LETTER FIXED-FORM WA" #x0FBA)
- ("TIBETAN SUBJOINED LETTER FIXED-FORM YA" #x0FBB)
- ("TIBETAN SUBJOINED LETTER FIXED-FORM RA" #x0FBC)
- ("TIBETAN KU RU KHA" #x0FBE)
- ("TIBETAN KU RU KHA BZHI MIG CAN" #x0FBF)
- ("TIBETAN CANTILLATION SIGN HEAVY BEAT" #x0FC0)
- ("TIBETAN CANTILLATION SIGN LIGHT BEAT" #x0FC1)
- ("TIBETAN CANTILLATION SIGN CANG TE-U" #x0FC2)
- ("TIBETAN CANTILLATION SIGN SBUB -CHAL" #x0FC3)
- ("TIBETAN SYMBOL DRIL BU" #x0FC4)
- ("TIBETAN SYMBOL RDO RJE" #x0FC5)
- ("TIBETAN SYMBOL PADMA GDAN" #x0FC6)
- ("TIBETAN SYMBOL RDO RJE RGYA GRAM" #x0FC7)
- ("TIBETAN SYMBOL PHUR PA" #x0FC8)
- ("TIBETAN SYMBOL NOR BU" #x0FC9)
- ("TIBETAN SYMBOL NOR BU NYIS -KHYIL" #x0FCA)
- ("TIBETAN SYMBOL NOR BU GSUM -KHYIL" #x0FCB)
- ("TIBETAN SYMBOL NOR BU BZHI -KHYIL" #x0FCC)
- ("TIBETAN SIGN RDEL NAG GSUM" #x0FCF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'myanmar
- '(("MYANMAR LETTER KA" #x1000)
- ("MYANMAR LETTER KHA" #x1001)
- ("MYANMAR LETTER GA" #x1002)
- ("MYANMAR LETTER GHA" #x1003)
- ("MYANMAR LETTER NGA" #x1004)
- ("MYANMAR LETTER CA" #x1005)
- ("MYANMAR LETTER CHA" #x1006)
- ("MYANMAR LETTER JA" #x1007)
- ("MYANMAR LETTER JHA" #x1008)
- ("MYANMAR LETTER NYA" #x1009)
- ("MYANMAR LETTER NNYA" #x100A)
- ("MYANMAR LETTER TTA" #x100B)
- ("MYANMAR LETTER TTHA" #x100C)
- ("MYANMAR LETTER DDA" #x100D)
- ("MYANMAR LETTER DDHA" #x100E)
- ("MYANMAR LETTER NNA" #x100F)
- ("MYANMAR LETTER TA" #x1010)
- ("MYANMAR LETTER THA" #x1011)
- ("MYANMAR LETTER DA" #x1012)
- ("MYANMAR LETTER DHA" #x1013)
- ("MYANMAR LETTER NA" #x1014)
- ("MYANMAR LETTER PA" #x1015)
- ("MYANMAR LETTER PHA" #x1016)
- ("MYANMAR LETTER BA" #x1017)
- ("MYANMAR LETTER BHA" #x1018)
- ("MYANMAR LETTER MA" #x1019)
- ("MYANMAR LETTER YA" #x101A)
- ("MYANMAR LETTER RA" #x101B)
- ("MYANMAR LETTER LA" #x101C)
- ("MYANMAR LETTER WA" #x101D)
- ("MYANMAR LETTER SA" #x101E)
- ("MYANMAR LETTER HA" #x101F)
- ("MYANMAR LETTER LLA" #x1020)
- ("MYANMAR LETTER A" #x1021)
- ("MYANMAR LETTER I" #x1023)
- ("MYANMAR LETTER II" #x1024)
- ("MYANMAR LETTER U" #x1025)
- ("MYANMAR LETTER UU" #x1026)
- ("MYANMAR LETTER E" #x1027)
- ("MYANMAR LETTER O" #x1029)
- ("MYANMAR LETTER AU" #x102A)
- ("MYANMAR VOWEL SIGN AA" #x102C)
- ("MYANMAR VOWEL SIGN I" #x102D)
- ("MYANMAR VOWEL SIGN II" #x102E)
- ("MYANMAR VOWEL SIGN U" #x102F)
- ("MYANMAR VOWEL SIGN UU" #x1030)
- ("MYANMAR VOWEL SIGN E" #x1031)
- ("MYANMAR VOWEL SIGN AI" #x1032)
- ("MYANMAR SIGN ANUSVARA" #x1036)
- ("MYANMAR SIGN DOT BELOW" #x1037)
- ("MYANMAR SIGN VISARGA" #x1038)
- ("MYANMAR SIGN VIRAMA" #x1039)
- ("MYANMAR DIGIT ZERO" #x1040)
- ("MYANMAR DIGIT ONE" #x1041)
- ("MYANMAR DIGIT TWO" #x1042)
- ("MYANMAR DIGIT THREE" #x1043)
- ("MYANMAR DIGIT FOUR" #x1044)
- ("MYANMAR DIGIT FIVE" #x1045)
- ("MYANMAR DIGIT SIX" #x1046)
- ("MYANMAR DIGIT SEVEN" #x1047)
- ("MYANMAR DIGIT EIGHT" #x1048)
- ("MYANMAR DIGIT NINE" #x1049)
- ("MYANMAR SIGN LITTLE SECTION" #x104A)
- ("MYANMAR SIGN SECTION" #x104B)
- ("MYANMAR SYMBOL LOCATIVE" #x104C)
- ("MYANMAR SYMBOL COMPLETED" #x104D)
- ("MYANMAR SYMBOL AFOREMENTIONED" #x104E)
- ("MYANMAR SYMBOL GENITIVE" #x104F)
- ("MYANMAR LETTER SHA" #x1050)
- ("MYANMAR LETTER SSA" #x1051)
- ("MYANMAR LETTER VOCALIC R" #x1052)
- ("MYANMAR LETTER VOCALIC RR" #x1053)
- ("MYANMAR LETTER VOCALIC L" #x1054)
- ("MYANMAR LETTER VOCALIC LL" #x1055)
- ("MYANMAR VOWEL SIGN VOCALIC R" #x1056)
- ("MYANMAR VOWEL SIGN VOCALIC RR" #x1057)
- ("MYANMAR VOWEL SIGN VOCALIC L" #x1058)
- ("MYANMAR VOWEL SIGN VOCALIC LL" #x1059)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'georgian
- '(("GEORGIAN CAPITAL LETTER AN" #x10A0)
- ("GEORGIAN CAPITAL LETTER BAN" #x10A1)
- ("GEORGIAN CAPITAL LETTER GAN" #x10A2)
- ("GEORGIAN CAPITAL LETTER DON" #x10A3)
- ("GEORGIAN CAPITAL LETTER EN" #x10A4)
- ("GEORGIAN CAPITAL LETTER VIN" #x10A5)
- ("GEORGIAN CAPITAL LETTER ZEN" #x10A6)
- ("GEORGIAN CAPITAL LETTER TAN" #x10A7)
- ("GEORGIAN CAPITAL LETTER IN" #x10A8)
- ("GEORGIAN CAPITAL LETTER KAN" #x10A9)
- ("GEORGIAN CAPITAL LETTER LAS" #x10AA)
- ("GEORGIAN CAPITAL LETTER MAN" #x10AB)
- ("GEORGIAN CAPITAL LETTER NAR" #x10AC)
- ("GEORGIAN CAPITAL LETTER ON" #x10AD)
- ("GEORGIAN CAPITAL LETTER PAR" #x10AE)
- ("GEORGIAN CAPITAL LETTER ZHAR" #x10AF)
- ("GEORGIAN CAPITAL LETTER RAE" #x10B0)
- ("GEORGIAN CAPITAL LETTER SAN" #x10B1)
- ("GEORGIAN CAPITAL LETTER TAR" #x10B2)
- ("GEORGIAN CAPITAL LETTER UN" #x10B3)
- ("GEORGIAN CAPITAL LETTER PHAR" #x10B4)
- ("GEORGIAN CAPITAL LETTER KHAR" #x10B5)
- ("GEORGIAN CAPITAL LETTER GHAN" #x10B6)
- ("GEORGIAN CAPITAL LETTER QAR" #x10B7)
- ("GEORGIAN CAPITAL LETTER SHIN" #x10B8)
- ("GEORGIAN CAPITAL LETTER CHIN" #x10B9)
- ("GEORGIAN CAPITAL LETTER CAN" #x10BA)
- ("GEORGIAN CAPITAL LETTER JIL" #x10BB)
- ("GEORGIAN CAPITAL LETTER CIL" #x10BC)
- ("GEORGIAN CAPITAL LETTER CHAR" #x10BD)
- ("GEORGIAN CAPITAL LETTER XAN" #x10BE)
- ("GEORGIAN CAPITAL LETTER JHAN" #x10BF)
- ("GEORGIAN CAPITAL LETTER HAE" #x10C0)
- ("GEORGIAN CAPITAL LETTER HE" #x10C1)
- ("GEORGIAN CAPITAL LETTER HIE" #x10C2)
- ("GEORGIAN CAPITAL LETTER WE" #x10C3)
- ("GEORGIAN CAPITAL LETTER HAR" #x10C4)
- ("GEORGIAN CAPITAL LETTER HOE" #x10C5)
- ("GEORGIAN LETTER AN" #x10D0)
- ("GEORGIAN LETTER BAN" #x10D1)
- ("GEORGIAN LETTER GAN" #x10D2)
- ("GEORGIAN LETTER DON" #x10D3)
- ("GEORGIAN LETTER EN" #x10D4)
- ("GEORGIAN LETTER VIN" #x10D5)
- ("GEORGIAN LETTER ZEN" #x10D6)
- ("GEORGIAN LETTER TAN" #x10D7)
- ("GEORGIAN LETTER IN" #x10D8)
- ("GEORGIAN LETTER KAN" #x10D9)
- ("GEORGIAN LETTER LAS" #x10DA)
- ("GEORGIAN LETTER MAN" #x10DB)
- ("GEORGIAN LETTER NAR" #x10DC)
- ("GEORGIAN LETTER ON" #x10DD)
- ("GEORGIAN LETTER PAR" #x10DE)
- ("GEORGIAN LETTER ZHAR" #x10DF)
- ("GEORGIAN LETTER RAE" #x10E0)
- ("GEORGIAN LETTER SAN" #x10E1)
- ("GEORGIAN LETTER TAR" #x10E2)
- ("GEORGIAN LETTER UN" #x10E3)
- ("GEORGIAN LETTER PHAR" #x10E4)
- ("GEORGIAN LETTER KHAR" #x10E5)
- ("GEORGIAN LETTER GHAN" #x10E6)
- ("GEORGIAN LETTER QAR" #x10E7)
- ("GEORGIAN LETTER SHIN" #x10E8)
- ("GEORGIAN LETTER CHIN" #x10E9)
- ("GEORGIAN LETTER CAN" #x10EA)
- ("GEORGIAN LETTER JIL" #x10EB)
- ("GEORGIAN LETTER CIL" #x10EC)
- ("GEORGIAN LETTER CHAR" #x10ED)
- ("GEORGIAN LETTER XAN" #x10EE)
- ("GEORGIAN LETTER JHAN" #x10EF)
- ("GEORGIAN LETTER HAE" #x10F0)
- ("GEORGIAN LETTER HE" #x10F1)
- ("GEORGIAN LETTER HIE" #x10F2)
- ("GEORGIAN LETTER WE" #x10F3)
- ("GEORGIAN LETTER HAR" #x10F4)
- ("GEORGIAN LETTER HOE" #x10F5)
- ("GEORGIAN LETTER FI" #x10F6)
- ("GEORGIAN LETTER YN" #x10F7)
- ("GEORGIAN LETTER ELIFI" #x10F8)
- ("GEORGIAN PARAGRAPH SEPARATOR" #x10FB)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'hangul-jamo
- '(("HANGUL CHOSEONG KIYEOK" #x1100)
- ("HANGUL CHOSEONG SSANGKIYEOK" #x1101)
- ("HANGUL CHOSEONG NIEUN" #x1102)
- ("HANGUL CHOSEONG TIKEUT" #x1103)
- ("HANGUL CHOSEONG SSANGTIKEUT" #x1104)
- ("HANGUL CHOSEONG RIEUL" #x1105)
- ("HANGUL CHOSEONG MIEUM" #x1106)
- ("HANGUL CHOSEONG PIEUP" #x1107)
- ("HANGUL CHOSEONG SSANGPIEUP" #x1108)
- ("HANGUL CHOSEONG SIOS" #x1109)
- ("HANGUL CHOSEONG SSANGSIOS" #x110A)
- ("HANGUL CHOSEONG IEUNG" #x110B)
- ("HANGUL CHOSEONG CIEUC" #x110C)
- ("HANGUL CHOSEONG SSANGCIEUC" #x110D)
- ("HANGUL CHOSEONG CHIEUCH" #x110E)
- ("HANGUL CHOSEONG KHIEUKH" #x110F)
- ("HANGUL CHOSEONG THIEUTH" #x1110)
- ("HANGUL CHOSEONG PHIEUPH" #x1111)
- ("HANGUL CHOSEONG HIEUH" #x1112)
- ("HANGUL CHOSEONG NIEUN-KIYEOK" #x1113)
- ("HANGUL CHOSEONG SSANGNIEUN" #x1114)
- ("HANGUL CHOSEONG NIEUN-TIKEUT" #x1115)
- ("HANGUL CHOSEONG NIEUN-PIEUP" #x1116)
- ("HANGUL CHOSEONG TIKEUT-KIYEOK" #x1117)
- ("HANGUL CHOSEONG RIEUL-NIEUN" #x1118)
- ("HANGUL CHOSEONG SSANGRIEUL" #x1119)
- ("HANGUL CHOSEONG RIEUL-HIEUH" #x111A)
- ("HANGUL CHOSEONG KAPYEOUNRIEUL" #x111B)
- ("HANGUL CHOSEONG MIEUM-PIEUP" #x111C)
- ("HANGUL CHOSEONG KAPYEOUNMIEUM" #x111D)
- ("HANGUL CHOSEONG PIEUP-KIYEOK" #x111E)
- ("HANGUL CHOSEONG PIEUP-NIEUN" #x111F)
- ("HANGUL CHOSEONG PIEUP-TIKEUT" #x1120)
- ("HANGUL CHOSEONG PIEUP-SIOS" #x1121)
- ("HANGUL CHOSEONG PIEUP-SIOS-KIYEOK" #x1122)
- ("HANGUL CHOSEONG PIEUP-SIOS-TIKEUT" #x1123)
- ("HANGUL CHOSEONG PIEUP-SIOS-PIEUP" #x1124)
- ("HANGUL CHOSEONG PIEUP-SSANGSIOS" #x1125)
- ("HANGUL CHOSEONG PIEUP-SIOS-CIEUC" #x1126)
- ("HANGUL CHOSEONG PIEUP-CIEUC" #x1127)
- ("HANGUL CHOSEONG PIEUP-CHIEUCH" #x1128)
- ("HANGUL CHOSEONG PIEUP-THIEUTH" #x1129)
- ("HANGUL CHOSEONG PIEUP-PHIEUPH" #x112A)
- ("HANGUL CHOSEONG KAPYEOUNPIEUP" #x112B)
- ("HANGUL CHOSEONG KAPYEOUNSSANGPIEUP" #x112C)
- ("HANGUL CHOSEONG SIOS-KIYEOK" #x112D)
- ("HANGUL CHOSEONG SIOS-NIEUN" #x112E)
- ("HANGUL CHOSEONG SIOS-TIKEUT" #x112F)
- ("HANGUL CHOSEONG SIOS-RIEUL" #x1130)
- ("HANGUL CHOSEONG SIOS-MIEUM" #x1131)
- ("HANGUL CHOSEONG SIOS-PIEUP" #x1132)
- ("HANGUL CHOSEONG SIOS-PIEUP-KIYEOK" #x1133)
- ("HANGUL CHOSEONG SIOS-SSANGSIOS" #x1134)
- ("HANGUL CHOSEONG SIOS-IEUNG" #x1135)
- ("HANGUL CHOSEONG SIOS-CIEUC" #x1136)
- ("HANGUL CHOSEONG SIOS-CHIEUCH" #x1137)
- ("HANGUL CHOSEONG SIOS-KHIEUKH" #x1138)
- ("HANGUL CHOSEONG SIOS-THIEUTH" #x1139)
- ("HANGUL CHOSEONG SIOS-PHIEUPH" #x113A)
- ("HANGUL CHOSEONG SIOS-HIEUH" #x113B)
- ("HANGUL CHOSEONG CHITUEUMSIOS" #x113C)
- ("HANGUL CHOSEONG CHITUEUMSSANGSIOS" #x113D)
- ("HANGUL CHOSEONG CEONGCHIEUMSIOS" #x113E)
- ("HANGUL CHOSEONG CEONGCHIEUMSSANGSIOS" #x113F)
- ("HANGUL CHOSEONG PANSIOS" #x1140)
- ("HANGUL CHOSEONG IEUNG-KIYEOK" #x1141)
- ("HANGUL CHOSEONG IEUNG-TIKEUT" #x1142)
- ("HANGUL CHOSEONG IEUNG-MIEUM" #x1143)
- ("HANGUL CHOSEONG IEUNG-PIEUP" #x1144)
- ("HANGUL CHOSEONG IEUNG-SIOS" #x1145)
- ("HANGUL CHOSEONG IEUNG-PANSIOS" #x1146)
- ("HANGUL CHOSEONG SSANGIEUNG" #x1147)
- ("HANGUL CHOSEONG IEUNG-CIEUC" #x1148)
- ("HANGUL CHOSEONG IEUNG-CHIEUCH" #x1149)
- ("HANGUL CHOSEONG IEUNG-THIEUTH" #x114A)
- ("HANGUL CHOSEONG IEUNG-PHIEUPH" #x114B)
- ("HANGUL CHOSEONG YESIEUNG" #x114C)
- ("HANGUL CHOSEONG CIEUC-IEUNG" #x114D)
- ("HANGUL CHOSEONG CHITUEUMCIEUC" #x114E)
- ("HANGUL CHOSEONG CHITUEUMSSANGCIEUC" #x114F)
- ("HANGUL CHOSEONG CEONGCHIEUMCIEUC" #x1150)
- ("HANGUL CHOSEONG CEONGCHIEUMSSANGCIEUC" #x1151)
- ("HANGUL CHOSEONG CHIEUCH-KHIEUKH" #x1152)
- ("HANGUL CHOSEONG CHIEUCH-HIEUH" #x1153)
- ("HANGUL CHOSEONG CHITUEUMCHIEUCH" #x1154)
- ("HANGUL CHOSEONG CEONGCHIEUMCHIEUCH" #x1155)
- ("HANGUL CHOSEONG PHIEUPH-PIEUP" #x1156)
- ("HANGUL CHOSEONG KAPYEOUNPHIEUPH" #x1157)
- ("HANGUL CHOSEONG SSANGHIEUH" #x1158)
- ("HANGUL CHOSEONG YEORINHIEUH" #x1159)
- ("HANGUL CHOSEONG FILLER" #x115F)
- ("HANGUL JUNGSEONG FILLER" #x1160)
- ("HANGUL JUNGSEONG A" #x1161)
- ("HANGUL JUNGSEONG AE" #x1162)
- ("HANGUL JUNGSEONG YA" #x1163)
- ("HANGUL JUNGSEONG YAE" #x1164)
- ("HANGUL JUNGSEONG EO" #x1165)
- ("HANGUL JUNGSEONG E" #x1166)
- ("HANGUL JUNGSEONG YEO" #x1167)
- ("HANGUL JUNGSEONG YE" #x1168)
- ("HANGUL JUNGSEONG O" #x1169)
- ("HANGUL JUNGSEONG WA" #x116A)
- ("HANGUL JUNGSEONG WAE" #x116B)
- ("HANGUL JUNGSEONG OE" #x116C)
- ("HANGUL JUNGSEONG YO" #x116D)
- ("HANGUL JUNGSEONG U" #x116E)
- ("HANGUL JUNGSEONG WEO" #x116F)
- ("HANGUL JUNGSEONG WE" #x1170)
- ("HANGUL JUNGSEONG WI" #x1171)
- ("HANGUL JUNGSEONG YU" #x1172)
- ("HANGUL JUNGSEONG EU" #x1173)
- ("HANGUL JUNGSEONG YI" #x1174)
- ("HANGUL JUNGSEONG I" #x1175)
- ("HANGUL JUNGSEONG A-O" #x1176)
- ("HANGUL JUNGSEONG A-U" #x1177)
- ("HANGUL JUNGSEONG YA-O" #x1178)
- ("HANGUL JUNGSEONG YA-YO" #x1179)
- ("HANGUL JUNGSEONG EO-O" #x117A)
- ("HANGUL JUNGSEONG EO-U" #x117B)
- ("HANGUL JUNGSEONG EO-EU" #x117C)
- ("HANGUL JUNGSEONG YEO-O" #x117D)
- ("HANGUL JUNGSEONG YEO-U" #x117E)
- ("HANGUL JUNGSEONG O-EO" #x117F)
- ("HANGUL JUNGSEONG O-E" #x1180)
- ("HANGUL JUNGSEONG O-YE" #x1181)
- ("HANGUL JUNGSEONG O-O" #x1182)
- ("HANGUL JUNGSEONG O-U" #x1183)
- ("HANGUL JUNGSEONG YO-YA" #x1184)
- ("HANGUL JUNGSEONG YO-YAE" #x1185)
- ("HANGUL JUNGSEONG YO-YEO" #x1186)
- ("HANGUL JUNGSEONG YO-O" #x1187)
- ("HANGUL JUNGSEONG YO-I" #x1188)
- ("HANGUL JUNGSEONG U-A" #x1189)
- ("HANGUL JUNGSEONG U-AE" #x118A)
- ("HANGUL JUNGSEONG U-EO-EU" #x118B)
- ("HANGUL JUNGSEONG U-YE" #x118C)
- ("HANGUL JUNGSEONG U-U" #x118D)
- ("HANGUL JUNGSEONG YU-A" #x118E)
- ("HANGUL JUNGSEONG YU-EO" #x118F)
- ("HANGUL JUNGSEONG YU-E" #x1190)
- ("HANGUL JUNGSEONG YU-YEO" #x1191)
- ("HANGUL JUNGSEONG YU-YE" #x1192)
- ("HANGUL JUNGSEONG YU-U" #x1193)
- ("HANGUL JUNGSEONG YU-I" #x1194)
- ("HANGUL JUNGSEONG EU-U" #x1195)
- ("HANGUL JUNGSEONG EU-EU" #x1196)
- ("HANGUL JUNGSEONG YI-U" #x1197)
- ("HANGUL JUNGSEONG I-A" #x1198)
- ("HANGUL JUNGSEONG I-YA" #x1199)
- ("HANGUL JUNGSEONG I-O" #x119A)
- ("HANGUL JUNGSEONG I-U" #x119B)
- ("HANGUL JUNGSEONG I-EU" #x119C)
- ("HANGUL JUNGSEONG I-ARAEA" #x119D)
- ("HANGUL JUNGSEONG ARAEA" #x119E)
- ("HANGUL JUNGSEONG ARAEA-EO" #x119F)
- ("HANGUL JUNGSEONG ARAEA-U" #x11A0)
- ("HANGUL JUNGSEONG ARAEA-I" #x11A1)
- ("HANGUL JUNGSEONG SSANGARAEA" #x11A2)
- ("HANGUL JONGSEONG KIYEOK" #x11A8)
- ("HANGUL JONGSEONG SSANGKIYEOK" #x11A9)
- ("HANGUL JONGSEONG KIYEOK-SIOS" #x11AA)
- ("HANGUL JONGSEONG NIEUN" #x11AB)
- ("HANGUL JONGSEONG NIEUN-CIEUC" #x11AC)
- ("HANGUL JONGSEONG NIEUN-HIEUH" #x11AD)
- ("HANGUL JONGSEONG TIKEUT" #x11AE)
- ("HANGUL JONGSEONG RIEUL" #x11AF)
- ("HANGUL JONGSEONG RIEUL-KIYEOK" #x11B0)
- ("HANGUL JONGSEONG RIEUL-MIEUM" #x11B1)
- ("HANGUL JONGSEONG RIEUL-PIEUP" #x11B2)
- ("HANGUL JONGSEONG RIEUL-SIOS" #x11B3)
- ("HANGUL JONGSEONG RIEUL-THIEUTH" #x11B4)
- ("HANGUL JONGSEONG RIEUL-PHIEUPH" #x11B5)
- ("HANGUL JONGSEONG RIEUL-HIEUH" #x11B6)
- ("HANGUL JONGSEONG MIEUM" #x11B7)
- ("HANGUL JONGSEONG PIEUP" #x11B8)
- ("HANGUL JONGSEONG PIEUP-SIOS" #x11B9)
- ("HANGUL JONGSEONG SIOS" #x11BA)
- ("HANGUL JONGSEONG SSANGSIOS" #x11BB)
- ("HANGUL JONGSEONG IEUNG" #x11BC)
- ("HANGUL JONGSEONG CIEUC" #x11BD)
- ("HANGUL JONGSEONG CHIEUCH" #x11BE)
- ("HANGUL JONGSEONG KHIEUKH" #x11BF)
- ("HANGUL JONGSEONG THIEUTH" #x11C0)
- ("HANGUL JONGSEONG PHIEUPH" #x11C1)
- ("HANGUL JONGSEONG HIEUH" #x11C2)
- ("HANGUL JONGSEONG KIYEOK-RIEUL" #x11C3)
- ("HANGUL JONGSEONG KIYEOK-SIOS-KIYEOK" #x11C4)
- ("HANGUL JONGSEONG NIEUN-KIYEOK" #x11C5)
- ("HANGUL JONGSEONG NIEUN-TIKEUT" #x11C6)
- ("HANGUL JONGSEONG NIEUN-SIOS" #x11C7)
- ("HANGUL JONGSEONG NIEUN-PANSIOS" #x11C8)
- ("HANGUL JONGSEONG NIEUN-THIEUTH" #x11C9)
- ("HANGUL JONGSEONG TIKEUT-KIYEOK" #x11CA)
- ("HANGUL JONGSEONG TIKEUT-RIEUL" #x11CB)
- ("HANGUL JONGSEONG RIEUL-KIYEOK-SIOS" #x11CC)
- ("HANGUL JONGSEONG RIEUL-NIEUN" #x11CD)
- ("HANGUL JONGSEONG RIEUL-TIKEUT" #x11CE)
- ("HANGUL JONGSEONG RIEUL-TIKEUT-HIEUH" #x11CF)
- ("HANGUL JONGSEONG SSANGRIEUL" #x11D0)
- ("HANGUL JONGSEONG RIEUL-MIEUM-KIYEOK" #x11D1)
- ("HANGUL JONGSEONG RIEUL-MIEUM-SIOS" #x11D2)
- ("HANGUL JONGSEONG RIEUL-PIEUP-SIOS" #x11D3)
- ("HANGUL JONGSEONG RIEUL-PIEUP-HIEUH" #x11D4)
- ("HANGUL JONGSEONG RIEUL-KAPYEOUNPIEUP" #x11D5)
- ("HANGUL JONGSEONG RIEUL-SSANGSIOS" #x11D6)
- ("HANGUL JONGSEONG RIEUL-PANSIOS" #x11D7)
- ("HANGUL JONGSEONG RIEUL-KHIEUKH" #x11D8)
- ("HANGUL JONGSEONG RIEUL-YEORINHIEUH" #x11D9)
- ("HANGUL JONGSEONG MIEUM-KIYEOK" #x11DA)
- ("HANGUL JONGSEONG MIEUM-RIEUL" #x11DB)
- ("HANGUL JONGSEONG MIEUM-PIEUP" #x11DC)
- ("HANGUL JONGSEONG MIEUM-SIOS" #x11DD)
- ("HANGUL JONGSEONG MIEUM-SSANGSIOS" #x11DE)
- ("HANGUL JONGSEONG MIEUM-PANSIOS" #x11DF)
- ("HANGUL JONGSEONG MIEUM-CHIEUCH" #x11E0)
- ("HANGUL JONGSEONG MIEUM-HIEUH" #x11E1)
- ("HANGUL JONGSEONG KAPYEOUNMIEUM" #x11E2)
- ("HANGUL JONGSEONG PIEUP-RIEUL" #x11E3)
- ("HANGUL JONGSEONG PIEUP-PHIEUPH" #x11E4)
- ("HANGUL JONGSEONG PIEUP-HIEUH" #x11E5)
- ("HANGUL JONGSEONG KAPYEOUNPIEUP" #x11E6)
- ("HANGUL JONGSEONG SIOS-KIYEOK" #x11E7)
- ("HANGUL JONGSEONG SIOS-TIKEUT" #x11E8)
- ("HANGUL JONGSEONG SIOS-RIEUL" #x11E9)
- ("HANGUL JONGSEONG SIOS-PIEUP" #x11EA)
- ("HANGUL JONGSEONG PANSIOS" #x11EB)
- ("HANGUL JONGSEONG IEUNG-KIYEOK" #x11EC)
- ("HANGUL JONGSEONG IEUNG-SSANGKIYEOK" #x11ED)
- ("HANGUL JONGSEONG SSANGIEUNG" #x11EE)
- ("HANGUL JONGSEONG IEUNG-KHIEUKH" #x11EF)
- ("HANGUL JONGSEONG YESIEUNG" #x11F0)
- ("HANGUL JONGSEONG YESIEUNG-SIOS" #x11F1)
- ("HANGUL JONGSEONG YESIEUNG-PANSIOS" #x11F2)
- ("HANGUL JONGSEONG PHIEUPH-PIEUP" #x11F3)
- ("HANGUL JONGSEONG KAPYEOUNPHIEUPH" #x11F4)
- ("HANGUL JONGSEONG HIEUH-NIEUN" #x11F5)
- ("HANGUL JONGSEONG HIEUH-RIEUL" #x11F6)
- ("HANGUL JONGSEONG HIEUH-MIEUM" #x11F7)
- ("HANGUL JONGSEONG HIEUH-PIEUP" #x11F8)
- ("HANGUL JONGSEONG YEORINHIEUH" #x11F9)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'ethiopic
- '(("ETHIOPIC SYLLABLE HA" #x1200)
- ("ETHIOPIC SYLLABLE HU" #x1201)
- ("ETHIOPIC SYLLABLE HI" #x1202)
- ("ETHIOPIC SYLLABLE HAA" #x1203)
- ("ETHIOPIC SYLLABLE HEE" #x1204)
- ("ETHIOPIC SYLLABLE HE" #x1205)
- ("ETHIOPIC SYLLABLE HO" #x1206)
- ("ETHIOPIC SYLLABLE LA" #x1208)
- ("ETHIOPIC SYLLABLE LU" #x1209)
- ("ETHIOPIC SYLLABLE LI" #x120A)
- ("ETHIOPIC SYLLABLE LAA" #x120B)
- ("ETHIOPIC SYLLABLE LEE" #x120C)
- ("ETHIOPIC SYLLABLE LE" #x120D)
- ("ETHIOPIC SYLLABLE LO" #x120E)
- ("ETHIOPIC SYLLABLE LWA" #x120F)
- ("ETHIOPIC SYLLABLE HHA" #x1210)
- ("ETHIOPIC SYLLABLE HHU" #x1211)
- ("ETHIOPIC SYLLABLE HHI" #x1212)
- ("ETHIOPIC SYLLABLE HHAA" #x1213)
- ("ETHIOPIC SYLLABLE HHEE" #x1214)
- ("ETHIOPIC SYLLABLE HHE" #x1215)
- ("ETHIOPIC SYLLABLE HHO" #x1216)
- ("ETHIOPIC SYLLABLE HHWA" #x1217)
- ("ETHIOPIC SYLLABLE MA" #x1218)
- ("ETHIOPIC SYLLABLE MU" #x1219)
- ("ETHIOPIC SYLLABLE MI" #x121A)
- ("ETHIOPIC SYLLABLE MAA" #x121B)
- ("ETHIOPIC SYLLABLE MEE" #x121C)
- ("ETHIOPIC SYLLABLE ME" #x121D)
- ("ETHIOPIC SYLLABLE MO" #x121E)
- ("ETHIOPIC SYLLABLE MWA" #x121F)
- ("ETHIOPIC SYLLABLE SZA" #x1220)
- ("ETHIOPIC SYLLABLE SZU" #x1221)
- ("ETHIOPIC SYLLABLE SZI" #x1222)
- ("ETHIOPIC SYLLABLE SZAA" #x1223)
- ("ETHIOPIC SYLLABLE SZEE" #x1224)
- ("ETHIOPIC SYLLABLE SZE" #x1225)
- ("ETHIOPIC SYLLABLE SZO" #x1226)
- ("ETHIOPIC SYLLABLE SZWA" #x1227)
- ("ETHIOPIC SYLLABLE RA" #x1228)
- ("ETHIOPIC SYLLABLE RU" #x1229)
- ("ETHIOPIC SYLLABLE RI" #x122A)
- ("ETHIOPIC SYLLABLE RAA" #x122B)
- ("ETHIOPIC SYLLABLE REE" #x122C)
- ("ETHIOPIC SYLLABLE RE" #x122D)
- ("ETHIOPIC SYLLABLE RO" #x122E)
- ("ETHIOPIC SYLLABLE RWA" #x122F)
- ("ETHIOPIC SYLLABLE SA" #x1230)
- ("ETHIOPIC SYLLABLE SU" #x1231)
- ("ETHIOPIC SYLLABLE SI" #x1232)
- ("ETHIOPIC SYLLABLE SAA" #x1233)
- ("ETHIOPIC SYLLABLE SEE" #x1234)
- ("ETHIOPIC SYLLABLE SE" #x1235)
- ("ETHIOPIC SYLLABLE SO" #x1236)
- ("ETHIOPIC SYLLABLE SWA" #x1237)
- ("ETHIOPIC SYLLABLE SHA" #x1238)
- ("ETHIOPIC SYLLABLE SHU" #x1239)
- ("ETHIOPIC SYLLABLE SHI" #x123A)
- ("ETHIOPIC SYLLABLE SHAA" #x123B)
- ("ETHIOPIC SYLLABLE SHEE" #x123C)
- ("ETHIOPIC SYLLABLE SHE" #x123D)
- ("ETHIOPIC SYLLABLE SHO" #x123E)
- ("ETHIOPIC SYLLABLE SHWA" #x123F)
- ("ETHIOPIC SYLLABLE QA" #x1240)
- ("ETHIOPIC SYLLABLE QU" #x1241)
- ("ETHIOPIC SYLLABLE QI" #x1242)
- ("ETHIOPIC SYLLABLE QAA" #x1243)
- ("ETHIOPIC SYLLABLE QEE" #x1244)
- ("ETHIOPIC SYLLABLE QE" #x1245)
- ("ETHIOPIC SYLLABLE QO" #x1246)
- ("ETHIOPIC SYLLABLE QWA" #x1248)
- ("ETHIOPIC SYLLABLE QWI" #x124A)
- ("ETHIOPIC SYLLABLE QWAA" #x124B)
- ("ETHIOPIC SYLLABLE QWEE" #x124C)
- ("ETHIOPIC SYLLABLE QWE" #x124D)
- ("ETHIOPIC SYLLABLE QHA" #x1250)
- ("ETHIOPIC SYLLABLE QHU" #x1251)
- ("ETHIOPIC SYLLABLE QHI" #x1252)
- ("ETHIOPIC SYLLABLE QHAA" #x1253)
- ("ETHIOPIC SYLLABLE QHEE" #x1254)
- ("ETHIOPIC SYLLABLE QHE" #x1255)
- ("ETHIOPIC SYLLABLE QHO" #x1256)
- ("ETHIOPIC SYLLABLE QHWA" #x1258)
- ("ETHIOPIC SYLLABLE QHWI" #x125A)
- ("ETHIOPIC SYLLABLE QHWAA" #x125B)
- ("ETHIOPIC SYLLABLE QHWEE" #x125C)
- ("ETHIOPIC SYLLABLE QHWE" #x125D)
- ("ETHIOPIC SYLLABLE BA" #x1260)
- ("ETHIOPIC SYLLABLE BU" #x1261)
- ("ETHIOPIC SYLLABLE BI" #x1262)
- ("ETHIOPIC SYLLABLE BAA" #x1263)
- ("ETHIOPIC SYLLABLE BEE" #x1264)
- ("ETHIOPIC SYLLABLE BE" #x1265)
- ("ETHIOPIC SYLLABLE BO" #x1266)
- ("ETHIOPIC SYLLABLE BWA" #x1267)
- ("ETHIOPIC SYLLABLE VA" #x1268)
- ("ETHIOPIC SYLLABLE VU" #x1269)
- ("ETHIOPIC SYLLABLE VI" #x126A)
- ("ETHIOPIC SYLLABLE VAA" #x126B)
- ("ETHIOPIC SYLLABLE VEE" #x126C)
- ("ETHIOPIC SYLLABLE VE" #x126D)
- ("ETHIOPIC SYLLABLE VO" #x126E)
- ("ETHIOPIC SYLLABLE VWA" #x126F)
- ("ETHIOPIC SYLLABLE TA" #x1270)
- ("ETHIOPIC SYLLABLE TU" #x1271)
- ("ETHIOPIC SYLLABLE TI" #x1272)
- ("ETHIOPIC SYLLABLE TAA" #x1273)
- ("ETHIOPIC SYLLABLE TEE" #x1274)
- ("ETHIOPIC SYLLABLE TE" #x1275)
- ("ETHIOPIC SYLLABLE TO" #x1276)
- ("ETHIOPIC SYLLABLE TWA" #x1277)
- ("ETHIOPIC SYLLABLE CA" #x1278)
- ("ETHIOPIC SYLLABLE CU" #x1279)
- ("ETHIOPIC SYLLABLE CI" #x127A)
- ("ETHIOPIC SYLLABLE CAA" #x127B)
- ("ETHIOPIC SYLLABLE CEE" #x127C)
- ("ETHIOPIC SYLLABLE CE" #x127D)
- ("ETHIOPIC SYLLABLE CO" #x127E)
- ("ETHIOPIC SYLLABLE CWA" #x127F)
- ("ETHIOPIC SYLLABLE XA" #x1280)
- ("ETHIOPIC SYLLABLE XU" #x1281)
- ("ETHIOPIC SYLLABLE XI" #x1282)
- ("ETHIOPIC SYLLABLE XAA" #x1283)
- ("ETHIOPIC SYLLABLE XEE" #x1284)
- ("ETHIOPIC SYLLABLE XE" #x1285)
- ("ETHIOPIC SYLLABLE XO" #x1286)
- ("ETHIOPIC SYLLABLE XWA" #x1288)
- ("ETHIOPIC SYLLABLE XWI" #x128A)
- ("ETHIOPIC SYLLABLE XWAA" #x128B)
- ("ETHIOPIC SYLLABLE XWEE" #x128C)
- ("ETHIOPIC SYLLABLE XWE" #x128D)
- ("ETHIOPIC SYLLABLE NA" #x1290)
- ("ETHIOPIC SYLLABLE NU" #x1291)
- ("ETHIOPIC SYLLABLE NI" #x1292)
- ("ETHIOPIC SYLLABLE NAA" #x1293)
- ("ETHIOPIC SYLLABLE NEE" #x1294)
- ("ETHIOPIC SYLLABLE NE" #x1295)
- ("ETHIOPIC SYLLABLE NO" #x1296)
- ("ETHIOPIC SYLLABLE NWA" #x1297)
- ("ETHIOPIC SYLLABLE NYA" #x1298)
- ("ETHIOPIC SYLLABLE NYU" #x1299)
- ("ETHIOPIC SYLLABLE NYI" #x129A)
- ("ETHIOPIC SYLLABLE NYAA" #x129B)
- ("ETHIOPIC SYLLABLE NYEE" #x129C)
- ("ETHIOPIC SYLLABLE NYE" #x129D)
- ("ETHIOPIC SYLLABLE NYO" #x129E)
- ("ETHIOPIC SYLLABLE NYWA" #x129F)
- ("ETHIOPIC SYLLABLE GLOTTAL A" #x12A0)
- ("ETHIOPIC SYLLABLE GLOTTAL U" #x12A1)
- ("ETHIOPIC SYLLABLE GLOTTAL I" #x12A2)
- ("ETHIOPIC SYLLABLE GLOTTAL AA" #x12A3)
- ("ETHIOPIC SYLLABLE GLOTTAL EE" #x12A4)
- ("ETHIOPIC SYLLABLE GLOTTAL E" #x12A5)
- ("ETHIOPIC SYLLABLE GLOTTAL O" #x12A6)
- ("ETHIOPIC SYLLABLE GLOTTAL WA" #x12A7)
- ("ETHIOPIC SYLLABLE KA" #x12A8)
- ("ETHIOPIC SYLLABLE KU" #x12A9)
- ("ETHIOPIC SYLLABLE KI" #x12AA)
- ("ETHIOPIC SYLLABLE KAA" #x12AB)
- ("ETHIOPIC SYLLABLE KEE" #x12AC)
- ("ETHIOPIC SYLLABLE KE" #x12AD)
- ("ETHIOPIC SYLLABLE KO" #x12AE)
- ("ETHIOPIC SYLLABLE KWA" #x12B0)
- ("ETHIOPIC SYLLABLE KWI" #x12B2)
- ("ETHIOPIC SYLLABLE KWAA" #x12B3)
- ("ETHIOPIC SYLLABLE KWEE" #x12B4)
- ("ETHIOPIC SYLLABLE KWE" #x12B5)
- ("ETHIOPIC SYLLABLE KXA" #x12B8)
- ("ETHIOPIC SYLLABLE KXU" #x12B9)
- ("ETHIOPIC SYLLABLE KXI" #x12BA)
- ("ETHIOPIC SYLLABLE KXAA" #x12BB)
- ("ETHIOPIC SYLLABLE KXEE" #x12BC)
- ("ETHIOPIC SYLLABLE KXE" #x12BD)
- ("ETHIOPIC SYLLABLE KXO" #x12BE)
- ("ETHIOPIC SYLLABLE KXWA" #x12C0)
- ("ETHIOPIC SYLLABLE KXWI" #x12C2)
- ("ETHIOPIC SYLLABLE KXWAA" #x12C3)
- ("ETHIOPIC SYLLABLE KXWEE" #x12C4)
- ("ETHIOPIC SYLLABLE KXWE" #x12C5)
- ("ETHIOPIC SYLLABLE WA" #x12C8)
- ("ETHIOPIC SYLLABLE WU" #x12C9)
- ("ETHIOPIC SYLLABLE WI" #x12CA)
- ("ETHIOPIC SYLLABLE WAA" #x12CB)
- ("ETHIOPIC SYLLABLE WEE" #x12CC)
- ("ETHIOPIC SYLLABLE WE" #x12CD)
- ("ETHIOPIC SYLLABLE WO" #x12CE)
- ("ETHIOPIC SYLLABLE PHARYNGEAL A" #x12D0)
- ("ETHIOPIC SYLLABLE PHARYNGEAL U" #x12D1)
- ("ETHIOPIC SYLLABLE PHARYNGEAL I" #x12D2)
- ("ETHIOPIC SYLLABLE PHARYNGEAL AA" #x12D3)
- ("ETHIOPIC SYLLABLE PHARYNGEAL EE" #x12D4)
- ("ETHIOPIC SYLLABLE PHARYNGEAL E" #x12D5)
- ("ETHIOPIC SYLLABLE PHARYNGEAL O" #x12D6)
- ("ETHIOPIC SYLLABLE ZA" #x12D8)
- ("ETHIOPIC SYLLABLE ZU" #x12D9)
- ("ETHIOPIC SYLLABLE ZI" #x12DA)
- ("ETHIOPIC SYLLABLE ZAA" #x12DB)
- ("ETHIOPIC SYLLABLE ZEE" #x12DC)
- ("ETHIOPIC SYLLABLE ZE" #x12DD)
- ("ETHIOPIC SYLLABLE ZO" #x12DE)
- ("ETHIOPIC SYLLABLE ZWA" #x12DF)
- ("ETHIOPIC SYLLABLE ZHA" #x12E0)
- ("ETHIOPIC SYLLABLE ZHU" #x12E1)
- ("ETHIOPIC SYLLABLE ZHI" #x12E2)
- ("ETHIOPIC SYLLABLE ZHAA" #x12E3)
- ("ETHIOPIC SYLLABLE ZHEE" #x12E4)
- ("ETHIOPIC SYLLABLE ZHE" #x12E5)
- ("ETHIOPIC SYLLABLE ZHO" #x12E6)
- ("ETHIOPIC SYLLABLE ZHWA" #x12E7)
- ("ETHIOPIC SYLLABLE YA" #x12E8)
- ("ETHIOPIC SYLLABLE YU" #x12E9)
- ("ETHIOPIC SYLLABLE YI" #x12EA)
- ("ETHIOPIC SYLLABLE YAA" #x12EB)
- ("ETHIOPIC SYLLABLE YEE" #x12EC)
- ("ETHIOPIC SYLLABLE YE" #x12ED)
- ("ETHIOPIC SYLLABLE YO" #x12EE)
- ("ETHIOPIC SYLLABLE DA" #x12F0)
- ("ETHIOPIC SYLLABLE DU" #x12F1)
- ("ETHIOPIC SYLLABLE DI" #x12F2)
- ("ETHIOPIC SYLLABLE DAA" #x12F3)
- ("ETHIOPIC SYLLABLE DEE" #x12F4)
- ("ETHIOPIC SYLLABLE DE" #x12F5)
- ("ETHIOPIC SYLLABLE DO" #x12F6)
- ("ETHIOPIC SYLLABLE DWA" #x12F7)
- ("ETHIOPIC SYLLABLE DDA" #x12F8)
- ("ETHIOPIC SYLLABLE DDU" #x12F9)
- ("ETHIOPIC SYLLABLE DDI" #x12FA)
- ("ETHIOPIC SYLLABLE DDAA" #x12FB)
- ("ETHIOPIC SYLLABLE DDEE" #x12FC)
- ("ETHIOPIC SYLLABLE DDE" #x12FD)
- ("ETHIOPIC SYLLABLE DDO" #x12FE)
- ("ETHIOPIC SYLLABLE DDWA" #x12FF)
- ("ETHIOPIC SYLLABLE JA" #x1300)
- ("ETHIOPIC SYLLABLE JU" #x1301)
- ("ETHIOPIC SYLLABLE JI" #x1302)
- ("ETHIOPIC SYLLABLE JAA" #x1303)
- ("ETHIOPIC SYLLABLE JEE" #x1304)
- ("ETHIOPIC SYLLABLE JE" #x1305)
- ("ETHIOPIC SYLLABLE JO" #x1306)
- ("ETHIOPIC SYLLABLE JWA" #x1307)
- ("ETHIOPIC SYLLABLE GA" #x1308)
- ("ETHIOPIC SYLLABLE GU" #x1309)
- ("ETHIOPIC SYLLABLE GI" #x130A)
- ("ETHIOPIC SYLLABLE GAA" #x130B)
- ("ETHIOPIC SYLLABLE GEE" #x130C)
- ("ETHIOPIC SYLLABLE GE" #x130D)
- ("ETHIOPIC SYLLABLE GO" #x130E)
- ("ETHIOPIC SYLLABLE GWA" #x1310)
- ("ETHIOPIC SYLLABLE GWI" #x1312)
- ("ETHIOPIC SYLLABLE GWAA" #x1313)
- ("ETHIOPIC SYLLABLE GWEE" #x1314)
- ("ETHIOPIC SYLLABLE GWE" #x1315)
- ("ETHIOPIC SYLLABLE GGA" #x1318)
- ("ETHIOPIC SYLLABLE GGU" #x1319)
- ("ETHIOPIC SYLLABLE GGI" #x131A)
- ("ETHIOPIC SYLLABLE GGAA" #x131B)
- ("ETHIOPIC SYLLABLE GGEE" #x131C)
- ("ETHIOPIC SYLLABLE GGE" #x131D)
- ("ETHIOPIC SYLLABLE GGO" #x131E)
- ("ETHIOPIC SYLLABLE THA" #x1320)
- ("ETHIOPIC SYLLABLE THU" #x1321)
- ("ETHIOPIC SYLLABLE THI" #x1322)
- ("ETHIOPIC SYLLABLE THAA" #x1323)
- ("ETHIOPIC SYLLABLE THEE" #x1324)
- ("ETHIOPIC SYLLABLE THE" #x1325)
- ("ETHIOPIC SYLLABLE THO" #x1326)
- ("ETHIOPIC SYLLABLE THWA" #x1327)
- ("ETHIOPIC SYLLABLE CHA" #x1328)
- ("ETHIOPIC SYLLABLE CHU" #x1329)
- ("ETHIOPIC SYLLABLE CHI" #x132A)
- ("ETHIOPIC SYLLABLE CHAA" #x132B)
- ("ETHIOPIC SYLLABLE CHEE" #x132C)
- ("ETHIOPIC SYLLABLE CHE" #x132D)
- ("ETHIOPIC SYLLABLE CHO" #x132E)
- ("ETHIOPIC SYLLABLE CHWA" #x132F)
- ("ETHIOPIC SYLLABLE PHA" #x1330)
- ("ETHIOPIC SYLLABLE PHU" #x1331)
- ("ETHIOPIC SYLLABLE PHI" #x1332)
- ("ETHIOPIC SYLLABLE PHAA" #x1333)
- ("ETHIOPIC SYLLABLE PHEE" #x1334)
- ("ETHIOPIC SYLLABLE PHE" #x1335)
- ("ETHIOPIC SYLLABLE PHO" #x1336)
- ("ETHIOPIC SYLLABLE PHWA" #x1337)
- ("ETHIOPIC SYLLABLE TSA" #x1338)
- ("ETHIOPIC SYLLABLE TSU" #x1339)
- ("ETHIOPIC SYLLABLE TSI" #x133A)
- ("ETHIOPIC SYLLABLE TSAA" #x133B)
- ("ETHIOPIC SYLLABLE TSEE" #x133C)
- ("ETHIOPIC SYLLABLE TSE" #x133D)
- ("ETHIOPIC SYLLABLE TSO" #x133E)
- ("ETHIOPIC SYLLABLE TSWA" #x133F)
- ("ETHIOPIC SYLLABLE TZA" #x1340)
- ("ETHIOPIC SYLLABLE TZU" #x1341)
- ("ETHIOPIC SYLLABLE TZI" #x1342)
- ("ETHIOPIC SYLLABLE TZAA" #x1343)
- ("ETHIOPIC SYLLABLE TZEE" #x1344)
- ("ETHIOPIC SYLLABLE TZE" #x1345)
- ("ETHIOPIC SYLLABLE TZO" #x1346)
- ("ETHIOPIC SYLLABLE FA" #x1348)
- ("ETHIOPIC SYLLABLE FU" #x1349)
- ("ETHIOPIC SYLLABLE FI" #x134A)
- ("ETHIOPIC SYLLABLE FAA" #x134B)
- ("ETHIOPIC SYLLABLE FEE" #x134C)
- ("ETHIOPIC SYLLABLE FE" #x134D)
- ("ETHIOPIC SYLLABLE FO" #x134E)
- ("ETHIOPIC SYLLABLE FWA" #x134F)
- ("ETHIOPIC SYLLABLE PA" #x1350)
- ("ETHIOPIC SYLLABLE PU" #x1351)
- ("ETHIOPIC SYLLABLE PI" #x1352)
- ("ETHIOPIC SYLLABLE PAA" #x1353)
- ("ETHIOPIC SYLLABLE PEE" #x1354)
- ("ETHIOPIC SYLLABLE PE" #x1355)
- ("ETHIOPIC SYLLABLE PO" #x1356)
- ("ETHIOPIC SYLLABLE PWA" #x1357)
- ("ETHIOPIC SYLLABLE RYA" #x1358)
- ("ETHIOPIC SYLLABLE MYA" #x1359)
- ("ETHIOPIC SYLLABLE FYA" #x135A)
- ("ETHIOPIC WORDSPACE" #x1361)
- ("ETHIOPIC FULL STOP" #x1362)
- ("ETHIOPIC COMMA" #x1363)
- ("ETHIOPIC SEMICOLON" #x1364)
- ("ETHIOPIC COLON" #x1365)
- ("ETHIOPIC PREFACE COLON" #x1366)
- ("ETHIOPIC QUESTION MARK" #x1367)
- ("ETHIOPIC PARAGRAPH SEPARATOR" #x1368)
- ("ETHIOPIC DIGIT ONE" #x1369)
- ("ETHIOPIC DIGIT TWO" #x136A)
- ("ETHIOPIC DIGIT THREE" #x136B)
- ("ETHIOPIC DIGIT FOUR" #x136C)
- ("ETHIOPIC DIGIT FIVE" #x136D)
- ("ETHIOPIC DIGIT SIX" #x136E)
- ("ETHIOPIC DIGIT SEVEN" #x136F)
- ("ETHIOPIC DIGIT EIGHT" #x1370)
- ("ETHIOPIC DIGIT NINE" #x1371)
- ("ETHIOPIC NUMBER TEN" #x1372)
- ("ETHIOPIC NUMBER TWENTY" #x1373)
- ("ETHIOPIC NUMBER THIRTY" #x1374)
- ("ETHIOPIC NUMBER FORTY" #x1375)
- ("ETHIOPIC NUMBER FIFTY" #x1376)
- ("ETHIOPIC NUMBER SIXTY" #x1377)
- ("ETHIOPIC NUMBER SEVENTY" #x1378)
- ("ETHIOPIC NUMBER EIGHTY" #x1379)
- ("ETHIOPIC NUMBER NINETY" #x137A)
- ("ETHIOPIC NUMBER HUNDRED" #x137B)
- ("ETHIOPIC NUMBER TEN THOUSAND" #x137C)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'cherokee
- '(("CHEROKEE LETTER A" #x13A0)
- ("CHEROKEE LETTER E" #x13A1)
- ("CHEROKEE LETTER I" #x13A2)
- ("CHEROKEE LETTER O" #x13A3)
- ("CHEROKEE LETTER U" #x13A4)
- ("CHEROKEE LETTER V" #x13A5)
- ("CHEROKEE LETTER GA" #x13A6)
- ("CHEROKEE LETTER KA" #x13A7)
- ("CHEROKEE LETTER GE" #x13A8)
- ("CHEROKEE LETTER GI" #x13A9)
- ("CHEROKEE LETTER GO" #x13AA)
- ("CHEROKEE LETTER GU" #x13AB)
- ("CHEROKEE LETTER GV" #x13AC)
- ("CHEROKEE LETTER HA" #x13AD)
- ("CHEROKEE LETTER HE" #x13AE)
- ("CHEROKEE LETTER HI" #x13AF)
- ("CHEROKEE LETTER HO" #x13B0)
- ("CHEROKEE LETTER HU" #x13B1)
- ("CHEROKEE LETTER HV" #x13B2)
- ("CHEROKEE LETTER LA" #x13B3)
- ("CHEROKEE LETTER LE" #x13B4)
- ("CHEROKEE LETTER LI" #x13B5)
- ("CHEROKEE LETTER LO" #x13B6)
- ("CHEROKEE LETTER LU" #x13B7)
- ("CHEROKEE LETTER LV" #x13B8)
- ("CHEROKEE LETTER MA" #x13B9)
- ("CHEROKEE LETTER ME" #x13BA)
- ("CHEROKEE LETTER MI" #x13BB)
- ("CHEROKEE LETTER MO" #x13BC)
- ("CHEROKEE LETTER MU" #x13BD)
- ("CHEROKEE LETTER NA" #x13BE)
- ("CHEROKEE LETTER HNA" #x13BF)
- ("CHEROKEE LETTER NAH" #x13C0)
- ("CHEROKEE LETTER NE" #x13C1)
- ("CHEROKEE LETTER NI" #x13C2)
- ("CHEROKEE LETTER NO" #x13C3)
- ("CHEROKEE LETTER NU" #x13C4)
- ("CHEROKEE LETTER NV" #x13C5)
- ("CHEROKEE LETTER QUA" #x13C6)
- ("CHEROKEE LETTER QUE" #x13C7)
- ("CHEROKEE LETTER QUI" #x13C8)
- ("CHEROKEE LETTER QUO" #x13C9)
- ("CHEROKEE LETTER QUU" #x13CA)
- ("CHEROKEE LETTER QUV" #x13CB)
- ("CHEROKEE LETTER SA" #x13CC)
- ("CHEROKEE LETTER S" #x13CD)
- ("CHEROKEE LETTER SE" #x13CE)
- ("CHEROKEE LETTER SI" #x13CF)
- ("CHEROKEE LETTER SO" #x13D0)
- ("CHEROKEE LETTER SU" #x13D1)
- ("CHEROKEE LETTER SV" #x13D2)
- ("CHEROKEE LETTER DA" #x13D3)
- ("CHEROKEE LETTER TA" #x13D4)
- ("CHEROKEE LETTER DE" #x13D5)
- ("CHEROKEE LETTER TE" #x13D6)
- ("CHEROKEE LETTER DI" #x13D7)
- ("CHEROKEE LETTER TI" #x13D8)
- ("CHEROKEE LETTER DO" #x13D9)
- ("CHEROKEE LETTER DU" #x13DA)
- ("CHEROKEE LETTER DV" #x13DB)
- ("CHEROKEE LETTER DLA" #x13DC)
- ("CHEROKEE LETTER TLA" #x13DD)
- ("CHEROKEE LETTER TLE" #x13DE)
- ("CHEROKEE LETTER TLI" #x13DF)
- ("CHEROKEE LETTER TLO" #x13E0)
- ("CHEROKEE LETTER TLU" #x13E1)
- ("CHEROKEE LETTER TLV" #x13E2)
- ("CHEROKEE LETTER TSA" #x13E3)
- ("CHEROKEE LETTER TSE" #x13E4)
- ("CHEROKEE LETTER TSI" #x13E5)
- ("CHEROKEE LETTER TSO" #x13E6)
- ("CHEROKEE LETTER TSU" #x13E7)
- ("CHEROKEE LETTER TSV" #x13E8)
- ("CHEROKEE LETTER WA" #x13E9)
- ("CHEROKEE LETTER WE" #x13EA)
- ("CHEROKEE LETTER WI" #x13EB)
- ("CHEROKEE LETTER WO" #x13EC)
- ("CHEROKEE LETTER WU" #x13ED)
- ("CHEROKEE LETTER WV" #x13EE)
- ("CHEROKEE LETTER YA" #x13EF)
- ("CHEROKEE LETTER YE" #x13F0)
- ("CHEROKEE LETTER YI" #x13F1)
- ("CHEROKEE LETTER YO" #x13F2)
- ("CHEROKEE LETTER YU" #x13F3)
- ("CHEROKEE LETTER YV" #x13F4)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'unified-canadian-aboriginal-syllabics
- '(("CANADIAN SYLLABICS E" #x1401)
- ("CANADIAN SYLLABICS AAI" #x1402)
- ("CANADIAN SYLLABICS I" #x1403)
- ("CANADIAN SYLLABICS II" #x1404)
- ("CANADIAN SYLLABICS O" #x1405)
- ("CANADIAN SYLLABICS OO" #x1406)
- ("CANADIAN SYLLABICS Y-CREE OO" #x1407)
- ("CANADIAN SYLLABICS CARRIER EE" #x1408)
- ("CANADIAN SYLLABICS CARRIER I" #x1409)
- ("CANADIAN SYLLABICS A" #x140A)
- ("CANADIAN SYLLABICS AA" #x140B)
- ("CANADIAN SYLLABICS WE" #x140C)
- ("CANADIAN SYLLABICS WEST-CREE WE" #x140D)
- ("CANADIAN SYLLABICS WI" #x140E)
- ("CANADIAN SYLLABICS WEST-CREE WI" #x140F)
- ("CANADIAN SYLLABICS WII" #x1410)
- ("CANADIAN SYLLABICS WEST-CREE WII" #x1411)
- ("CANADIAN SYLLABICS WO" #x1412)
- ("CANADIAN SYLLABICS WEST-CREE WO" #x1413)
- ("CANADIAN SYLLABICS WOO" #x1414)
- ("CANADIAN SYLLABICS WEST-CREE WOO" #x1415)
- ("CANADIAN SYLLABICS NASKAPI WOO" #x1416)
- ("CANADIAN SYLLABICS WA" #x1417)
- ("CANADIAN SYLLABICS WEST-CREE WA" #x1418)
- ("CANADIAN SYLLABICS WAA" #x1419)
- ("CANADIAN SYLLABICS WEST-CREE WAA" #x141A)
- ("CANADIAN SYLLABICS NASKAPI WAA" #x141B)
- ("CANADIAN SYLLABICS AI" #x141C)
- ("CANADIAN SYLLABICS Y-CREE W" #x141D)
- ("CANADIAN SYLLABICS GLOTTAL STOP" #x141E)
- ("CANADIAN SYLLABICS FINAL ACUTE" #x141F)
- ("CANADIAN SYLLABICS FINAL GRAVE" #x1420)
- ("CANADIAN SYLLABICS FINAL BOTTOM HALF RING" #x1421)
- ("CANADIAN SYLLABICS FINAL TOP HALF RING" #x1422)
- ("CANADIAN SYLLABICS FINAL RIGHT HALF RING" #x1423)
- ("CANADIAN SYLLABICS FINAL RING" #x1424)
- ("CANADIAN SYLLABICS FINAL DOUBLE ACUTE" #x1425)
- ("CANADIAN SYLLABICS FINAL DOUBLE SHORT VERTICAL STROKES" #x1426)
- ("CANADIAN SYLLABICS FINAL MIDDLE DOT" #x1427)
- ("CANADIAN SYLLABICS FINAL SHORT HORIZONTAL STROKE" #x1428)
- ("CANADIAN SYLLABICS FINAL PLUS" #x1429)
- ("CANADIAN SYLLABICS FINAL DOWN TACK" #x142A)
- ("CANADIAN SYLLABICS EN" #x142B)
- ("CANADIAN SYLLABICS IN" #x142C)
- ("CANADIAN SYLLABICS ON" #x142D)
- ("CANADIAN SYLLABICS AN" #x142E)
- ("CANADIAN SYLLABICS PE" #x142F)
- ("CANADIAN SYLLABICS PAAI" #x1430)
- ("CANADIAN SYLLABICS PI" #x1431)
- ("CANADIAN SYLLABICS PII" #x1432)
- ("CANADIAN SYLLABICS PO" #x1433)
- ("CANADIAN SYLLABICS POO" #x1434)
- ("CANADIAN SYLLABICS Y-CREE POO" #x1435)
- ("CANADIAN SYLLABICS CARRIER HEE" #x1436)
- ("CANADIAN SYLLABICS CARRIER HI" #x1437)
- ("CANADIAN SYLLABICS PA" #x1438)
- ("CANADIAN SYLLABICS PAA" #x1439)
- ("CANADIAN SYLLABICS PWE" #x143A)
- ("CANADIAN SYLLABICS WEST-CREE PWE" #x143B)
- ("CANADIAN SYLLABICS PWI" #x143C)
- ("CANADIAN SYLLABICS WEST-CREE PWI" #x143D)
- ("CANADIAN SYLLABICS PWII" #x143E)
- ("CANADIAN SYLLABICS WEST-CREE PWII" #x143F)
- ("CANADIAN SYLLABICS PWO" #x1440)
- ("CANADIAN SYLLABICS WEST-CREE PWO" #x1441)
- ("CANADIAN SYLLABICS PWOO" #x1442)
- ("CANADIAN SYLLABICS WEST-CREE PWOO" #x1443)
- ("CANADIAN SYLLABICS PWA" #x1444)
- ("CANADIAN SYLLABICS WEST-CREE PWA" #x1445)
- ("CANADIAN SYLLABICS PWAA" #x1446)
- ("CANADIAN SYLLABICS WEST-CREE PWAA" #x1447)
- ("CANADIAN SYLLABICS Y-CREE PWAA" #x1448)
- ("CANADIAN SYLLABICS P" #x1449)
- ("CANADIAN SYLLABICS WEST-CREE P" #x144A)
- ("CANADIAN SYLLABICS CARRIER H" #x144B)
- ("CANADIAN SYLLABICS TE" #x144C)
- ("CANADIAN SYLLABICS TAAI" #x144D)
- ("CANADIAN SYLLABICS TI" #x144E)
- ("CANADIAN SYLLABICS TII" #x144F)
- ("CANADIAN SYLLABICS TO" #x1450)
- ("CANADIAN SYLLABICS TOO" #x1451)
- ("CANADIAN SYLLABICS Y-CREE TOO" #x1452)
- ("CANADIAN SYLLABICS CARRIER DEE" #x1453)
- ("CANADIAN SYLLABICS CARRIER DI" #x1454)
- ("CANADIAN SYLLABICS TA" #x1455)
- ("CANADIAN SYLLABICS TAA" #x1456)
- ("CANADIAN SYLLABICS TWE" #x1457)
- ("CANADIAN SYLLABICS WEST-CREE TWE" #x1458)
- ("CANADIAN SYLLABICS TWI" #x1459)
- ("CANADIAN SYLLABICS WEST-CREE TWI" #x145A)
- ("CANADIAN SYLLABICS TWII" #x145B)
- ("CANADIAN SYLLABICS WEST-CREE TWII" #x145C)
- ("CANADIAN SYLLABICS TWO" #x145D)
- ("CANADIAN SYLLABICS WEST-CREE TWO" #x145E)
- ("CANADIAN SYLLABICS TWOO" #x145F)
- ("CANADIAN SYLLABICS WEST-CREE TWOO" #x1460)
- ("CANADIAN SYLLABICS TWA" #x1461)
- ("CANADIAN SYLLABICS WEST-CREE TWA" #x1462)
- ("CANADIAN SYLLABICS TWAA" #x1463)
- ("CANADIAN SYLLABICS WEST-CREE TWAA" #x1464)
- ("CANADIAN SYLLABICS NASKAPI TWAA" #x1465)
- ("CANADIAN SYLLABICS T" #x1466)
- ("CANADIAN SYLLABICS TTE" #x1467)
- ("CANADIAN SYLLABICS TTI" #x1468)
- ("CANADIAN SYLLABICS TTO" #x1469)
- ("CANADIAN SYLLABICS TTA" #x146A)
- ("CANADIAN SYLLABICS KE" #x146B)
- ("CANADIAN SYLLABICS KAAI" #x146C)
- ("CANADIAN SYLLABICS KI" #x146D)
- ("CANADIAN SYLLABICS KII" #x146E)
- ("CANADIAN SYLLABICS KO" #x146F)
- ("CANADIAN SYLLABICS KOO" #x1470)
- ("CANADIAN SYLLABICS Y-CREE KOO" #x1471)
- ("CANADIAN SYLLABICS KA" #x1472)
- ("CANADIAN SYLLABICS KAA" #x1473)
- ("CANADIAN SYLLABICS KWE" #x1474)
- ("CANADIAN SYLLABICS WEST-CREE KWE" #x1475)
- ("CANADIAN SYLLABICS KWI" #x1476)
- ("CANADIAN SYLLABICS WEST-CREE KWI" #x1477)
- ("CANADIAN SYLLABICS KWII" #x1478)
- ("CANADIAN SYLLABICS WEST-CREE KWII" #x1479)
- ("CANADIAN SYLLABICS KWO" #x147A)
- ("CANADIAN SYLLABICS WEST-CREE KWO" #x147B)
- ("CANADIAN SYLLABICS KWOO" #x147C)
- ("CANADIAN SYLLABICS WEST-CREE KWOO" #x147D)
- ("CANADIAN SYLLABICS KWA" #x147E)
- ("CANADIAN SYLLABICS WEST-CREE KWA" #x147F)
- ("CANADIAN SYLLABICS KWAA" #x1480)
- ("CANADIAN SYLLABICS WEST-CREE KWAA" #x1481)
- ("CANADIAN SYLLABICS NASKAPI KWAA" #x1482)
- ("CANADIAN SYLLABICS K" #x1483)
- ("CANADIAN SYLLABICS KW" #x1484)
- ("CANADIAN SYLLABICS SOUTH-SLAVEY KEH" #x1485)
- ("CANADIAN SYLLABICS SOUTH-SLAVEY KIH" #x1486)
- ("CANADIAN SYLLABICS SOUTH-SLAVEY KOH" #x1487)
- ("CANADIAN SYLLABICS SOUTH-SLAVEY KAH" #x1488)
- ("CANADIAN SYLLABICS CE" #x1489)
- ("CANADIAN SYLLABICS CAAI" #x148A)
- ("CANADIAN SYLLABICS CI" #x148B)
- ("CANADIAN SYLLABICS CII" #x148C)
- ("CANADIAN SYLLABICS CO" #x148D)
- ("CANADIAN SYLLABICS COO" #x148E)
- ("CANADIAN SYLLABICS Y-CREE COO" #x148F)
- ("CANADIAN SYLLABICS CA" #x1490)
- ("CANADIAN SYLLABICS CAA" #x1491)
- ("CANADIAN SYLLABICS CWE" #x1492)
- ("CANADIAN SYLLABICS WEST-CREE CWE" #x1493)
- ("CANADIAN SYLLABICS CWI" #x1494)
- ("CANADIAN SYLLABICS WEST-CREE CWI" #x1495)
- ("CANADIAN SYLLABICS CWII" #x1496)
- ("CANADIAN SYLLABICS WEST-CREE CWII" #x1497)
- ("CANADIAN SYLLABICS CWO" #x1498)
- ("CANADIAN SYLLABICS WEST-CREE CWO" #x1499)
- ("CANADIAN SYLLABICS CWOO" #x149A)
- ("CANADIAN SYLLABICS WEST-CREE CWOO" #x149B)
- ("CANADIAN SYLLABICS CWA" #x149C)
- ("CANADIAN SYLLABICS WEST-CREE CWA" #x149D)
- ("CANADIAN SYLLABICS CWAA" #x149E)
- ("CANADIAN SYLLABICS WEST-CREE CWAA" #x149F)
- ("CANADIAN SYLLABICS NASKAPI CWAA" #x14A0)
- ("CANADIAN SYLLABICS C" #x14A1)
- ("CANADIAN SYLLABICS SAYISI TH" #x14A2)
- ("CANADIAN SYLLABICS ME" #x14A3)
- ("CANADIAN SYLLABICS MAAI" #x14A4)
- ("CANADIAN SYLLABICS MI" #x14A5)
- ("CANADIAN SYLLABICS MII" #x14A6)
- ("CANADIAN SYLLABICS MO" #x14A7)
- ("CANADIAN SYLLABICS MOO" #x14A8)
- ("CANADIAN SYLLABICS Y-CREE MOO" #x14A9)
- ("CANADIAN SYLLABICS MA" #x14AA)
- ("CANADIAN SYLLABICS MAA" #x14AB)
- ("CANADIAN SYLLABICS MWE" #x14AC)
- ("CANADIAN SYLLABICS WEST-CREE MWE" #x14AD)
- ("CANADIAN SYLLABICS MWI" #x14AE)
- ("CANADIAN SYLLABICS WEST-CREE MWI" #x14AF)
- ("CANADIAN SYLLABICS MWII" #x14B0)
- ("CANADIAN SYLLABICS WEST-CREE MWII" #x14B1)
- ("CANADIAN SYLLABICS MWO" #x14B2)
- ("CANADIAN SYLLABICS WEST-CREE MWO" #x14B3)
- ("CANADIAN SYLLABICS MWOO" #x14B4)
- ("CANADIAN SYLLABICS WEST-CREE MWOO" #x14B5)
- ("CANADIAN SYLLABICS MWA" #x14B6)
- ("CANADIAN SYLLABICS WEST-CREE MWA" #x14B7)
- ("CANADIAN SYLLABICS MWAA" #x14B8)
- ("CANADIAN SYLLABICS WEST-CREE MWAA" #x14B9)
- ("CANADIAN SYLLABICS NASKAPI MWAA" #x14BA)
- ("CANADIAN SYLLABICS M" #x14BB)
- ("CANADIAN SYLLABICS WEST-CREE M" #x14BC)
- ("CANADIAN SYLLABICS MH" #x14BD)
- ("CANADIAN SYLLABICS ATHAPASCAN M" #x14BE)
- ("CANADIAN SYLLABICS SAYISI M" #x14BF)
- ("CANADIAN SYLLABICS NE" #x14C0)
- ("CANADIAN SYLLABICS NAAI" #x14C1)
- ("CANADIAN SYLLABICS NI" #x14C2)
- ("CANADIAN SYLLABICS NII" #x14C3)
- ("CANADIAN SYLLABICS NO" #x14C4)
- ("CANADIAN SYLLABICS NOO" #x14C5)
- ("CANADIAN SYLLABICS Y-CREE NOO" #x14C6)
- ("CANADIAN SYLLABICS NA" #x14C7)
- ("CANADIAN SYLLABICS NAA" #x14C8)
- ("CANADIAN SYLLABICS NWE" #x14C9)
- ("CANADIAN SYLLABICS WEST-CREE NWE" #x14CA)
- ("CANADIAN SYLLABICS NWA" #x14CB)
- ("CANADIAN SYLLABICS WEST-CREE NWA" #x14CC)
- ("CANADIAN SYLLABICS NWAA" #x14CD)
- ("CANADIAN SYLLABICS WEST-CREE NWAA" #x14CE)
- ("CANADIAN SYLLABICS NASKAPI NWAA" #x14CF)
- ("CANADIAN SYLLABICS N" #x14D0)
- ("CANADIAN SYLLABICS CARRIER NG" #x14D1)
- ("CANADIAN SYLLABICS NH" #x14D2)
- ("CANADIAN SYLLABICS LE" #x14D3)
- ("CANADIAN SYLLABICS LAAI" #x14D4)
- ("CANADIAN SYLLABICS LI" #x14D5)
- ("CANADIAN SYLLABICS LII" #x14D6)
- ("CANADIAN SYLLABICS LO" #x14D7)
- ("CANADIAN SYLLABICS LOO" #x14D8)
- ("CANADIAN SYLLABICS Y-CREE LOO" #x14D9)
- ("CANADIAN SYLLABICS LA" #x14DA)
- ("CANADIAN SYLLABICS LAA" #x14DB)
- ("CANADIAN SYLLABICS LWE" #x14DC)
- ("CANADIAN SYLLABICS WEST-CREE LWE" #x14DD)
- ("CANADIAN SYLLABICS LWI" #x14DE)
- ("CANADIAN SYLLABICS WEST-CREE LWI" #x14DF)
- ("CANADIAN SYLLABICS LWII" #x14E0)
- ("CANADIAN SYLLABICS WEST-CREE LWII" #x14E1)
- ("CANADIAN SYLLABICS LWO" #x14E2)
- ("CANADIAN SYLLABICS WEST-CREE LWO" #x14E3)
- ("CANADIAN SYLLABICS LWOO" #x14E4)
- ("CANADIAN SYLLABICS WEST-CREE LWOO" #x14E5)
- ("CANADIAN SYLLABICS LWA" #x14E6)
- ("CANADIAN SYLLABICS WEST-CREE LWA" #x14E7)
- ("CANADIAN SYLLABICS LWAA" #x14E8)
- ("CANADIAN SYLLABICS WEST-CREE LWAA" #x14E9)
- ("CANADIAN SYLLABICS L" #x14EA)
- ("CANADIAN SYLLABICS WEST-CREE L" #x14EB)
- ("CANADIAN SYLLABICS MEDIAL L" #x14EC)
- ("CANADIAN SYLLABICS SE" #x14ED)
- ("CANADIAN SYLLABICS SAAI" #x14EE)
- ("CANADIAN SYLLABICS SI" #x14EF)
- ("CANADIAN SYLLABICS SII" #x14F0)
- ("CANADIAN SYLLABICS SO" #x14F1)
- ("CANADIAN SYLLABICS SOO" #x14F2)
- ("CANADIAN SYLLABICS Y-CREE SOO" #x14F3)
- ("CANADIAN SYLLABICS SA" #x14F4)
- ("CANADIAN SYLLABICS SAA" #x14F5)
- ("CANADIAN SYLLABICS SWE" #x14F6)
- ("CANADIAN SYLLABICS WEST-CREE SWE" #x14F7)
- ("CANADIAN SYLLABICS SWI" #x14F8)
- ("CANADIAN SYLLABICS WEST-CREE SWI" #x14F9)
- ("CANADIAN SYLLABICS SWII" #x14FA)
- ("CANADIAN SYLLABICS WEST-CREE SWII" #x14FB)
- ("CANADIAN SYLLABICS SWO" #x14FC)
- ("CANADIAN SYLLABICS WEST-CREE SWO" #x14FD)
- ("CANADIAN SYLLABICS SWOO" #x14FE)
- ("CANADIAN SYLLABICS WEST-CREE SWOO" #x14FF)
- ("CANADIAN SYLLABICS SWA" #x1500)
- ("CANADIAN SYLLABICS WEST-CREE SWA" #x1501)
- ("CANADIAN SYLLABICS SWAA" #x1502)
- ("CANADIAN SYLLABICS WEST-CREE SWAA" #x1503)
- ("CANADIAN SYLLABICS NASKAPI SWAA" #x1504)
- ("CANADIAN SYLLABICS S" #x1505)
- ("CANADIAN SYLLABICS ATHAPASCAN S" #x1506)
- ("CANADIAN SYLLABICS SW" #x1507)
- ("CANADIAN SYLLABICS BLACKFOOT S" #x1508)
- ("CANADIAN SYLLABICS MOOSE-CREE SK" #x1509)
- ("CANADIAN SYLLABICS NASKAPI SKW" #x150A)
- ("CANADIAN SYLLABICS NASKAPI S-W" #x150B)
- ("CANADIAN SYLLABICS NASKAPI SPWA" #x150C)
- ("CANADIAN SYLLABICS NASKAPI STWA" #x150D)
- ("CANADIAN SYLLABICS NASKAPI SKWA" #x150E)
- ("CANADIAN SYLLABICS NASKAPI SCWA" #x150F)
- ("CANADIAN SYLLABICS SHE" #x1510)
- ("CANADIAN SYLLABICS SHI" #x1511)
- ("CANADIAN SYLLABICS SHII" #x1512)
- ("CANADIAN SYLLABICS SHO" #x1513)
- ("CANADIAN SYLLABICS SHOO" #x1514)
- ("CANADIAN SYLLABICS SHA" #x1515)
- ("CANADIAN SYLLABICS SHAA" #x1516)
- ("CANADIAN SYLLABICS SHWE" #x1517)
- ("CANADIAN SYLLABICS WEST-CREE SHWE" #x1518)
- ("CANADIAN SYLLABICS SHWI" #x1519)
- ("CANADIAN SYLLABICS WEST-CREE SHWI" #x151A)
- ("CANADIAN SYLLABICS SHWII" #x151B)
- ("CANADIAN SYLLABICS WEST-CREE SHWII" #x151C)
- ("CANADIAN SYLLABICS SHWO" #x151D)
- ("CANADIAN SYLLABICS WEST-CREE SHWO" #x151E)
- ("CANADIAN SYLLABICS SHWOO" #x151F)
- ("CANADIAN SYLLABICS WEST-CREE SHWOO" #x1520)
- ("CANADIAN SYLLABICS SHWA" #x1521)
- ("CANADIAN SYLLABICS WEST-CREE SHWA" #x1522)
- ("CANADIAN SYLLABICS SHWAA" #x1523)
- ("CANADIAN SYLLABICS WEST-CREE SHWAA" #x1524)
- ("CANADIAN SYLLABICS SH" #x1525)
- ("CANADIAN SYLLABICS YE" #x1526)
- ("CANADIAN SYLLABICS YAAI" #x1527)
- ("CANADIAN SYLLABICS YI" #x1528)
- ("CANADIAN SYLLABICS YII" #x1529)
- ("CANADIAN SYLLABICS YO" #x152A)
- ("CANADIAN SYLLABICS YOO" #x152B)
- ("CANADIAN SYLLABICS Y-CREE YOO" #x152C)
- ("CANADIAN SYLLABICS YA" #x152D)
- ("CANADIAN SYLLABICS YAA" #x152E)
- ("CANADIAN SYLLABICS YWE" #x152F)
- ("CANADIAN SYLLABICS WEST-CREE YWE" #x1530)
- ("CANADIAN SYLLABICS YWI" #x1531)
- ("CANADIAN SYLLABICS WEST-CREE YWI" #x1532)
- ("CANADIAN SYLLABICS YWII" #x1533)
- ("CANADIAN SYLLABICS WEST-CREE YWII" #x1534)
- ("CANADIAN SYLLABICS YWO" #x1535)
- ("CANADIAN SYLLABICS WEST-CREE YWO" #x1536)
- ("CANADIAN SYLLABICS YWOO" #x1537)
- ("CANADIAN SYLLABICS WEST-CREE YWOO" #x1538)
- ("CANADIAN SYLLABICS YWA" #x1539)
- ("CANADIAN SYLLABICS WEST-CREE YWA" #x153A)
- ("CANADIAN SYLLABICS YWAA" #x153B)
- ("CANADIAN SYLLABICS WEST-CREE YWAA" #x153C)
- ("CANADIAN SYLLABICS NASKAPI YWAA" #x153D)
- ("CANADIAN SYLLABICS Y" #x153E)
- ("CANADIAN SYLLABICS BIBLE-CREE Y" #x153F)
- ("CANADIAN SYLLABICS WEST-CREE Y" #x1540)
- ("CANADIAN SYLLABICS SAYISI YI" #x1541)
- ("CANADIAN SYLLABICS RE" #x1542)
- ("CANADIAN SYLLABICS R-CREE RE" #x1543)
- ("CANADIAN SYLLABICS WEST-CREE LE" #x1544)
- ("CANADIAN SYLLABICS RAAI" #x1545)
- ("CANADIAN SYLLABICS RI" #x1546)
- ("CANADIAN SYLLABICS RII" #x1547)
- ("CANADIAN SYLLABICS RO" #x1548)
- ("CANADIAN SYLLABICS ROO" #x1549)
- ("CANADIAN SYLLABICS WEST-CREE LO" #x154A)
- ("CANADIAN SYLLABICS RA" #x154B)
- ("CANADIAN SYLLABICS RAA" #x154C)
- ("CANADIAN SYLLABICS WEST-CREE LA" #x154D)
- ("CANADIAN SYLLABICS RWAA" #x154E)
- ("CANADIAN SYLLABICS WEST-CREE RWAA" #x154F)
- ("CANADIAN SYLLABICS R" #x1550)
- ("CANADIAN SYLLABICS WEST-CREE R" #x1551)
- ("CANADIAN SYLLABICS MEDIAL R" #x1552)
- ("CANADIAN SYLLABICS FE" #x1553)
- ("CANADIAN SYLLABICS FAAI" #x1554)
- ("CANADIAN SYLLABICS FI" #x1555)
- ("CANADIAN SYLLABICS FII" #x1556)
- ("CANADIAN SYLLABICS FO" #x1557)
- ("CANADIAN SYLLABICS FOO" #x1558)
- ("CANADIAN SYLLABICS FA" #x1559)
- ("CANADIAN SYLLABICS FAA" #x155A)
- ("CANADIAN SYLLABICS FWAA" #x155B)
- ("CANADIAN SYLLABICS WEST-CREE FWAA" #x155C)
- ("CANADIAN SYLLABICS F" #x155D)
- ("CANADIAN SYLLABICS THE" #x155E)
- ("CANADIAN SYLLABICS N-CREE THE" #x155F)
- ("CANADIAN SYLLABICS THI" #x1560)
- ("CANADIAN SYLLABICS N-CREE THI" #x1561)
- ("CANADIAN SYLLABICS THII" #x1562)
- ("CANADIAN SYLLABICS N-CREE THII" #x1563)
- ("CANADIAN SYLLABICS THO" #x1564)
- ("CANADIAN SYLLABICS THOO" #x1565)
- ("CANADIAN SYLLABICS THA" #x1566)
- ("CANADIAN SYLLABICS THAA" #x1567)
- ("CANADIAN SYLLABICS THWAA" #x1568)
- ("CANADIAN SYLLABICS WEST-CREE THWAA" #x1569)
- ("CANADIAN SYLLABICS TH" #x156A)
- ("CANADIAN SYLLABICS TTHE" #x156B)
- ("CANADIAN SYLLABICS TTHI" #x156C)
- ("CANADIAN SYLLABICS TTHO" #x156D)
- ("CANADIAN SYLLABICS TTHA" #x156E)
- ("CANADIAN SYLLABICS TTH" #x156F)
- ("CANADIAN SYLLABICS TYE" #x1570)
- ("CANADIAN SYLLABICS TYI" #x1571)
- ("CANADIAN SYLLABICS TYO" #x1572)
- ("CANADIAN SYLLABICS TYA" #x1573)
- ("CANADIAN SYLLABICS NUNAVIK HE" #x1574)
- ("CANADIAN SYLLABICS NUNAVIK HI" #x1575)
- ("CANADIAN SYLLABICS NUNAVIK HII" #x1576)
- ("CANADIAN SYLLABICS NUNAVIK HO" #x1577)
- ("CANADIAN SYLLABICS NUNAVIK HOO" #x1578)
- ("CANADIAN SYLLABICS NUNAVIK HA" #x1579)
- ("CANADIAN SYLLABICS NUNAVIK HAA" #x157A)
- ("CANADIAN SYLLABICS NUNAVIK H" #x157B)
- ("CANADIAN SYLLABICS NUNAVUT H" #x157C)
- ("CANADIAN SYLLABICS HK" #x157D)
- ("CANADIAN SYLLABICS QAAI" #x157E)
- ("CANADIAN SYLLABICS QI" #x157F)
- ("CANADIAN SYLLABICS QII" #x1580)
- ("CANADIAN SYLLABICS QO" #x1581)
- ("CANADIAN SYLLABICS QOO" #x1582)
- ("CANADIAN SYLLABICS QA" #x1583)
- ("CANADIAN SYLLABICS QAA" #x1584)
- ("CANADIAN SYLLABICS Q" #x1585)
- ("CANADIAN SYLLABICS TLHE" #x1586)
- ("CANADIAN SYLLABICS TLHI" #x1587)
- ("CANADIAN SYLLABICS TLHO" #x1588)
- ("CANADIAN SYLLABICS TLHA" #x1589)
- ("CANADIAN SYLLABICS WEST-CREE RE" #x158A)
- ("CANADIAN SYLLABICS WEST-CREE RI" #x158B)
- ("CANADIAN SYLLABICS WEST-CREE RO" #x158C)
- ("CANADIAN SYLLABICS WEST-CREE RA" #x158D)
- ("CANADIAN SYLLABICS NGAAI" #x158E)
- ("CANADIAN SYLLABICS NGI" #x158F)
- ("CANADIAN SYLLABICS NGII" #x1590)
- ("CANADIAN SYLLABICS NGO" #x1591)
- ("CANADIAN SYLLABICS NGOO" #x1592)
- ("CANADIAN SYLLABICS NGA" #x1593)
- ("CANADIAN SYLLABICS NGAA" #x1594)
- ("CANADIAN SYLLABICS NG" #x1595)
- ("CANADIAN SYLLABICS NNG" #x1596)
- ("CANADIAN SYLLABICS SAYISI SHE" #x1597)
- ("CANADIAN SYLLABICS SAYISI SHI" #x1598)
- ("CANADIAN SYLLABICS SAYISI SHO" #x1599)
- ("CANADIAN SYLLABICS SAYISI SHA" #x159A)
- ("CANADIAN SYLLABICS WOODS-CREE THE" #x159B)
- ("CANADIAN SYLLABICS WOODS-CREE THI" #x159C)
- ("CANADIAN SYLLABICS WOODS-CREE THO" #x159D)
- ("CANADIAN SYLLABICS WOODS-CREE THA" #x159E)
- ("CANADIAN SYLLABICS WOODS-CREE TH" #x159F)
- ("CANADIAN SYLLABICS LHI" #x15A0)
- ("CANADIAN SYLLABICS LHII" #x15A1)
- ("CANADIAN SYLLABICS LHO" #x15A2)
- ("CANADIAN SYLLABICS LHOO" #x15A3)
- ("CANADIAN SYLLABICS LHA" #x15A4)
- ("CANADIAN SYLLABICS LHAA" #x15A5)
- ("CANADIAN SYLLABICS LH" #x15A6)
- ("CANADIAN SYLLABICS TH-CREE THE" #x15A7)
- ("CANADIAN SYLLABICS TH-CREE THI" #x15A8)
- ("CANADIAN SYLLABICS TH-CREE THII" #x15A9)
- ("CANADIAN SYLLABICS TH-CREE THO" #x15AA)
- ("CANADIAN SYLLABICS TH-CREE THOO" #x15AB)
- ("CANADIAN SYLLABICS TH-CREE THA" #x15AC)
- ("CANADIAN SYLLABICS TH-CREE THAA" #x15AD)
- ("CANADIAN SYLLABICS TH-CREE TH" #x15AE)
- ("CANADIAN SYLLABICS AIVILIK B" #x15AF)
- ("CANADIAN SYLLABICS BLACKFOOT E" #x15B0)
- ("CANADIAN SYLLABICS BLACKFOOT I" #x15B1)
- ("CANADIAN SYLLABICS BLACKFOOT O" #x15B2)
- ("CANADIAN SYLLABICS BLACKFOOT A" #x15B3)
- ("CANADIAN SYLLABICS BLACKFOOT WE" #x15B4)
- ("CANADIAN SYLLABICS BLACKFOOT WI" #x15B5)
- ("CANADIAN SYLLABICS BLACKFOOT WO" #x15B6)
- ("CANADIAN SYLLABICS BLACKFOOT WA" #x15B7)
- ("CANADIAN SYLLABICS BLACKFOOT NE" #x15B8)
- ("CANADIAN SYLLABICS BLACKFOOT NI" #x15B9)
- ("CANADIAN SYLLABICS BLACKFOOT NO" #x15BA)
- ("CANADIAN SYLLABICS BLACKFOOT NA" #x15BB)
- ("CANADIAN SYLLABICS BLACKFOOT KE" #x15BC)
- ("CANADIAN SYLLABICS BLACKFOOT KI" #x15BD)
- ("CANADIAN SYLLABICS BLACKFOOT KO" #x15BE)
- ("CANADIAN SYLLABICS BLACKFOOT KA" #x15BF)
- ("CANADIAN SYLLABICS SAYISI HE" #x15C0)
- ("CANADIAN SYLLABICS SAYISI HI" #x15C1)
- ("CANADIAN SYLLABICS SAYISI HO" #x15C2)
- ("CANADIAN SYLLABICS SAYISI HA" #x15C3)
- ("CANADIAN SYLLABICS CARRIER GHU" #x15C4)
- ("CANADIAN SYLLABICS CARRIER GHO" #x15C5)
- ("CANADIAN SYLLABICS CARRIER GHE" #x15C6)
- ("CANADIAN SYLLABICS CARRIER GHEE" #x15C7)
- ("CANADIAN SYLLABICS CARRIER GHI" #x15C8)
- ("CANADIAN SYLLABICS CARRIER GHA" #x15C9)
- ("CANADIAN SYLLABICS CARRIER RU" #x15CA)
- ("CANADIAN SYLLABICS CARRIER RO" #x15CB)
- ("CANADIAN SYLLABICS CARRIER RE" #x15CC)
- ("CANADIAN SYLLABICS CARRIER REE" #x15CD)
- ("CANADIAN SYLLABICS CARRIER RI" #x15CE)
- ("CANADIAN SYLLABICS CARRIER RA" #x15CF)
- ("CANADIAN SYLLABICS CARRIER WU" #x15D0)
- ("CANADIAN SYLLABICS CARRIER WO" #x15D1)
- ("CANADIAN SYLLABICS CARRIER WE" #x15D2)
- ("CANADIAN SYLLABICS CARRIER WEE" #x15D3)
- ("CANADIAN SYLLABICS CARRIER WI" #x15D4)
- ("CANADIAN SYLLABICS CARRIER WA" #x15D5)
- ("CANADIAN SYLLABICS CARRIER HWU" #x15D6)
- ("CANADIAN SYLLABICS CARRIER HWO" #x15D7)
- ("CANADIAN SYLLABICS CARRIER HWE" #x15D8)
- ("CANADIAN SYLLABICS CARRIER HWEE" #x15D9)
- ("CANADIAN SYLLABICS CARRIER HWI" #x15DA)
- ("CANADIAN SYLLABICS CARRIER HWA" #x15DB)
- ("CANADIAN SYLLABICS CARRIER THU" #x15DC)
- ("CANADIAN SYLLABICS CARRIER THO" #x15DD)
- ("CANADIAN SYLLABICS CARRIER THE" #x15DE)
- ("CANADIAN SYLLABICS CARRIER THEE" #x15DF)
- ("CANADIAN SYLLABICS CARRIER THI" #x15E0)
- ("CANADIAN SYLLABICS CARRIER THA" #x15E1)
- ("CANADIAN SYLLABICS CARRIER TTU" #x15E2)
- ("CANADIAN SYLLABICS CARRIER TTO" #x15E3)
- ("CANADIAN SYLLABICS CARRIER TTE" #x15E4)
- ("CANADIAN SYLLABICS CARRIER TTEE" #x15E5)
- ("CANADIAN SYLLABICS CARRIER TTI" #x15E6)
- ("CANADIAN SYLLABICS CARRIER TTA" #x15E7)
- ("CANADIAN SYLLABICS CARRIER PU" #x15E8)
- ("CANADIAN SYLLABICS CARRIER PO" #x15E9)
- ("CANADIAN SYLLABICS CARRIER PE" #x15EA)
- ("CANADIAN SYLLABICS CARRIER PEE" #x15EB)
- ("CANADIAN SYLLABICS CARRIER PI" #x15EC)
- ("CANADIAN SYLLABICS CARRIER PA" #x15ED)
- ("CANADIAN SYLLABICS CARRIER P" #x15EE)
- ("CANADIAN SYLLABICS CARRIER GU" #x15EF)
- ("CANADIAN SYLLABICS CARRIER GO" #x15F0)
- ("CANADIAN SYLLABICS CARRIER GE" #x15F1)
- ("CANADIAN SYLLABICS CARRIER GEE" #x15F2)
- ("CANADIAN SYLLABICS CARRIER GI" #x15F3)
- ("CANADIAN SYLLABICS CARRIER GA" #x15F4)
- ("CANADIAN SYLLABICS CARRIER KHU" #x15F5)
- ("CANADIAN SYLLABICS CARRIER KHO" #x15F6)
- ("CANADIAN SYLLABICS CARRIER KHE" #x15F7)
- ("CANADIAN SYLLABICS CARRIER KHEE" #x15F8)
- ("CANADIAN SYLLABICS CARRIER KHI" #x15F9)
- ("CANADIAN SYLLABICS CARRIER KHA" #x15FA)
- ("CANADIAN SYLLABICS CARRIER KKU" #x15FB)
- ("CANADIAN SYLLABICS CARRIER KKO" #x15FC)
- ("CANADIAN SYLLABICS CARRIER KKE" #x15FD)
- ("CANADIAN SYLLABICS CARRIER KKEE" #x15FE)
- ("CANADIAN SYLLABICS CARRIER KKI" #x15FF)
- ("CANADIAN SYLLABICS CARRIER KKA" #x1600)
- ("CANADIAN SYLLABICS CARRIER KK" #x1601)
- ("CANADIAN SYLLABICS CARRIER NU" #x1602)
- ("CANADIAN SYLLABICS CARRIER NO" #x1603)
- ("CANADIAN SYLLABICS CARRIER NE" #x1604)
- ("CANADIAN SYLLABICS CARRIER NEE" #x1605)
- ("CANADIAN SYLLABICS CARRIER NI" #x1606)
- ("CANADIAN SYLLABICS CARRIER NA" #x1607)
- ("CANADIAN SYLLABICS CARRIER MU" #x1608)
- ("CANADIAN SYLLABICS CARRIER MO" #x1609)
- ("CANADIAN SYLLABICS CARRIER ME" #x160A)
- ("CANADIAN SYLLABICS CARRIER MEE" #x160B)
- ("CANADIAN SYLLABICS CARRIER MI" #x160C)
- ("CANADIAN SYLLABICS CARRIER MA" #x160D)
- ("CANADIAN SYLLABICS CARRIER YU" #x160E)
- ("CANADIAN SYLLABICS CARRIER YO" #x160F)
- ("CANADIAN SYLLABICS CARRIER YE" #x1610)
- ("CANADIAN SYLLABICS CARRIER YEE" #x1611)
- ("CANADIAN SYLLABICS CARRIER YI" #x1612)
- ("CANADIAN SYLLABICS CARRIER YA" #x1613)
- ("CANADIAN SYLLABICS CARRIER JU" #x1614)
- ("CANADIAN SYLLABICS SAYISI JU" #x1615)
- ("CANADIAN SYLLABICS CARRIER JO" #x1616)
- ("CANADIAN SYLLABICS CARRIER JE" #x1617)
- ("CANADIAN SYLLABICS CARRIER JEE" #x1618)
- ("CANADIAN SYLLABICS CARRIER JI" #x1619)
- ("CANADIAN SYLLABICS SAYISI JI" #x161A)
- ("CANADIAN SYLLABICS CARRIER JA" #x161B)
- ("CANADIAN SYLLABICS CARRIER JJU" #x161C)
- ("CANADIAN SYLLABICS CARRIER JJO" #x161D)
- ("CANADIAN SYLLABICS CARRIER JJE" #x161E)
- ("CANADIAN SYLLABICS CARRIER JJEE" #x161F)
- ("CANADIAN SYLLABICS CARRIER JJI" #x1620)
- ("CANADIAN SYLLABICS CARRIER JJA" #x1621)
- ("CANADIAN SYLLABICS CARRIER LU" #x1622)
- ("CANADIAN SYLLABICS CARRIER LO" #x1623)
- ("CANADIAN SYLLABICS CARRIER LE" #x1624)
- ("CANADIAN SYLLABICS CARRIER LEE" #x1625)
- ("CANADIAN SYLLABICS CARRIER LI" #x1626)
- ("CANADIAN SYLLABICS CARRIER LA" #x1627)
- ("CANADIAN SYLLABICS CARRIER DLU" #x1628)
- ("CANADIAN SYLLABICS CARRIER DLO" #x1629)
- ("CANADIAN SYLLABICS CARRIER DLE" #x162A)
- ("CANADIAN SYLLABICS CARRIER DLEE" #x162B)
- ("CANADIAN SYLLABICS CARRIER DLI" #x162C)
- ("CANADIAN SYLLABICS CARRIER DLA" #x162D)
- ("CANADIAN SYLLABICS CARRIER LHU" #x162E)
- ("CANADIAN SYLLABICS CARRIER LHO" #x162F)
- ("CANADIAN SYLLABICS CARRIER LHE" #x1630)
- ("CANADIAN SYLLABICS CARRIER LHEE" #x1631)
- ("CANADIAN SYLLABICS CARRIER LHI" #x1632)
- ("CANADIAN SYLLABICS CARRIER LHA" #x1633)
- ("CANADIAN SYLLABICS CARRIER TLHU" #x1634)
- ("CANADIAN SYLLABICS CARRIER TLHO" #x1635)
- ("CANADIAN SYLLABICS CARRIER TLHE" #x1636)
- ("CANADIAN SYLLABICS CARRIER TLHEE" #x1637)
- ("CANADIAN SYLLABICS CARRIER TLHI" #x1638)
- ("CANADIAN SYLLABICS CARRIER TLHA" #x1639)
- ("CANADIAN SYLLABICS CARRIER TLU" #x163A)
- ("CANADIAN SYLLABICS CARRIER TLO" #x163B)
- ("CANADIAN SYLLABICS CARRIER TLE" #x163C)
- ("CANADIAN SYLLABICS CARRIER TLEE" #x163D)
- ("CANADIAN SYLLABICS CARRIER TLI" #x163E)
- ("CANADIAN SYLLABICS CARRIER TLA" #x163F)
- ("CANADIAN SYLLABICS CARRIER ZU" #x1640)
- ("CANADIAN SYLLABICS CARRIER ZO" #x1641)
- ("CANADIAN SYLLABICS CARRIER ZE" #x1642)
- ("CANADIAN SYLLABICS CARRIER ZEE" #x1643)
- ("CANADIAN SYLLABICS CARRIER ZI" #x1644)
- ("CANADIAN SYLLABICS CARRIER ZA" #x1645)
- ("CANADIAN SYLLABICS CARRIER Z" #x1646)
- ("CANADIAN SYLLABICS CARRIER INITIAL Z" #x1647)
- ("CANADIAN SYLLABICS CARRIER DZU" #x1648)
- ("CANADIAN SYLLABICS CARRIER DZO" #x1649)
- ("CANADIAN SYLLABICS CARRIER DZE" #x164A)
- ("CANADIAN SYLLABICS CARRIER DZEE" #x164B)
- ("CANADIAN SYLLABICS CARRIER DZI" #x164C)
- ("CANADIAN SYLLABICS CARRIER DZA" #x164D)
- ("CANADIAN SYLLABICS CARRIER SU" #x164E)
- ("CANADIAN SYLLABICS CARRIER SO" #x164F)
- ("CANADIAN SYLLABICS CARRIER SE" #x1650)
- ("CANADIAN SYLLABICS CARRIER SEE" #x1651)
- ("CANADIAN SYLLABICS CARRIER SI" #x1652)
- ("CANADIAN SYLLABICS CARRIER SA" #x1653)
- ("CANADIAN SYLLABICS CARRIER SHU" #x1654)
- ("CANADIAN SYLLABICS CARRIER SHO" #x1655)
- ("CANADIAN SYLLABICS CARRIER SHE" #x1656)
- ("CANADIAN SYLLABICS CARRIER SHEE" #x1657)
- ("CANADIAN SYLLABICS CARRIER SHI" #x1658)
- ("CANADIAN SYLLABICS CARRIER SHA" #x1659)
- ("CANADIAN SYLLABICS CARRIER SH" #x165A)
- ("CANADIAN SYLLABICS CARRIER TSU" #x165B)
- ("CANADIAN SYLLABICS CARRIER TSO" #x165C)
- ("CANADIAN SYLLABICS CARRIER TSE" #x165D)
- ("CANADIAN SYLLABICS CARRIER TSEE" #x165E)
- ("CANADIAN SYLLABICS CARRIER TSI" #x165F)
- ("CANADIAN SYLLABICS CARRIER TSA" #x1660)
- ("CANADIAN SYLLABICS CARRIER CHU" #x1661)
- ("CANADIAN SYLLABICS CARRIER CHO" #x1662)
- ("CANADIAN SYLLABICS CARRIER CHE" #x1663)
- ("CANADIAN SYLLABICS CARRIER CHEE" #x1664)
- ("CANADIAN SYLLABICS CARRIER CHI" #x1665)
- ("CANADIAN SYLLABICS CARRIER CHA" #x1666)
- ("CANADIAN SYLLABICS CARRIER TTSU" #x1667)
- ("CANADIAN SYLLABICS CARRIER TTSO" #x1668)
- ("CANADIAN SYLLABICS CARRIER TTSE" #x1669)
- ("CANADIAN SYLLABICS CARRIER TTSEE" #x166A)
- ("CANADIAN SYLLABICS CARRIER TTSI" #x166B)
- ("CANADIAN SYLLABICS CARRIER TTSA" #x166C)
- ("CANADIAN SYLLABICS CHI SIGN" #x166D)
- ("CANADIAN SYLLABICS FULL STOP" #x166E)
- ("CANADIAN SYLLABICS QAI" #x166F)
- ("CANADIAN SYLLABICS NGAI" #x1670)
- ("CANADIAN SYLLABICS NNGI" #x1671)
- ("CANADIAN SYLLABICS NNGII" #x1672)
- ("CANADIAN SYLLABICS NNGO" #x1673)
- ("CANADIAN SYLLABICS NNGOO" #x1674)
- ("CANADIAN SYLLABICS NNGA" #x1675)
- ("CANADIAN SYLLABICS NNGAA" #x1676)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'ogham
- '(("OGHAM SPACE MARK" #x1680)
- ("OGHAM LETTER BEITH" #x1681)
- ("OGHAM LETTER LUIS" #x1682)
- ("OGHAM LETTER FEARN" #x1683)
- ("OGHAM LETTER SAIL" #x1684)
- ("OGHAM LETTER NION" #x1685)
- ("OGHAM LETTER UATH" #x1686)
- ("OGHAM LETTER DAIR" #x1687)
- ("OGHAM LETTER TINNE" #x1688)
- ("OGHAM LETTER COLL" #x1689)
- ("OGHAM LETTER CEIRT" #x168A)
- ("OGHAM LETTER MUIN" #x168B)
- ("OGHAM LETTER GORT" #x168C)
- ("OGHAM LETTER NGEADAL" #x168D)
- ("OGHAM LETTER STRAIF" #x168E)
- ("OGHAM LETTER RUIS" #x168F)
- ("OGHAM LETTER AILM" #x1690)
- ("OGHAM LETTER ONN" #x1691)
- ("OGHAM LETTER UR" #x1692)
- ("OGHAM LETTER EADHADH" #x1693)
- ("OGHAM LETTER IODHADH" #x1694)
- ("OGHAM LETTER EABHADH" #x1695)
- ("OGHAM LETTER OR" #x1696)
- ("OGHAM LETTER UILLEANN" #x1697)
- ("OGHAM LETTER IFIN" #x1698)
- ("OGHAM LETTER EAMHANCHOLL" #x1699)
- ("OGHAM LETTER PEITH" #x169A)
- ("OGHAM FEATHER MARK" #x169B)
- ("OGHAM REVERSED FEATHER MARK" #x169C)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'runic
- '(("RUNIC LETTER FEHU FEOH FE F" #x16A0)
- ("RUNIC LETTER V" #x16A1)
- ("RUNIC LETTER URUZ UR U" #x16A2)
- ("RUNIC LETTER YR" #x16A3)
- ("RUNIC LETTER Y" #x16A4)
- ("RUNIC LETTER W" #x16A5)
- ("RUNIC LETTER THURISAZ THURS THORN" #x16A6)
- ("RUNIC LETTER ETH" #x16A7)
- ("RUNIC LETTER ANSUZ A" #x16A8)
- ("RUNIC LETTER OS O" #x16A9)
- ("RUNIC LETTER AC A" #x16AA)
- ("RUNIC LETTER AESC" #x16AB)
- ("RUNIC LETTER LONG-BRANCH-OSS O" #x16AC)
- ("RUNIC LETTER SHORT-TWIG-OSS O" #x16AD)
- ("RUNIC LETTER O" #x16AE)
- ("RUNIC LETTER OE" #x16AF)
- ("RUNIC LETTER ON" #x16B0)
- ("RUNIC LETTER RAIDO RAD REID R" #x16B1)
- ("RUNIC LETTER KAUNA" #x16B2)
- ("RUNIC LETTER CEN" #x16B3)
- ("RUNIC LETTER KAUN K" #x16B4)
- ("RUNIC LETTER G" #x16B5)
- ("RUNIC LETTER ENG" #x16B6)
- ("RUNIC LETTER GEBO GYFU G" #x16B7)
- ("RUNIC LETTER GAR" #x16B8)
- ("RUNIC LETTER WUNJO WYNN W" #x16B9)
- ("RUNIC LETTER HAGLAZ H" #x16BA)
- ("RUNIC LETTER HAEGL H" #x16BB)
- ("RUNIC LETTER LONG-BRANCH-HAGALL H" #x16BC)
- ("RUNIC LETTER SHORT-TWIG-HAGALL H" #x16BD)
- ("RUNIC LETTER NAUDIZ NYD NAUD N" #x16BE)
- ("RUNIC LETTER SHORT-TWIG-NAUD N" #x16BF)
- ("RUNIC LETTER DOTTED-N" #x16C0)
- ("RUNIC LETTER ISAZ IS ISS I" #x16C1)
- ("RUNIC LETTER E" #x16C2)
- ("RUNIC LETTER JERAN J" #x16C3)
- ("RUNIC LETTER GER" #x16C4)
- ("RUNIC LETTER LONG-BRANCH-AR AE" #x16C5)
- ("RUNIC LETTER SHORT-TWIG-AR A" #x16C6)
- ("RUNIC LETTER IWAZ EOH" #x16C7)
- ("RUNIC LETTER PERTHO PEORTH P" #x16C8)
- ("RUNIC LETTER ALGIZ EOLHX" #x16C9)
- ("RUNIC LETTER SOWILO S" #x16CA)
- ("RUNIC LETTER SIGEL LONG-BRANCH-SOL S" #x16CB)
- ("RUNIC LETTER SHORT-TWIG-SOL S" #x16CC)
- ("RUNIC LETTER C" #x16CD)
- ("RUNIC LETTER Z" #x16CE)
- ("RUNIC LETTER TIWAZ TIR TYR T" #x16CF)
- ("RUNIC LETTER SHORT-TWIG-TYR T" #x16D0)
- ("RUNIC LETTER D" #x16D1)
- ("RUNIC LETTER BERKANAN BEORC BJARKAN B" #x16D2)
- ("RUNIC LETTER SHORT-TWIG-BJARKAN B" #x16D3)
- ("RUNIC LETTER DOTTED-P" #x16D4)
- ("RUNIC LETTER OPEN-P" #x16D5)
- ("RUNIC LETTER EHWAZ EH E" #x16D6)
- ("RUNIC LETTER MANNAZ MAN M" #x16D7)
- ("RUNIC LETTER LONG-BRANCH-MADR M" #x16D8)
- ("RUNIC LETTER SHORT-TWIG-MADR M" #x16D9)
- ("RUNIC LETTER LAUKAZ LAGU LOGR L" #x16DA)
- ("RUNIC LETTER DOTTED-L" #x16DB)
- ("RUNIC LETTER INGWAZ" #x16DC)
- ("RUNIC LETTER ING" #x16DD)
- ("RUNIC LETTER DAGAZ DAEG D" #x16DE)
- ("RUNIC LETTER OTHALAN ETHEL O" #x16DF)
- ("RUNIC LETTER EAR" #x16E0)
- ("RUNIC LETTER IOR" #x16E1)
- ("RUNIC LETTER CWEORTH" #x16E2)
- ("RUNIC LETTER CALC" #x16E3)
- ("RUNIC LETTER CEALC" #x16E4)
- ("RUNIC LETTER STAN" #x16E5)
- ("RUNIC LETTER LONG-BRANCH-YR" #x16E6)
- ("RUNIC LETTER SHORT-TWIG-YR" #x16E7)
- ("RUNIC LETTER ICELANDIC-YR" #x16E8)
- ("RUNIC LETTER Q" #x16E9)
- ("RUNIC LETTER X" #x16EA)
- ("RUNIC SINGLE PUNCTUATION" #x16EB)
- ("RUNIC MULTIPLE PUNCTUATION" #x16EC)
- ("RUNIC CROSS PUNCTUATION" #x16ED)
- ("RUNIC ARLAUG SYMBOL" #x16EE)
- ("RUNIC TVIMADUR SYMBOL" #x16EF)
- ("RUNIC BELGTHOR SYMBOL" #x16F0)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'tagalog
- '(("TAGALOG LETTER A" #x1700)
- ("TAGALOG LETTER I" #x1701)
- ("TAGALOG LETTER U" #x1702)
- ("TAGALOG LETTER KA" #x1703)
- ("TAGALOG LETTER GA" #x1704)
- ("TAGALOG LETTER NGA" #x1705)
- ("TAGALOG LETTER TA" #x1706)
- ("TAGALOG LETTER DA" #x1707)
- ("TAGALOG LETTER NA" #x1708)
- ("TAGALOG LETTER PA" #x1709)
- ("TAGALOG LETTER BA" #x170A)
- ("TAGALOG LETTER MA" #x170B)
- ("TAGALOG LETTER YA" #x170C)
- ("TAGALOG LETTER LA" #x170E)
- ("TAGALOG LETTER WA" #x170F)
- ("TAGALOG LETTER SA" #x1710)
- ("TAGALOG LETTER HA" #x1711)
- ("TAGALOG VOWEL SIGN I" #x1712)
- ("TAGALOG VOWEL SIGN U" #x1713)
- ("TAGALOG SIGN VIRAMA" #x1714)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'hanunoo
- '(("HANUNOO LETTER A" #x1720)
- ("HANUNOO LETTER I" #x1721)
- ("HANUNOO LETTER U" #x1722)
- ("HANUNOO LETTER KA" #x1723)
- ("HANUNOO LETTER GA" #x1724)
- ("HANUNOO LETTER NGA" #x1725)
- ("HANUNOO LETTER TA" #x1726)
- ("HANUNOO LETTER DA" #x1727)
- ("HANUNOO LETTER NA" #x1728)
- ("HANUNOO LETTER PA" #x1729)
- ("HANUNOO LETTER BA" #x172A)
- ("HANUNOO LETTER MA" #x172B)
- ("HANUNOO LETTER YA" #x172C)
- ("HANUNOO LETTER RA" #x172D)
- ("HANUNOO LETTER LA" #x172E)
- ("HANUNOO LETTER WA" #x172F)
- ("HANUNOO LETTER SA" #x1730)
- ("HANUNOO LETTER HA" #x1731)
- ("HANUNOO VOWEL SIGN I" #x1732)
- ("HANUNOO VOWEL SIGN U" #x1733)
- ("HANUNOO SIGN PAMUDPOD" #x1734)
- ("PHILIPPINE SINGLE PUNCTUATION" #x1735)
- ("PHILIPPINE DOUBLE PUNCTUATION" #x1736)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'buhid
- '(("BUHID LETTER A" #x1740)
- ("BUHID LETTER I" #x1741)
- ("BUHID LETTER U" #x1742)
- ("BUHID LETTER KA" #x1743)
- ("BUHID LETTER GA" #x1744)
- ("BUHID LETTER NGA" #x1745)
- ("BUHID LETTER TA" #x1746)
- ("BUHID LETTER DA" #x1747)
- ("BUHID LETTER NA" #x1748)
- ("BUHID LETTER PA" #x1749)
- ("BUHID LETTER BA" #x174A)
- ("BUHID LETTER MA" #x174B)
- ("BUHID LETTER YA" #x174C)
- ("BUHID LETTER RA" #x174D)
- ("BUHID LETTER LA" #x174E)
- ("BUHID LETTER WA" #x174F)
- ("BUHID LETTER SA" #x1750)
- ("BUHID LETTER HA" #x1751)
- ("BUHID VOWEL SIGN I" #x1752)
- ("BUHID VOWEL SIGN U" #x1753)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'tagbanwa
- '(("TAGBANWA LETTER A" #x1760)
- ("TAGBANWA LETTER I" #x1761)
- ("TAGBANWA LETTER U" #x1762)
- ("TAGBANWA LETTER KA" #x1763)
- ("TAGBANWA LETTER GA" #x1764)
- ("TAGBANWA LETTER NGA" #x1765)
- ("TAGBANWA LETTER TA" #x1766)
- ("TAGBANWA LETTER DA" #x1767)
- ("TAGBANWA LETTER NA" #x1768)
- ("TAGBANWA LETTER PA" #x1769)
- ("TAGBANWA LETTER BA" #x176A)
- ("TAGBANWA LETTER MA" #x176B)
- ("TAGBANWA LETTER YA" #x176C)
- ("TAGBANWA LETTER LA" #x176E)
- ("TAGBANWA LETTER WA" #x176F)
- ("TAGBANWA LETTER SA" #x1770)
- ("TAGBANWA VOWEL SIGN I" #x1772)
- ("TAGBANWA VOWEL SIGN U" #x1773)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'khmer
- '(("KHMER LETTER KA" #x1780)
- ("KHMER LETTER KHA" #x1781)
- ("KHMER LETTER KO" #x1782)
- ("KHMER LETTER KHO" #x1783)
- ("KHMER LETTER NGO" #x1784)
- ("KHMER LETTER CA" #x1785)
- ("KHMER LETTER CHA" #x1786)
- ("KHMER LETTER CO" #x1787)
- ("KHMER LETTER CHO" #x1788)
- ("KHMER LETTER NYO" #x1789)
- ("KHMER LETTER DA" #x178A)
- ("KHMER LETTER TTHA" #x178B)
- ("KHMER LETTER DO" #x178C)
- ("KHMER LETTER TTHO" #x178D)
- ("KHMER LETTER NNO" #x178E)
- ("KHMER LETTER TA" #x178F)
- ("KHMER LETTER THA" #x1790)
- ("KHMER LETTER TO" #x1791)
- ("KHMER LETTER THO" #x1792)
- ("KHMER LETTER NO" #x1793)
- ("KHMER LETTER BA" #x1794)
- ("KHMER LETTER PHA" #x1795)
- ("KHMER LETTER PO" #x1796)
- ("KHMER LETTER PHO" #x1797)
- ("KHMER LETTER MO" #x1798)
- ("KHMER LETTER YO" #x1799)
- ("KHMER LETTER RO" #x179A)
- ("KHMER LETTER LO" #x179B)
- ("KHMER LETTER VO" #x179C)
- ("KHMER LETTER SHA" #x179D)
- ("KHMER LETTER SSO" #x179E)
- ("KHMER LETTER SA" #x179F)
- ("KHMER LETTER HA" #x17A0)
- ("KHMER LETTER LA" #x17A1)
- ("KHMER LETTER QA" #x17A2)
- ("KHMER INDEPENDENT VOWEL QAQ" #x17A3)
- ("KHMER INDEPENDENT VOWEL QAA" #x17A4)
- ("KHMER INDEPENDENT VOWEL QI" #x17A5)
- ("KHMER INDEPENDENT VOWEL QII" #x17A6)
- ("KHMER INDEPENDENT VOWEL QU" #x17A7)
- ("KHMER INDEPENDENT VOWEL QUK" #x17A8)
- ("KHMER INDEPENDENT VOWEL QUU" #x17A9)
- ("KHMER INDEPENDENT VOWEL QUUV" #x17AA)
- ("KHMER INDEPENDENT VOWEL RY" #x17AB)
- ("KHMER INDEPENDENT VOWEL RYY" #x17AC)
- ("KHMER INDEPENDENT VOWEL LY" #x17AD)
- ("KHMER INDEPENDENT VOWEL LYY" #x17AE)
- ("KHMER INDEPENDENT VOWEL QE" #x17AF)
- ("KHMER INDEPENDENT VOWEL QAI" #x17B0)
- ("KHMER INDEPENDENT VOWEL QOO TYPE ONE" #x17B1)
- ("KHMER INDEPENDENT VOWEL QOO TYPE TWO" #x17B2)
- ("KHMER INDEPENDENT VOWEL QAU" #x17B3)
- ("KHMER VOWEL INHERENT AQ" #x17B4)
- ("KHMER VOWEL INHERENT AA" #x17B5)
- ("KHMER VOWEL SIGN AA" #x17B6)
- ("KHMER VOWEL SIGN I" #x17B7)
- ("KHMER VOWEL SIGN II" #x17B8)
- ("KHMER VOWEL SIGN Y" #x17B9)
- ("KHMER VOWEL SIGN YY" #x17BA)
- ("KHMER VOWEL SIGN U" #x17BB)
- ("KHMER VOWEL SIGN UU" #x17BC)
- ("KHMER VOWEL SIGN UA" #x17BD)
- ("KHMER VOWEL SIGN OE" #x17BE)
- ("KHMER VOWEL SIGN YA" #x17BF)
- ("KHMER VOWEL SIGN IE" #x17C0)
- ("KHMER VOWEL SIGN E" #x17C1)
- ("KHMER VOWEL SIGN AE" #x17C2)
- ("KHMER VOWEL SIGN AI" #x17C3)
- ("KHMER VOWEL SIGN OO" #x17C4)
- ("KHMER VOWEL SIGN AU" #x17C5)
- ("KHMER SIGN NIKAHIT" #x17C6)
- ("KHMER SIGN REAHMUK" #x17C7)
- ("KHMER SIGN YUUKALEAPINTU" #x17C8)
- ("KHMER SIGN MUUSIKATOAN" #x17C9)
- ("KHMER SIGN TRIISAP" #x17CA)
- ("KHMER SIGN BANTOC" #x17CB)
- ("KHMER SIGN ROBAT" #x17CC)
- ("KHMER SIGN TOANDAKHIAT" #x17CD)
- ("KHMER SIGN KAKABAT" #x17CE)
- ("KHMER SIGN AHSDA" #x17CF)
- ("KHMER SIGN SAMYOK SANNYA" #x17D0)
- ("KHMER SIGN VIRIAM" #x17D1)
- ("KHMER SIGN COENG" #x17D2)
- ("KHMER SIGN BATHAMASAT" #x17D3)
- ("KHMER SIGN KHAN" #x17D4)
- ("KHMER SIGN BARIYOOSAN" #x17D5)
- ("KHMER SIGN CAMNUC PII KUUH" #x17D6)
- ("KHMER SIGN LEK TOO" #x17D7)
- ("KHMER SIGN BEYYAL" #x17D8)
- ("KHMER SIGN PHNAEK MUAN" #x17D9)
- ("KHMER SIGN KOOMUUT" #x17DA)
- ("KHMER CURRENCY SYMBOL RIEL" #x17DB)
- ("KHMER SIGN AVAKRAHASANYA" #x17DC)
- ("KHMER DIGIT ZERO" #x17E0)
- ("KHMER DIGIT ONE" #x17E1)
- ("KHMER DIGIT TWO" #x17E2)
- ("KHMER DIGIT THREE" #x17E3)
- ("KHMER DIGIT FOUR" #x17E4)
- ("KHMER DIGIT FIVE" #x17E5)
- ("KHMER DIGIT SIX" #x17E6)
- ("KHMER DIGIT SEVEN" #x17E7)
- ("KHMER DIGIT EIGHT" #x17E8)
- ("KHMER DIGIT NINE" #x17E9)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'mongolian
- '(("MONGOLIAN BIRGA" #x1800)
- ("MONGOLIAN ELLIPSIS" #x1801)
- ("MONGOLIAN COMMA" #x1802)
- ("MONGOLIAN FULL STOP" #x1803)
- ("MONGOLIAN COLON" #x1804)
- ("MONGOLIAN FOUR DOTS" #x1805)
- ("MONGOLIAN TODO SOFT HYPHEN" #x1806)
- ("MONGOLIAN SIBE SYLLABLE BOUNDARY MARKER" #x1807)
- ("MONGOLIAN MANCHU COMMA" #x1808)
- ("MONGOLIAN MANCHU FULL STOP" #x1809)
- ("MONGOLIAN NIRUGU" #x180A)
- ("MONGOLIAN FREE VARIATION SELECTOR ONE" #x180B)
- ("MONGOLIAN FREE VARIATION SELECTOR TWO" #x180C)
- ("MONGOLIAN FREE VARIATION SELECTOR THREE" #x180D)
- ("MONGOLIAN VOWEL SEPARATOR" #x180E)
- ("MONGOLIAN DIGIT ZERO" #x1810)
- ("MONGOLIAN DIGIT ONE" #x1811)
- ("MONGOLIAN DIGIT TWO" #x1812)
- ("MONGOLIAN DIGIT THREE" #x1813)
- ("MONGOLIAN DIGIT FOUR" #x1814)
- ("MONGOLIAN DIGIT FIVE" #x1815)
- ("MONGOLIAN DIGIT SIX" #x1816)
- ("MONGOLIAN DIGIT SEVEN" #x1817)
- ("MONGOLIAN DIGIT EIGHT" #x1818)
- ("MONGOLIAN DIGIT NINE" #x1819)
- ("MONGOLIAN LETTER A" #x1820)
- ("MONGOLIAN LETTER E" #x1821)
- ("MONGOLIAN LETTER I" #x1822)
- ("MONGOLIAN LETTER O" #x1823)
- ("MONGOLIAN LETTER U" #x1824)
- ("MONGOLIAN LETTER OE" #x1825)
- ("MONGOLIAN LETTER UE" #x1826)
- ("MONGOLIAN LETTER EE" #x1827)
- ("MONGOLIAN LETTER NA" #x1828)
- ("MONGOLIAN LETTER ANG" #x1829)
- ("MONGOLIAN LETTER BA" #x182A)
- ("MONGOLIAN LETTER PA" #x182B)
- ("MONGOLIAN LETTER QA" #x182C)
- ("MONGOLIAN LETTER GA" #x182D)
- ("MONGOLIAN LETTER MA" #x182E)
- ("MONGOLIAN LETTER LA" #x182F)
- ("MONGOLIAN LETTER SA" #x1830)
- ("MONGOLIAN LETTER SHA" #x1831)
- ("MONGOLIAN LETTER TA" #x1832)
- ("MONGOLIAN LETTER DA" #x1833)
- ("MONGOLIAN LETTER CHA" #x1834)
- ("MONGOLIAN LETTER JA" #x1835)
- ("MONGOLIAN LETTER YA" #x1836)
- ("MONGOLIAN LETTER RA" #x1837)
- ("MONGOLIAN LETTER WA" #x1838)
- ("MONGOLIAN LETTER FA" #x1839)
- ("MONGOLIAN LETTER KA" #x183A)
- ("MONGOLIAN LETTER KHA" #x183B)
- ("MONGOLIAN LETTER TSA" #x183C)
- ("MONGOLIAN LETTER ZA" #x183D)
- ("MONGOLIAN LETTER HAA" #x183E)
- ("MONGOLIAN LETTER ZRA" #x183F)
- ("MONGOLIAN LETTER LHA" #x1840)
- ("MONGOLIAN LETTER ZHI" #x1841)
- ("MONGOLIAN LETTER CHI" #x1842)
- ("MONGOLIAN LETTER TODO LONG VOWEL SIGN" #x1843)
- ("MONGOLIAN LETTER TODO E" #x1844)
- ("MONGOLIAN LETTER TODO I" #x1845)
- ("MONGOLIAN LETTER TODO O" #x1846)
- ("MONGOLIAN LETTER TODO U" #x1847)
- ("MONGOLIAN LETTER TODO OE" #x1848)
- ("MONGOLIAN LETTER TODO UE" #x1849)
- ("MONGOLIAN LETTER TODO ANG" #x184A)
- ("MONGOLIAN LETTER TODO BA" #x184B)
- ("MONGOLIAN LETTER TODO PA" #x184C)
- ("MONGOLIAN LETTER TODO QA" #x184D)
- ("MONGOLIAN LETTER TODO GA" #x184E)
- ("MONGOLIAN LETTER TODO MA" #x184F)
- ("MONGOLIAN LETTER TODO TA" #x1850)
- ("MONGOLIAN LETTER TODO DA" #x1851)
- ("MONGOLIAN LETTER TODO CHA" #x1852)
- ("MONGOLIAN LETTER TODO JA" #x1853)
- ("MONGOLIAN LETTER TODO TSA" #x1854)
- ("MONGOLIAN LETTER TODO YA" #x1855)
- ("MONGOLIAN LETTER TODO WA" #x1856)
- ("MONGOLIAN LETTER TODO KA" #x1857)
- ("MONGOLIAN LETTER TODO GAA" #x1858)
- ("MONGOLIAN LETTER TODO HAA" #x1859)
- ("MONGOLIAN LETTER TODO JIA" #x185A)
- ("MONGOLIAN LETTER TODO NIA" #x185B)
- ("MONGOLIAN LETTER TODO DZA" #x185C)
- ("MONGOLIAN LETTER SIBE E" #x185D)
- ("MONGOLIAN LETTER SIBE I" #x185E)
- ("MONGOLIAN LETTER SIBE IY" #x185F)
- ("MONGOLIAN LETTER SIBE UE" #x1860)
- ("MONGOLIAN LETTER SIBE U" #x1861)
- ("MONGOLIAN LETTER SIBE ANG" #x1862)
- ("MONGOLIAN LETTER SIBE KA" #x1863)
- ("MONGOLIAN LETTER SIBE GA" #x1864)
- ("MONGOLIAN LETTER SIBE HA" #x1865)
- ("MONGOLIAN LETTER SIBE PA" #x1866)
- ("MONGOLIAN LETTER SIBE SHA" #x1867)
- ("MONGOLIAN LETTER SIBE TA" #x1868)
- ("MONGOLIAN LETTER SIBE DA" #x1869)
- ("MONGOLIAN LETTER SIBE JA" #x186A)
- ("MONGOLIAN LETTER SIBE FA" #x186B)
- ("MONGOLIAN LETTER SIBE GAA" #x186C)
- ("MONGOLIAN LETTER SIBE HAA" #x186D)
- ("MONGOLIAN LETTER SIBE TSA" #x186E)
- ("MONGOLIAN LETTER SIBE ZA" #x186F)
- ("MONGOLIAN LETTER SIBE RAA" #x1870)
- ("MONGOLIAN LETTER SIBE CHA" #x1871)
- ("MONGOLIAN LETTER SIBE ZHA" #x1872)
- ("MONGOLIAN LETTER MANCHU I" #x1873)
- ("MONGOLIAN LETTER MANCHU KA" #x1874)
- ("MONGOLIAN LETTER MANCHU RA" #x1875)
- ("MONGOLIAN LETTER MANCHU FA" #x1876)
- ("MONGOLIAN LETTER MANCHU ZHA" #x1877)
- ("MONGOLIAN LETTER ALI GALI ANUSVARA ONE" #x1880)
- ("MONGOLIAN LETTER ALI GALI VISARGA ONE" #x1881)
- ("MONGOLIAN LETTER ALI GALI DAMARU" #x1882)
- ("MONGOLIAN LETTER ALI GALI UBADAMA" #x1883)
- ("MONGOLIAN LETTER ALI GALI INVERTED UBADAMA" #x1884)
- ("MONGOLIAN LETTER ALI GALI BALUDA" #x1885)
- ("MONGOLIAN LETTER ALI GALI THREE BALUDA" #x1886)
- ("MONGOLIAN LETTER ALI GALI A" #x1887)
- ("MONGOLIAN LETTER ALI GALI I" #x1888)
- ("MONGOLIAN LETTER ALI GALI KA" #x1889)
- ("MONGOLIAN LETTER ALI GALI NGA" #x188A)
- ("MONGOLIAN LETTER ALI GALI CA" #x188B)
- ("MONGOLIAN LETTER ALI GALI TTA" #x188C)
- ("MONGOLIAN LETTER ALI GALI TTHA" #x188D)
- ("MONGOLIAN LETTER ALI GALI DDA" #x188E)
- ("MONGOLIAN LETTER ALI GALI NNA" #x188F)
- ("MONGOLIAN LETTER ALI GALI TA" #x1890)
- ("MONGOLIAN LETTER ALI GALI DA" #x1891)
- ("MONGOLIAN LETTER ALI GALI PA" #x1892)
- ("MONGOLIAN LETTER ALI GALI PHA" #x1893)
- ("MONGOLIAN LETTER ALI GALI SSA" #x1894)
- ("MONGOLIAN LETTER ALI GALI ZHA" #x1895)
- ("MONGOLIAN LETTER ALI GALI ZA" #x1896)
- ("MONGOLIAN LETTER ALI GALI AH" #x1897)
- ("MONGOLIAN LETTER TODO ALI GALI TA" #x1898)
- ("MONGOLIAN LETTER TODO ALI GALI ZHA" #x1899)
- ("MONGOLIAN LETTER MANCHU ALI GALI GHA" #x189A)
- ("MONGOLIAN LETTER MANCHU ALI GALI NGA" #x189B)
- ("MONGOLIAN LETTER MANCHU ALI GALI CA" #x189C)
- ("MONGOLIAN LETTER MANCHU ALI GALI JHA" #x189D)
- ("MONGOLIAN LETTER MANCHU ALI GALI TTA" #x189E)
- ("MONGOLIAN LETTER MANCHU ALI GALI DDHA" #x189F)
- ("MONGOLIAN LETTER MANCHU ALI GALI TA" #x18A0)
- ("MONGOLIAN LETTER MANCHU ALI GALI DHA" #x18A1)
- ("MONGOLIAN LETTER MANCHU ALI GALI SSA" #x18A2)
- ("MONGOLIAN LETTER MANCHU ALI GALI CYA" #x18A3)
- ("MONGOLIAN LETTER MANCHU ALI GALI ZHA" #x18A4)
- ("MONGOLIAN LETTER MANCHU ALI GALI ZA" #x18A5)
- ("MONGOLIAN LETTER ALI GALI HALF U" #x18A6)
- ("MONGOLIAN LETTER ALI GALI HALF YA" #x18A7)
- ("MONGOLIAN LETTER MANCHU ALI GALI BHA" #x18A8)
- ("MONGOLIAN LETTER ALI GALI DAGALGA" #x18A9)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'latin-extended-additional
- '(("LATIN CAPITAL LETTER A WITH RING BELOW" #x1E00)
- ("LATIN SMALL LETTER A WITH RING BELOW" #x1E01)
- ("LATIN CAPITAL LETTER B WITH DOT ABOVE" #x1E02)
- ("LATIN SMALL LETTER B WITH DOT ABOVE" #x1E03)
- ("LATIN CAPITAL LETTER B WITH DOT BELOW" #x1E04)
- ("LATIN SMALL LETTER B WITH DOT BELOW" #x1E05)
- ("LATIN CAPITAL LETTER B WITH LINE BELOW" #x1E06)
- ("LATIN SMALL LETTER B WITH LINE BELOW" #x1E07)
- ("LATIN CAPITAL LETTER C WITH CEDILLA AND ACUTE" #x1E08)
- ("LATIN SMALL LETTER C WITH CEDILLA AND ACUTE" #x1E09)
- ("LATIN CAPITAL LETTER D WITH DOT ABOVE" #x1E0A)
- ("LATIN SMALL LETTER D WITH DOT ABOVE" #x1E0B)
- ("LATIN CAPITAL LETTER D WITH DOT BELOW" #x1E0C)
- ("LATIN SMALL LETTER D WITH DOT BELOW" #x1E0D)
- ("LATIN CAPITAL LETTER D WITH LINE BELOW" #x1E0E)
- ("LATIN SMALL LETTER D WITH LINE BELOW" #x1E0F)
- ("LATIN CAPITAL LETTER D WITH CEDILLA" #x1E10)
- ("LATIN SMALL LETTER D WITH CEDILLA" #x1E11)
- ("LATIN CAPITAL LETTER D WITH CIRCUMFLEX BELOW" #x1E12)
- ("LATIN SMALL LETTER D WITH CIRCUMFLEX BELOW" #x1E13)
- ("LATIN CAPITAL LETTER E WITH MACRON AND GRAVE" #x1E14)
- ("LATIN SMALL LETTER E WITH MACRON AND GRAVE" #x1E15)
- ("LATIN CAPITAL LETTER E WITH MACRON AND ACUTE" #x1E16)
- ("LATIN SMALL LETTER E WITH MACRON AND ACUTE" #x1E17)
- ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX BELOW" #x1E18)
- ("LATIN SMALL LETTER E WITH CIRCUMFLEX BELOW" #x1E19)
- ("LATIN CAPITAL LETTER E WITH TILDE BELOW" #x1E1A)
- ("LATIN SMALL LETTER E WITH TILDE BELOW" #x1E1B)
- ("LATIN CAPITAL LETTER E WITH CEDILLA AND BREVE" #x1E1C)
- ("LATIN SMALL LETTER E WITH CEDILLA AND BREVE" #x1E1D)
- ("LATIN CAPITAL LETTER F WITH DOT ABOVE" #x1E1E)
- ("LATIN SMALL LETTER F WITH DOT ABOVE" #x1E1F)
- ("LATIN CAPITAL LETTER G WITH MACRON" #x1E20)
- ("LATIN SMALL LETTER G WITH MACRON" #x1E21)
- ("LATIN CAPITAL LETTER H WITH DOT ABOVE" #x1E22)
- ("LATIN SMALL LETTER H WITH DOT ABOVE" #x1E23)
- ("LATIN CAPITAL LETTER H WITH DOT BELOW" #x1E24)
- ("LATIN SMALL LETTER H WITH DOT BELOW" #x1E25)
- ("LATIN CAPITAL LETTER H WITH DIAERESIS" #x1E26)
- ("LATIN SMALL LETTER H WITH DIAERESIS" #x1E27)
- ("LATIN CAPITAL LETTER H WITH CEDILLA" #x1E28)
- ("LATIN SMALL LETTER H WITH CEDILLA" #x1E29)
- ("LATIN CAPITAL LETTER H WITH BREVE BELOW" #x1E2A)
- ("LATIN SMALL LETTER H WITH BREVE BELOW" #x1E2B)
- ("LATIN CAPITAL LETTER I WITH TILDE BELOW" #x1E2C)
- ("LATIN SMALL LETTER I WITH TILDE BELOW" #x1E2D)
- ("LATIN CAPITAL LETTER I WITH DIAERESIS AND ACUTE" #x1E2E)
- ("LATIN SMALL LETTER I WITH DIAERESIS AND ACUTE" #x1E2F)
- ("LATIN CAPITAL LETTER K WITH ACUTE" #x1E30)
- ("LATIN SMALL LETTER K WITH ACUTE" #x1E31)
- ("LATIN CAPITAL LETTER K WITH DOT BELOW" #x1E32)
- ("LATIN SMALL LETTER K WITH DOT BELOW" #x1E33)
- ("LATIN CAPITAL LETTER K WITH LINE BELOW" #x1E34)
- ("LATIN SMALL LETTER K WITH LINE BELOW" #x1E35)
- ("LATIN CAPITAL LETTER L WITH DOT BELOW" #x1E36)
- ("LATIN SMALL LETTER L WITH DOT BELOW" #x1E37)
- ("LATIN CAPITAL LETTER L WITH DOT BELOW AND MACRON" #x1E38)
- ("LATIN SMALL LETTER L WITH DOT BELOW AND MACRON" #x1E39)
- ("LATIN CAPITAL LETTER L WITH LINE BELOW" #x1E3A)
- ("LATIN SMALL LETTER L WITH LINE BELOW" #x1E3B)
- ("LATIN CAPITAL LETTER L WITH CIRCUMFLEX BELOW" #x1E3C)
- ("LATIN SMALL LETTER L WITH CIRCUMFLEX BELOW" #x1E3D)
- ("LATIN CAPITAL LETTER M WITH ACUTE" #x1E3E)
- ("LATIN SMALL LETTER M WITH ACUTE" #x1E3F)
- ("LATIN CAPITAL LETTER M WITH DOT ABOVE" #x1E40)
- ("LATIN SMALL LETTER M WITH DOT ABOVE" #x1E41)
- ("LATIN CAPITAL LETTER M WITH DOT BELOW" #x1E42)
- ("LATIN SMALL LETTER M WITH DOT BELOW" #x1E43)
- ("LATIN CAPITAL LETTER N WITH DOT ABOVE" #x1E44)
- ("LATIN SMALL LETTER N WITH DOT ABOVE" #x1E45)
- ("LATIN CAPITAL LETTER N WITH DOT BELOW" #x1E46)
- ("LATIN SMALL LETTER N WITH DOT BELOW" #x1E47)
- ("LATIN CAPITAL LETTER N WITH LINE BELOW" #x1E48)
- ("LATIN SMALL LETTER N WITH LINE BELOW" #x1E49)
- ("LATIN CAPITAL LETTER N WITH CIRCUMFLEX BELOW" #x1E4A)
- ("LATIN SMALL LETTER N WITH CIRCUMFLEX BELOW" #x1E4B)
- ("LATIN CAPITAL LETTER O WITH TILDE AND ACUTE" #x1E4C)
- ("LATIN SMALL LETTER O WITH TILDE AND ACUTE" #x1E4D)
- ("LATIN CAPITAL LETTER O WITH TILDE AND DIAERESIS" #x1E4E)
- ("LATIN SMALL LETTER O WITH TILDE AND DIAERESIS" #x1E4F)
- ("LATIN CAPITAL LETTER O WITH MACRON AND GRAVE" #x1E50)
- ("LATIN SMALL LETTER O WITH MACRON AND GRAVE" #x1E51)
- ("LATIN CAPITAL LETTER O WITH MACRON AND ACUTE" #x1E52)
- ("LATIN SMALL LETTER O WITH MACRON AND ACUTE" #x1E53)
- ("LATIN CAPITAL LETTER P WITH ACUTE" #x1E54)
- ("LATIN SMALL LETTER P WITH ACUTE" #x1E55)
- ("LATIN CAPITAL LETTER P WITH DOT ABOVE" #x1E56)
- ("LATIN SMALL LETTER P WITH DOT ABOVE" #x1E57)
- ("LATIN CAPITAL LETTER R WITH DOT ABOVE" #x1E58)
- ("LATIN SMALL LETTER R WITH DOT ABOVE" #x1E59)
- ("LATIN CAPITAL LETTER R WITH DOT BELOW" #x1E5A)
- ("LATIN SMALL LETTER R WITH DOT BELOW" #x1E5B)
- ("LATIN CAPITAL LETTER R WITH DOT BELOW AND MACRON" #x1E5C)
- ("LATIN SMALL LETTER R WITH DOT BELOW AND MACRON" #x1E5D)
- ("LATIN CAPITAL LETTER R WITH LINE BELOW" #x1E5E)
- ("LATIN SMALL LETTER R WITH LINE BELOW" #x1E5F)
- ("LATIN CAPITAL LETTER S WITH DOT ABOVE" #x1E60)
- ("LATIN SMALL LETTER S WITH DOT ABOVE" #x1E61)
- ("LATIN CAPITAL LETTER S WITH DOT BELOW" #x1E62)
- ("LATIN SMALL LETTER S WITH DOT BELOW" #x1E63)
- ("LATIN CAPITAL LETTER S WITH ACUTE AND DOT ABOVE" #x1E64)
- ("LATIN SMALL LETTER S WITH ACUTE AND DOT ABOVE" #x1E65)
- ("LATIN CAPITAL LETTER S WITH CARON AND DOT ABOVE" #x1E66)
- ("LATIN SMALL LETTER S WITH CARON AND DOT ABOVE" #x1E67)
- ("LATIN CAPITAL LETTER S WITH DOT BELOW AND DOT ABOVE" #x1E68)
- ("LATIN SMALL LETTER S WITH DOT BELOW AND DOT ABOVE" #x1E69)
- ("LATIN CAPITAL LETTER T WITH DOT ABOVE" #x1E6A)
- ("LATIN SMALL LETTER T WITH DOT ABOVE" #x1E6B)
- ("LATIN CAPITAL LETTER T WITH DOT BELOW" #x1E6C)
- ("LATIN SMALL LETTER T WITH DOT BELOW" #x1E6D)
- ("LATIN CAPITAL LETTER T WITH LINE BELOW" #x1E6E)
- ("LATIN SMALL LETTER T WITH LINE BELOW" #x1E6F)
- ("LATIN CAPITAL LETTER T WITH CIRCUMFLEX BELOW" #x1E70)
- ("LATIN SMALL LETTER T WITH CIRCUMFLEX BELOW" #x1E71)
- ("LATIN CAPITAL LETTER U WITH DIAERESIS BELOW" #x1E72)
- ("LATIN SMALL LETTER U WITH DIAERESIS BELOW" #x1E73)
- ("LATIN CAPITAL LETTER U WITH TILDE BELOW" #x1E74)
- ("LATIN SMALL LETTER U WITH TILDE BELOW" #x1E75)
- ("LATIN CAPITAL LETTER U WITH CIRCUMFLEX BELOW" #x1E76)
- ("LATIN SMALL LETTER U WITH CIRCUMFLEX BELOW" #x1E77)
- ("LATIN CAPITAL LETTER U WITH TILDE AND ACUTE" #x1E78)
- ("LATIN SMALL LETTER U WITH TILDE AND ACUTE" #x1E79)
- ("LATIN CAPITAL LETTER U WITH MACRON AND DIAERESIS" #x1E7A)
- ("LATIN SMALL LETTER U WITH MACRON AND DIAERESIS" #x1E7B)
- ("LATIN CAPITAL LETTER V WITH TILDE" #x1E7C)
- ("LATIN SMALL LETTER V WITH TILDE" #x1E7D)
- ("LATIN CAPITAL LETTER V WITH DOT BELOW" #x1E7E)
- ("LATIN SMALL LETTER V WITH DOT BELOW" #x1E7F)
- ("LATIN CAPITAL LETTER W WITH GRAVE" #x1E80)
- ("LATIN SMALL LETTER W WITH GRAVE" #x1E81)
- ("LATIN CAPITAL LETTER W WITH ACUTE" #x1E82)
- ("LATIN SMALL LETTER W WITH ACUTE" #x1E83)
- ("LATIN CAPITAL LETTER W WITH DIAERESIS" #x1E84)
- ("LATIN SMALL LETTER W WITH DIAERESIS" #x1E85)
- ("LATIN CAPITAL LETTER W WITH DOT ABOVE" #x1E86)
- ("LATIN SMALL LETTER W WITH DOT ABOVE" #x1E87)
- ("LATIN CAPITAL LETTER W WITH DOT BELOW" #x1E88)
- ("LATIN SMALL LETTER W WITH DOT BELOW" #x1E89)
- ("LATIN CAPITAL LETTER X WITH DOT ABOVE" #x1E8A)
- ("LATIN SMALL LETTER X WITH DOT ABOVE" #x1E8B)
- ("LATIN CAPITAL LETTER X WITH DIAERESIS" #x1E8C)
- ("LATIN SMALL LETTER X WITH DIAERESIS" #x1E8D)
- ("LATIN CAPITAL LETTER Y WITH DOT ABOVE" #x1E8E)
- ("LATIN SMALL LETTER Y WITH DOT ABOVE" #x1E8F)
- ("LATIN CAPITAL LETTER Z WITH CIRCUMFLEX" #x1E90)
- ("LATIN SMALL LETTER Z WITH CIRCUMFLEX" #x1E91)
- ("LATIN CAPITAL LETTER Z WITH DOT BELOW" #x1E92)
- ("LATIN SMALL LETTER Z WITH DOT BELOW" #x1E93)
- ("LATIN CAPITAL LETTER Z WITH LINE BELOW" #x1E94)
- ("LATIN SMALL LETTER Z WITH LINE BELOW" #x1E95)
- ("LATIN SMALL LETTER H WITH LINE BELOW" #x1E96)
- ("LATIN SMALL LETTER T WITH DIAERESIS" #x1E97)
- ("LATIN SMALL LETTER W WITH RING ABOVE" #x1E98)
- ("LATIN SMALL LETTER Y WITH RING ABOVE" #x1E99)
- ("LATIN SMALL LETTER A WITH RIGHT HALF RING" #x1E9A)
- ("LATIN SMALL LETTER LONG S WITH DOT ABOVE" #x1E9B)
- ("LATIN CAPITAL LETTER A WITH DOT BELOW" #x1EA0)
- ("LATIN SMALL LETTER A WITH DOT BELOW" #x1EA1)
- ("LATIN CAPITAL LETTER A WITH HOOK ABOVE" #x1EA2)
- ("LATIN SMALL LETTER A WITH HOOK ABOVE" #x1EA3)
- ("LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND ACUTE" #x1EA4)
- ("LATIN SMALL LETTER A WITH CIRCUMFLEX AND ACUTE" #x1EA5)
- ("LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND GRAVE" #x1EA6)
- ("LATIN SMALL LETTER A WITH CIRCUMFLEX AND GRAVE" #x1EA7)
- ("LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND HOOK ABOVE" #x1EA8)
- ("LATIN SMALL LETTER A WITH CIRCUMFLEX AND HOOK ABOVE" #x1EA9)
- ("LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND TILDE" #x1EAA)
- ("LATIN SMALL LETTER A WITH CIRCUMFLEX AND TILDE" #x1EAB)
- ("LATIN CAPITAL LETTER A WITH CIRCUMFLEX AND DOT BELOW" #x1EAC)
- ("LATIN SMALL LETTER A WITH CIRCUMFLEX AND DOT BELOW" #x1EAD)
- ("LATIN CAPITAL LETTER A WITH BREVE AND ACUTE" #x1EAE)
- ("LATIN SMALL LETTER A WITH BREVE AND ACUTE" #x1EAF)
- ("LATIN CAPITAL LETTER A WITH BREVE AND GRAVE" #x1EB0)
- ("LATIN SMALL LETTER A WITH BREVE AND GRAVE" #x1EB1)
- ("LATIN CAPITAL LETTER A WITH BREVE AND HOOK ABOVE" #x1EB2)
- ("LATIN SMALL LETTER A WITH BREVE AND HOOK ABOVE" #x1EB3)
- ("LATIN CAPITAL LETTER A WITH BREVE AND TILDE" #x1EB4)
- ("LATIN SMALL LETTER A WITH BREVE AND TILDE" #x1EB5)
- ("LATIN CAPITAL LETTER A WITH BREVE AND DOT BELOW" #x1EB6)
- ("LATIN SMALL LETTER A WITH BREVE AND DOT BELOW" #x1EB7)
- ("LATIN CAPITAL LETTER E WITH DOT BELOW" #x1EB8)
- ("LATIN SMALL LETTER E WITH DOT BELOW" #x1EB9)
- ("LATIN CAPITAL LETTER E WITH HOOK ABOVE" #x1EBA)
- ("LATIN SMALL LETTER E WITH HOOK ABOVE" #x1EBB)
- ("LATIN CAPITAL LETTER E WITH TILDE" #x1EBC)
- ("LATIN SMALL LETTER E WITH TILDE" #x1EBD)
- ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND ACUTE" #x1EBE)
- ("LATIN SMALL LETTER E WITH CIRCUMFLEX AND ACUTE" #x1EBF)
- ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND GRAVE" #x1EC0)
- ("LATIN SMALL LETTER E WITH CIRCUMFLEX AND GRAVE" #x1EC1)
- ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND HOOK ABOVE" #x1EC2)
- ("LATIN SMALL LETTER E WITH CIRCUMFLEX AND HOOK ABOVE" #x1EC3)
- ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND TILDE" #x1EC4)
- ("LATIN SMALL LETTER E WITH CIRCUMFLEX AND TILDE" #x1EC5)
- ("LATIN CAPITAL LETTER E WITH CIRCUMFLEX AND DOT BELOW" #x1EC6)
- ("LATIN SMALL LETTER E WITH CIRCUMFLEX AND DOT BELOW" #x1EC7)
- ("LATIN CAPITAL LETTER I WITH HOOK ABOVE" #x1EC8)
- ("LATIN SMALL LETTER I WITH HOOK ABOVE" #x1EC9)
- ("LATIN CAPITAL LETTER I WITH DOT BELOW" #x1ECA)
- ("LATIN SMALL LETTER I WITH DOT BELOW" #x1ECB)
- ("LATIN CAPITAL LETTER O WITH DOT BELOW" #x1ECC)
- ("LATIN SMALL LETTER O WITH DOT BELOW" #x1ECD)
- ("LATIN CAPITAL LETTER O WITH HOOK ABOVE" #x1ECE)
- ("LATIN SMALL LETTER O WITH HOOK ABOVE" #x1ECF)
- ("LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND ACUTE" #x1ED0)
- ("LATIN SMALL LETTER O WITH CIRCUMFLEX AND ACUTE" #x1ED1)
- ("LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND GRAVE" #x1ED2)
- ("LATIN SMALL LETTER O WITH CIRCUMFLEX AND GRAVE" #x1ED3)
- ("LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND HOOK ABOVE" #x1ED4)
- ("LATIN SMALL LETTER O WITH CIRCUMFLEX AND HOOK ABOVE" #x1ED5)
- ("LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND TILDE" #x1ED6)
- ("LATIN SMALL LETTER O WITH CIRCUMFLEX AND TILDE" #x1ED7)
- ("LATIN CAPITAL LETTER O WITH CIRCUMFLEX AND DOT BELOW" #x1ED8)
- ("LATIN SMALL LETTER O WITH CIRCUMFLEX AND DOT BELOW" #x1ED9)
- ("LATIN CAPITAL LETTER O WITH HORN AND ACUTE" #x1EDA)
- ("LATIN SMALL LETTER O WITH HORN AND ACUTE" #x1EDB)
- ("LATIN CAPITAL LETTER O WITH HORN AND GRAVE" #x1EDC)
- ("LATIN SMALL LETTER O WITH HORN AND GRAVE" #x1EDD)
- ("LATIN CAPITAL LETTER O WITH HORN AND HOOK ABOVE" #x1EDE)
- ("LATIN SMALL LETTER O WITH HORN AND HOOK ABOVE" #x1EDF)
- ("LATIN CAPITAL LETTER O WITH HORN AND TILDE" #x1EE0)
- ("LATIN SMALL LETTER O WITH HORN AND TILDE" #x1EE1)
- ("LATIN CAPITAL LETTER O WITH HORN AND DOT BELOW" #x1EE2)
- ("LATIN SMALL LETTER O WITH HORN AND DOT BELOW" #x1EE3)
- ("LATIN CAPITAL LETTER U WITH DOT BELOW" #x1EE4)
- ("LATIN SMALL LETTER U WITH DOT BELOW" #x1EE5)
- ("LATIN CAPITAL LETTER U WITH HOOK ABOVE" #x1EE6)
- ("LATIN SMALL LETTER U WITH HOOK ABOVE" #x1EE7)
- ("LATIN CAPITAL LETTER U WITH HORN AND ACUTE" #x1EE8)
- ("LATIN SMALL LETTER U WITH HORN AND ACUTE" #x1EE9)
- ("LATIN CAPITAL LETTER U WITH HORN AND GRAVE" #x1EEA)
- ("LATIN SMALL LETTER U WITH HORN AND GRAVE" #x1EEB)
- ("LATIN CAPITAL LETTER U WITH HORN AND HOOK ABOVE" #x1EEC)
- ("LATIN SMALL LETTER U WITH HORN AND HOOK ABOVE" #x1EED)
- ("LATIN CAPITAL LETTER U WITH HORN AND TILDE" #x1EEE)
- ("LATIN SMALL LETTER U WITH HORN AND TILDE" #x1EEF)
- ("LATIN CAPITAL LETTER U WITH HORN AND DOT BELOW" #x1EF0)
- ("LATIN SMALL LETTER U WITH HORN AND DOT BELOW" #x1EF1)
- ("LATIN CAPITAL LETTER Y WITH GRAVE" #x1EF2)
- ("LATIN SMALL LETTER Y WITH GRAVE" #x1EF3)
- ("LATIN CAPITAL LETTER Y WITH DOT BELOW" #x1EF4)
- ("LATIN SMALL LETTER Y WITH DOT BELOW" #x1EF5)
- ("LATIN CAPITAL LETTER Y WITH HOOK ABOVE" #x1EF6)
- ("LATIN SMALL LETTER Y WITH HOOK ABOVE" #x1EF7)
- ("LATIN CAPITAL LETTER Y WITH TILDE" #x1EF8)
- ("LATIN SMALL LETTER Y WITH TILDE" #x1EF9)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'greek-extended
- '(("GREEK SMALL LETTER ALPHA WITH PSILI" #x1F00)
- ("GREEK SMALL LETTER ALPHA WITH DASIA" #x1F01)
- ("GREEK SMALL LETTER ALPHA WITH PSILI AND VARIA" #x1F02)
- ("GREEK SMALL LETTER ALPHA WITH DASIA AND VARIA" #x1F03)
- ("GREEK SMALL LETTER ALPHA WITH PSILI AND OXIA" #x1F04)
- ("GREEK SMALL LETTER ALPHA WITH DASIA AND OXIA" #x1F05)
- ("GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI" #x1F06)
- ("GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI" #x1F07)
- ("GREEK CAPITAL LETTER ALPHA WITH PSILI" #x1F08)
- ("GREEK CAPITAL LETTER ALPHA WITH DASIA" #x1F09)
- ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND VARIA" #x1F0A)
- ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND VARIA" #x1F0B)
- ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND OXIA" #x1F0C)
- ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND OXIA" #x1F0D)
- ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI" #x1F0E)
- ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI" #x1F0F)
- ("GREEK SMALL LETTER EPSILON WITH PSILI" #x1F10)
- ("GREEK SMALL LETTER EPSILON WITH DASIA" #x1F11)
- ("GREEK SMALL LETTER EPSILON WITH PSILI AND VARIA" #x1F12)
- ("GREEK SMALL LETTER EPSILON WITH DASIA AND VARIA" #x1F13)
- ("GREEK SMALL LETTER EPSILON WITH PSILI AND OXIA" #x1F14)
- ("GREEK SMALL LETTER EPSILON WITH DASIA AND OXIA" #x1F15)
- ("GREEK CAPITAL LETTER EPSILON WITH PSILI" #x1F18)
- ("GREEK CAPITAL LETTER EPSILON WITH DASIA" #x1F19)
- ("GREEK CAPITAL LETTER EPSILON WITH PSILI AND VARIA" #x1F1A)
- ("GREEK CAPITAL LETTER EPSILON WITH DASIA AND VARIA" #x1F1B)
- ("GREEK CAPITAL LETTER EPSILON WITH PSILI AND OXIA" #x1F1C)
- ("GREEK CAPITAL LETTER EPSILON WITH DASIA AND OXIA" #x1F1D)
- ("GREEK SMALL LETTER ETA WITH PSILI" #x1F20)
- ("GREEK SMALL LETTER ETA WITH DASIA" #x1F21)
- ("GREEK SMALL LETTER ETA WITH PSILI AND VARIA" #x1F22)
- ("GREEK SMALL LETTER ETA WITH DASIA AND VARIA" #x1F23)
- ("GREEK SMALL LETTER ETA WITH PSILI AND OXIA" #x1F24)
- ("GREEK SMALL LETTER ETA WITH DASIA AND OXIA" #x1F25)
- ("GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI" #x1F26)
- ("GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI" #x1F27)
- ("GREEK CAPITAL LETTER ETA WITH PSILI" #x1F28)
- ("GREEK CAPITAL LETTER ETA WITH DASIA" #x1F29)
- ("GREEK CAPITAL LETTER ETA WITH PSILI AND VARIA" #x1F2A)
- ("GREEK CAPITAL LETTER ETA WITH DASIA AND VARIA" #x1F2B)
- ("GREEK CAPITAL LETTER ETA WITH PSILI AND OXIA" #x1F2C)
- ("GREEK CAPITAL LETTER ETA WITH DASIA AND OXIA" #x1F2D)
- ("GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI" #x1F2E)
- ("GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI" #x1F2F)
- ("GREEK SMALL LETTER IOTA WITH PSILI" #x1F30)
- ("GREEK SMALL LETTER IOTA WITH DASIA" #x1F31)
- ("GREEK SMALL LETTER IOTA WITH PSILI AND VARIA" #x1F32)
- ("GREEK SMALL LETTER IOTA WITH DASIA AND VARIA" #x1F33)
- ("GREEK SMALL LETTER IOTA WITH PSILI AND OXIA" #x1F34)
- ("GREEK SMALL LETTER IOTA WITH DASIA AND OXIA" #x1F35)
- ("GREEK SMALL LETTER IOTA WITH PSILI AND PERISPOMENI" #x1F36)
- ("GREEK SMALL LETTER IOTA WITH DASIA AND PERISPOMENI" #x1F37)
- ("GREEK CAPITAL LETTER IOTA WITH PSILI" #x1F38)
- ("GREEK CAPITAL LETTER IOTA WITH DASIA" #x1F39)
- ("GREEK CAPITAL LETTER IOTA WITH PSILI AND VARIA" #x1F3A)
- ("GREEK CAPITAL LETTER IOTA WITH DASIA AND VARIA" #x1F3B)
- ("GREEK CAPITAL LETTER IOTA WITH PSILI AND OXIA" #x1F3C)
- ("GREEK CAPITAL LETTER IOTA WITH DASIA AND OXIA" #x1F3D)
- ("GREEK CAPITAL LETTER IOTA WITH PSILI AND PERISPOMENI" #x1F3E)
- ("GREEK CAPITAL LETTER IOTA WITH DASIA AND PERISPOMENI" #x1F3F)
- ("GREEK SMALL LETTER OMICRON WITH PSILI" #x1F40)
- ("GREEK SMALL LETTER OMICRON WITH DASIA" #x1F41)
- ("GREEK SMALL LETTER OMICRON WITH PSILI AND VARIA" #x1F42)
- ("GREEK SMALL LETTER OMICRON WITH DASIA AND VARIA" #x1F43)
- ("GREEK SMALL LETTER OMICRON WITH PSILI AND OXIA" #x1F44)
- ("GREEK SMALL LETTER OMICRON WITH DASIA AND OXIA" #x1F45)
- ("GREEK CAPITAL LETTER OMICRON WITH PSILI" #x1F48)
- ("GREEK CAPITAL LETTER OMICRON WITH DASIA" #x1F49)
- ("GREEK CAPITAL LETTER OMICRON WITH PSILI AND VARIA" #x1F4A)
- ("GREEK CAPITAL LETTER OMICRON WITH DASIA AND VARIA" #x1F4B)
- ("GREEK CAPITAL LETTER OMICRON WITH PSILI AND OXIA" #x1F4C)
- ("GREEK CAPITAL LETTER OMICRON WITH DASIA AND OXIA" #x1F4D)
- ("GREEK SMALL LETTER UPSILON WITH PSILI" #x1F50)
- ("GREEK SMALL LETTER UPSILON WITH DASIA" #x1F51)
- ("GREEK SMALL LETTER UPSILON WITH PSILI AND VARIA" #x1F52)
- ("GREEK SMALL LETTER UPSILON WITH DASIA AND VARIA" #x1F53)
- ("GREEK SMALL LETTER UPSILON WITH PSILI AND OXIA" #x1F54)
- ("GREEK SMALL LETTER UPSILON WITH DASIA AND OXIA" #x1F55)
- ("GREEK SMALL LETTER UPSILON WITH PSILI AND PERISPOMENI" #x1F56)
- ("GREEK SMALL LETTER UPSILON WITH DASIA AND PERISPOMENI" #x1F57)
- ("GREEK CAPITAL LETTER UPSILON WITH DASIA" #x1F59)
- ("GREEK CAPITAL LETTER UPSILON WITH DASIA AND VARIA" #x1F5B)
- ("GREEK CAPITAL LETTER UPSILON WITH DASIA AND OXIA" #x1F5D)
- ("GREEK CAPITAL LETTER UPSILON WITH DASIA AND PERISPOMENI" #x1F5F)
- ("GREEK SMALL LETTER OMEGA WITH PSILI" #x1F60)
- ("GREEK SMALL LETTER OMEGA WITH DASIA" #x1F61)
- ("GREEK SMALL LETTER OMEGA WITH PSILI AND VARIA" #x1F62)
- ("GREEK SMALL LETTER OMEGA WITH DASIA AND VARIA" #x1F63)
- ("GREEK SMALL LETTER OMEGA WITH PSILI AND OXIA" #x1F64)
- ("GREEK SMALL LETTER OMEGA WITH DASIA AND OXIA" #x1F65)
- ("GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI" #x1F66)
- ("GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI" #x1F67)
- ("GREEK CAPITAL LETTER OMEGA WITH PSILI" #x1F68)
- ("GREEK CAPITAL LETTER OMEGA WITH DASIA" #x1F69)
- ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND VARIA" #x1F6A)
- ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND VARIA" #x1F6B)
- ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND OXIA" #x1F6C)
- ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND OXIA" #x1F6D)
- ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI" #x1F6E)
- ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI" #x1F6F)
- ("GREEK SMALL LETTER ALPHA WITH VARIA" #x1F70)
- ("GREEK SMALL LETTER ALPHA WITH OXIA" #x1F71)
- ("GREEK SMALL LETTER EPSILON WITH VARIA" #x1F72)
- ("GREEK SMALL LETTER EPSILON WITH OXIA" #x1F73)
- ("GREEK SMALL LETTER ETA WITH VARIA" #x1F74)
- ("GREEK SMALL LETTER ETA WITH OXIA" #x1F75)
- ("GREEK SMALL LETTER IOTA WITH VARIA" #x1F76)
- ("GREEK SMALL LETTER IOTA WITH OXIA" #x1F77)
- ("GREEK SMALL LETTER OMICRON WITH VARIA" #x1F78)
- ("GREEK SMALL LETTER OMICRON WITH OXIA" #x1F79)
- ("GREEK SMALL LETTER UPSILON WITH VARIA" #x1F7A)
- ("GREEK SMALL LETTER UPSILON WITH OXIA" #x1F7B)
- ("GREEK SMALL LETTER OMEGA WITH VARIA" #x1F7C)
- ("GREEK SMALL LETTER OMEGA WITH OXIA" #x1F7D)
- ("GREEK SMALL LETTER ALPHA WITH PSILI AND YPOGEGRAMMENI" #x1F80)
- ("GREEK SMALL LETTER ALPHA WITH DASIA AND YPOGEGRAMMENI" #x1F81)
- ("GREEK SMALL LETTER ALPHA WITH PSILI AND VARIA AND YPOGEGRAMMENI" #x1F82)
- ("GREEK SMALL LETTER ALPHA WITH DASIA AND VARIA AND YPOGEGRAMMENI" #x1F83)
- ("GREEK SMALL LETTER ALPHA WITH PSILI AND OXIA AND YPOGEGRAMMENI" #x1F84)
- ("GREEK SMALL LETTER ALPHA WITH DASIA AND OXIA AND YPOGEGRAMMENI" #x1F85)
- ("GREEK SMALL LETTER ALPHA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI" #x1F86)
- ("GREEK SMALL LETTER ALPHA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI" #x1F87)
- ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND PROSGEGRAMMENI" #x1F88)
- ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND PROSGEGRAMMENI" #x1F89)
- ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND VARIA AND PROSGEGRAMMENI" #x1F8A)
- ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND VARIA AND PROSGEGRAMMENI" #x1F8B)
- ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND OXIA AND PROSGEGRAMMENI" #x1F8C)
- ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND OXIA AND PROSGEGRAMMENI" #x1F8D)
- ("GREEK CAPITAL LETTER ALPHA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI" #x1F8E)
- ("GREEK CAPITAL LETTER ALPHA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI" #x1F8F)
- ("GREEK SMALL LETTER ETA WITH PSILI AND YPOGEGRAMMENI" #x1F90)
- ("GREEK SMALL LETTER ETA WITH DASIA AND YPOGEGRAMMENI" #x1F91)
- ("GREEK SMALL LETTER ETA WITH PSILI AND VARIA AND YPOGEGRAMMENI" #x1F92)
- ("GREEK SMALL LETTER ETA WITH DASIA AND VARIA AND YPOGEGRAMMENI" #x1F93)
- ("GREEK SMALL LETTER ETA WITH PSILI AND OXIA AND YPOGEGRAMMENI" #x1F94)
- ("GREEK SMALL LETTER ETA WITH DASIA AND OXIA AND YPOGEGRAMMENI" #x1F95)
- ("GREEK SMALL LETTER ETA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI" #x1F96)
- ("GREEK SMALL LETTER ETA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI" #x1F97)
- ("GREEK CAPITAL LETTER ETA WITH PSILI AND PROSGEGRAMMENI" #x1F98)
- ("GREEK CAPITAL LETTER ETA WITH DASIA AND PROSGEGRAMMENI" #x1F99)
- ("GREEK CAPITAL LETTER ETA WITH PSILI AND VARIA AND PROSGEGRAMMENI" #x1F9A)
- ("GREEK CAPITAL LETTER ETA WITH DASIA AND VARIA AND PROSGEGRAMMENI" #x1F9B)
- ("GREEK CAPITAL LETTER ETA WITH PSILI AND OXIA AND PROSGEGRAMMENI" #x1F9C)
- ("GREEK CAPITAL LETTER ETA WITH DASIA AND OXIA AND PROSGEGRAMMENI" #x1F9D)
- ("GREEK CAPITAL LETTER ETA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI" #x1F9E)
- ("GREEK CAPITAL LETTER ETA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI" #x1F9F)
- ("GREEK SMALL LETTER OMEGA WITH PSILI AND YPOGEGRAMMENI" #x1FA0)
- ("GREEK SMALL LETTER OMEGA WITH DASIA AND YPOGEGRAMMENI" #x1FA1)
- ("GREEK SMALL LETTER OMEGA WITH PSILI AND VARIA AND YPOGEGRAMMENI" #x1FA2)
- ("GREEK SMALL LETTER OMEGA WITH DASIA AND VARIA AND YPOGEGRAMMENI" #x1FA3)
- ("GREEK SMALL LETTER OMEGA WITH PSILI AND OXIA AND YPOGEGRAMMENI" #x1FA4)
- ("GREEK SMALL LETTER OMEGA WITH DASIA AND OXIA AND YPOGEGRAMMENI" #x1FA5)
- ("GREEK SMALL LETTER OMEGA WITH PSILI AND PERISPOMENI AND YPOGEGRAMMENI" #x1FA6)
- ("GREEK SMALL LETTER OMEGA WITH DASIA AND PERISPOMENI AND YPOGEGRAMMENI" #x1FA7)
- ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND PROSGEGRAMMENI" #x1FA8)
- ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND PROSGEGRAMMENI" #x1FA9)
- ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND VARIA AND PROSGEGRAMMENI" #x1FAA)
- ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND VARIA AND PROSGEGRAMMENI" #x1FAB)
- ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND OXIA AND PROSGEGRAMMENI" #x1FAC)
- ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND OXIA AND PROSGEGRAMMENI" #x1FAD)
- ("GREEK CAPITAL LETTER OMEGA WITH PSILI AND PERISPOMENI AND PROSGEGRAMMENI" #x1FAE)
- ("GREEK CAPITAL LETTER OMEGA WITH DASIA AND PERISPOMENI AND PROSGEGRAMMENI" #x1FAF)
- ("GREEK SMALL LETTER ALPHA WITH VRACHY" #x1FB0)
- ("GREEK SMALL LETTER ALPHA WITH MACRON" #x1FB1)
- ("GREEK SMALL LETTER ALPHA WITH VARIA AND YPOGEGRAMMENI" #x1FB2)
- ("GREEK SMALL LETTER ALPHA WITH YPOGEGRAMMENI" #x1FB3)
- ("GREEK SMALL LETTER ALPHA WITH OXIA AND YPOGEGRAMMENI" #x1FB4)
- ("GREEK SMALL LETTER ALPHA WITH PERISPOMENI" #x1FB6)
- ("GREEK SMALL LETTER ALPHA WITH PERISPOMENI AND YPOGEGRAMMENI" #x1FB7)
- ("GREEK CAPITAL LETTER ALPHA WITH VRACHY" #x1FB8)
- ("GREEK CAPITAL LETTER ALPHA WITH MACRON" #x1FB9)
- ("GREEK CAPITAL LETTER ALPHA WITH VARIA" #x1FBA)
- ("GREEK CAPITAL LETTER ALPHA WITH OXIA" #x1FBB)
- ("GREEK CAPITAL LETTER ALPHA WITH PROSGEGRAMMENI" #x1FBC)
- ("GREEK KORONIS" #x1FBD)
- ("GREEK PROSGEGRAMMENI" #x1FBE)
- ("GREEK PSILI" #x1FBF)
- ("GREEK PERISPOMENI" #x1FC0)
- ("GREEK DIALYTIKA AND PERISPOMENI" #x1FC1)
- ("GREEK SMALL LETTER ETA WITH VARIA AND YPOGEGRAMMENI" #x1FC2)
- ("GREEK SMALL LETTER ETA WITH YPOGEGRAMMENI" #x1FC3)
- ("GREEK SMALL LETTER ETA WITH OXIA AND YPOGEGRAMMENI" #x1FC4)
- ("GREEK SMALL LETTER ETA WITH PERISPOMENI" #x1FC6)
- ("GREEK SMALL LETTER ETA WITH PERISPOMENI AND YPOGEGRAMMENI" #x1FC7)
- ("GREEK CAPITAL LETTER EPSILON WITH VARIA" #x1FC8)
- ("GREEK CAPITAL LETTER EPSILON WITH OXIA" #x1FC9)
- ("GREEK CAPITAL LETTER ETA WITH VARIA" #x1FCA)
- ("GREEK CAPITAL LETTER ETA WITH OXIA" #x1FCB)
- ("GREEK CAPITAL LETTER ETA WITH PROSGEGRAMMENI" #x1FCC)
- ("GREEK PSILI AND VARIA" #x1FCD)
- ("GREEK PSILI AND OXIA" #x1FCE)
- ("GREEK PSILI AND PERISPOMENI" #x1FCF)
- ("GREEK SMALL LETTER IOTA WITH VRACHY" #x1FD0)
- ("GREEK SMALL LETTER IOTA WITH MACRON" #x1FD1)
- ("GREEK SMALL LETTER IOTA WITH DIALYTIKA AND VARIA" #x1FD2)
- ("GREEK SMALL LETTER IOTA WITH DIALYTIKA AND OXIA" #x1FD3)
- ("GREEK SMALL LETTER IOTA WITH PERISPOMENI" #x1FD6)
- ("GREEK SMALL LETTER IOTA WITH DIALYTIKA AND PERISPOMENI" #x1FD7)
- ("GREEK CAPITAL LETTER IOTA WITH VRACHY" #x1FD8)
- ("GREEK CAPITAL LETTER IOTA WITH MACRON" #x1FD9)
- ("GREEK CAPITAL LETTER IOTA WITH VARIA" #x1FDA)
- ("GREEK CAPITAL LETTER IOTA WITH OXIA" #x1FDB)
- ("GREEK DASIA AND VARIA" #x1FDD)
- ("GREEK DASIA AND OXIA" #x1FDE)
- ("GREEK DASIA AND PERISPOMENI" #x1FDF)
- ("GREEK SMALL LETTER UPSILON WITH VRACHY" #x1FE0)
- ("GREEK SMALL LETTER UPSILON WITH MACRON" #x1FE1)
- ("GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND VARIA" #x1FE2)
- ("GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND OXIA" #x1FE3)
- ("GREEK SMALL LETTER RHO WITH PSILI" #x1FE4)
- ("GREEK SMALL LETTER RHO WITH DASIA" #x1FE5)
- ("GREEK SMALL LETTER UPSILON WITH PERISPOMENI" #x1FE6)
- ("GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND PERISPOMENI" #x1FE7)
- ("GREEK CAPITAL LETTER UPSILON WITH VRACHY" #x1FE8)
- ("GREEK CAPITAL LETTER UPSILON WITH MACRON" #x1FE9)
- ("GREEK CAPITAL LETTER UPSILON WITH VARIA" #x1FEA)
- ("GREEK CAPITAL LETTER UPSILON WITH OXIA" #x1FEB)
- ("GREEK CAPITAL LETTER RHO WITH DASIA" #x1FEC)
- ("GREEK DIALYTIKA AND VARIA" #x1FED)
- ("GREEK DIALYTIKA AND OXIA" #x1FEE)
- ("GREEK VARIA" #x1FEF)
- ("GREEK SMALL LETTER OMEGA WITH VARIA AND YPOGEGRAMMENI" #x1FF2)
- ("GREEK SMALL LETTER OMEGA WITH YPOGEGRAMMENI" #x1FF3)
- ("GREEK SMALL LETTER OMEGA WITH OXIA AND YPOGEGRAMMENI" #x1FF4)
- ("GREEK SMALL LETTER OMEGA WITH PERISPOMENI" #x1FF6)
- ("GREEK SMALL LETTER OMEGA WITH PERISPOMENI AND YPOGEGRAMMENI" #x1FF7)
- ("GREEK CAPITAL LETTER OMICRON WITH VARIA" #x1FF8)
- ("GREEK CAPITAL LETTER OMICRON WITH OXIA" #x1FF9)
- ("GREEK CAPITAL LETTER OMEGA WITH VARIA" #x1FFA)
- ("GREEK CAPITAL LETTER OMEGA WITH OXIA" #x1FFB)
- ("GREEK CAPITAL LETTER OMEGA WITH PROSGEGRAMMENI" #x1FFC)
- ("GREEK OXIA" #x1FFD)
- ("GREEK DASIA" #x1FFE)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'general-punctuation
- '(("EN QUAD" #x2000)
- ("EM QUAD" #x2001)
- ("EN SPACE" #x2002)
- ("EM SPACE" #x2003)
- ("THREE-PER-EM SPACE" #x2004)
- ("FOUR-PER-EM SPACE" #x2005)
- ("SIX-PER-EM SPACE" #x2006)
- ("FIGURE SPACE" #x2007)
- ("PUNCTUATION SPACE" #x2008)
- ("THIN SPACE" #x2009)
- ("HAIR SPACE" #x200A)
- ("ZERO WIDTH SPACE" #x200B)
- ("ZERO WIDTH NON-JOINER" #x200C)
- ("ZERO WIDTH JOINER" #x200D)
- ("LEFT-TO-RIGHT MARK" #x200E)
- ("RIGHT-TO-LEFT MARK" #x200F)
- ("HYPHEN" #x2010)
- ("NON-BREAKING HYPHEN" #x2011)
- ("FIGURE DASH" #x2012)
- ("EN DASH" #x2013)
- ("EM DASH" #x2014)
- ("HORIZONTAL BAR" #x2015)
- ("DOUBLE VERTICAL LINE" #x2016)
- ("DOUBLE LOW LINE" #x2017)
- ("LEFT SINGLE QUOTATION MARK" #x2018)
- ("RIGHT SINGLE QUOTATION MARK" #x2019)
- ("SINGLE LOW-9 QUOTATION MARK" #x201A)
- ("SINGLE HIGH-REVERSED-9 QUOTATION MARK" #x201B)
- ("LEFT DOUBLE QUOTATION MARK" #x201C)
- ("RIGHT DOUBLE QUOTATION MARK" #x201D)
- ("DOUBLE LOW-9 QUOTATION MARK" #x201E)
- ("DOUBLE HIGH-REVERSED-9 QUOTATION MARK" #x201F)
- ("DAGGER" #x2020)
- ("DOUBLE DAGGER" #x2021)
- ("BULLET" #x2022)
- ("TRIANGULAR BULLET" #x2023)
- ("ONE DOT LEADER" #x2024)
- ("TWO DOT LEADER" #x2025)
- ("HORIZONTAL ELLIPSIS" #x2026)
- ("HYPHENATION POINT" #x2027)
- ("LINE SEPARATOR" #x2028)
- ("PARAGRAPH SEPARATOR" #x2029)
- ("LEFT-TO-RIGHT EMBEDDING" #x202A)
- ("RIGHT-TO-LEFT EMBEDDING" #x202B)
- ("POP DIRECTIONAL FORMATTING" #x202C)
- ("LEFT-TO-RIGHT OVERRIDE" #x202D)
- ("RIGHT-TO-LEFT OVERRIDE" #x202E)
- ("NARROW NO-BREAK SPACE" #x202F)
- ("PER MILLE SIGN" #x2030)
- ("PER TEN THOUSAND SIGN" #x2031)
- ("PRIME" #x2032)
- ("DOUBLE PRIME" #x2033)
- ("TRIPLE PRIME" #x2034)
- ("REVERSED PRIME" #x2035)
- ("REVERSED DOUBLE PRIME" #x2036)
- ("REVERSED TRIPLE PRIME" #x2037)
- ("CARET" #x2038)
- ("SINGLE LEFT-POINTING ANGLE QUOTATION MARK" #x2039)
- ("SINGLE RIGHT-POINTING ANGLE QUOTATION MARK" #x203A)
- ("REFERENCE MARK" #x203B)
- ("DOUBLE EXCLAMATION MARK" #x203C)
- ("INTERROBANG" #x203D)
- ("OVERLINE" #x203E)
- ("UNDERTIE" #x203F)
- ("CHARACTER TIE" #x2040)
- ("CARET INSERTION POINT" #x2041)
- ("ASTERISM" #x2042)
- ("HYPHEN BULLET" #x2043)
- ("FRACTION SLASH" #x2044)
- ("LEFT SQUARE BRACKET WITH QUILL" #x2045)
- ("RIGHT SQUARE BRACKET WITH QUILL" #x2046)
- ("DOUBLE QUESTION MARK" #x2047)
- ("QUESTION EXCLAMATION MARK" #x2048)
- ("EXCLAMATION QUESTION MARK" #x2049)
- ("TIRONIAN SIGN ET" #x204A)
- ("REVERSED PILCROW SIGN" #x204B)
- ("BLACK LEFTWARDS BULLET" #x204C)
- ("BLACK RIGHTWARDS BULLET" #x204D)
- ("LOW ASTERISK" #x204E)
- ("REVERSED SEMICOLON" #x204F)
- ("CLOSE UP" #x2050)
- ("TWO ASTERISKS ALIGNED VERTICALLY" #x2051)
- ("COMMERCIAL MINUS SIGN" #x2052)
- ("QUADRUPLE PRIME" #x2057)
- ("MEDIUM MATHEMATICAL SPACE" #x205F)
- ("WORD JOINER" #x2060)
- ("FUNCTION APPLICATION" #x2061)
- ("INVISIBLE TIMES" #x2062)
- ("INVISIBLE SEPARATOR" #x2063)
- ("INHIBIT SYMMETRIC SWAPPING" #x206A)
- ("ACTIVATE SYMMETRIC SWAPPING" #x206B)
- ("INHIBIT ARABIC FORM SHAPING" #x206C)
- ("ACTIVATE ARABIC FORM SHAPING" #x206D)
- ("NATIONAL DIGIT SHAPES" #x206E)
- ("NOMINAL DIGIT SHAPES" #x206F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'superscripts-and-subscripts
- '(("SUPERSCRIPT ZERO" #x2070)
- ("SUPERSCRIPT LATIN SMALL LETTER I" #x2071)
- ("SUPERSCRIPT FOUR" #x2074)
- ("SUPERSCRIPT FIVE" #x2075)
- ("SUPERSCRIPT SIX" #x2076)
- ("SUPERSCRIPT SEVEN" #x2077)
- ("SUPERSCRIPT EIGHT" #x2078)
- ("SUPERSCRIPT NINE" #x2079)
- ("SUPERSCRIPT PLUS SIGN" #x207A)
- ("SUPERSCRIPT MINUS" #x207B)
- ("SUPERSCRIPT EQUALS SIGN" #x207C)
- ("SUPERSCRIPT LEFT PARENTHESIS" #x207D)
- ("SUPERSCRIPT RIGHT PARENTHESIS" #x207E)
- ("SUPERSCRIPT LATIN SMALL LETTER N" #x207F)
- ("SUBSCRIPT ZERO" #x2080)
- ("SUBSCRIPT ONE" #x2081)
- ("SUBSCRIPT TWO" #x2082)
- ("SUBSCRIPT THREE" #x2083)
- ("SUBSCRIPT FOUR" #x2084)
- ("SUBSCRIPT FIVE" #x2085)
- ("SUBSCRIPT SIX" #x2086)
- ("SUBSCRIPT SEVEN" #x2087)
- ("SUBSCRIPT EIGHT" #x2088)
- ("SUBSCRIPT NINE" #x2089)
- ("SUBSCRIPT PLUS SIGN" #x208A)
- ("SUBSCRIPT MINUS" #x208B)
- ("SUBSCRIPT EQUALS SIGN" #x208C)
- ("SUBSCRIPT LEFT PARENTHESIS" #x208D)
- ("SUBSCRIPT RIGHT PARENTHESIS" #x208E)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'currency-symbols
- '(("EURO-CURRENCY SIGN" #x20A0)
- ("COLON SIGN" #x20A1)
- ("CRUZEIRO SIGN" #x20A2)
- ("FRENCH FRANC SIGN" #x20A3)
- ("LIRA SIGN" #x20A4)
- ("MILL SIGN" #x20A5)
- ("NAIRA SIGN" #x20A6)
- ("PESETA SIGN" #x20A7)
- ("RUPEE SIGN" #x20A8)
- ("WON SIGN" #x20A9)
- ("NEW SHEQEL SIGN" #x20AA)
- ("DONG SIGN" #x20AB)
- ("EURO SIGN" #x20AC)
- ("KIP SIGN" #x20AD)
- ("TUGRIK SIGN" #x20AE)
- ("DRACHMA SIGN" #x20AF)
- ("GERMAN PENNY SIGN" #x20B0)
- ("PESO SIGN" #x20B1)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'combining-diacritical-marks-for-symbols
- '(("COMBINING LEFT HARPOON ABOVE" #x20D0)
- ("COMBINING RIGHT HARPOON ABOVE" #x20D1)
- ("COMBINING LONG VERTICAL LINE OVERLAY" #x20D2)
- ("COMBINING SHORT VERTICAL LINE OVERLAY" #x20D3)
- ("COMBINING ANTICLOCKWISE ARROW ABOVE" #x20D4)
- ("COMBINING CLOCKWISE ARROW ABOVE" #x20D5)
- ("COMBINING LEFT ARROW ABOVE" #x20D6)
- ("COMBINING RIGHT ARROW ABOVE" #x20D7)
- ("COMBINING RING OVERLAY" #x20D8)
- ("COMBINING CLOCKWISE RING OVERLAY" #x20D9)
- ("COMBINING ANTICLOCKWISE RING OVERLAY" #x20DA)
- ("COMBINING THREE DOTS ABOVE" #x20DB)
- ("COMBINING FOUR DOTS ABOVE" #x20DC)
- ("COMBINING ENCLOSING CIRCLE" #x20DD)
- ("COMBINING ENCLOSING SQUARE" #x20DE)
- ("COMBINING ENCLOSING DIAMOND" #x20DF)
- ("COMBINING ENCLOSING CIRCLE BACKSLASH" #x20E0)
- ("COMBINING LEFT RIGHT ARROW ABOVE" #x20E1)
- ("COMBINING ENCLOSING SCREEN" #x20E2)
- ("COMBINING ENCLOSING KEYCAP" #x20E3)
- ("COMBINING ENCLOSING UPWARD POINTING TRIANGLE" #x20E4)
- ("COMBINING REVERSE SOLIDUS OVERLAY" #x20E5)
- ("COMBINING DOUBLE VERTICAL STROKE OVERLAY" #x20E6)
- ("COMBINING ANNUITY SYMBOL" #x20E7)
- ("COMBINING TRIPLE UNDERDOT" #x20E8)
- ("COMBINING WIDE BRIDGE ABOVE" #x20E9)
- ("COMBINING LEFTWARDS ARROW OVERLAY" #x20EA)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'letterlike-symbols
- '(("ACCOUNT OF" #x2100)
- ("ADDRESSED TO THE SUBJECT" #x2101)
- ("DOUBLE-STRUCK CAPITAL C" #x2102)
- ("DEGREE CELSIUS" #x2103)
- ("CENTRE LINE SYMBOL" #x2104)
- ("CARE OF" #x2105)
- ("CADA UNA" #x2106)
- ("EULER CONSTANT" #x2107)
- ("SCRUPLE" #x2108)
- ("DEGREE FAHRENHEIT" #x2109)
- ("SCRIPT SMALL G" #x210A)
- ("SCRIPT CAPITAL H" #x210B)
- ("BLACK-LETTER CAPITAL H" #x210C)
- ("DOUBLE-STRUCK CAPITAL H" #x210D)
- ("PLANCK CONSTANT" #x210E)
- ("PLANCK CONSTANT OVER TWO PI" #x210F)
- ("SCRIPT CAPITAL I" #x2110)
- ("BLACK-LETTER CAPITAL I" #x2111)
- ("SCRIPT CAPITAL L" #x2112)
- ("SCRIPT SMALL L" #x2113)
- ("L B BAR SYMBOL" #x2114)
- ("DOUBLE-STRUCK CAPITAL N" #x2115)
- ("NUMERO SIGN" #x2116)
- ("SOUND RECORDING COPYRIGHT" #x2117)
- ("SCRIPT CAPITAL P" #x2118)
- ("DOUBLE-STRUCK CAPITAL P" #x2119)
- ("DOUBLE-STRUCK CAPITAL Q" #x211A)
- ("SCRIPT CAPITAL R" #x211B)
- ("BLACK-LETTER CAPITAL R" #x211C)
- ("DOUBLE-STRUCK CAPITAL R" #x211D)
- ("PRESCRIPTION TAKE" #x211E)
- ("RESPONSE" #x211F)
- ("SERVICE MARK" #x2120)
- ("TELEPHONE SIGN" #x2121)
- ("TRADE MARK SIGN" #x2122)
- ("VERSICLE" #x2123)
- ("DOUBLE-STRUCK CAPITAL Z" #x2124)
- ("OUNCE SIGN" #x2125)
- ("OHM SIGN" #x2126)
- ("INVERTED OHM SIGN" #x2127)
- ("BLACK-LETTER CAPITAL Z" #x2128)
- ("TURNED GREEK SMALL LETTER IOTA" #x2129)
- ("KELVIN SIGN" #x212A)
- ("ANGSTROM SIGN" #x212B)
- ("SCRIPT CAPITAL B" #x212C)
- ("BLACK-LETTER CAPITAL C" #x212D)
- ("ESTIMATED SYMBOL" #x212E)
- ("SCRIPT SMALL E" #x212F)
- ("SCRIPT CAPITAL E" #x2130)
- ("SCRIPT CAPITAL F" #x2131)
- ("TURNED CAPITAL F" #x2132)
- ("SCRIPT CAPITAL M" #x2133)
- ("SCRIPT SMALL O" #x2134)
- ("ALEF SYMBOL" #x2135)
- ("BET SYMBOL" #x2136)
- ("GIMEL SYMBOL" #x2137)
- ("DALET SYMBOL" #x2138)
- ("INFORMATION SOURCE" #x2139)
- ("ROTATED CAPITAL Q" #x213A)
- ("DOUBLE-STRUCK SMALL GAMMA" #x213D)
- ("DOUBLE-STRUCK CAPITAL GAMMA" #x213E)
- ("DOUBLE-STRUCK CAPITAL PI" #x213F)
- ("DOUBLE-STRUCK N-ARY SUMMATION" #x2140)
- ("TURNED SANS-SERIF CAPITAL G" #x2141)
- ("TURNED SANS-SERIF CAPITAL L" #x2142)
- ("REVERSED SANS-SERIF CAPITAL L" #x2143)
- ("TURNED SANS-SERIF CAPITAL Y" #x2144)
- ("DOUBLE-STRUCK ITALIC CAPITAL D" #x2145)
- ("DOUBLE-STRUCK ITALIC SMALL D" #x2146)
- ("DOUBLE-STRUCK ITALIC SMALL E" #x2147)
- ("DOUBLE-STRUCK ITALIC SMALL I" #x2148)
- ("DOUBLE-STRUCK ITALIC SMALL J" #x2149)
- ("PROPERTY LINE" #x214A)
- ("TURNED AMPERSAND" #x214B)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'number-forms
- '(("VULGAR FRACTION ONE THIRD" #x2153)
- ("VULGAR FRACTION TWO THIRDS" #x2154)
- ("VULGAR FRACTION ONE FIFTH" #x2155)
- ("VULGAR FRACTION TWO FIFTHS" #x2156)
- ("VULGAR FRACTION THREE FIFTHS" #x2157)
- ("VULGAR FRACTION FOUR FIFTHS" #x2158)
- ("VULGAR FRACTION ONE SIXTH" #x2159)
- ("VULGAR FRACTION FIVE SIXTHS" #x215A)
- ("VULGAR FRACTION ONE EIGHTH" #x215B)
- ("VULGAR FRACTION THREE EIGHTHS" #x215C)
- ("VULGAR FRACTION FIVE EIGHTHS" #x215D)
- ("VULGAR FRACTION SEVEN EIGHTHS" #x215E)
- ("FRACTION NUMERATOR ONE" #x215F)
- ("ROMAN NUMERAL ONE" #x2160)
- ("ROMAN NUMERAL TWO" #x2161)
- ("ROMAN NUMERAL THREE" #x2162)
- ("ROMAN NUMERAL FOUR" #x2163)
- ("ROMAN NUMERAL FIVE" #x2164)
- ("ROMAN NUMERAL SIX" #x2165)
- ("ROMAN NUMERAL SEVEN" #x2166)
- ("ROMAN NUMERAL EIGHT" #x2167)
- ("ROMAN NUMERAL NINE" #x2168)
- ("ROMAN NUMERAL TEN" #x2169)
- ("ROMAN NUMERAL ELEVEN" #x216A)
- ("ROMAN NUMERAL TWELVE" #x216B)
- ("ROMAN NUMERAL FIFTY" #x216C)
- ("ROMAN NUMERAL ONE HUNDRED" #x216D)
- ("ROMAN NUMERAL FIVE HUNDRED" #x216E)
- ("ROMAN NUMERAL ONE THOUSAND" #x216F)
- ("SMALL ROMAN NUMERAL ONE" #x2170)
- ("SMALL ROMAN NUMERAL TWO" #x2171)
- ("SMALL ROMAN NUMERAL THREE" #x2172)
- ("SMALL ROMAN NUMERAL FOUR" #x2173)
- ("SMALL ROMAN NUMERAL FIVE" #x2174)
- ("SMALL ROMAN NUMERAL SIX" #x2175)
- ("SMALL ROMAN NUMERAL SEVEN" #x2176)
- ("SMALL ROMAN NUMERAL EIGHT" #x2177)
- ("SMALL ROMAN NUMERAL NINE" #x2178)
- ("SMALL ROMAN NUMERAL TEN" #x2179)
- ("SMALL ROMAN NUMERAL ELEVEN" #x217A)
- ("SMALL ROMAN NUMERAL TWELVE" #x217B)
- ("SMALL ROMAN NUMERAL FIFTY" #x217C)
- ("SMALL ROMAN NUMERAL ONE HUNDRED" #x217D)
- ("SMALL ROMAN NUMERAL FIVE HUNDRED" #x217E)
- ("SMALL ROMAN NUMERAL ONE THOUSAND" #x217F)
- ("ROMAN NUMERAL ONE THOUSAND C D" #x2180)
- ("ROMAN NUMERAL FIVE THOUSAND" #x2181)
- ("ROMAN NUMERAL TEN THOUSAND" #x2182)
- ("ROMAN NUMERAL REVERSED ONE HUNDRED" #x2183)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'arrows
- '(("LEFTWARDS ARROW" #x2190)
- ("UPWARDS ARROW" #x2191)
- ("RIGHTWARDS ARROW" #x2192)
- ("DOWNWARDS ARROW" #x2193)
- ("LEFT RIGHT ARROW" #x2194)
- ("UP DOWN ARROW" #x2195)
- ("NORTH WEST ARROW" #x2196)
- ("NORTH EAST ARROW" #x2197)
- ("SOUTH EAST ARROW" #x2198)
- ("SOUTH WEST ARROW" #x2199)
- ("LEFTWARDS ARROW WITH STROKE" #x219A)
- ("RIGHTWARDS ARROW WITH STROKE" #x219B)
- ("LEFTWARDS WAVE ARROW" #x219C)
- ("RIGHTWARDS WAVE ARROW" #x219D)
- ("LEFTWARDS TWO HEADED ARROW" #x219E)
- ("UPWARDS TWO HEADED ARROW" #x219F)
- ("RIGHTWARDS TWO HEADED ARROW" #x21A0)
- ("DOWNWARDS TWO HEADED ARROW" #x21A1)
- ("LEFTWARDS ARROW WITH TAIL" #x21A2)
- ("RIGHTWARDS ARROW WITH TAIL" #x21A3)
- ("LEFTWARDS ARROW FROM BAR" #x21A4)
- ("UPWARDS ARROW FROM BAR" #x21A5)
- ("RIGHTWARDS ARROW FROM BAR" #x21A6)
- ("DOWNWARDS ARROW FROM BAR" #x21A7)
- ("UP DOWN ARROW WITH BASE" #x21A8)
- ("LEFTWARDS ARROW WITH HOOK" #x21A9)
- ("RIGHTWARDS ARROW WITH HOOK" #x21AA)
- ("LEFTWARDS ARROW WITH LOOP" #x21AB)
- ("RIGHTWARDS ARROW WITH LOOP" #x21AC)
- ("LEFT RIGHT WAVE ARROW" #x21AD)
- ("LEFT RIGHT ARROW WITH STROKE" #x21AE)
- ("DOWNWARDS ZIGZAG ARROW" #x21AF)
- ("UPWARDS ARROW WITH TIP LEFTWARDS" #x21B0)
- ("UPWARDS ARROW WITH TIP RIGHTWARDS" #x21B1)
- ("DOWNWARDS ARROW WITH TIP LEFTWARDS" #x21B2)
- ("DOWNWARDS ARROW WITH TIP RIGHTWARDS" #x21B3)
- ("RIGHTWARDS ARROW WITH CORNER DOWNWARDS" #x21B4)
- ("DOWNWARDS ARROW WITH CORNER LEFTWARDS" #x21B5)
- ("ANTICLOCKWISE TOP SEMICIRCLE ARROW" #x21B6)
- ("CLOCKWISE TOP SEMICIRCLE ARROW" #x21B7)
- ("NORTH WEST ARROW TO LONG BAR" #x21B8)
- ("LEFTWARDS ARROW TO BAR OVER RIGHTWARDS ARROW TO BAR" #x21B9)
- ("ANTICLOCKWISE OPEN CIRCLE ARROW" #x21BA)
- ("CLOCKWISE OPEN CIRCLE ARROW" #x21BB)
- ("LEFTWARDS HARPOON WITH BARB UPWARDS" #x21BC)
- ("LEFTWARDS HARPOON WITH BARB DOWNWARDS" #x21BD)
- ("UPWARDS HARPOON WITH BARB RIGHTWARDS" #x21BE)
- ("UPWARDS HARPOON WITH BARB LEFTWARDS" #x21BF)
- ("RIGHTWARDS HARPOON WITH BARB UPWARDS" #x21C0)
- ("RIGHTWARDS HARPOON WITH BARB DOWNWARDS" #x21C1)
- ("DOWNWARDS HARPOON WITH BARB RIGHTWARDS" #x21C2)
- ("DOWNWARDS HARPOON WITH BARB LEFTWARDS" #x21C3)
- ("RIGHTWARDS ARROW OVER LEFTWARDS ARROW" #x21C4)
- ("UPWARDS ARROW LEFTWARDS OF DOWNWARDS ARROW" #x21C5)
- ("LEFTWARDS ARROW OVER RIGHTWARDS ARROW" #x21C6)
- ("LEFTWARDS PAIRED ARROWS" #x21C7)
- ("UPWARDS PAIRED ARROWS" #x21C8)
- ("RIGHTWARDS PAIRED ARROWS" #x21C9)
- ("DOWNWARDS PAIRED ARROWS" #x21CA)
- ("LEFTWARDS HARPOON OVER RIGHTWARDS HARPOON" #x21CB)
- ("RIGHTWARDS HARPOON OVER LEFTWARDS HARPOON" #x21CC)
- ("LEFTWARDS DOUBLE ARROW WITH STROKE" #x21CD)
- ("LEFT RIGHT DOUBLE ARROW WITH STROKE" #x21CE)
- ("RIGHTWARDS DOUBLE ARROW WITH STROKE" #x21CF)
- ("LEFTWARDS DOUBLE ARROW" #x21D0)
- ("UPWARDS DOUBLE ARROW" #x21D1)
- ("RIGHTWARDS DOUBLE ARROW" #x21D2)
- ("DOWNWARDS DOUBLE ARROW" #x21D3)
- ("LEFT RIGHT DOUBLE ARROW" #x21D4)
- ("UP DOWN DOUBLE ARROW" #x21D5)
- ("NORTH WEST DOUBLE ARROW" #x21D6)
- ("NORTH EAST DOUBLE ARROW" #x21D7)
- ("SOUTH EAST DOUBLE ARROW" #x21D8)
- ("SOUTH WEST DOUBLE ARROW" #x21D9)
- ("LEFTWARDS TRIPLE ARROW" #x21DA)
- ("RIGHTWARDS TRIPLE ARROW" #x21DB)
- ("LEFTWARDS SQUIGGLE ARROW" #x21DC)
- ("RIGHTWARDS SQUIGGLE ARROW" #x21DD)
- ("UPWARDS ARROW WITH DOUBLE STROKE" #x21DE)
- ("DOWNWARDS ARROW WITH DOUBLE STROKE" #x21DF)
- ("LEFTWARDS DASHED ARROW" #x21E0)
- ("UPWARDS DASHED ARROW" #x21E1)
- ("RIGHTWARDS DASHED ARROW" #x21E2)
- ("DOWNWARDS DASHED ARROW" #x21E3)
- ("LEFTWARDS ARROW TO BAR" #x21E4)
- ("RIGHTWARDS ARROW TO BAR" #x21E5)
- ("LEFTWARDS WHITE ARROW" #x21E6)
- ("UPWARDS WHITE ARROW" #x21E7)
- ("RIGHTWARDS WHITE ARROW" #x21E8)
- ("DOWNWARDS WHITE ARROW" #x21E9)
- ("UPWARDS WHITE ARROW FROM BAR" #x21EA)
- ("UPWARDS WHITE ARROW ON PEDESTAL" #x21EB)
- ("UPWARDS WHITE ARROW ON PEDESTAL WITH HORIZONTAL BAR" #x21EC)
- ("UPWARDS WHITE ARROW ON PEDESTAL WITH VERTICAL BAR" #x21ED)
- ("UPWARDS WHITE DOUBLE ARROW" #x21EE)
- ("UPWARDS WHITE DOUBLE ARROW ON PEDESTAL" #x21EF)
- ("RIGHTWARDS WHITE ARROW FROM WALL" #x21F0)
- ("NORTH WEST ARROW TO CORNER" #x21F1)
- ("SOUTH EAST ARROW TO CORNER" #x21F2)
- ("UP DOWN WHITE ARROW" #x21F3)
- ("RIGHT ARROW WITH SMALL CIRCLE" #x21F4)
- ("DOWNWARDS ARROW LEFTWARDS OF UPWARDS ARROW" #x21F5)
- ("THREE RIGHTWARDS ARROWS" #x21F6)
- ("LEFTWARDS ARROW WITH VERTICAL STROKE" #x21F7)
- ("RIGHTWARDS ARROW WITH VERTICAL STROKE" #x21F8)
- ("LEFT RIGHT ARROW WITH VERTICAL STROKE" #x21F9)
- ("LEFTWARDS ARROW WITH DOUBLE VERTICAL STROKE" #x21FA)
- ("RIGHTWARDS ARROW WITH DOUBLE VERTICAL STROKE" #x21FB)
- ("LEFT RIGHT ARROW WITH DOUBLE VERTICAL STROKE" #x21FC)
- ("LEFTWARDS OPEN-HEADED ARROW" #x21FD)
- ("RIGHTWARDS OPEN-HEADED ARROW" #x21FE)
- ("LEFT RIGHT OPEN-HEADED ARROW" #x21FF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'mathematical-operators
- '(("FOR ALL" #x2200)
- ("COMPLEMENT" #x2201)
- ("PARTIAL DIFFERENTIAL" #x2202)
- ("THERE EXISTS" #x2203)
- ("THERE DOES NOT EXIST" #x2204)
- ("EMPTY SET" #x2205)
- ("INCREMENT" #x2206)
- ("NABLA" #x2207)
- ("ELEMENT OF" #x2208)
- ("NOT AN ELEMENT OF" #x2209)
- ("SMALL ELEMENT OF" #x220A)
- ("CONTAINS AS MEMBER" #x220B)
- ("DOES NOT CONTAIN AS MEMBER" #x220C)
- ("SMALL CONTAINS AS MEMBER" #x220D)
- ("END OF PROOF" #x220E)
- ("N-ARY PRODUCT" #x220F)
- ("N-ARY COPRODUCT" #x2210)
- ("N-ARY SUMMATION" #x2211)
- ("MINUS SIGN" #x2212)
- ("MINUS-OR-PLUS SIGN" #x2213)
- ("DOT PLUS" #x2214)
- ("DIVISION SLASH" #x2215)
- ("SET MINUS" #x2216)
- ("ASTERISK OPERATOR" #x2217)
- ("RING OPERATOR" #x2218)
- ("BULLET OPERATOR" #x2219)
- ("SQUARE ROOT" #x221A)
- ("CUBE ROOT" #x221B)
- ("FOURTH ROOT" #x221C)
- ("PROPORTIONAL TO" #x221D)
- ("INFINITY" #x221E)
- ("RIGHT ANGLE" #x221F)
- ("ANGLE" #x2220)
- ("MEASURED ANGLE" #x2221)
- ("SPHERICAL ANGLE" #x2222)
- ("DIVIDES" #x2223)
- ("DOES NOT DIVIDE" #x2224)
- ("PARALLEL TO" #x2225)
- ("NOT PARALLEL TO" #x2226)
- ("LOGICAL AND" #x2227)
- ("LOGICAL OR" #x2228)
- ("INTERSECTION" #x2229)
- ("UNION" #x222A)
- ("INTEGRAL" #x222B)
- ("DOUBLE INTEGRAL" #x222C)
- ("TRIPLE INTEGRAL" #x222D)
- ("CONTOUR INTEGRAL" #x222E)
- ("SURFACE INTEGRAL" #x222F)
- ("VOLUME INTEGRAL" #x2230)
- ("CLOCKWISE INTEGRAL" #x2231)
- ("CLOCKWISE CONTOUR INTEGRAL" #x2232)
- ("ANTICLOCKWISE CONTOUR INTEGRAL" #x2233)
- ("THEREFORE" #x2234)
- ("BECAUSE" #x2235)
- ("RATIO" #x2236)
- ("PROPORTION" #x2237)
- ("DOT MINUS" #x2238)
- ("EXCESS" #x2239)
- ("GEOMETRIC PROPORTION" #x223A)
- ("HOMOTHETIC" #x223B)
- ("TILDE OPERATOR" #x223C)
- ("REVERSED TILDE" #x223D)
- ("INVERTED LAZY S" #x223E)
- ("SINE WAVE" #x223F)
- ("WREATH PRODUCT" #x2240)
- ("NOT TILDE" #x2241)
- ("MINUS TILDE" #x2242)
- ("ASYMPTOTICALLY EQUAL TO" #x2243)
- ("NOT ASYMPTOTICALLY EQUAL TO" #x2244)
- ("APPROXIMATELY EQUAL TO" #x2245)
- ("APPROXIMATELY BUT NOT ACTUALLY EQUAL TO" #x2246)
- ("NEITHER APPROXIMATELY NOR ACTUALLY EQUAL TO" #x2247)
- ("ALMOST EQUAL TO" #x2248)
- ("NOT ALMOST EQUAL TO" #x2249)
- ("ALMOST EQUAL OR EQUAL TO" #x224A)
- ("TRIPLE TILDE" #x224B)
- ("ALL EQUAL TO" #x224C)
- ("EQUIVALENT TO" #x224D)
- ("GEOMETRICALLY EQUIVALENT TO" #x224E)
- ("DIFFERENCE BETWEEN" #x224F)
- ("APPROACHES THE LIMIT" #x2250)
- ("GEOMETRICALLY EQUAL TO" #x2251)
- ("APPROXIMATELY EQUAL TO OR THE IMAGE OF" #x2252)
- ("IMAGE OF OR APPROXIMATELY EQUAL TO" #x2253)
- ("COLON EQUALS" #x2254)
- ("EQUALS COLON" #x2255)
- ("RING IN EQUAL TO" #x2256)
- ("RING EQUAL TO" #x2257)
- ("CORRESPONDS TO" #x2258)
- ("ESTIMATES" #x2259)
- ("EQUIANGULAR TO" #x225A)
- ("STAR EQUALS" #x225B)
- ("DELTA EQUAL TO" #x225C)
- ("EQUAL TO BY DEFINITION" #x225D)
- ("MEASURED BY" #x225E)
- ("QUESTIONED EQUAL TO" #x225F)
- ("NOT EQUAL TO" #x2260)
- ("IDENTICAL TO" #x2261)
- ("NOT IDENTICAL TO" #x2262)
- ("STRICTLY EQUIVALENT TO" #x2263)
- ("LESS-THAN OR EQUAL TO" #x2264)
- ("GREATER-THAN OR EQUAL TO" #x2265)
- ("LESS-THAN OVER EQUAL TO" #x2266)
- ("GREATER-THAN OVER EQUAL TO" #x2267)
- ("LESS-THAN BUT NOT EQUAL TO" #x2268)
- ("GREATER-THAN BUT NOT EQUAL TO" #x2269)
- ("MUCH LESS-THAN" #x226A)
- ("MUCH GREATER-THAN" #x226B)
- ("BETWEEN" #x226C)
- ("NOT EQUIVALENT TO" #x226D)
- ("NOT LESS-THAN" #x226E)
- ("NOT GREATER-THAN" #x226F)
- ("NEITHER LESS-THAN NOR EQUAL TO" #x2270)
- ("NEITHER GREATER-THAN NOR EQUAL TO" #x2271)
- ("LESS-THAN OR EQUIVALENT TO" #x2272)
- ("GREATER-THAN OR EQUIVALENT TO" #x2273)
- ("NEITHER LESS-THAN NOR EQUIVALENT TO" #x2274)
- ("NEITHER GREATER-THAN NOR EQUIVALENT TO" #x2275)
- ("LESS-THAN OR GREATER-THAN" #x2276)
- ("GREATER-THAN OR LESS-THAN" #x2277)
- ("NEITHER LESS-THAN NOR GREATER-THAN" #x2278)
- ("NEITHER GREATER-THAN NOR LESS-THAN" #x2279)
- ("PRECEDES" #x227A)
- ("SUCCEEDS" #x227B)
- ("PRECEDES OR EQUAL TO" #x227C)
- ("SUCCEEDS OR EQUAL TO" #x227D)
- ("PRECEDES OR EQUIVALENT TO" #x227E)
- ("SUCCEEDS OR EQUIVALENT TO" #x227F)
- ("DOES NOT PRECEDE" #x2280)
- ("DOES NOT SUCCEED" #x2281)
- ("SUBSET OF" #x2282)
- ("SUPERSET OF" #x2283)
- ("NOT A SUBSET OF" #x2284)
- ("NOT A SUPERSET OF" #x2285)
- ("SUBSET OF OR EQUAL TO" #x2286)
- ("SUPERSET OF OR EQUAL TO" #x2287)
- ("NEITHER A SUBSET OF NOR EQUAL TO" #x2288)
- ("NEITHER A SUPERSET OF NOR EQUAL TO" #x2289)
- ("SUBSET OF WITH NOT EQUAL TO" #x228A)
- ("SUPERSET OF WITH NOT EQUAL TO" #x228B)
- ("MULTISET" #x228C)
- ("MULTISET MULTIPLICATION" #x228D)
- ("MULTISET UNION" #x228E)
- ("SQUARE IMAGE OF" #x228F)
- ("SQUARE ORIGINAL OF" #x2290)
- ("SQUARE IMAGE OF OR EQUAL TO" #x2291)
- ("SQUARE ORIGINAL OF OR EQUAL TO" #x2292)
- ("SQUARE CAP" #x2293)
- ("SQUARE CUP" #x2294)
- ("CIRCLED PLUS" #x2295)
- ("CIRCLED MINUS" #x2296)
- ("CIRCLED TIMES" #x2297)
- ("CIRCLED DIVISION SLASH" #x2298)
- ("CIRCLED DOT OPERATOR" #x2299)
- ("CIRCLED RING OPERATOR" #x229A)
- ("CIRCLED ASTERISK OPERATOR" #x229B)
- ("CIRCLED EQUALS" #x229C)
- ("CIRCLED DASH" #x229D)
- ("SQUARED PLUS" #x229E)
- ("SQUARED MINUS" #x229F)
- ("SQUARED TIMES" #x22A0)
- ("SQUARED DOT OPERATOR" #x22A1)
- ("RIGHT TACK" #x22A2)
- ("LEFT TACK" #x22A3)
- ("DOWN TACK" #x22A4)
- ("UP TACK" #x22A5)
- ("ASSERTION" #x22A6)
- ("MODELS" #x22A7)
- ("TRUE" #x22A8)
- ("FORCES" #x22A9)
- ("TRIPLE VERTICAL BAR RIGHT TURNSTILE" #x22AA)
- ("DOUBLE VERTICAL BAR DOUBLE RIGHT TURNSTILE" #x22AB)
- ("DOES NOT PROVE" #x22AC)
- ("NOT TRUE" #x22AD)
- ("DOES NOT FORCE" #x22AE)
- ("NEGATED DOUBLE VERTICAL BAR DOUBLE RIGHT TURNSTILE" #x22AF)
- ("PRECEDES UNDER RELATION" #x22B0)
- ("SUCCEEDS UNDER RELATION" #x22B1)
- ("NORMAL SUBGROUP OF" #x22B2)
- ("CONTAINS AS NORMAL SUBGROUP" #x22B3)
- ("NORMAL SUBGROUP OF OR EQUAL TO" #x22B4)
- ("CONTAINS AS NORMAL SUBGROUP OR EQUAL TO" #x22B5)
- ("ORIGINAL OF" #x22B6)
- ("IMAGE OF" #x22B7)
- ("MULTIMAP" #x22B8)
- ("HERMITIAN CONJUGATE MATRIX" #x22B9)
- ("INTERCALATE" #x22BA)
- ("XOR" #x22BB)
- ("NAND" #x22BC)
- ("NOR" #x22BD)
- ("RIGHT ANGLE WITH ARC" #x22BE)
- ("RIGHT TRIANGLE" #x22BF)
- ("N-ARY LOGICAL AND" #x22C0)
- ("N-ARY LOGICAL OR" #x22C1)
- ("N-ARY INTERSECTION" #x22C2)
- ("N-ARY UNION" #x22C3)
- ("DIAMOND OPERATOR" #x22C4)
- ("DOT OPERATOR" #x22C5)
- ("STAR OPERATOR" #x22C6)
- ("DIVISION TIMES" #x22C7)
- ("BOWTIE" #x22C8)
- ("LEFT NORMAL FACTOR SEMIDIRECT PRODUCT" #x22C9)
- ("RIGHT NORMAL FACTOR SEMIDIRECT PRODUCT" #x22CA)
- ("LEFT SEMIDIRECT PRODUCT" #x22CB)
- ("RIGHT SEMIDIRECT PRODUCT" #x22CC)
- ("REVERSED TILDE EQUALS" #x22CD)
- ("CURLY LOGICAL OR" #x22CE)
- ("CURLY LOGICAL AND" #x22CF)
- ("DOUBLE SUBSET" #x22D0)
- ("DOUBLE SUPERSET" #x22D1)
- ("DOUBLE INTERSECTION" #x22D2)
- ("DOUBLE UNION" #x22D3)
- ("PITCHFORK" #x22D4)
- ("EQUAL AND PARALLEL TO" #x22D5)
- ("LESS-THAN WITH DOT" #x22D6)
- ("GREATER-THAN WITH DOT" #x22D7)
- ("VERY MUCH LESS-THAN" #x22D8)
- ("VERY MUCH GREATER-THAN" #x22D9)
- ("LESS-THAN EQUAL TO OR GREATER-THAN" #x22DA)
- ("GREATER-THAN EQUAL TO OR LESS-THAN" #x22DB)
- ("EQUAL TO OR LESS-THAN" #x22DC)
- ("EQUAL TO OR GREATER-THAN" #x22DD)
- ("EQUAL TO OR PRECEDES" #x22DE)
- ("EQUAL TO OR SUCCEEDS" #x22DF)
- ("DOES NOT PRECEDE OR EQUAL" #x22E0)
- ("DOES NOT SUCCEED OR EQUAL" #x22E1)
- ("NOT SQUARE IMAGE OF OR EQUAL TO" #x22E2)
- ("NOT SQUARE ORIGINAL OF OR EQUAL TO" #x22E3)
- ("SQUARE IMAGE OF OR NOT EQUAL TO" #x22E4)
- ("SQUARE ORIGINAL OF OR NOT EQUAL TO" #x22E5)
- ("LESS-THAN BUT NOT EQUIVALENT TO" #x22E6)
- ("GREATER-THAN BUT NOT EQUIVALENT TO" #x22E7)
- ("PRECEDES BUT NOT EQUIVALENT TO" #x22E8)
- ("SUCCEEDS BUT NOT EQUIVALENT TO" #x22E9)
- ("NOT NORMAL SUBGROUP OF" #x22EA)
- ("DOES NOT CONTAIN AS NORMAL SUBGROUP" #x22EB)
- ("NOT NORMAL SUBGROUP OF OR EQUAL TO" #x22EC)
- ("DOES NOT CONTAIN AS NORMAL SUBGROUP OR EQUAL" #x22ED)
- ("VERTICAL ELLIPSIS" #x22EE)
- ("MIDLINE HORIZONTAL ELLIPSIS" #x22EF)
- ("UP RIGHT DIAGONAL ELLIPSIS" #x22F0)
- ("DOWN RIGHT DIAGONAL ELLIPSIS" #x22F1)
- ("ELEMENT OF WITH LONG HORIZONTAL STROKE" #x22F2)
- ("ELEMENT OF WITH VERTICAL BAR AT END OF HORIZONTAL STROKE" #x22F3)
- ("SMALL ELEMENT OF WITH VERTICAL BAR AT END OF HORIZONTAL STROKE" #x22F4)
- ("ELEMENT OF WITH DOT ABOVE" #x22F5)
- ("ELEMENT OF WITH OVERBAR" #x22F6)
- ("SMALL ELEMENT OF WITH OVERBAR" #x22F7)
- ("ELEMENT OF WITH UNDERBAR" #x22F8)
- ("ELEMENT OF WITH TWO HORIZONTAL STROKES" #x22F9)
- ("CONTAINS WITH LONG HORIZONTAL STROKE" #x22FA)
- ("CONTAINS WITH VERTICAL BAR AT END OF HORIZONTAL STROKE" #x22FB)
- ("SMALL CONTAINS WITH VERTICAL BAR AT END OF HORIZONTAL STROKE" #x22FC)
- ("CONTAINS WITH OVERBAR" #x22FD)
- ("SMALL CONTAINS WITH OVERBAR" #x22FE)
- ("Z NOTATION BAG MEMBERSHIP" #x22FF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'miscellaneous-technical
- '(("DIAMETER SIGN" #x2300)
- ("ELECTRIC ARROW" #x2301)
- ("HOUSE" #x2302)
- ("UP ARROWHEAD" #x2303)
- ("DOWN ARROWHEAD" #x2304)
- ("PROJECTIVE" #x2305)
- ("PERSPECTIVE" #x2306)
- ("WAVY LINE" #x2307)
- ("LEFT CEILING" #x2308)
- ("RIGHT CEILING" #x2309)
- ("LEFT FLOOR" #x230A)
- ("RIGHT FLOOR" #x230B)
- ("BOTTOM RIGHT CROP" #x230C)
- ("BOTTOM LEFT CROP" #x230D)
- ("TOP RIGHT CROP" #x230E)
- ("TOP LEFT CROP" #x230F)
- ("REVERSED NOT SIGN" #x2310)
- ("SQUARE LOZENGE" #x2311)
- ("ARC" #x2312)
- ("SEGMENT" #x2313)
- ("SECTOR" #x2314)
- ("TELEPHONE RECORDER" #x2315)
- ("POSITION INDICATOR" #x2316)
- ("VIEWDATA SQUARE" #x2317)
- ("PLACE OF INTEREST SIGN" #x2318)
- ("TURNED NOT SIGN" #x2319)
- ("WATCH" #x231A)
- ("HOURGLASS" #x231B)
- ("TOP LEFT CORNER" #x231C)
- ("TOP RIGHT CORNER" #x231D)
- ("BOTTOM LEFT CORNER" #x231E)
- ("BOTTOM RIGHT CORNER" #x231F)
- ("TOP HALF INTEGRAL" #x2320)
- ("BOTTOM HALF INTEGRAL" #x2321)
- ("FROWN" #x2322)
- ("SMILE" #x2323)
- ("UP ARROWHEAD BETWEEN TWO HORIZONTAL BARS" #x2324)
- ("OPTION KEY" #x2325)
- ("ERASE TO THE RIGHT" #x2326)
- ("X IN A RECTANGLE BOX" #x2327)
- ("KEYBOARD" #x2328)
- ("LEFT-POINTING ANGLE BRACKET" #x2329)
- ("RIGHT-POINTING ANGLE BRACKET" #x232A)
- ("ERASE TO THE LEFT" #x232B)
- ("BENZENE RING" #x232C)
- ("CYLINDRICITY" #x232D)
- ("ALL AROUND-PROFILE" #x232E)
- ("SYMMETRY" #x232F)
- ("TOTAL RUNOUT" #x2330)
- ("DIMENSION ORIGIN" #x2331)
- ("CONICAL TAPER" #x2332)
- ("SLOPE" #x2333)
- ("COUNTERBORE" #x2334)
- ("COUNTERSINK" #x2335)
- ("APL FUNCTIONAL SYMBOL I-BEAM" #x2336)
- ("APL FUNCTIONAL SYMBOL SQUISH QUAD" #x2337)
- ("APL FUNCTIONAL SYMBOL QUAD EQUAL" #x2338)
- ("APL FUNCTIONAL SYMBOL QUAD DIVIDE" #x2339)
- ("APL FUNCTIONAL SYMBOL QUAD DIAMOND" #x233A)
- ("APL FUNCTIONAL SYMBOL QUAD JOT" #x233B)
- ("APL FUNCTIONAL SYMBOL QUAD CIRCLE" #x233C)
- ("APL FUNCTIONAL SYMBOL CIRCLE STILE" #x233D)
- ("APL FUNCTIONAL SYMBOL CIRCLE JOT" #x233E)
- ("APL FUNCTIONAL SYMBOL SLASH BAR" #x233F)
- ("APL FUNCTIONAL SYMBOL BACKSLASH BAR" #x2340)
- ("APL FUNCTIONAL SYMBOL QUAD SLASH" #x2341)
- ("APL FUNCTIONAL SYMBOL QUAD BACKSLASH" #x2342)
- ("APL FUNCTIONAL SYMBOL QUAD LESS-THAN" #x2343)
- ("APL FUNCTIONAL SYMBOL QUAD GREATER-THAN" #x2344)
- ("APL FUNCTIONAL SYMBOL LEFTWARDS VANE" #x2345)
- ("APL FUNCTIONAL SYMBOL RIGHTWARDS VANE" #x2346)
- ("APL FUNCTIONAL SYMBOL QUAD LEFTWARDS ARROW" #x2347)
- ("APL FUNCTIONAL SYMBOL QUAD RIGHTWARDS ARROW" #x2348)
- ("APL FUNCTIONAL SYMBOL CIRCLE BACKSLASH" #x2349)
- ("APL FUNCTIONAL SYMBOL DOWN TACK UNDERBAR" #x234A)
- ("APL FUNCTIONAL SYMBOL DELTA STILE" #x234B)
- ("APL FUNCTIONAL SYMBOL QUAD DOWN CARET" #x234C)
- ("APL FUNCTIONAL SYMBOL QUAD DELTA" #x234D)
- ("APL FUNCTIONAL SYMBOL DOWN TACK JOT" #x234E)
- ("APL FUNCTIONAL SYMBOL UPWARDS VANE" #x234F)
- ("APL FUNCTIONAL SYMBOL QUAD UPWARDS ARROW" #x2350)
- ("APL FUNCTIONAL SYMBOL UP TACK OVERBAR" #x2351)
- ("APL FUNCTIONAL SYMBOL DEL STILE" #x2352)
- ("APL FUNCTIONAL SYMBOL QUAD UP CARET" #x2353)
- ("APL FUNCTIONAL SYMBOL QUAD DEL" #x2354)
- ("APL FUNCTIONAL SYMBOL UP TACK JOT" #x2355)
- ("APL FUNCTIONAL SYMBOL DOWNWARDS VANE" #x2356)
- ("APL FUNCTIONAL SYMBOL QUAD DOWNWARDS ARROW" #x2357)
- ("APL FUNCTIONAL SYMBOL QUOTE UNDERBAR" #x2358)
- ("APL FUNCTIONAL SYMBOL DELTA UNDERBAR" #x2359)
- ("APL FUNCTIONAL SYMBOL DIAMOND UNDERBAR" #x235A)
- ("APL FUNCTIONAL SYMBOL JOT UNDERBAR" #x235B)
- ("APL FUNCTIONAL SYMBOL CIRCLE UNDERBAR" #x235C)
- ("APL FUNCTIONAL SYMBOL UP SHOE JOT" #x235D)
- ("APL FUNCTIONAL SYMBOL QUOTE QUAD" #x235E)
- ("APL FUNCTIONAL SYMBOL CIRCLE STAR" #x235F)
- ("APL FUNCTIONAL SYMBOL QUAD COLON" #x2360)
- ("APL FUNCTIONAL SYMBOL UP TACK DIAERESIS" #x2361)
- ("APL FUNCTIONAL SYMBOL DEL DIAERESIS" #x2362)
- ("APL FUNCTIONAL SYMBOL STAR DIAERESIS" #x2363)
- ("APL FUNCTIONAL SYMBOL JOT DIAERESIS" #x2364)
- ("APL FUNCTIONAL SYMBOL CIRCLE DIAERESIS" #x2365)
- ("APL FUNCTIONAL SYMBOL DOWN SHOE STILE" #x2366)
- ("APL FUNCTIONAL SYMBOL LEFT SHOE STILE" #x2367)
- ("APL FUNCTIONAL SYMBOL TILDE DIAERESIS" #x2368)
- ("APL FUNCTIONAL SYMBOL GREATER-THAN DIAERESIS" #x2369)
- ("APL FUNCTIONAL SYMBOL COMMA BAR" #x236A)
- ("APL FUNCTIONAL SYMBOL DEL TILDE" #x236B)
- ("APL FUNCTIONAL SYMBOL ZILDE" #x236C)
- ("APL FUNCTIONAL SYMBOL STILE TILDE" #x236D)
- ("APL FUNCTIONAL SYMBOL SEMICOLON UNDERBAR" #x236E)
- ("APL FUNCTIONAL SYMBOL QUAD NOT EQUAL" #x236F)
- ("APL FUNCTIONAL SYMBOL QUAD QUESTION" #x2370)
- ("APL FUNCTIONAL SYMBOL DOWN CARET TILDE" #x2371)
- ("APL FUNCTIONAL SYMBOL UP CARET TILDE" #x2372)
- ("APL FUNCTIONAL SYMBOL IOTA" #x2373)
- ("APL FUNCTIONAL SYMBOL RHO" #x2374)
- ("APL FUNCTIONAL SYMBOL OMEGA" #x2375)
- ("APL FUNCTIONAL SYMBOL ALPHA UNDERBAR" #x2376)
- ("APL FUNCTIONAL SYMBOL EPSILON UNDERBAR" #x2377)
- ("APL FUNCTIONAL SYMBOL IOTA UNDERBAR" #x2378)
- ("APL FUNCTIONAL SYMBOL OMEGA UNDERBAR" #x2379)
- ("APL FUNCTIONAL SYMBOL ALPHA" #x237A)
- ("NOT CHECK MARK" #x237B)
- ("RIGHT ANGLE WITH DOWNWARDS ZIGZAG ARROW" #x237C)
- ("SHOULDERED OPEN BOX" #x237D)
- ("BELL SYMBOL" #x237E)
- ("VERTICAL LINE WITH MIDDLE DOT" #x237F)
- ("INSERTION SYMBOL" #x2380)
- ("CONTINUOUS UNDERLINE SYMBOL" #x2381)
- ("DISCONTINUOUS UNDERLINE SYMBOL" #x2382)
- ("EMPHASIS SYMBOL" #x2383)
- ("COMPOSITION SYMBOL" #x2384)
- ("WHITE SQUARE WITH CENTRE VERTICAL LINE" #x2385)
- ("ENTER SYMBOL" #x2386)
- ("ALTERNATIVE KEY SYMBOL" #x2387)
- ("HELM SYMBOL" #x2388)
- ("CIRCLED HORIZONTAL BAR WITH NOTCH" #x2389)
- ("CIRCLED TRIANGLE DOWN" #x238A)
- ("BROKEN CIRCLE WITH NORTHWEST ARROW" #x238B)
- ("UNDO SYMBOL" #x238C)
- ("MONOSTABLE SYMBOL" #x238D)
- ("HYSTERESIS SYMBOL" #x238E)
- ("OPEN-CIRCUIT-OUTPUT H-TYPE SYMBOL" #x238F)
- ("OPEN-CIRCUIT-OUTPUT L-TYPE SYMBOL" #x2390)
- ("PASSIVE-PULL-DOWN-OUTPUT SYMBOL" #x2391)
- ("PASSIVE-PULL-UP-OUTPUT SYMBOL" #x2392)
- ("DIRECT CURRENT SYMBOL FORM TWO" #x2393)
- ("SOFTWARE-FUNCTION SYMBOL" #x2394)
- ("APL FUNCTIONAL SYMBOL QUAD" #x2395)
- ("DECIMAL SEPARATOR KEY SYMBOL" #x2396)
- ("PREVIOUS PAGE" #x2397)
- ("NEXT PAGE" #x2398)
- ("PRINT SCREEN SYMBOL" #x2399)
- ("CLEAR SCREEN SYMBOL" #x239A)
- ("LEFT PARENTHESIS UPPER HOOK" #x239B)
- ("LEFT PARENTHESIS EXTENSION" #x239C)
- ("LEFT PARENTHESIS LOWER HOOK" #x239D)
- ("RIGHT PARENTHESIS UPPER HOOK" #x239E)
- ("RIGHT PARENTHESIS EXTENSION" #x239F)
- ("RIGHT PARENTHESIS LOWER HOOK" #x23A0)
- ("LEFT SQUARE BRACKET UPPER CORNER" #x23A1)
- ("LEFT SQUARE BRACKET EXTENSION" #x23A2)
- ("LEFT SQUARE BRACKET LOWER CORNER" #x23A3)
- ("RIGHT SQUARE BRACKET UPPER CORNER" #x23A4)
- ("RIGHT SQUARE BRACKET EXTENSION" #x23A5)
- ("RIGHT SQUARE BRACKET LOWER CORNER" #x23A6)
- ("LEFT CURLY BRACKET UPPER HOOK" #x23A7)
- ("LEFT CURLY BRACKET MIDDLE PIECE" #x23A8)
- ("LEFT CURLY BRACKET LOWER HOOK" #x23A9)
- ("CURLY BRACKET EXTENSION" #x23AA)
- ("RIGHT CURLY BRACKET UPPER HOOK" #x23AB)
- ("RIGHT CURLY BRACKET MIDDLE PIECE" #x23AC)
- ("RIGHT CURLY BRACKET LOWER HOOK" #x23AD)
- ("INTEGRAL EXTENSION" #x23AE)
- ("HORIZONTAL LINE EXTENSION" #x23AF)
- ("UPPER LEFT OR LOWER RIGHT CURLY BRACKET SECTION" #x23B0)
- ("UPPER RIGHT OR LOWER LEFT CURLY BRACKET SECTION" #x23B1)
- ("SUMMATION TOP" #x23B2)
- ("SUMMATION BOTTOM" #x23B3)
- ("TOP SQUARE BRACKET" #x23B4)
- ("BOTTOM SQUARE BRACKET" #x23B5)
- ("BOTTOM SQUARE BRACKET OVER TOP SQUARE BRACKET" #x23B6)
- ("RADICAL SYMBOL BOTTOM" #x23B7)
- ("LEFT VERTICAL BOX LINE" #x23B8)
- ("RIGHT VERTICAL BOX LINE" #x23B9)
- ("HORIZONTAL SCAN LINE-1" #x23BA)
- ("HORIZONTAL SCAN LINE-3" #x23BB)
- ("HORIZONTAL SCAN LINE-7" #x23BC)
- ("HORIZONTAL SCAN LINE-9" #x23BD)
- ("DENTISTRY SYMBOL LIGHT VERTICAL AND TOP RIGHT" #x23BE)
- ("DENTISTRY SYMBOL LIGHT VERTICAL AND BOTTOM RIGHT" #x23BF)
- ("DENTISTRY SYMBOL LIGHT VERTICAL WITH CIRCLE" #x23C0)
- ("DENTISTRY SYMBOL LIGHT DOWN AND HORIZONTAL WITH CIRCLE" #x23C1)
- ("DENTISTRY SYMBOL LIGHT UP AND HORIZONTAL WITH CIRCLE" #x23C2)
- ("DENTISTRY SYMBOL LIGHT VERTICAL WITH TRIANGLE" #x23C3)
- ("DENTISTRY SYMBOL LIGHT DOWN AND HORIZONTAL WITH TRIANGLE" #x23C4)
- ("DENTISTRY SYMBOL LIGHT UP AND HORIZONTAL WITH TRIANGLE" #x23C5)
- ("DENTISTRY SYMBOL LIGHT VERTICAL AND WAVE" #x23C6)
- ("DENTISTRY SYMBOL LIGHT DOWN AND HORIZONTAL WITH WAVE" #x23C7)
- ("DENTISTRY SYMBOL LIGHT UP AND HORIZONTAL WITH WAVE" #x23C8)
- ("DENTISTRY SYMBOL LIGHT DOWN AND HORIZONTAL" #x23C9)
- ("DENTISTRY SYMBOL LIGHT UP AND HORIZONTAL" #x23CA)
- ("DENTISTRY SYMBOL LIGHT VERTICAL AND TOP LEFT" #x23CB)
- ("DENTISTRY SYMBOL LIGHT VERTICAL AND BOTTOM LEFT" #x23CC)
- ("SQUARE FOOT" #x23CD)
- ("RETURN SYMBOL" #x23CE)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'control-pictures
- '(("SYMBOL FOR NULL" #x2400)
- ("SYMBOL FOR START OF HEADING" #x2401)
- ("SYMBOL FOR START OF TEXT" #x2402)
- ("SYMBOL FOR END OF TEXT" #x2403)
- ("SYMBOL FOR END OF TRANSMISSION" #x2404)
- ("SYMBOL FOR ENQUIRY" #x2405)
- ("SYMBOL FOR ACKNOWLEDGE" #x2406)
- ("SYMBOL FOR BELL" #x2407)
- ("SYMBOL FOR BACKSPACE" #x2408)
- ("SYMBOL FOR HORIZONTAL TABULATION" #x2409)
- ("SYMBOL FOR LINE FEED" #x240A)
- ("SYMBOL FOR VERTICAL TABULATION" #x240B)
- ("SYMBOL FOR FORM FEED" #x240C)
- ("SYMBOL FOR CARRIAGE RETURN" #x240D)
- ("SYMBOL FOR SHIFT OUT" #x240E)
- ("SYMBOL FOR SHIFT IN" #x240F)
- ("SYMBOL FOR DATA LINK ESCAPE" #x2410)
- ("SYMBOL FOR DEVICE CONTROL ONE" #x2411)
- ("SYMBOL FOR DEVICE CONTROL TWO" #x2412)
- ("SYMBOL FOR DEVICE CONTROL THREE" #x2413)
- ("SYMBOL FOR DEVICE CONTROL FOUR" #x2414)
- ("SYMBOL FOR NEGATIVE ACKNOWLEDGE" #x2415)
- ("SYMBOL FOR SYNCHRONOUS IDLE" #x2416)
- ("SYMBOL FOR END OF TRANSMISSION BLOCK" #x2417)
- ("SYMBOL FOR CANCEL" #x2418)
- ("SYMBOL FOR END OF MEDIUM" #x2419)
- ("SYMBOL FOR SUBSTITUTE" #x241A)
- ("SYMBOL FOR ESCAPE" #x241B)
- ("SYMBOL FOR FILE SEPARATOR" #x241C)
- ("SYMBOL FOR GROUP SEPARATOR" #x241D)
- ("SYMBOL FOR RECORD SEPARATOR" #x241E)
- ("SYMBOL FOR UNIT SEPARATOR" #x241F)
- ("SYMBOL FOR SPACE" #x2420)
- ("SYMBOL FOR DELETE" #x2421)
- ("BLANK SYMBOL" #x2422)
- ("OPEN BOX" #x2423)
- ("SYMBOL FOR NEWLINE" #x2424)
- ("SYMBOL FOR DELETE FORM TWO" #x2425)
- ("SYMBOL FOR SUBSTITUTE FORM TWO" #x2426)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'optical-character-recognition
- '(("OCR HOOK" #x2440)
- ("OCR CHAIR" #x2441)
- ("OCR FORK" #x2442)
- ("OCR INVERTED FORK" #x2443)
- ("OCR BELT BUCKLE" #x2444)
- ("OCR BOW TIE" #x2445)
- ("OCR BRANCH BANK IDENTIFICATION" #x2446)
- ("OCR AMOUNT OF CHECK" #x2447)
- ("OCR DASH" #x2448)
- ("OCR CUSTOMER ACCOUNT NUMBER" #x2449)
- ("OCR DOUBLE BACKSLASH" #x244A)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'enclosed-alphanumerics
- '(("CIRCLED DIGIT ONE" #x2460)
- ("CIRCLED DIGIT TWO" #x2461)
- ("CIRCLED DIGIT THREE" #x2462)
- ("CIRCLED DIGIT FOUR" #x2463)
- ("CIRCLED DIGIT FIVE" #x2464)
- ("CIRCLED DIGIT SIX" #x2465)
- ("CIRCLED DIGIT SEVEN" #x2466)
- ("CIRCLED DIGIT EIGHT" #x2467)
- ("CIRCLED DIGIT NINE" #x2468)
- ("CIRCLED NUMBER TEN" #x2469)
- ("CIRCLED NUMBER ELEVEN" #x246A)
- ("CIRCLED NUMBER TWELVE" #x246B)
- ("CIRCLED NUMBER THIRTEEN" #x246C)
- ("CIRCLED NUMBER FOURTEEN" #x246D)
- ("CIRCLED NUMBER FIFTEEN" #x246E)
- ("CIRCLED NUMBER SIXTEEN" #x246F)
- ("CIRCLED NUMBER SEVENTEEN" #x2470)
- ("CIRCLED NUMBER EIGHTEEN" #x2471)
- ("CIRCLED NUMBER NINETEEN" #x2472)
- ("CIRCLED NUMBER TWENTY" #x2473)
- ("PARENTHESIZED DIGIT ONE" #x2474)
- ("PARENTHESIZED DIGIT TWO" #x2475)
- ("PARENTHESIZED DIGIT THREE" #x2476)
- ("PARENTHESIZED DIGIT FOUR" #x2477)
- ("PARENTHESIZED DIGIT FIVE" #x2478)
- ("PARENTHESIZED DIGIT SIX" #x2479)
- ("PARENTHESIZED DIGIT SEVEN" #x247A)
- ("PARENTHESIZED DIGIT EIGHT" #x247B)
- ("PARENTHESIZED DIGIT NINE" #x247C)
- ("PARENTHESIZED NUMBER TEN" #x247D)
- ("PARENTHESIZED NUMBER ELEVEN" #x247E)
- ("PARENTHESIZED NUMBER TWELVE" #x247F)
- ("PARENTHESIZED NUMBER THIRTEEN" #x2480)
- ("PARENTHESIZED NUMBER FOURTEEN" #x2481)
- ("PARENTHESIZED NUMBER FIFTEEN" #x2482)
- ("PARENTHESIZED NUMBER SIXTEEN" #x2483)
- ("PARENTHESIZED NUMBER SEVENTEEN" #x2484)
- ("PARENTHESIZED NUMBER EIGHTEEN" #x2485)
- ("PARENTHESIZED NUMBER NINETEEN" #x2486)
- ("PARENTHESIZED NUMBER TWENTY" #x2487)
- ("DIGIT ONE FULL STOP" #x2488)
- ("DIGIT TWO FULL STOP" #x2489)
- ("DIGIT THREE FULL STOP" #x248A)
- ("DIGIT FOUR FULL STOP" #x248B)
- ("DIGIT FIVE FULL STOP" #x248C)
- ("DIGIT SIX FULL STOP" #x248D)
- ("DIGIT SEVEN FULL STOP" #x248E)
- ("DIGIT EIGHT FULL STOP" #x248F)
- ("DIGIT NINE FULL STOP" #x2490)
- ("NUMBER TEN FULL STOP" #x2491)
- ("NUMBER ELEVEN FULL STOP" #x2492)
- ("NUMBER TWELVE FULL STOP" #x2493)
- ("NUMBER THIRTEEN FULL STOP" #x2494)
- ("NUMBER FOURTEEN FULL STOP" #x2495)
- ("NUMBER FIFTEEN FULL STOP" #x2496)
- ("NUMBER SIXTEEN FULL STOP" #x2497)
- ("NUMBER SEVENTEEN FULL STOP" #x2498)
- ("NUMBER EIGHTEEN FULL STOP" #x2499)
- ("NUMBER NINETEEN FULL STOP" #x249A)
- ("NUMBER TWENTY FULL STOP" #x249B)
- ("PARENTHESIZED LATIN SMALL LETTER A" #x249C)
- ("PARENTHESIZED LATIN SMALL LETTER B" #x249D)
- ("PARENTHESIZED LATIN SMALL LETTER C" #x249E)
- ("PARENTHESIZED LATIN SMALL LETTER D" #x249F)
- ("PARENTHESIZED LATIN SMALL LETTER E" #x24A0)
- ("PARENTHESIZED LATIN SMALL LETTER F" #x24A1)
- ("PARENTHESIZED LATIN SMALL LETTER G" #x24A2)
- ("PARENTHESIZED LATIN SMALL LETTER H" #x24A3)
- ("PARENTHESIZED LATIN SMALL LETTER I" #x24A4)
- ("PARENTHESIZED LATIN SMALL LETTER J" #x24A5)
- ("PARENTHESIZED LATIN SMALL LETTER K" #x24A6)
- ("PARENTHESIZED LATIN SMALL LETTER L" #x24A7)
- ("PARENTHESIZED LATIN SMALL LETTER M" #x24A8)
- ("PARENTHESIZED LATIN SMALL LETTER N" #x24A9)
- ("PARENTHESIZED LATIN SMALL LETTER O" #x24AA)
- ("PARENTHESIZED LATIN SMALL LETTER P" #x24AB)
- ("PARENTHESIZED LATIN SMALL LETTER Q" #x24AC)
- ("PARENTHESIZED LATIN SMALL LETTER R" #x24AD)
- ("PARENTHESIZED LATIN SMALL LETTER S" #x24AE)
- ("PARENTHESIZED LATIN SMALL LETTER T" #x24AF)
- ("PARENTHESIZED LATIN SMALL LETTER U" #x24B0)
- ("PARENTHESIZED LATIN SMALL LETTER V" #x24B1)
- ("PARENTHESIZED LATIN SMALL LETTER W" #x24B2)
- ("PARENTHESIZED LATIN SMALL LETTER X" #x24B3)
- ("PARENTHESIZED LATIN SMALL LETTER Y" #x24B4)
- ("PARENTHESIZED LATIN SMALL LETTER Z" #x24B5)
- ("CIRCLED LATIN CAPITAL LETTER A" #x24B6)
- ("CIRCLED LATIN CAPITAL LETTER B" #x24B7)
- ("CIRCLED LATIN CAPITAL LETTER C" #x24B8)
- ("CIRCLED LATIN CAPITAL LETTER D" #x24B9)
- ("CIRCLED LATIN CAPITAL LETTER E" #x24BA)
- ("CIRCLED LATIN CAPITAL LETTER F" #x24BB)
- ("CIRCLED LATIN CAPITAL LETTER G" #x24BC)
- ("CIRCLED LATIN CAPITAL LETTER H" #x24BD)
- ("CIRCLED LATIN CAPITAL LETTER I" #x24BE)
- ("CIRCLED LATIN CAPITAL LETTER J" #x24BF)
- ("CIRCLED LATIN CAPITAL LETTER K" #x24C0)
- ("CIRCLED LATIN CAPITAL LETTER L" #x24C1)
- ("CIRCLED LATIN CAPITAL LETTER M" #x24C2)
- ("CIRCLED LATIN CAPITAL LETTER N" #x24C3)
- ("CIRCLED LATIN CAPITAL LETTER O" #x24C4)
- ("CIRCLED LATIN CAPITAL LETTER P" #x24C5)
- ("CIRCLED LATIN CAPITAL LETTER Q" #x24C6)
- ("CIRCLED LATIN CAPITAL LETTER R" #x24C7)
- ("CIRCLED LATIN CAPITAL LETTER S" #x24C8)
- ("CIRCLED LATIN CAPITAL LETTER T" #x24C9)
- ("CIRCLED LATIN CAPITAL LETTER U" #x24CA)
- ("CIRCLED LATIN CAPITAL LETTER V" #x24CB)
- ("CIRCLED LATIN CAPITAL LETTER W" #x24CC)
- ("CIRCLED LATIN CAPITAL LETTER X" #x24CD)
- ("CIRCLED LATIN CAPITAL LETTER Y" #x24CE)
- ("CIRCLED LATIN CAPITAL LETTER Z" #x24CF)
- ("CIRCLED LATIN SMALL LETTER A" #x24D0)
- ("CIRCLED LATIN SMALL LETTER B" #x24D1)
- ("CIRCLED LATIN SMALL LETTER C" #x24D2)
- ("CIRCLED LATIN SMALL LETTER D" #x24D3)
- ("CIRCLED LATIN SMALL LETTER E" #x24D4)
- ("CIRCLED LATIN SMALL LETTER F" #x24D5)
- ("CIRCLED LATIN SMALL LETTER G" #x24D6)
- ("CIRCLED LATIN SMALL LETTER H" #x24D7)
- ("CIRCLED LATIN SMALL LETTER I" #x24D8)
- ("CIRCLED LATIN SMALL LETTER J" #x24D9)
- ("CIRCLED LATIN SMALL LETTER K" #x24DA)
- ("CIRCLED LATIN SMALL LETTER L" #x24DB)
- ("CIRCLED LATIN SMALL LETTER M" #x24DC)
- ("CIRCLED LATIN SMALL LETTER N" #x24DD)
- ("CIRCLED LATIN SMALL LETTER O" #x24DE)
- ("CIRCLED LATIN SMALL LETTER P" #x24DF)
- ("CIRCLED LATIN SMALL LETTER Q" #x24E0)
- ("CIRCLED LATIN SMALL LETTER R" #x24E1)
- ("CIRCLED LATIN SMALL LETTER S" #x24E2)
- ("CIRCLED LATIN SMALL LETTER T" #x24E3)
- ("CIRCLED LATIN SMALL LETTER U" #x24E4)
- ("CIRCLED LATIN SMALL LETTER V" #x24E5)
- ("CIRCLED LATIN SMALL LETTER W" #x24E6)
- ("CIRCLED LATIN SMALL LETTER X" #x24E7)
- ("CIRCLED LATIN SMALL LETTER Y" #x24E8)
- ("CIRCLED LATIN SMALL LETTER Z" #x24E9)
- ("CIRCLED DIGIT ZERO" #x24EA)
- ("NEGATIVE CIRCLED NUMBER ELEVEN" #x24EB)
- ("NEGATIVE CIRCLED NUMBER TWELVE" #x24EC)
- ("NEGATIVE CIRCLED NUMBER THIRTEEN" #x24ED)
- ("NEGATIVE CIRCLED NUMBER FOURTEEN" #x24EE)
- ("NEGATIVE CIRCLED NUMBER FIFTEEN" #x24EF)
- ("NEGATIVE CIRCLED NUMBER SIXTEEN" #x24F0)
- ("NEGATIVE CIRCLED NUMBER SEVENTEEN" #x24F1)
- ("NEGATIVE CIRCLED NUMBER EIGHTEEN" #x24F2)
- ("NEGATIVE CIRCLED NUMBER NINETEEN" #x24F3)
- ("NEGATIVE CIRCLED NUMBER TWENTY" #x24F4)
- ("DOUBLE CIRCLED DIGIT ONE" #x24F5)
- ("DOUBLE CIRCLED DIGIT TWO" #x24F6)
- ("DOUBLE CIRCLED DIGIT THREE" #x24F7)
- ("DOUBLE CIRCLED DIGIT FOUR" #x24F8)
- ("DOUBLE CIRCLED DIGIT FIVE" #x24F9)
- ("DOUBLE CIRCLED DIGIT SIX" #x24FA)
- ("DOUBLE CIRCLED DIGIT SEVEN" #x24FB)
- ("DOUBLE CIRCLED DIGIT EIGHT" #x24FC)
- ("DOUBLE CIRCLED DIGIT NINE" #x24FD)
- ("DOUBLE CIRCLED NUMBER TEN" #x24FE)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'box-drawing
- '(("BOX DRAWINGS LIGHT HORIZONTAL" #x2500)
- ("BOX DRAWINGS HEAVY HORIZONTAL" #x2501)
- ("BOX DRAWINGS LIGHT VERTICAL" #x2502)
- ("BOX DRAWINGS HEAVY VERTICAL" #x2503)
- ("BOX DRAWINGS LIGHT TRIPLE DASH HORIZONTAL" #x2504)
- ("BOX DRAWINGS HEAVY TRIPLE DASH HORIZONTAL" #x2505)
- ("BOX DRAWINGS LIGHT TRIPLE DASH VERTICAL" #x2506)
- ("BOX DRAWINGS HEAVY TRIPLE DASH VERTICAL" #x2507)
- ("BOX DRAWINGS LIGHT QUADRUPLE DASH HORIZONTAL" #x2508)
- ("BOX DRAWINGS HEAVY QUADRUPLE DASH HORIZONTAL" #x2509)
- ("BOX DRAWINGS LIGHT QUADRUPLE DASH VERTICAL" #x250A)
- ("BOX DRAWINGS HEAVY QUADRUPLE DASH VERTICAL" #x250B)
- ("BOX DRAWINGS LIGHT DOWN AND RIGHT" #x250C)
- ("BOX DRAWINGS DOWN LIGHT AND RIGHT HEAVY" #x250D)
- ("BOX DRAWINGS DOWN HEAVY AND RIGHT LIGHT" #x250E)
- ("BOX DRAWINGS HEAVY DOWN AND RIGHT" #x250F)
- ("BOX DRAWINGS LIGHT DOWN AND LEFT" #x2510)
- ("BOX DRAWINGS DOWN LIGHT AND LEFT HEAVY" #x2511)
- ("BOX DRAWINGS DOWN HEAVY AND LEFT LIGHT" #x2512)
- ("BOX DRAWINGS HEAVY DOWN AND LEFT" #x2513)
- ("BOX DRAWINGS LIGHT UP AND RIGHT" #x2514)
- ("BOX DRAWINGS UP LIGHT AND RIGHT HEAVY" #x2515)
- ("BOX DRAWINGS UP HEAVY AND RIGHT LIGHT" #x2516)
- ("BOX DRAWINGS HEAVY UP AND RIGHT" #x2517)
- ("BOX DRAWINGS LIGHT UP AND LEFT" #x2518)
- ("BOX DRAWINGS UP LIGHT AND LEFT HEAVY" #x2519)
- ("BOX DRAWINGS UP HEAVY AND LEFT LIGHT" #x251A)
- ("BOX DRAWINGS HEAVY UP AND LEFT" #x251B)
- ("BOX DRAWINGS LIGHT VERTICAL AND RIGHT" #x251C)
- ("BOX DRAWINGS VERTICAL LIGHT AND RIGHT HEAVY" #x251D)
- ("BOX DRAWINGS UP HEAVY AND RIGHT DOWN LIGHT" #x251E)
- ("BOX DRAWINGS DOWN HEAVY AND RIGHT UP LIGHT" #x251F)
- ("BOX DRAWINGS VERTICAL HEAVY AND RIGHT LIGHT" #x2520)
- ("BOX DRAWINGS DOWN LIGHT AND RIGHT UP HEAVY" #x2521)
- ("BOX DRAWINGS UP LIGHT AND RIGHT DOWN HEAVY" #x2522)
- ("BOX DRAWINGS HEAVY VERTICAL AND RIGHT" #x2523)
- ("BOX DRAWINGS LIGHT VERTICAL AND LEFT" #x2524)
- ("BOX DRAWINGS VERTICAL LIGHT AND LEFT HEAVY" #x2525)
- ("BOX DRAWINGS UP HEAVY AND LEFT DOWN LIGHT" #x2526)
- ("BOX DRAWINGS DOWN HEAVY AND LEFT UP LIGHT" #x2527)
- ("BOX DRAWINGS VERTICAL HEAVY AND LEFT LIGHT" #x2528)
- ("BOX DRAWINGS DOWN LIGHT AND LEFT UP HEAVY" #x2529)
- ("BOX DRAWINGS UP LIGHT AND LEFT DOWN HEAVY" #x252A)
- ("BOX DRAWINGS HEAVY VERTICAL AND LEFT" #x252B)
- ("BOX DRAWINGS LIGHT DOWN AND HORIZONTAL" #x252C)
- ("BOX DRAWINGS LEFT HEAVY AND RIGHT DOWN LIGHT" #x252D)
- ("BOX DRAWINGS RIGHT HEAVY AND LEFT DOWN LIGHT" #x252E)
- ("BOX DRAWINGS DOWN LIGHT AND HORIZONTAL HEAVY" #x252F)
- ("BOX DRAWINGS DOWN HEAVY AND HORIZONTAL LIGHT" #x2530)
- ("BOX DRAWINGS RIGHT LIGHT AND LEFT DOWN HEAVY" #x2531)
- ("BOX DRAWINGS LEFT LIGHT AND RIGHT DOWN HEAVY" #x2532)
- ("BOX DRAWINGS HEAVY DOWN AND HORIZONTAL" #x2533)
- ("BOX DRAWINGS LIGHT UP AND HORIZONTAL" #x2534)
- ("BOX DRAWINGS LEFT HEAVY AND RIGHT UP LIGHT" #x2535)
- ("BOX DRAWINGS RIGHT HEAVY AND LEFT UP LIGHT" #x2536)
- ("BOX DRAWINGS UP LIGHT AND HORIZONTAL HEAVY" #x2537)
- ("BOX DRAWINGS UP HEAVY AND HORIZONTAL LIGHT" #x2538)
- ("BOX DRAWINGS RIGHT LIGHT AND LEFT UP HEAVY" #x2539)
- ("BOX DRAWINGS LEFT LIGHT AND RIGHT UP HEAVY" #x253A)
- ("BOX DRAWINGS HEAVY UP AND HORIZONTAL" #x253B)
- ("BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL" #x253C)
- ("BOX DRAWINGS LEFT HEAVY AND RIGHT VERTICAL LIGHT" #x253D)
- ("BOX DRAWINGS RIGHT HEAVY AND LEFT VERTICAL LIGHT" #x253E)
- ("BOX DRAWINGS VERTICAL LIGHT AND HORIZONTAL HEAVY" #x253F)
- ("BOX DRAWINGS UP HEAVY AND DOWN HORIZONTAL LIGHT" #x2540)
- ("BOX DRAWINGS DOWN HEAVY AND UP HORIZONTAL LIGHT" #x2541)
- ("BOX DRAWINGS VERTICAL HEAVY AND HORIZONTAL LIGHT" #x2542)
- ("BOX DRAWINGS LEFT UP HEAVY AND RIGHT DOWN LIGHT" #x2543)
- ("BOX DRAWINGS RIGHT UP HEAVY AND LEFT DOWN LIGHT" #x2544)
- ("BOX DRAWINGS LEFT DOWN HEAVY AND RIGHT UP LIGHT" #x2545)
- ("BOX DRAWINGS RIGHT DOWN HEAVY AND LEFT UP LIGHT" #x2546)
- ("BOX DRAWINGS DOWN LIGHT AND UP HORIZONTAL HEAVY" #x2547)
- ("BOX DRAWINGS UP LIGHT AND DOWN HORIZONTAL HEAVY" #x2548)
- ("BOX DRAWINGS RIGHT LIGHT AND LEFT VERTICAL HEAVY" #x2549)
- ("BOX DRAWINGS LEFT LIGHT AND RIGHT VERTICAL HEAVY" #x254A)
- ("BOX DRAWINGS HEAVY VERTICAL AND HORIZONTAL" #x254B)
- ("BOX DRAWINGS LIGHT DOUBLE DASH HORIZONTAL" #x254C)
- ("BOX DRAWINGS HEAVY DOUBLE DASH HORIZONTAL" #x254D)
- ("BOX DRAWINGS LIGHT DOUBLE DASH VERTICAL" #x254E)
- ("BOX DRAWINGS HEAVY DOUBLE DASH VERTICAL" #x254F)
- ("BOX DRAWINGS DOUBLE HORIZONTAL" #x2550)
- ("BOX DRAWINGS DOUBLE VERTICAL" #x2551)
- ("BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE" #x2552)
- ("BOX DRAWINGS DOWN DOUBLE AND RIGHT SINGLE" #x2553)
- ("BOX DRAWINGS DOUBLE DOWN AND RIGHT" #x2554)
- ("BOX DRAWINGS DOWN SINGLE AND LEFT DOUBLE" #x2555)
- ("BOX DRAWINGS DOWN DOUBLE AND LEFT SINGLE" #x2556)
- ("BOX DRAWINGS DOUBLE DOWN AND LEFT" #x2557)
- ("BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE" #x2558)
- ("BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE" #x2559)
- ("BOX DRAWINGS DOUBLE UP AND RIGHT" #x255A)
- ("BOX DRAWINGS UP SINGLE AND LEFT DOUBLE" #x255B)
- ("BOX DRAWINGS UP DOUBLE AND LEFT SINGLE" #x255C)
- ("BOX DRAWINGS DOUBLE UP AND LEFT" #x255D)
- ("BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE" #x255E)
- ("BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE" #x255F)
- ("BOX DRAWINGS DOUBLE VERTICAL AND RIGHT" #x2560)
- ("BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE" #x2561)
- ("BOX DRAWINGS VERTICAL DOUBLE AND LEFT SINGLE" #x2562)
- ("BOX DRAWINGS DOUBLE VERTICAL AND LEFT" #x2563)
- ("BOX DRAWINGS DOWN SINGLE AND HORIZONTAL DOUBLE" #x2564)
- ("BOX DRAWINGS DOWN DOUBLE AND HORIZONTAL SINGLE" #x2565)
- ("BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL" #x2566)
- ("BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE" #x2567)
- ("BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE" #x2568)
- ("BOX DRAWINGS DOUBLE UP AND HORIZONTAL" #x2569)
- ("BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE" #x256A)
- ("BOX DRAWINGS VERTICAL DOUBLE AND HORIZONTAL SINGLE" #x256B)
- ("BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL" #x256C)
- ("BOX DRAWINGS LIGHT ARC DOWN AND RIGHT" #x256D)
- ("BOX DRAWINGS LIGHT ARC DOWN AND LEFT" #x256E)
- ("BOX DRAWINGS LIGHT ARC UP AND LEFT" #x256F)
- ("BOX DRAWINGS LIGHT ARC UP AND RIGHT" #x2570)
- ("BOX DRAWINGS LIGHT DIAGONAL UPPER RIGHT TO LOWER LEFT" #x2571)
- ("BOX DRAWINGS LIGHT DIAGONAL UPPER LEFT TO LOWER RIGHT" #x2572)
- ("BOX DRAWINGS LIGHT DIAGONAL CROSS" #x2573)
- ("BOX DRAWINGS LIGHT LEFT" #x2574)
- ("BOX DRAWINGS LIGHT UP" #x2575)
- ("BOX DRAWINGS LIGHT RIGHT" #x2576)
- ("BOX DRAWINGS LIGHT DOWN" #x2577)
- ("BOX DRAWINGS HEAVY LEFT" #x2578)
- ("BOX DRAWINGS HEAVY UP" #x2579)
- ("BOX DRAWINGS HEAVY RIGHT" #x257A)
- ("BOX DRAWINGS HEAVY DOWN" #x257B)
- ("BOX DRAWINGS LIGHT LEFT AND HEAVY RIGHT" #x257C)
- ("BOX DRAWINGS LIGHT UP AND HEAVY DOWN" #x257D)
- ("BOX DRAWINGS HEAVY LEFT AND LIGHT RIGHT" #x257E)
- ("BOX DRAWINGS HEAVY UP AND LIGHT DOWN" #x257F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'block-elements
- '(("UPPER HALF BLOCK" #x2580)
- ("LOWER ONE EIGHTH BLOCK" #x2581)
- ("LOWER ONE QUARTER BLOCK" #x2582)
- ("LOWER THREE EIGHTHS BLOCK" #x2583)
- ("LOWER HALF BLOCK" #x2584)
- ("LOWER FIVE EIGHTHS BLOCK" #x2585)
- ("LOWER THREE QUARTERS BLOCK" #x2586)
- ("LOWER SEVEN EIGHTHS BLOCK" #x2587)
- ("FULL BLOCK" #x2588)
- ("LEFT SEVEN EIGHTHS BLOCK" #x2589)
- ("LEFT THREE QUARTERS BLOCK" #x258A)
- ("LEFT FIVE EIGHTHS BLOCK" #x258B)
- ("LEFT HALF BLOCK" #x258C)
- ("LEFT THREE EIGHTHS BLOCK" #x258D)
- ("LEFT ONE QUARTER BLOCK" #x258E)
- ("LEFT ONE EIGHTH BLOCK" #x258F)
- ("RIGHT HALF BLOCK" #x2590)
- ("LIGHT SHADE" #x2591)
- ("MEDIUM SHADE" #x2592)
- ("DARK SHADE" #x2593)
- ("UPPER ONE EIGHTH BLOCK" #x2594)
- ("RIGHT ONE EIGHTH BLOCK" #x2595)
- ("QUADRANT LOWER LEFT" #x2596)
- ("QUADRANT LOWER RIGHT" #x2597)
- ("QUADRANT UPPER LEFT" #x2598)
- ("QUADRANT UPPER LEFT AND LOWER LEFT AND LOWER RIGHT" #x2599)
- ("QUADRANT UPPER LEFT AND LOWER RIGHT" #x259A)
- ("QUADRANT UPPER LEFT AND UPPER RIGHT AND LOWER LEFT" #x259B)
- ("QUADRANT UPPER LEFT AND UPPER RIGHT AND LOWER RIGHT" #x259C)
- ("QUADRANT UPPER RIGHT" #x259D)
- ("QUADRANT UPPER RIGHT AND LOWER LEFT" #x259E)
- ("QUADRANT UPPER RIGHT AND LOWER LEFT AND LOWER RIGHT" #x259F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'geometric-shapes
- '(("BLACK SQUARE" #x25A0)
- ("WHITE SQUARE" #x25A1)
- ("WHITE SQUARE WITH ROUNDED CORNERS" #x25A2)
- ("WHITE SQUARE CONTAINING BLACK SMALL SQUARE" #x25A3)
- ("SQUARE WITH HORIZONTAL FILL" #x25A4)
- ("SQUARE WITH VERTICAL FILL" #x25A5)
- ("SQUARE WITH ORTHOGONAL CROSSHATCH FILL" #x25A6)
- ("SQUARE WITH UPPER LEFT TO LOWER RIGHT FILL" #x25A7)
- ("SQUARE WITH UPPER RIGHT TO LOWER LEFT FILL" #x25A8)
- ("SQUARE WITH DIAGONAL CROSSHATCH FILL" #x25A9)
- ("BLACK SMALL SQUARE" #x25AA)
- ("WHITE SMALL SQUARE" #x25AB)
- ("BLACK RECTANGLE" #x25AC)
- ("WHITE RECTANGLE" #x25AD)
- ("BLACK VERTICAL RECTANGLE" #x25AE)
- ("WHITE VERTICAL RECTANGLE" #x25AF)
- ("BLACK PARALLELOGRAM" #x25B0)
- ("WHITE PARALLELOGRAM" #x25B1)
- ("BLACK UP-POINTING TRIANGLE" #x25B2)
- ("WHITE UP-POINTING TRIANGLE" #x25B3)
- ("BLACK UP-POINTING SMALL TRIANGLE" #x25B4)
- ("WHITE UP-POINTING SMALL TRIANGLE" #x25B5)
- ("BLACK RIGHT-POINTING TRIANGLE" #x25B6)
- ("WHITE RIGHT-POINTING TRIANGLE" #x25B7)
- ("BLACK RIGHT-POINTING SMALL TRIANGLE" #x25B8)
- ("WHITE RIGHT-POINTING SMALL TRIANGLE" #x25B9)
- ("BLACK RIGHT-POINTING POINTER" #x25BA)
- ("WHITE RIGHT-POINTING POINTER" #x25BB)
- ("BLACK DOWN-POINTING TRIANGLE" #x25BC)
- ("WHITE DOWN-POINTING TRIANGLE" #x25BD)
- ("BLACK DOWN-POINTING SMALL TRIANGLE" #x25BE)
- ("WHITE DOWN-POINTING SMALL TRIANGLE" #x25BF)
- ("BLACK LEFT-POINTING TRIANGLE" #x25C0)
- ("WHITE LEFT-POINTING TRIANGLE" #x25C1)
- ("BLACK LEFT-POINTING SMALL TRIANGLE" #x25C2)
- ("WHITE LEFT-POINTING SMALL TRIANGLE" #x25C3)
- ("BLACK LEFT-POINTING POINTER" #x25C4)
- ("WHITE LEFT-POINTING POINTER" #x25C5)
- ("BLACK DIAMOND" #x25C6)
- ("WHITE DIAMOND" #x25C7)
- ("WHITE DIAMOND CONTAINING BLACK SMALL DIAMOND" #x25C8)
- ("FISHEYE" #x25C9)
- ("LOZENGE" #x25CA)
- ("WHITE CIRCLE" #x25CB)
- ("DOTTED CIRCLE" #x25CC)
- ("CIRCLE WITH VERTICAL FILL" #x25CD)
- ("BULLSEYE" #x25CE)
- ("BLACK CIRCLE" #x25CF)
- ("CIRCLE WITH LEFT HALF BLACK" #x25D0)
- ("CIRCLE WITH RIGHT HALF BLACK" #x25D1)
- ("CIRCLE WITH LOWER HALF BLACK" #x25D2)
- ("CIRCLE WITH UPPER HALF BLACK" #x25D3)
- ("CIRCLE WITH UPPER RIGHT QUADRANT BLACK" #x25D4)
- ("CIRCLE WITH ALL BUT UPPER LEFT QUADRANT BLACK" #x25D5)
- ("LEFT HALF BLACK CIRCLE" #x25D6)
- ("RIGHT HALF BLACK CIRCLE" #x25D7)
- ("INVERSE BULLET" #x25D8)
- ("INVERSE WHITE CIRCLE" #x25D9)
- ("UPPER HALF INVERSE WHITE CIRCLE" #x25DA)
- ("LOWER HALF INVERSE WHITE CIRCLE" #x25DB)
- ("UPPER LEFT QUADRANT CIRCULAR ARC" #x25DC)
- ("UPPER RIGHT QUADRANT CIRCULAR ARC" #x25DD)
- ("LOWER RIGHT QUADRANT CIRCULAR ARC" #x25DE)
- ("LOWER LEFT QUADRANT CIRCULAR ARC" #x25DF)
- ("UPPER HALF CIRCLE" #x25E0)
- ("LOWER HALF CIRCLE" #x25E1)
- ("BLACK LOWER RIGHT TRIANGLE" #x25E2)
- ("BLACK LOWER LEFT TRIANGLE" #x25E3)
- ("BLACK UPPER LEFT TRIANGLE" #x25E4)
- ("BLACK UPPER RIGHT TRIANGLE" #x25E5)
- ("WHITE BULLET" #x25E6)
- ("SQUARE WITH LEFT HALF BLACK" #x25E7)
- ("SQUARE WITH RIGHT HALF BLACK" #x25E8)
- ("SQUARE WITH UPPER LEFT DIAGONAL HALF BLACK" #x25E9)
- ("SQUARE WITH LOWER RIGHT DIAGONAL HALF BLACK" #x25EA)
- ("WHITE SQUARE WITH VERTICAL BISECTING LINE" #x25EB)
- ("WHITE UP-POINTING TRIANGLE WITH DOT" #x25EC)
- ("UP-POINTING TRIANGLE WITH LEFT HALF BLACK" #x25ED)
- ("UP-POINTING TRIANGLE WITH RIGHT HALF BLACK" #x25EE)
- ("LARGE CIRCLE" #x25EF)
- ("WHITE SQUARE WITH UPPER LEFT QUADRANT" #x25F0)
- ("WHITE SQUARE WITH LOWER LEFT QUADRANT" #x25F1)
- ("WHITE SQUARE WITH LOWER RIGHT QUADRANT" #x25F2)
- ("WHITE SQUARE WITH UPPER RIGHT QUADRANT" #x25F3)
- ("WHITE CIRCLE WITH UPPER LEFT QUADRANT" #x25F4)
- ("WHITE CIRCLE WITH LOWER LEFT QUADRANT" #x25F5)
- ("WHITE CIRCLE WITH LOWER RIGHT QUADRANT" #x25F6)
- ("WHITE CIRCLE WITH UPPER RIGHT QUADRANT" #x25F7)
- ("UPPER LEFT TRIANGLE" #x25F8)
- ("UPPER RIGHT TRIANGLE" #x25F9)
- ("LOWER LEFT TRIANGLE" #x25FA)
- ("WHITE MEDIUM SQUARE" #x25FB)
- ("BLACK MEDIUM SQUARE" #x25FC)
- ("WHITE MEDIUM SMALL SQUARE" #x25FD)
- ("BLACK MEDIUM SMALL SQUARE" #x25FE)
- ("LOWER RIGHT TRIANGLE" #x25FF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'miscellaneous-symbols
- '(("BLACK SUN WITH RAYS" #x2600)
- ("CLOUD" #x2601)
- ("UMBRELLA" #x2602)
- ("SNOWMAN" #x2603)
- ("COMET" #x2604)
- ("BLACK STAR" #x2605)
- ("WHITE STAR" #x2606)
- ("LIGHTNING" #x2607)
- ("THUNDERSTORM" #x2608)
- ("SUN" #x2609)
- ("ASCENDING NODE" #x260A)
- ("DESCENDING NODE" #x260B)
- ("CONJUNCTION" #x260C)
- ("OPPOSITION" #x260D)
- ("BLACK TELEPHONE" #x260E)
- ("WHITE TELEPHONE" #x260F)
- ("BALLOT BOX" #x2610)
- ("BALLOT BOX WITH CHECK" #x2611)
- ("BALLOT BOX WITH X" #x2612)
- ("SALTIRE" #x2613)
- ("WHITE SHOGI PIECE" #x2616)
- ("BLACK SHOGI PIECE" #x2617)
- ("REVERSED ROTATED FLORAL HEART BULLET" #x2619)
- ("BLACK LEFT POINTING INDEX" #x261A)
- ("BLACK RIGHT POINTING INDEX" #x261B)
- ("WHITE LEFT POINTING INDEX" #x261C)
- ("WHITE UP POINTING INDEX" #x261D)
- ("WHITE RIGHT POINTING INDEX" #x261E)
- ("WHITE DOWN POINTING INDEX" #x261F)
- ("SKULL AND CROSSBONES" #x2620)
- ("CAUTION SIGN" #x2621)
- ("RADIOACTIVE SIGN" #x2622)
- ("BIOHAZARD SIGN" #x2623)
- ("CADUCEUS" #x2624)
- ("ANKH" #x2625)
- ("ORTHODOX CROSS" #x2626)
- ("CHI RHO" #x2627)
- ("CROSS OF LORRAINE" #x2628)
- ("CROSS OF JERUSALEM" #x2629)
- ("STAR AND CRESCENT" #x262A)
- ("FARSI SYMBOL" #x262B)
- ("ADI SHAKTI" #x262C)
- ("HAMMER AND SICKLE" #x262D)
- ("PEACE SYMBOL" #x262E)
- ("YIN YANG" #x262F)
- ("TRIGRAM FOR HEAVEN" #x2630)
- ("TRIGRAM FOR LAKE" #x2631)
- ("TRIGRAM FOR FIRE" #x2632)
- ("TRIGRAM FOR THUNDER" #x2633)
- ("TRIGRAM FOR WIND" #x2634)
- ("TRIGRAM FOR WATER" #x2635)
- ("TRIGRAM FOR MOUNTAIN" #x2636)
- ("TRIGRAM FOR EARTH" #x2637)
- ("WHEEL OF DHARMA" #x2638)
- ("WHITE FROWNING FACE" #x2639)
- ("WHITE SMILING FACE" #x263A)
- ("BLACK SMILING FACE" #x263B)
- ("WHITE SUN WITH RAYS" #x263C)
- ("FIRST QUARTER MOON" #x263D)
- ("LAST QUARTER MOON" #x263E)
- ("MERCURY" #x263F)
- ("FEMALE SIGN" #x2640)
- ("EARTH" #x2641)
- ("MALE SIGN" #x2642)
- ("JUPITER" #x2643)
- ("SATURN" #x2644)
- ("URANUS" #x2645)
- ("NEPTUNE" #x2646)
- ("PLUTO" #x2647)
- ("ARIES" #x2648)
- ("TAURUS" #x2649)
- ("GEMINI" #x264A)
- ("CANCER" #x264B)
- ("LEO" #x264C)
- ("VIRGO" #x264D)
- ("LIBRA" #x264E)
- ("SCORPIUS" #x264F)
- ("SAGITTARIUS" #x2650)
- ("CAPRICORN" #x2651)
- ("AQUARIUS" #x2652)
- ("PISCES" #x2653)
- ("WHITE CHESS KING" #x2654)
- ("WHITE CHESS QUEEN" #x2655)
- ("WHITE CHESS ROOK" #x2656)
- ("WHITE CHESS BISHOP" #x2657)
- ("WHITE CHESS KNIGHT" #x2658)
- ("WHITE CHESS PAWN" #x2659)
- ("BLACK CHESS KING" #x265A)
- ("BLACK CHESS QUEEN" #x265B)
- ("BLACK CHESS ROOK" #x265C)
- ("BLACK CHESS BISHOP" #x265D)
- ("BLACK CHESS KNIGHT" #x265E)
- ("BLACK CHESS PAWN" #x265F)
- ("BLACK SPADE SUIT" #x2660)
- ("WHITE HEART SUIT" #x2661)
- ("WHITE DIAMOND SUIT" #x2662)
- ("BLACK CLUB SUIT" #x2663)
- ("WHITE SPADE SUIT" #x2664)
- ("BLACK HEART SUIT" #x2665)
- ("BLACK DIAMOND SUIT" #x2666)
- ("WHITE CLUB SUIT" #x2667)
- ("HOT SPRINGS" #x2668)
- ("QUARTER NOTE" #x2669)
- ("EIGHTH NOTE" #x266A)
- ("BEAMED EIGHTH NOTES" #x266B)
- ("BEAMED SIXTEENTH NOTES" #x266C)
- ("MUSIC FLAT SIGN" #x266D)
- ("MUSIC NATURAL SIGN" #x266E)
- ("MUSIC SHARP SIGN" #x266F)
- ("WEST SYRIAC CROSS" #x2670)
- ("EAST SYRIAC CROSS" #x2671)
- ("UNIVERSAL RECYCLING SYMBOL" #x2672)
- ("RECYCLING SYMBOL FOR TYPE-1 PLASTICS" #x2673)
- ("RECYCLING SYMBOL FOR TYPE-2 PLASTICS" #x2674)
- ("RECYCLING SYMBOL FOR TYPE-3 PLASTICS" #x2675)
- ("RECYCLING SYMBOL FOR TYPE-4 PLASTICS" #x2676)
- ("RECYCLING SYMBOL FOR TYPE-5 PLASTICS" #x2677)
- ("RECYCLING SYMBOL FOR TYPE-6 PLASTICS" #x2678)
- ("RECYCLING SYMBOL FOR TYPE-7 PLASTICS" #x2679)
- ("RECYCLING SYMBOL FOR GENERIC MATERIALS" #x267A)
- ("BLACK UNIVERSAL RECYCLING SYMBOL" #x267B)
- ("RECYCLED PAPER SYMBOL" #x267C)
- ("PARTIALLY-RECYCLED PAPER SYMBOL" #x267D)
- ("DIE FACE-1" #x2680)
- ("DIE FACE-2" #x2681)
- ("DIE FACE-3" #x2682)
- ("DIE FACE-4" #x2683)
- ("DIE FACE-5" #x2684)
- ("DIE FACE-6" #x2685)
- ("WHITE CIRCLE WITH DOT RIGHT" #x2686)
- ("WHITE CIRCLE WITH TWO DOTS" #x2687)
- ("BLACK CIRCLE WITH WHITE DOT RIGHT" #x2688)
- ("BLACK CIRCLE WITH TWO WHITE DOTS" #x2689)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'dingbats
- '(("UPPER BLADE SCISSORS" #x2701)
- ("BLACK SCISSORS" #x2702)
- ("LOWER BLADE SCISSORS" #x2703)
- ("WHITE SCISSORS" #x2704)
- ("TELEPHONE LOCATION SIGN" #x2706)
- ("TAPE DRIVE" #x2707)
- ("AIRPLANE" #x2708)
- ("ENVELOPE" #x2709)
- ("VICTORY HAND" #x270C)
- ("WRITING HAND" #x270D)
- ("LOWER RIGHT PENCIL" #x270E)
- ("PENCIL" #x270F)
- ("UPPER RIGHT PENCIL" #x2710)
- ("WHITE NIB" #x2711)
- ("BLACK NIB" #x2712)
- ("CHECK MARK" #x2713)
- ("HEAVY CHECK MARK" #x2714)
- ("MULTIPLICATION X" #x2715)
- ("HEAVY MULTIPLICATION X" #x2716)
- ("BALLOT X" #x2717)
- ("HEAVY BALLOT X" #x2718)
- ("OUTLINED GREEK CROSS" #x2719)
- ("HEAVY GREEK CROSS" #x271A)
- ("OPEN CENTRE CROSS" #x271B)
- ("HEAVY OPEN CENTRE CROSS" #x271C)
- ("LATIN CROSS" #x271D)
- ("SHADOWED WHITE LATIN CROSS" #x271E)
- ("OUTLINED LATIN CROSS" #x271F)
- ("MALTESE CROSS" #x2720)
- ("STAR OF DAVID" #x2721)
- ("FOUR TEARDROP-SPOKED ASTERISK" #x2722)
- ("FOUR BALLOON-SPOKED ASTERISK" #x2723)
- ("HEAVY FOUR BALLOON-SPOKED ASTERISK" #x2724)
- ("FOUR CLUB-SPOKED ASTERISK" #x2725)
- ("BLACK FOUR POINTED STAR" #x2726)
- ("WHITE FOUR POINTED STAR" #x2727)
- ("STRESS OUTLINED WHITE STAR" #x2729)
- ("CIRCLED WHITE STAR" #x272A)
- ("OPEN CENTRE BLACK STAR" #x272B)
- ("BLACK CENTRE WHITE STAR" #x272C)
- ("OUTLINED BLACK STAR" #x272D)
- ("HEAVY OUTLINED BLACK STAR" #x272E)
- ("PINWHEEL STAR" #x272F)
- ("SHADOWED WHITE STAR" #x2730)
- ("HEAVY ASTERISK" #x2731)
- ("OPEN CENTRE ASTERISK" #x2732)
- ("EIGHT SPOKED ASTERISK" #x2733)
- ("EIGHT POINTED BLACK STAR" #x2734)
- ("EIGHT POINTED PINWHEEL STAR" #x2735)
- ("SIX POINTED BLACK STAR" #x2736)
- ("EIGHT POINTED RECTILINEAR BLACK STAR" #x2737)
- ("HEAVY EIGHT POINTED RECTILINEAR BLACK STAR" #x2738)
- ("TWELVE POINTED BLACK STAR" #x2739)
- ("SIXTEEN POINTED ASTERISK" #x273A)
- ("TEARDROP-SPOKED ASTERISK" #x273B)
- ("OPEN CENTRE TEARDROP-SPOKED ASTERISK" #x273C)
- ("HEAVY TEARDROP-SPOKED ASTERISK" #x273D)
- ("SIX PETALLED BLACK AND WHITE FLORETTE" #x273E)
- ("BLACK FLORETTE" #x273F)
- ("WHITE FLORETTE" #x2740)
- ("EIGHT PETALLED OUTLINED BLACK FLORETTE" #x2741)
- ("CIRCLED OPEN CENTRE EIGHT POINTED STAR" #x2742)
- ("HEAVY TEARDROP-SPOKED PINWHEEL ASTERISK" #x2743)
- ("SNOWFLAKE" #x2744)
- ("TIGHT TRIFOLIATE SNOWFLAKE" #x2745)
- ("HEAVY CHEVRON SNOWFLAKE" #x2746)
- ("SPARKLE" #x2747)
- ("HEAVY SPARKLE" #x2748)
- ("BALLOON-SPOKED ASTERISK" #x2749)
- ("EIGHT TEARDROP-SPOKED PROPELLER ASTERISK" #x274A)
- ("HEAVY EIGHT TEARDROP-SPOKED PROPELLER ASTERISK" #x274B)
- ("SHADOWED WHITE CIRCLE" #x274D)
- ("LOWER RIGHT DROP-SHADOWED WHITE SQUARE" #x274F)
- ("UPPER RIGHT DROP-SHADOWED WHITE SQUARE" #x2750)
- ("LOWER RIGHT SHADOWED WHITE SQUARE" #x2751)
- ("UPPER RIGHT SHADOWED WHITE SQUARE" #x2752)
- ("BLACK DIAMOND MINUS WHITE X" #x2756)
- ("LIGHT VERTICAL BAR" #x2758)
- ("MEDIUM VERTICAL BAR" #x2759)
- ("HEAVY VERTICAL BAR" #x275A)
- ("HEAVY SINGLE TURNED COMMA QUOTATION MARK ORNAMENT" #x275B)
- ("HEAVY SINGLE COMMA QUOTATION MARK ORNAMENT" #x275C)
- ("HEAVY DOUBLE TURNED COMMA QUOTATION MARK ORNAMENT" #x275D)
- ("HEAVY DOUBLE COMMA QUOTATION MARK ORNAMENT" #x275E)
- ("CURVED STEM PARAGRAPH SIGN ORNAMENT" #x2761)
- ("HEAVY EXCLAMATION MARK ORNAMENT" #x2762)
- ("HEAVY HEART EXCLAMATION MARK ORNAMENT" #x2763)
- ("HEAVY BLACK HEART" #x2764)
- ("ROTATED HEAVY BLACK HEART BULLET" #x2765)
- ("FLORAL HEART" #x2766)
- ("ROTATED FLORAL HEART BULLET" #x2767)
- ("MEDIUM LEFT PARENTHESIS ORNAMENT" #x2768)
- ("MEDIUM RIGHT PARENTHESIS ORNAMENT" #x2769)
- ("MEDIUM FLATTENED LEFT PARENTHESIS ORNAMENT" #x276A)
- ("MEDIUM FLATTENED RIGHT PARENTHESIS ORNAMENT" #x276B)
- ("MEDIUM LEFT-POINTING ANGLE BRACKET ORNAMENT" #x276C)
- ("MEDIUM RIGHT-POINTING ANGLE BRACKET ORNAMENT" #x276D)
- ("HEAVY LEFT-POINTING ANGLE QUOTATION MARK ORNAMENT" #x276E)
- ("HEAVY RIGHT-POINTING ANGLE QUOTATION MARK ORNAMENT" #x276F)
- ("HEAVY LEFT-POINTING ANGLE BRACKET ORNAMENT" #x2770)
- ("HEAVY RIGHT-POINTING ANGLE BRACKET ORNAMENT" #x2771)
- ("LIGHT LEFT TORTOISE SHELL BRACKET ORNAMENT" #x2772)
- ("LIGHT RIGHT TORTOISE SHELL BRACKET ORNAMENT" #x2773)
- ("MEDIUM LEFT CURLY BRACKET ORNAMENT" #x2774)
- ("MEDIUM RIGHT CURLY BRACKET ORNAMENT" #x2775)
- ("DINGBAT NEGATIVE CIRCLED DIGIT ONE" #x2776)
- ("DINGBAT NEGATIVE CIRCLED DIGIT TWO" #x2777)
- ("DINGBAT NEGATIVE CIRCLED DIGIT THREE" #x2778)
- ("DINGBAT NEGATIVE CIRCLED DIGIT FOUR" #x2779)
- ("DINGBAT NEGATIVE CIRCLED DIGIT FIVE" #x277A)
- ("DINGBAT NEGATIVE CIRCLED DIGIT SIX" #x277B)
- ("DINGBAT NEGATIVE CIRCLED DIGIT SEVEN" #x277C)
- ("DINGBAT NEGATIVE CIRCLED DIGIT EIGHT" #x277D)
- ("DINGBAT NEGATIVE CIRCLED DIGIT NINE" #x277E)
- ("DINGBAT NEGATIVE CIRCLED NUMBER TEN" #x277F)
- ("DINGBAT CIRCLED SANS-SERIF DIGIT ONE" #x2780)
- ("DINGBAT CIRCLED SANS-SERIF DIGIT TWO" #x2781)
- ("DINGBAT CIRCLED SANS-SERIF DIGIT THREE" #x2782)
- ("DINGBAT CIRCLED SANS-SERIF DIGIT FOUR" #x2783)
- ("DINGBAT CIRCLED SANS-SERIF DIGIT FIVE" #x2784)
- ("DINGBAT CIRCLED SANS-SERIF DIGIT SIX" #x2785)
- ("DINGBAT CIRCLED SANS-SERIF DIGIT SEVEN" #x2786)
- ("DINGBAT CIRCLED SANS-SERIF DIGIT EIGHT" #x2787)
- ("DINGBAT CIRCLED SANS-SERIF DIGIT NINE" #x2788)
- ("DINGBAT CIRCLED SANS-SERIF NUMBER TEN" #x2789)
- ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT ONE" #x278A)
- ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT TWO" #x278B)
- ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT THREE" #x278C)
- ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT FOUR" #x278D)
- ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT FIVE" #x278E)
- ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT SIX" #x278F)
- ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT SEVEN" #x2790)
- ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT EIGHT" #x2791)
- ("DINGBAT NEGATIVE CIRCLED SANS-SERIF DIGIT NINE" #x2792)
- ("DINGBAT NEGATIVE CIRCLED SANS-SERIF NUMBER TEN" #x2793)
- ("HEAVY WIDE-HEADED RIGHTWARDS ARROW" #x2794)
- ("HEAVY SOUTH EAST ARROW" #x2798)
- ("HEAVY RIGHTWARDS ARROW" #x2799)
- ("HEAVY NORTH EAST ARROW" #x279A)
- ("DRAFTING POINT RIGHTWARDS ARROW" #x279B)
- ("HEAVY ROUND-TIPPED RIGHTWARDS ARROW" #x279C)
- ("TRIANGLE-HEADED RIGHTWARDS ARROW" #x279D)
- ("HEAVY TRIANGLE-HEADED RIGHTWARDS ARROW" #x279E)
- ("DASHED TRIANGLE-HEADED RIGHTWARDS ARROW" #x279F)
- ("HEAVY DASHED TRIANGLE-HEADED RIGHTWARDS ARROW" #x27A0)
- ("BLACK RIGHTWARDS ARROW" #x27A1)
- ("THREE-D TOP-LIGHTED RIGHTWARDS ARROWHEAD" #x27A2)
- ("THREE-D BOTTOM-LIGHTED RIGHTWARDS ARROWHEAD" #x27A3)
- ("BLACK RIGHTWARDS ARROWHEAD" #x27A4)
- ("HEAVY BLACK CURVED DOWNWARDS AND RIGHTWARDS ARROW" #x27A5)
- ("HEAVY BLACK CURVED UPWARDS AND RIGHTWARDS ARROW" #x27A6)
- ("SQUAT BLACK RIGHTWARDS ARROW" #x27A7)
- ("HEAVY CONCAVE-POINTED BLACK RIGHTWARDS ARROW" #x27A8)
- ("RIGHT-SHADED WHITE RIGHTWARDS ARROW" #x27A9)
- ("LEFT-SHADED WHITE RIGHTWARDS ARROW" #x27AA)
- ("BACK-TILTED SHADOWED WHITE RIGHTWARDS ARROW" #x27AB)
- ("FRONT-TILTED SHADOWED WHITE RIGHTWARDS ARROW" #x27AC)
- ("HEAVY LOWER RIGHT-SHADOWED WHITE RIGHTWARDS ARROW" #x27AD)
- ("HEAVY UPPER RIGHT-SHADOWED WHITE RIGHTWARDS ARROW" #x27AE)
- ("NOTCHED LOWER RIGHT-SHADOWED WHITE RIGHTWARDS ARROW" #x27AF)
- ("NOTCHED UPPER RIGHT-SHADOWED WHITE RIGHTWARDS ARROW" #x27B1)
- ("CIRCLED HEAVY WHITE RIGHTWARDS ARROW" #x27B2)
- ("WHITE-FEATHERED RIGHTWARDS ARROW" #x27B3)
- ("BLACK-FEATHERED SOUTH EAST ARROW" #x27B4)
- ("BLACK-FEATHERED RIGHTWARDS ARROW" #x27B5)
- ("BLACK-FEATHERED NORTH EAST ARROW" #x27B6)
- ("HEAVY BLACK-FEATHERED SOUTH EAST ARROW" #x27B7)
- ("HEAVY BLACK-FEATHERED RIGHTWARDS ARROW" #x27B8)
- ("HEAVY BLACK-FEATHERED NORTH EAST ARROW" #x27B9)
- ("TEARDROP-BARBED RIGHTWARDS ARROW" #x27BA)
- ("HEAVY TEARDROP-SHANKED RIGHTWARDS ARROW" #x27BB)
- ("WEDGE-TAILED RIGHTWARDS ARROW" #x27BC)
- ("HEAVY WEDGE-TAILED RIGHTWARDS ARROW" #x27BD)
- ("OPEN-OUTLINED RIGHTWARDS ARROW" #x27BE)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'miscellaneous-mathematical-symbols-a
- '(("WHITE DIAMOND WITH CENTRED DOT" #x27D0)
- ("AND WITH DOT" #x27D1)
- ("ELEMENT OF OPENING UPWARDS" #x27D2)
- ("LOWER RIGHT CORNER WITH DOT" #x27D3)
- ("UPPER LEFT CORNER WITH DOT" #x27D4)
- ("LEFT OUTER JOIN" #x27D5)
- ("RIGHT OUTER JOIN" #x27D6)
- ("FULL OUTER JOIN" #x27D7)
- ("LARGE UP TACK" #x27D8)
- ("LARGE DOWN TACK" #x27D9)
- ("LEFT AND RIGHT DOUBLE TURNSTILE" #x27DA)
- ("LEFT AND RIGHT TACK" #x27DB)
- ("LEFT MULTIMAP" #x27DC)
- ("LONG RIGHT TACK" #x27DD)
- ("LONG LEFT TACK" #x27DE)
- ("UP TACK WITH CIRCLE ABOVE" #x27DF)
- ("LOZENGE DIVIDED BY HORIZONTAL RULE" #x27E0)
- ("WHITE CONCAVE-SIDED DIAMOND" #x27E1)
- ("WHITE CONCAVE-SIDED DIAMOND WITH LEFTWARDS TICK" #x27E2)
- ("WHITE CONCAVE-SIDED DIAMOND WITH RIGHTWARDS TICK" #x27E3)
- ("WHITE SQUARE WITH LEFTWARDS TICK" #x27E4)
- ("WHITE SQUARE WITH RIGHTWARDS TICK" #x27E5)
- ("MATHEMATICAL LEFT WHITE SQUARE BRACKET" #x27E6)
- ("MATHEMATICAL RIGHT WHITE SQUARE BRACKET" #x27E7)
- ("MATHEMATICAL LEFT ANGLE BRACKET" #x27E8)
- ("MATHEMATICAL RIGHT ANGLE BRACKET" #x27E9)
- ("MATHEMATICAL LEFT DOUBLE ANGLE BRACKET" #x27EA)
- ("MATHEMATICAL RIGHT DOUBLE ANGLE BRACKET" #x27EB)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'supplemental-arrows-a
- '(("UPWARDS QUADRUPLE ARROW" #x27F0)
- ("DOWNWARDS QUADRUPLE ARROW" #x27F1)
- ("ANTICLOCKWISE GAPPED CIRCLE ARROW" #x27F2)
- ("CLOCKWISE GAPPED CIRCLE ARROW" #x27F3)
- ("RIGHT ARROW WITH CIRCLED PLUS" #x27F4)
- ("LONG LEFTWARDS ARROW" #x27F5)
- ("LONG RIGHTWARDS ARROW" #x27F6)
- ("LONG LEFT RIGHT ARROW" #x27F7)
- ("LONG LEFTWARDS DOUBLE ARROW" #x27F8)
- ("LONG RIGHTWARDS DOUBLE ARROW" #x27F9)
- ("LONG LEFT RIGHT DOUBLE ARROW" #x27FA)
- ("LONG LEFTWARDS ARROW FROM BAR" #x27FB)
- ("LONG RIGHTWARDS ARROW FROM BAR" #x27FC)
- ("LONG LEFTWARDS DOUBLE ARROW FROM BAR" #x27FD)
- ("LONG RIGHTWARDS DOUBLE ARROW FROM BAR" #x27FE)
- ("LONG RIGHTWARDS SQUIGGLE ARROW" #x27FF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'braille-patterns
- '(("BRAILLE PATTERN BLANK" #x2800)
- ("BRAILLE PATTERN DOTS-1" #x2801)
- ("BRAILLE PATTERN DOTS-2" #x2802)
- ("BRAILLE PATTERN DOTS-12" #x2803)
- ("BRAILLE PATTERN DOTS-3" #x2804)
- ("BRAILLE PATTERN DOTS-13" #x2805)
- ("BRAILLE PATTERN DOTS-23" #x2806)
- ("BRAILLE PATTERN DOTS-123" #x2807)
- ("BRAILLE PATTERN DOTS-4" #x2808)
- ("BRAILLE PATTERN DOTS-14" #x2809)
- ("BRAILLE PATTERN DOTS-24" #x280A)
- ("BRAILLE PATTERN DOTS-124" #x280B)
- ("BRAILLE PATTERN DOTS-34" #x280C)
- ("BRAILLE PATTERN DOTS-134" #x280D)
- ("BRAILLE PATTERN DOTS-234" #x280E)
- ("BRAILLE PATTERN DOTS-1234" #x280F)
- ("BRAILLE PATTERN DOTS-5" #x2810)
- ("BRAILLE PATTERN DOTS-15" #x2811)
- ("BRAILLE PATTERN DOTS-25" #x2812)
- ("BRAILLE PATTERN DOTS-125" #x2813)
- ("BRAILLE PATTERN DOTS-35" #x2814)
- ("BRAILLE PATTERN DOTS-135" #x2815)
- ("BRAILLE PATTERN DOTS-235" #x2816)
- ("BRAILLE PATTERN DOTS-1235" #x2817)
- ("BRAILLE PATTERN DOTS-45" #x2818)
- ("BRAILLE PATTERN DOTS-145" #x2819)
- ("BRAILLE PATTERN DOTS-245" #x281A)
- ("BRAILLE PATTERN DOTS-1245" #x281B)
- ("BRAILLE PATTERN DOTS-345" #x281C)
- ("BRAILLE PATTERN DOTS-1345" #x281D)
- ("BRAILLE PATTERN DOTS-2345" #x281E)
- ("BRAILLE PATTERN DOTS-12345" #x281F)
- ("BRAILLE PATTERN DOTS-6" #x2820)
- ("BRAILLE PATTERN DOTS-16" #x2821)
- ("BRAILLE PATTERN DOTS-26" #x2822)
- ("BRAILLE PATTERN DOTS-126" #x2823)
- ("BRAILLE PATTERN DOTS-36" #x2824)
- ("BRAILLE PATTERN DOTS-136" #x2825)
- ("BRAILLE PATTERN DOTS-236" #x2826)
- ("BRAILLE PATTERN DOTS-1236" #x2827)
- ("BRAILLE PATTERN DOTS-46" #x2828)
- ("BRAILLE PATTERN DOTS-146" #x2829)
- ("BRAILLE PATTERN DOTS-246" #x282A)
- ("BRAILLE PATTERN DOTS-1246" #x282B)
- ("BRAILLE PATTERN DOTS-346" #x282C)
- ("BRAILLE PATTERN DOTS-1346" #x282D)
- ("BRAILLE PATTERN DOTS-2346" #x282E)
- ("BRAILLE PATTERN DOTS-12346" #x282F)
- ("BRAILLE PATTERN DOTS-56" #x2830)
- ("BRAILLE PATTERN DOTS-156" #x2831)
- ("BRAILLE PATTERN DOTS-256" #x2832)
- ("BRAILLE PATTERN DOTS-1256" #x2833)
- ("BRAILLE PATTERN DOTS-356" #x2834)
- ("BRAILLE PATTERN DOTS-1356" #x2835)
- ("BRAILLE PATTERN DOTS-2356" #x2836)
- ("BRAILLE PATTERN DOTS-12356" #x2837)
- ("BRAILLE PATTERN DOTS-456" #x2838)
- ("BRAILLE PATTERN DOTS-1456" #x2839)
- ("BRAILLE PATTERN DOTS-2456" #x283A)
- ("BRAILLE PATTERN DOTS-12456" #x283B)
- ("BRAILLE PATTERN DOTS-3456" #x283C)
- ("BRAILLE PATTERN DOTS-13456" #x283D)
- ("BRAILLE PATTERN DOTS-23456" #x283E)
- ("BRAILLE PATTERN DOTS-123456" #x283F)
- ("BRAILLE PATTERN DOTS-7" #x2840)
- ("BRAILLE PATTERN DOTS-17" #x2841)
- ("BRAILLE PATTERN DOTS-27" #x2842)
- ("BRAILLE PATTERN DOTS-127" #x2843)
- ("BRAILLE PATTERN DOTS-37" #x2844)
- ("BRAILLE PATTERN DOTS-137" #x2845)
- ("BRAILLE PATTERN DOTS-237" #x2846)
- ("BRAILLE PATTERN DOTS-1237" #x2847)
- ("BRAILLE PATTERN DOTS-47" #x2848)
- ("BRAILLE PATTERN DOTS-147" #x2849)
- ("BRAILLE PATTERN DOTS-247" #x284A)
- ("BRAILLE PATTERN DOTS-1247" #x284B)
- ("BRAILLE PATTERN DOTS-347" #x284C)
- ("BRAILLE PATTERN DOTS-1347" #x284D)
- ("BRAILLE PATTERN DOTS-2347" #x284E)
- ("BRAILLE PATTERN DOTS-12347" #x284F)
- ("BRAILLE PATTERN DOTS-57" #x2850)
- ("BRAILLE PATTERN DOTS-157" #x2851)
- ("BRAILLE PATTERN DOTS-257" #x2852)
- ("BRAILLE PATTERN DOTS-1257" #x2853)
- ("BRAILLE PATTERN DOTS-357" #x2854)
- ("BRAILLE PATTERN DOTS-1357" #x2855)
- ("BRAILLE PATTERN DOTS-2357" #x2856)
- ("BRAILLE PATTERN DOTS-12357" #x2857)
- ("BRAILLE PATTERN DOTS-457" #x2858)
- ("BRAILLE PATTERN DOTS-1457" #x2859)
- ("BRAILLE PATTERN DOTS-2457" #x285A)
- ("BRAILLE PATTERN DOTS-12457" #x285B)
- ("BRAILLE PATTERN DOTS-3457" #x285C)
- ("BRAILLE PATTERN DOTS-13457" #x285D)
- ("BRAILLE PATTERN DOTS-23457" #x285E)
- ("BRAILLE PATTERN DOTS-123457" #x285F)
- ("BRAILLE PATTERN DOTS-67" #x2860)
- ("BRAILLE PATTERN DOTS-167" #x2861)
- ("BRAILLE PATTERN DOTS-267" #x2862)
- ("BRAILLE PATTERN DOTS-1267" #x2863)
- ("BRAILLE PATTERN DOTS-367" #x2864)
- ("BRAILLE PATTERN DOTS-1367" #x2865)
- ("BRAILLE PATTERN DOTS-2367" #x2866)
- ("BRAILLE PATTERN DOTS-12367" #x2867)
- ("BRAILLE PATTERN DOTS-467" #x2868)
- ("BRAILLE PATTERN DOTS-1467" #x2869)
- ("BRAILLE PATTERN DOTS-2467" #x286A)
- ("BRAILLE PATTERN DOTS-12467" #x286B)
- ("BRAILLE PATTERN DOTS-3467" #x286C)
- ("BRAILLE PATTERN DOTS-13467" #x286D)
- ("BRAILLE PATTERN DOTS-23467" #x286E)
- ("BRAILLE PATTERN DOTS-123467" #x286F)
- ("BRAILLE PATTERN DOTS-567" #x2870)
- ("BRAILLE PATTERN DOTS-1567" #x2871)
- ("BRAILLE PATTERN DOTS-2567" #x2872)
- ("BRAILLE PATTERN DOTS-12567" #x2873)
- ("BRAILLE PATTERN DOTS-3567" #x2874)
- ("BRAILLE PATTERN DOTS-13567" #x2875)
- ("BRAILLE PATTERN DOTS-23567" #x2876)
- ("BRAILLE PATTERN DOTS-123567" #x2877)
- ("BRAILLE PATTERN DOTS-4567" #x2878)
- ("BRAILLE PATTERN DOTS-14567" #x2879)
- ("BRAILLE PATTERN DOTS-24567" #x287A)
- ("BRAILLE PATTERN DOTS-124567" #x287B)
- ("BRAILLE PATTERN DOTS-34567" #x287C)
- ("BRAILLE PATTERN DOTS-134567" #x287D)
- ("BRAILLE PATTERN DOTS-234567" #x287E)
- ("BRAILLE PATTERN DOTS-1234567" #x287F)
- ("BRAILLE PATTERN DOTS-8" #x2880)
- ("BRAILLE PATTERN DOTS-18" #x2881)
- ("BRAILLE PATTERN DOTS-28" #x2882)
- ("BRAILLE PATTERN DOTS-128" #x2883)
- ("BRAILLE PATTERN DOTS-38" #x2884)
- ("BRAILLE PATTERN DOTS-138" #x2885)
- ("BRAILLE PATTERN DOTS-238" #x2886)
- ("BRAILLE PATTERN DOTS-1238" #x2887)
- ("BRAILLE PATTERN DOTS-48" #x2888)
- ("BRAILLE PATTERN DOTS-148" #x2889)
- ("BRAILLE PATTERN DOTS-248" #x288A)
- ("BRAILLE PATTERN DOTS-1248" #x288B)
- ("BRAILLE PATTERN DOTS-348" #x288C)
- ("BRAILLE PATTERN DOTS-1348" #x288D)
- ("BRAILLE PATTERN DOTS-2348" #x288E)
- ("BRAILLE PATTERN DOTS-12348" #x288F)
- ("BRAILLE PATTERN DOTS-58" #x2890)
- ("BRAILLE PATTERN DOTS-158" #x2891)
- ("BRAILLE PATTERN DOTS-258" #x2892)
- ("BRAILLE PATTERN DOTS-1258" #x2893)
- ("BRAILLE PATTERN DOTS-358" #x2894)
- ("BRAILLE PATTERN DOTS-1358" #x2895)
- ("BRAILLE PATTERN DOTS-2358" #x2896)
- ("BRAILLE PATTERN DOTS-12358" #x2897)
- ("BRAILLE PATTERN DOTS-458" #x2898)
- ("BRAILLE PATTERN DOTS-1458" #x2899)
- ("BRAILLE PATTERN DOTS-2458" #x289A)
- ("BRAILLE PATTERN DOTS-12458" #x289B)
- ("BRAILLE PATTERN DOTS-3458" #x289C)
- ("BRAILLE PATTERN DOTS-13458" #x289D)
- ("BRAILLE PATTERN DOTS-23458" #x289E)
- ("BRAILLE PATTERN DOTS-123458" #x289F)
- ("BRAILLE PATTERN DOTS-68" #x28A0)
- ("BRAILLE PATTERN DOTS-168" #x28A1)
- ("BRAILLE PATTERN DOTS-268" #x28A2)
- ("BRAILLE PATTERN DOTS-1268" #x28A3)
- ("BRAILLE PATTERN DOTS-368" #x28A4)
- ("BRAILLE PATTERN DOTS-1368" #x28A5)
- ("BRAILLE PATTERN DOTS-2368" #x28A6)
- ("BRAILLE PATTERN DOTS-12368" #x28A7)
- ("BRAILLE PATTERN DOTS-468" #x28A8)
- ("BRAILLE PATTERN DOTS-1468" #x28A9)
- ("BRAILLE PATTERN DOTS-2468" #x28AA)
- ("BRAILLE PATTERN DOTS-12468" #x28AB)
- ("BRAILLE PATTERN DOTS-3468" #x28AC)
- ("BRAILLE PATTERN DOTS-13468" #x28AD)
- ("BRAILLE PATTERN DOTS-23468" #x28AE)
- ("BRAILLE PATTERN DOTS-123468" #x28AF)
- ("BRAILLE PATTERN DOTS-568" #x28B0)
- ("BRAILLE PATTERN DOTS-1568" #x28B1)
- ("BRAILLE PATTERN DOTS-2568" #x28B2)
- ("BRAILLE PATTERN DOTS-12568" #x28B3)
- ("BRAILLE PATTERN DOTS-3568" #x28B4)
- ("BRAILLE PATTERN DOTS-13568" #x28B5)
- ("BRAILLE PATTERN DOTS-23568" #x28B6)
- ("BRAILLE PATTERN DOTS-123568" #x28B7)
- ("BRAILLE PATTERN DOTS-4568" #x28B8)
- ("BRAILLE PATTERN DOTS-14568" #x28B9)
- ("BRAILLE PATTERN DOTS-24568" #x28BA)
- ("BRAILLE PATTERN DOTS-124568" #x28BB)
- ("BRAILLE PATTERN DOTS-34568" #x28BC)
- ("BRAILLE PATTERN DOTS-134568" #x28BD)
- ("BRAILLE PATTERN DOTS-234568" #x28BE)
- ("BRAILLE PATTERN DOTS-1234568" #x28BF)
- ("BRAILLE PATTERN DOTS-78" #x28C0)
- ("BRAILLE PATTERN DOTS-178" #x28C1)
- ("BRAILLE PATTERN DOTS-278" #x28C2)
- ("BRAILLE PATTERN DOTS-1278" #x28C3)
- ("BRAILLE PATTERN DOTS-378" #x28C4)
- ("BRAILLE PATTERN DOTS-1378" #x28C5)
- ("BRAILLE PATTERN DOTS-2378" #x28C6)
- ("BRAILLE PATTERN DOTS-12378" #x28C7)
- ("BRAILLE PATTERN DOTS-478" #x28C8)
- ("BRAILLE PATTERN DOTS-1478" #x28C9)
- ("BRAILLE PATTERN DOTS-2478" #x28CA)
- ("BRAILLE PATTERN DOTS-12478" #x28CB)
- ("BRAILLE PATTERN DOTS-3478" #x28CC)
- ("BRAILLE PATTERN DOTS-13478" #x28CD)
- ("BRAILLE PATTERN DOTS-23478" #x28CE)
- ("BRAILLE PATTERN DOTS-123478" #x28CF)
- ("BRAILLE PATTERN DOTS-578" #x28D0)
- ("BRAILLE PATTERN DOTS-1578" #x28D1)
- ("BRAILLE PATTERN DOTS-2578" #x28D2)
- ("BRAILLE PATTERN DOTS-12578" #x28D3)
- ("BRAILLE PATTERN DOTS-3578" #x28D4)
- ("BRAILLE PATTERN DOTS-13578" #x28D5)
- ("BRAILLE PATTERN DOTS-23578" #x28D6)
- ("BRAILLE PATTERN DOTS-123578" #x28D7)
- ("BRAILLE PATTERN DOTS-4578" #x28D8)
- ("BRAILLE PATTERN DOTS-14578" #x28D9)
- ("BRAILLE PATTERN DOTS-24578" #x28DA)
- ("BRAILLE PATTERN DOTS-124578" #x28DB)
- ("BRAILLE PATTERN DOTS-34578" #x28DC)
- ("BRAILLE PATTERN DOTS-134578" #x28DD)
- ("BRAILLE PATTERN DOTS-234578" #x28DE)
- ("BRAILLE PATTERN DOTS-1234578" #x28DF)
- ("BRAILLE PATTERN DOTS-678" #x28E0)
- ("BRAILLE PATTERN DOTS-1678" #x28E1)
- ("BRAILLE PATTERN DOTS-2678" #x28E2)
- ("BRAILLE PATTERN DOTS-12678" #x28E3)
- ("BRAILLE PATTERN DOTS-3678" #x28E4)
- ("BRAILLE PATTERN DOTS-13678" #x28E5)
- ("BRAILLE PATTERN DOTS-23678" #x28E6)
- ("BRAILLE PATTERN DOTS-123678" #x28E7)
- ("BRAILLE PATTERN DOTS-4678" #x28E8)
- ("BRAILLE PATTERN DOTS-14678" #x28E9)
- ("BRAILLE PATTERN DOTS-24678" #x28EA)
- ("BRAILLE PATTERN DOTS-124678" #x28EB)
- ("BRAILLE PATTERN DOTS-34678" #x28EC)
- ("BRAILLE PATTERN DOTS-134678" #x28ED)
- ("BRAILLE PATTERN DOTS-234678" #x28EE)
- ("BRAILLE PATTERN DOTS-1234678" #x28EF)
- ("BRAILLE PATTERN DOTS-5678" #x28F0)
- ("BRAILLE PATTERN DOTS-15678" #x28F1)
- ("BRAILLE PATTERN DOTS-25678" #x28F2)
- ("BRAILLE PATTERN DOTS-125678" #x28F3)
- ("BRAILLE PATTERN DOTS-35678" #x28F4)
- ("BRAILLE PATTERN DOTS-135678" #x28F5)
- ("BRAILLE PATTERN DOTS-235678" #x28F6)
- ("BRAILLE PATTERN DOTS-1235678" #x28F7)
- ("BRAILLE PATTERN DOTS-45678" #x28F8)
- ("BRAILLE PATTERN DOTS-145678" #x28F9)
- ("BRAILLE PATTERN DOTS-245678" #x28FA)
- ("BRAILLE PATTERN DOTS-1245678" #x28FB)
- ("BRAILLE PATTERN DOTS-345678" #x28FC)
- ("BRAILLE PATTERN DOTS-1345678" #x28FD)
- ("BRAILLE PATTERN DOTS-2345678" #x28FE)
- ("BRAILLE PATTERN DOTS-12345678" #x28FF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'supplemental-arrows-b
- '(("RIGHTWARDS TWO-HEADED ARROW WITH VERTICAL STROKE" #x2900)
- ("RIGHTWARDS TWO-HEADED ARROW WITH DOUBLE VERTICAL STROKE" #x2901)
- ("LEFTWARDS DOUBLE ARROW WITH VERTICAL STROKE" #x2902)
- ("RIGHTWARDS DOUBLE ARROW WITH VERTICAL STROKE" #x2903)
- ("LEFT RIGHT DOUBLE ARROW WITH VERTICAL STROKE" #x2904)
- ("RIGHTWARDS TWO-HEADED ARROW FROM BAR" #x2905)
- ("LEFTWARDS DOUBLE ARROW FROM BAR" #x2906)
- ("RIGHTWARDS DOUBLE ARROW FROM BAR" #x2907)
- ("DOWNWARDS ARROW WITH HORIZONTAL STROKE" #x2908)
- ("UPWARDS ARROW WITH HORIZONTAL STROKE" #x2909)
- ("UPWARDS TRIPLE ARROW" #x290A)
- ("DOWNWARDS TRIPLE ARROW" #x290B)
- ("LEFTWARDS DOUBLE DASH ARROW" #x290C)
- ("RIGHTWARDS DOUBLE DASH ARROW" #x290D)
- ("LEFTWARDS TRIPLE DASH ARROW" #x290E)
- ("RIGHTWARDS TRIPLE DASH ARROW" #x290F)
- ("RIGHTWARDS TWO-HEADED TRIPLE DASH ARROW" #x2910)
- ("RIGHTWARDS ARROW WITH DOTTED STEM" #x2911)
- ("UPWARDS ARROW TO BAR" #x2912)
- ("DOWNWARDS ARROW TO BAR" #x2913)
- ("RIGHTWARDS ARROW WITH TAIL WITH VERTICAL STROKE" #x2914)
- ("RIGHTWARDS ARROW WITH TAIL WITH DOUBLE VERTICAL STROKE" #x2915)
- ("RIGHTWARDS TWO-HEADED ARROW WITH TAIL" #x2916)
- ("RIGHTWARDS TWO-HEADED ARROW WITH TAIL WITH VERTICAL STROKE" #x2917)
- ("RIGHTWARDS TWO-HEADED ARROW WITH TAIL WITH DOUBLE VERTICAL STROKE" #x2918)
- ("LEFTWARDS ARROW-TAIL" #x2919)
- ("RIGHTWARDS ARROW-TAIL" #x291A)
- ("LEFTWARDS DOUBLE ARROW-TAIL" #x291B)
- ("RIGHTWARDS DOUBLE ARROW-TAIL" #x291C)
- ("LEFTWARDS ARROW TO BLACK DIAMOND" #x291D)
- ("RIGHTWARDS ARROW TO BLACK DIAMOND" #x291E)
- ("LEFTWARDS ARROW FROM BAR TO BLACK DIAMOND" #x291F)
- ("RIGHTWARDS ARROW FROM BAR TO BLACK DIAMOND" #x2920)
- ("NORTH WEST AND SOUTH EAST ARROW" #x2921)
- ("NORTH EAST AND SOUTH WEST ARROW" #x2922)
- ("NORTH WEST ARROW WITH HOOK" #x2923)
- ("NORTH EAST ARROW WITH HOOK" #x2924)
- ("SOUTH EAST ARROW WITH HOOK" #x2925)
- ("SOUTH WEST ARROW WITH HOOK" #x2926)
- ("NORTH WEST ARROW AND NORTH EAST ARROW" #x2927)
- ("NORTH EAST ARROW AND SOUTH EAST ARROW" #x2928)
- ("SOUTH EAST ARROW AND SOUTH WEST ARROW" #x2929)
- ("SOUTH WEST ARROW AND NORTH WEST ARROW" #x292A)
- ("RISING DIAGONAL CROSSING FALLING DIAGONAL" #x292B)
- ("FALLING DIAGONAL CROSSING RISING DIAGONAL" #x292C)
- ("SOUTH EAST ARROW CROSSING NORTH EAST ARROW" #x292D)
- ("NORTH EAST ARROW CROSSING SOUTH EAST ARROW" #x292E)
- ("FALLING DIAGONAL CROSSING NORTH EAST ARROW" #x292F)
- ("RISING DIAGONAL CROSSING SOUTH EAST ARROW" #x2930)
- ("NORTH EAST ARROW CROSSING NORTH WEST ARROW" #x2931)
- ("NORTH WEST ARROW CROSSING NORTH EAST ARROW" #x2932)
- ("WAVE ARROW POINTING DIRECTLY RIGHT" #x2933)
- ("ARROW POINTING RIGHTWARDS THEN CURVING UPWARDS" #x2934)
- ("ARROW POINTING RIGHTWARDS THEN CURVING DOWNWARDS" #x2935)
- ("ARROW POINTING DOWNWARDS THEN CURVING LEFTWARDS" #x2936)
- ("ARROW POINTING DOWNWARDS THEN CURVING RIGHTWARDS" #x2937)
- ("RIGHT-SIDE ARC CLOCKWISE ARROW" #x2938)
- ("LEFT-SIDE ARC ANTICLOCKWISE ARROW" #x2939)
- ("TOP ARC ANTICLOCKWISE ARROW" #x293A)
- ("BOTTOM ARC ANTICLOCKWISE ARROW" #x293B)
- ("TOP ARC CLOCKWISE ARROW WITH MINUS" #x293C)
- ("TOP ARC ANTICLOCKWISE ARROW WITH PLUS" #x293D)
- ("LOWER RIGHT SEMICIRCULAR CLOCKWISE ARROW" #x293E)
- ("LOWER LEFT SEMICIRCULAR ANTICLOCKWISE ARROW" #x293F)
- ("ANTICLOCKWISE CLOSED CIRCLE ARROW" #x2940)
- ("CLOCKWISE CLOSED CIRCLE ARROW" #x2941)
- ("RIGHTWARDS ARROW ABOVE SHORT LEFTWARDS ARROW" #x2942)
- ("LEFTWARDS ARROW ABOVE SHORT RIGHTWARDS ARROW" #x2943)
- ("SHORT RIGHTWARDS ARROW ABOVE LEFTWARDS ARROW" #x2944)
- ("RIGHTWARDS ARROW WITH PLUS BELOW" #x2945)
- ("LEFTWARDS ARROW WITH PLUS BELOW" #x2946)
- ("RIGHTWARDS ARROW THROUGH X" #x2947)
- ("LEFT RIGHT ARROW THROUGH SMALL CIRCLE" #x2948)
- ("UPWARDS TWO-HEADED ARROW FROM SMALL CIRCLE" #x2949)
- ("LEFT BARB UP RIGHT BARB DOWN HARPOON" #x294A)
- ("LEFT BARB DOWN RIGHT BARB UP HARPOON" #x294B)
- ("UP BARB RIGHT DOWN BARB LEFT HARPOON" #x294C)
- ("UP BARB LEFT DOWN BARB RIGHT HARPOON" #x294D)
- ("LEFT BARB UP RIGHT BARB UP HARPOON" #x294E)
- ("UP BARB RIGHT DOWN BARB RIGHT HARPOON" #x294F)
- ("LEFT BARB DOWN RIGHT BARB DOWN HARPOON" #x2950)
- ("UP BARB LEFT DOWN BARB LEFT HARPOON" #x2951)
- ("LEFTWARDS HARPOON WITH BARB UP TO BAR" #x2952)
- ("RIGHTWARDS HARPOON WITH BARB UP TO BAR" #x2953)
- ("UPWARDS HARPOON WITH BARB RIGHT TO BAR" #x2954)
- ("DOWNWARDS HARPOON WITH BARB RIGHT TO BAR" #x2955)
- ("LEFTWARDS HARPOON WITH BARB DOWN TO BAR" #x2956)
- ("RIGHTWARDS HARPOON WITH BARB DOWN TO BAR" #x2957)
- ("UPWARDS HARPOON WITH BARB LEFT TO BAR" #x2958)
- ("DOWNWARDS HARPOON WITH BARB LEFT TO BAR" #x2959)
- ("LEFTWARDS HARPOON WITH BARB UP FROM BAR" #x295A)
- ("RIGHTWARDS HARPOON WITH BARB UP FROM BAR" #x295B)
- ("UPWARDS HARPOON WITH BARB RIGHT FROM BAR" #x295C)
- ("DOWNWARDS HARPOON WITH BARB RIGHT FROM BAR" #x295D)
- ("LEFTWARDS HARPOON WITH BARB DOWN FROM BAR" #x295E)
- ("RIGHTWARDS HARPOON WITH BARB DOWN FROM BAR" #x295F)
- ("UPWARDS HARPOON WITH BARB LEFT FROM BAR" #x2960)
- ("DOWNWARDS HARPOON WITH BARB LEFT FROM BAR" #x2961)
- ("LEFTWARDS HARPOON WITH BARB UP ABOVE LEFTWARDS HARPOON WITH BARB DOWN" #x2962)
- ("UPWARDS HARPOON WITH BARB LEFT BESIDE UPWARDS HARPOON WITH BARB RIGHT" #x2963)
- ("RIGHTWARDS HARPOON WITH BARB UP ABOVE RIGHTWARDS HARPOON WITH BARB DOWN" #x2964)
- ("DOWNWARDS HARPOON WITH BARB LEFT BESIDE DOWNWARDS HARPOON WITH BARB RIGHT" #x2965)
- ("LEFTWARDS HARPOON WITH BARB UP ABOVE RIGHTWARDS HARPOON WITH BARB UP" #x2966)
- ("LEFTWARDS HARPOON WITH BARB DOWN ABOVE RIGHTWARDS HARPOON WITH BARB DOWN" #x2967)
- ("RIGHTWARDS HARPOON WITH BARB UP ABOVE LEFTWARDS HARPOON WITH BARB UP" #x2968)
- ("RIGHTWARDS HARPOON WITH BARB DOWN ABOVE LEFTWARDS HARPOON WITH BARB DOWN" #x2969)
- ("LEFTWARDS HARPOON WITH BARB UP ABOVE LONG DASH" #x296A)
- ("LEFTWARDS HARPOON WITH BARB DOWN BELOW LONG DASH" #x296B)
- ("RIGHTWARDS HARPOON WITH BARB UP ABOVE LONG DASH" #x296C)
- ("RIGHTWARDS HARPOON WITH BARB DOWN BELOW LONG DASH" #x296D)
- ("UPWARDS HARPOON WITH BARB LEFT BESIDE DOWNWARDS HARPOON WITH BARB RIGHT" #x296E)
- ("DOWNWARDS HARPOON WITH BARB LEFT BESIDE UPWARDS HARPOON WITH BARB RIGHT" #x296F)
- ("RIGHT DOUBLE ARROW WITH ROUNDED HEAD" #x2970)
- ("EQUALS SIGN ABOVE RIGHTWARDS ARROW" #x2971)
- ("TILDE OPERATOR ABOVE RIGHTWARDS ARROW" #x2972)
- ("LEFTWARDS ARROW ABOVE TILDE OPERATOR" #x2973)
- ("RIGHTWARDS ARROW ABOVE TILDE OPERATOR" #x2974)
- ("RIGHTWARDS ARROW ABOVE ALMOST EQUAL TO" #x2975)
- ("LESS-THAN ABOVE LEFTWARDS ARROW" #x2976)
- ("LEFTWARDS ARROW THROUGH LESS-THAN" #x2977)
- ("GREATER-THAN ABOVE RIGHTWARDS ARROW" #x2978)
- ("SUBSET ABOVE RIGHTWARDS ARROW" #x2979)
- ("LEFTWARDS ARROW THROUGH SUBSET" #x297A)
- ("SUPERSET ABOVE LEFTWARDS ARROW" #x297B)
- ("LEFT FISH TAIL" #x297C)
- ("RIGHT FISH TAIL" #x297D)
- ("UP FISH TAIL" #x297E)
- ("DOWN FISH TAIL" #x297F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'miscellaneous-mathematical-symbols-b
- '(("TRIPLE VERTICAL BAR DELIMITER" #x2980)
- ("Z NOTATION SPOT" #x2981)
- ("Z NOTATION TYPE COLON" #x2982)
- ("LEFT WHITE CURLY BRACKET" #x2983)
- ("RIGHT WHITE CURLY BRACKET" #x2984)
- ("LEFT WHITE PARENTHESIS" #x2985)
- ("RIGHT WHITE PARENTHESIS" #x2986)
- ("Z NOTATION LEFT IMAGE BRACKET" #x2987)
- ("Z NOTATION RIGHT IMAGE BRACKET" #x2988)
- ("Z NOTATION LEFT BINDING BRACKET" #x2989)
- ("Z NOTATION RIGHT BINDING BRACKET" #x298A)
- ("LEFT SQUARE BRACKET WITH UNDERBAR" #x298B)
- ("RIGHT SQUARE BRACKET WITH UNDERBAR" #x298C)
- ("LEFT SQUARE BRACKET WITH TICK IN TOP CORNER" #x298D)
- ("RIGHT SQUARE BRACKET WITH TICK IN BOTTOM CORNER" #x298E)
- ("LEFT SQUARE BRACKET WITH TICK IN BOTTOM CORNER" #x298F)
- ("RIGHT SQUARE BRACKET WITH TICK IN TOP CORNER" #x2990)
- ("LEFT ANGLE BRACKET WITH DOT" #x2991)
- ("RIGHT ANGLE BRACKET WITH DOT" #x2992)
- ("LEFT ARC LESS-THAN BRACKET" #x2993)
- ("RIGHT ARC GREATER-THAN BRACKET" #x2994)
- ("DOUBLE LEFT ARC GREATER-THAN BRACKET" #x2995)
- ("DOUBLE RIGHT ARC LESS-THAN BRACKET" #x2996)
- ("LEFT BLACK TORTOISE SHELL BRACKET" #x2997)
- ("RIGHT BLACK TORTOISE SHELL BRACKET" #x2998)
- ("DOTTED FENCE" #x2999)
- ("VERTICAL ZIGZAG LINE" #x299A)
- ("MEASURED ANGLE OPENING LEFT" #x299B)
- ("RIGHT ANGLE VARIANT WITH SQUARE" #x299C)
- ("MEASURED RIGHT ANGLE WITH DOT" #x299D)
- ("ANGLE WITH S INSIDE" #x299E)
- ("ACUTE ANGLE" #x299F)
- ("SPHERICAL ANGLE OPENING LEFT" #x29A0)
- ("SPHERICAL ANGLE OPENING UP" #x29A1)
- ("TURNED ANGLE" #x29A2)
- ("REVERSED ANGLE" #x29A3)
- ("ANGLE WITH UNDERBAR" #x29A4)
- ("REVERSED ANGLE WITH UNDERBAR" #x29A5)
- ("OBLIQUE ANGLE OPENING UP" #x29A6)
- ("OBLIQUE ANGLE OPENING DOWN" #x29A7)
- ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING UP AND RIGHT" #x29A8)
- ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING UP AND LEFT" #x29A9)
- ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING DOWN AND RIGHT" #x29AA)
- ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING DOWN AND LEFT" #x29AB)
- ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING RIGHT AND UP" #x29AC)
- ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING LEFT AND UP" #x29AD)
- ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING RIGHT AND DOWN" #x29AE)
- ("MEASURED ANGLE WITH OPEN ARM ENDING IN ARROW POINTING LEFT AND DOWN" #x29AF)
- ("REVERSED EMPTY SET" #x29B0)
- ("EMPTY SET WITH OVERBAR" #x29B1)
- ("EMPTY SET WITH SMALL CIRCLE ABOVE" #x29B2)
- ("EMPTY SET WITH RIGHT ARROW ABOVE" #x29B3)
- ("EMPTY SET WITH LEFT ARROW ABOVE" #x29B4)
- ("CIRCLE WITH HORIZONTAL BAR" #x29B5)
- ("CIRCLED VERTICAL BAR" #x29B6)
- ("CIRCLED PARALLEL" #x29B7)
- ("CIRCLED REVERSE SOLIDUS" #x29B8)
- ("CIRCLED PERPENDICULAR" #x29B9)
- ("CIRCLE DIVIDED BY HORIZONTAL BAR AND TOP HALF DIVIDED BY VERTICAL BAR" #x29BA)
- ("CIRCLE WITH SUPERIMPOSED X" #x29BB)
- ("CIRCLED ANTICLOCKWISE-ROTATED DIVISION SIGN" #x29BC)
- ("UP ARROW THROUGH CIRCLE" #x29BD)
- ("CIRCLED WHITE BULLET" #x29BE)
- ("CIRCLED BULLET" #x29BF)
- ("CIRCLED LESS-THAN" #x29C0)
- ("CIRCLED GREATER-THAN" #x29C1)
- ("CIRCLE WITH SMALL CIRCLE TO THE RIGHT" #x29C2)
- ("CIRCLE WITH TWO HORIZONTAL STROKES TO THE RIGHT" #x29C3)
- ("SQUARED RISING DIAGONAL SLASH" #x29C4)
- ("SQUARED FALLING DIAGONAL SLASH" #x29C5)
- ("SQUARED ASTERISK" #x29C6)
- ("SQUARED SMALL CIRCLE" #x29C7)
- ("SQUARED SQUARE" #x29C8)
- ("TWO JOINED SQUARES" #x29C9)
- ("TRIANGLE WITH DOT ABOVE" #x29CA)
- ("TRIANGLE WITH UNDERBAR" #x29CB)
- ("S IN TRIANGLE" #x29CC)
- ("TRIANGLE WITH SERIFS AT BOTTOM" #x29CD)
- ("RIGHT TRIANGLE ABOVE LEFT TRIANGLE" #x29CE)
- ("LEFT TRIANGLE BESIDE VERTICAL BAR" #x29CF)
- ("VERTICAL BAR BESIDE RIGHT TRIANGLE" #x29D0)
- ("BOWTIE WITH LEFT HALF BLACK" #x29D1)
- ("BOWTIE WITH RIGHT HALF BLACK" #x29D2)
- ("BLACK BOWTIE" #x29D3)
- ("TIMES WITH LEFT HALF BLACK" #x29D4)
- ("TIMES WITH RIGHT HALF BLACK" #x29D5)
- ("WHITE HOURGLASS" #x29D6)
- ("BLACK HOURGLASS" #x29D7)
- ("LEFT WIGGLY FENCE" #x29D8)
- ("RIGHT WIGGLY FENCE" #x29D9)
- ("LEFT DOUBLE WIGGLY FENCE" #x29DA)
- ("RIGHT DOUBLE WIGGLY FENCE" #x29DB)
- ("INCOMPLETE INFINITY" #x29DC)
- ("TIE OVER INFINITY" #x29DD)
- ("INFINITY NEGATED WITH VERTICAL BAR" #x29DE)
- ("DOUBLE-ENDED MULTIMAP" #x29DF)
- ("SQUARE WITH CONTOURED OUTLINE" #x29E0)
- ("INCREASES AS" #x29E1)
- ("SHUFFLE PRODUCT" #x29E2)
- ("EQUALS SIGN AND SLANTED PARALLEL" #x29E3)
- ("EQUALS SIGN AND SLANTED PARALLEL WITH TILDE ABOVE" #x29E4)
- ("IDENTICAL TO AND SLANTED PARALLEL" #x29E5)
- ("GLEICH STARK" #x29E6)
- ("THERMODYNAMIC" #x29E7)
- ("DOWN-POINTING TRIANGLE WITH LEFT HALF BLACK" #x29E8)
- ("DOWN-POINTING TRIANGLE WITH RIGHT HALF BLACK" #x29E9)
- ("BLACK DIAMOND WITH DOWN ARROW" #x29EA)
- ("BLACK LOZENGE" #x29EB)
- ("WHITE CIRCLE WITH DOWN ARROW" #x29EC)
- ("BLACK CIRCLE WITH DOWN ARROW" #x29ED)
- ("ERROR-BARRED WHITE SQUARE" #x29EE)
- ("ERROR-BARRED BLACK SQUARE" #x29EF)
- ("ERROR-BARRED WHITE DIAMOND" #x29F0)
- ("ERROR-BARRED BLACK DIAMOND" #x29F1)
- ("ERROR-BARRED WHITE CIRCLE" #x29F2)
- ("ERROR-BARRED BLACK CIRCLE" #x29F3)
- ("RULE-DELAYED" #x29F4)
- ("REVERSE SOLIDUS OPERATOR" #x29F5)
- ("SOLIDUS WITH OVERBAR" #x29F6)
- ("REVERSE SOLIDUS WITH HORIZONTAL STROKE" #x29F7)
- ("BIG SOLIDUS" #x29F8)
- ("BIG REVERSE SOLIDUS" #x29F9)
- ("DOUBLE PLUS" #x29FA)
- ("TRIPLE PLUS" #x29FB)
- ("LEFT-POINTING CURVED ANGLE BRACKET" #x29FC)
- ("RIGHT-POINTING CURVED ANGLE BRACKET" #x29FD)
- ("TINY" #x29FE)
- ("MINY" #x29FF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'supplemental-mathematical-operators
- '(("N-ARY CIRCLED DOT OPERATOR" #x2A00)
- ("N-ARY CIRCLED PLUS OPERATOR" #x2A01)
- ("N-ARY CIRCLED TIMES OPERATOR" #x2A02)
- ("N-ARY UNION OPERATOR WITH DOT" #x2A03)
- ("N-ARY UNION OPERATOR WITH PLUS" #x2A04)
- ("N-ARY SQUARE INTERSECTION OPERATOR" #x2A05)
- ("N-ARY SQUARE UNION OPERATOR" #x2A06)
- ("TWO LOGICAL AND OPERATOR" #x2A07)
- ("TWO LOGICAL OR OPERATOR" #x2A08)
- ("N-ARY TIMES OPERATOR" #x2A09)
- ("MODULO TWO SUM" #x2A0A)
- ("SUMMATION WITH INTEGRAL" #x2A0B)
- ("QUADRUPLE INTEGRAL OPERATOR" #x2A0C)
- ("FINITE PART INTEGRAL" #x2A0D)
- ("INTEGRAL WITH DOUBLE STROKE" #x2A0E)
- ("INTEGRAL AVERAGE WITH SLASH" #x2A0F)
- ("CIRCULATION FUNCTION" #x2A10)
- ("ANTICLOCKWISE INTEGRATION" #x2A11)
- ("LINE INTEGRATION WITH RECTANGULAR PATH AROUND POLE" #x2A12)
- ("LINE INTEGRATION WITH SEMICIRCULAR PATH AROUND POLE" #x2A13)
- ("LINE INTEGRATION NOT INCLUDING THE POLE" #x2A14)
- ("INTEGRAL AROUND A POINT OPERATOR" #x2A15)
- ("QUATERNION INTEGRAL OPERATOR" #x2A16)
- ("INTEGRAL WITH LEFTWARDS ARROW WITH HOOK" #x2A17)
- ("INTEGRAL WITH TIMES SIGN" #x2A18)
- ("INTEGRAL WITH INTERSECTION" #x2A19)
- ("INTEGRAL WITH UNION" #x2A1A)
- ("INTEGRAL WITH OVERBAR" #x2A1B)
- ("INTEGRAL WITH UNDERBAR" #x2A1C)
- ("JOIN" #x2A1D)
- ("LARGE LEFT TRIANGLE OPERATOR" #x2A1E)
- ("Z NOTATION SCHEMA COMPOSITION" #x2A1F)
- ("Z NOTATION SCHEMA PIPING" #x2A20)
- ("Z NOTATION SCHEMA PROJECTION" #x2A21)
- ("PLUS SIGN WITH SMALL CIRCLE ABOVE" #x2A22)
- ("PLUS SIGN WITH CIRCUMFLEX ACCENT ABOVE" #x2A23)
- ("PLUS SIGN WITH TILDE ABOVE" #x2A24)
- ("PLUS SIGN WITH DOT BELOW" #x2A25)
- ("PLUS SIGN WITH TILDE BELOW" #x2A26)
- ("PLUS SIGN WITH SUBSCRIPT TWO" #x2A27)
- ("PLUS SIGN WITH BLACK TRIANGLE" #x2A28)
- ("MINUS SIGN WITH COMMA ABOVE" #x2A29)
- ("MINUS SIGN WITH DOT BELOW" #x2A2A)
- ("MINUS SIGN WITH FALLING DOTS" #x2A2B)
- ("MINUS SIGN WITH RISING DOTS" #x2A2C)
- ("PLUS SIGN IN LEFT HALF CIRCLE" #x2A2D)
- ("PLUS SIGN IN RIGHT HALF CIRCLE" #x2A2E)
- ("VECTOR OR CROSS PRODUCT" #x2A2F)
- ("MULTIPLICATION SIGN WITH DOT ABOVE" #x2A30)
- ("MULTIPLICATION SIGN WITH UNDERBAR" #x2A31)
- ("SEMIDIRECT PRODUCT WITH BOTTOM CLOSED" #x2A32)
- ("SMASH PRODUCT" #x2A33)
- ("MULTIPLICATION SIGN IN LEFT HALF CIRCLE" #x2A34)
- ("MULTIPLICATION SIGN IN RIGHT HALF CIRCLE" #x2A35)
- ("CIRCLED MULTIPLICATION SIGN WITH CIRCUMFLEX ACCENT" #x2A36)
- ("MULTIPLICATION SIGN IN DOUBLE CIRCLE" #x2A37)
- ("CIRCLED DIVISION SIGN" #x2A38)
- ("PLUS SIGN IN TRIANGLE" #x2A39)
- ("MINUS SIGN IN TRIANGLE" #x2A3A)
- ("MULTIPLICATION SIGN IN TRIANGLE" #x2A3B)
- ("INTERIOR PRODUCT" #x2A3C)
- ("RIGHTHAND INTERIOR PRODUCT" #x2A3D)
- ("Z NOTATION RELATIONAL COMPOSITION" #x2A3E)
- ("AMALGAMATION OR COPRODUCT" #x2A3F)
- ("INTERSECTION WITH DOT" #x2A40)
- ("UNION WITH MINUS SIGN" #x2A41)
- ("UNION WITH OVERBAR" #x2A42)
- ("INTERSECTION WITH OVERBAR" #x2A43)
- ("INTERSECTION WITH LOGICAL AND" #x2A44)
- ("UNION WITH LOGICAL OR" #x2A45)
- ("UNION ABOVE INTERSECTION" #x2A46)
- ("INTERSECTION ABOVE UNION" #x2A47)
- ("UNION ABOVE BAR ABOVE INTERSECTION" #x2A48)
- ("INTERSECTION ABOVE BAR ABOVE UNION" #x2A49)
- ("UNION BESIDE AND JOINED WITH UNION" #x2A4A)
- ("INTERSECTION BESIDE AND JOINED WITH INTERSECTION" #x2A4B)
- ("CLOSED UNION WITH SERIFS" #x2A4C)
- ("CLOSED INTERSECTION WITH SERIFS" #x2A4D)
- ("DOUBLE SQUARE INTERSECTION" #x2A4E)
- ("DOUBLE SQUARE UNION" #x2A4F)
- ("CLOSED UNION WITH SERIFS AND SMASH PRODUCT" #x2A50)
- ("LOGICAL AND WITH DOT ABOVE" #x2A51)
- ("LOGICAL OR WITH DOT ABOVE" #x2A52)
- ("DOUBLE LOGICAL AND" #x2A53)
- ("DOUBLE LOGICAL OR" #x2A54)
- ("TWO INTERSECTING LOGICAL AND" #x2A55)
- ("TWO INTERSECTING LOGICAL OR" #x2A56)
- ("SLOPING LARGE OR" #x2A57)
- ("SLOPING LARGE AND" #x2A58)
- ("LOGICAL OR OVERLAPPING LOGICAL AND" #x2A59)
- ("LOGICAL AND WITH MIDDLE STEM" #x2A5A)
- ("LOGICAL OR WITH MIDDLE STEM" #x2A5B)
- ("LOGICAL AND WITH HORIZONTAL DASH" #x2A5C)
- ("LOGICAL OR WITH HORIZONTAL DASH" #x2A5D)
- ("LOGICAL AND WITH DOUBLE OVERBAR" #x2A5E)
- ("LOGICAL AND WITH UNDERBAR" #x2A5F)
- ("LOGICAL AND WITH DOUBLE UNDERBAR" #x2A60)
- ("SMALL VEE WITH UNDERBAR" #x2A61)
- ("LOGICAL OR WITH DOUBLE OVERBAR" #x2A62)
- ("LOGICAL OR WITH DOUBLE UNDERBAR" #x2A63)
- ("Z NOTATION DOMAIN ANTIRESTRICTION" #x2A64)
- ("Z NOTATION RANGE ANTIRESTRICTION" #x2A65)
- ("EQUALS SIGN WITH DOT BELOW" #x2A66)
- ("IDENTICAL WITH DOT ABOVE" #x2A67)
- ("TRIPLE HORIZONTAL BAR WITH DOUBLE VERTICAL STROKE" #x2A68)
- ("TRIPLE HORIZONTAL BAR WITH TRIPLE VERTICAL STROKE" #x2A69)
- ("TILDE OPERATOR WITH DOT ABOVE" #x2A6A)
- ("TILDE OPERATOR WITH RISING DOTS" #x2A6B)
- ("SIMILAR MINUS SIMILAR" #x2A6C)
- ("CONGRUENT WITH DOT ABOVE" #x2A6D)
- ("EQUALS WITH ASTERISK" #x2A6E)
- ("ALMOST EQUAL TO WITH CIRCUMFLEX ACCENT" #x2A6F)
- ("APPROXIMATELY EQUAL OR EQUAL TO" #x2A70)
- ("EQUALS SIGN ABOVE PLUS SIGN" #x2A71)
- ("PLUS SIGN ABOVE EQUALS SIGN" #x2A72)
- ("EQUALS SIGN ABOVE TILDE OPERATOR" #x2A73)
- ("DOUBLE COLON EQUAL" #x2A74)
- ("TWO CONSECUTIVE EQUALS SIGNS" #x2A75)
- ("THREE CONSECUTIVE EQUALS SIGNS" #x2A76)
- ("EQUALS SIGN WITH TWO DOTS ABOVE AND TWO DOTS BELOW" #x2A77)
- ("EQUIVALENT WITH FOUR DOTS ABOVE" #x2A78)
- ("LESS-THAN WITH CIRCLE INSIDE" #x2A79)
- ("GREATER-THAN WITH CIRCLE INSIDE" #x2A7A)
- ("LESS-THAN WITH QUESTION MARK ABOVE" #x2A7B)
- ("GREATER-THAN WITH QUESTION MARK ABOVE" #x2A7C)
- ("LESS-THAN OR SLANTED EQUAL TO" #x2A7D)
- ("GREATER-THAN OR SLANTED EQUAL TO" #x2A7E)
- ("LESS-THAN OR SLANTED EQUAL TO WITH DOT INSIDE" #x2A7F)
- ("GREATER-THAN OR SLANTED EQUAL TO WITH DOT INSIDE" #x2A80)
- ("LESS-THAN OR SLANTED EQUAL TO WITH DOT ABOVE" #x2A81)
- ("GREATER-THAN OR SLANTED EQUAL TO WITH DOT ABOVE" #x2A82)
- ("LESS-THAN OR SLANTED EQUAL TO WITH DOT ABOVE RIGHT" #x2A83)
- ("GREATER-THAN OR SLANTED EQUAL TO WITH DOT ABOVE LEFT" #x2A84)
- ("LESS-THAN OR APPROXIMATE" #x2A85)
- ("GREATER-THAN OR APPROXIMATE" #x2A86)
- ("LESS-THAN AND SINGLE-LINE NOT EQUAL TO" #x2A87)
- ("GREATER-THAN AND SINGLE-LINE NOT EQUAL TO" #x2A88)
- ("LESS-THAN AND NOT APPROXIMATE" #x2A89)
- ("GREATER-THAN AND NOT APPROXIMATE" #x2A8A)
- ("LESS-THAN ABOVE DOUBLE-LINE EQUAL ABOVE GREATER-THAN" #x2A8B)
- ("GREATER-THAN ABOVE DOUBLE-LINE EQUAL ABOVE LESS-THAN" #x2A8C)
- ("LESS-THAN ABOVE SIMILAR OR EQUAL" #x2A8D)
- ("GREATER-THAN ABOVE SIMILAR OR EQUAL" #x2A8E)
- ("LESS-THAN ABOVE SIMILAR ABOVE GREATER-THAN" #x2A8F)
- ("GREATER-THAN ABOVE SIMILAR ABOVE LESS-THAN" #x2A90)
- ("LESS-THAN ABOVE GREATER-THAN ABOVE DOUBLE-LINE EQUAL" #x2A91)
- ("GREATER-THAN ABOVE LESS-THAN ABOVE DOUBLE-LINE EQUAL" #x2A92)
- ("LESS-THAN ABOVE SLANTED EQUAL ABOVE GREATER-THAN ABOVE SLANTED EQUAL" #x2A93)
- ("GREATER-THAN ABOVE SLANTED EQUAL ABOVE LESS-THAN ABOVE SLANTED EQUAL" #x2A94)
- ("SLANTED EQUAL TO OR LESS-THAN" #x2A95)
- ("SLANTED EQUAL TO OR GREATER-THAN" #x2A96)
- ("SLANTED EQUAL TO OR LESS-THAN WITH DOT INSIDE" #x2A97)
- ("SLANTED EQUAL TO OR GREATER-THAN WITH DOT INSIDE" #x2A98)
- ("DOUBLE-LINE EQUAL TO OR LESS-THAN" #x2A99)
- ("DOUBLE-LINE EQUAL TO OR GREATER-THAN" #x2A9A)
- ("DOUBLE-LINE SLANTED EQUAL TO OR LESS-THAN" #x2A9B)
- ("DOUBLE-LINE SLANTED EQUAL TO OR GREATER-THAN" #x2A9C)
- ("SIMILAR OR LESS-THAN" #x2A9D)
- ("SIMILAR OR GREATER-THAN" #x2A9E)
- ("SIMILAR ABOVE LESS-THAN ABOVE EQUALS SIGN" #x2A9F)
- ("SIMILAR ABOVE GREATER-THAN ABOVE EQUALS SIGN" #x2AA0)
- ("DOUBLE NESTED LESS-THAN" #x2AA1)
- ("DOUBLE NESTED GREATER-THAN" #x2AA2)
- ("DOUBLE NESTED LESS-THAN WITH UNDERBAR" #x2AA3)
- ("GREATER-THAN OVERLAPPING LESS-THAN" #x2AA4)
- ("GREATER-THAN BESIDE LESS-THAN" #x2AA5)
- ("LESS-THAN CLOSED BY CURVE" #x2AA6)
- ("GREATER-THAN CLOSED BY CURVE" #x2AA7)
- ("LESS-THAN CLOSED BY CURVE ABOVE SLANTED EQUAL" #x2AA8)
- ("GREATER-THAN CLOSED BY CURVE ABOVE SLANTED EQUAL" #x2AA9)
- ("SMALLER THAN" #x2AAA)
- ("LARGER THAN" #x2AAB)
- ("SMALLER THAN OR EQUAL TO" #x2AAC)
- ("LARGER THAN OR EQUAL TO" #x2AAD)
- ("EQUALS SIGN WITH BUMPY ABOVE" #x2AAE)
- ("PRECEDES ABOVE SINGLE-LINE EQUALS SIGN" #x2AAF)
- ("SUCCEEDS ABOVE SINGLE-LINE EQUALS SIGN" #x2AB0)
- ("PRECEDES ABOVE SINGLE-LINE NOT EQUAL TO" #x2AB1)
- ("SUCCEEDS ABOVE SINGLE-LINE NOT EQUAL TO" #x2AB2)
- ("PRECEDES ABOVE EQUALS SIGN" #x2AB3)
- ("SUCCEEDS ABOVE EQUALS SIGN" #x2AB4)
- ("PRECEDES ABOVE NOT EQUAL TO" #x2AB5)
- ("SUCCEEDS ABOVE NOT EQUAL TO" #x2AB6)
- ("PRECEDES ABOVE ALMOST EQUAL TO" #x2AB7)
- ("SUCCEEDS ABOVE ALMOST EQUAL TO" #x2AB8)
- ("PRECEDES ABOVE NOT ALMOST EQUAL TO" #x2AB9)
- ("SUCCEEDS ABOVE NOT ALMOST EQUAL TO" #x2ABA)
- ("DOUBLE PRECEDES" #x2ABB)
- ("DOUBLE SUCCEEDS" #x2ABC)
- ("SUBSET WITH DOT" #x2ABD)
- ("SUPERSET WITH DOT" #x2ABE)
- ("SUBSET WITH PLUS SIGN BELOW" #x2ABF)
- ("SUPERSET WITH PLUS SIGN BELOW" #x2AC0)
- ("SUBSET WITH MULTIPLICATION SIGN BELOW" #x2AC1)
- ("SUPERSET WITH MULTIPLICATION SIGN BELOW" #x2AC2)
- ("SUBSET OF OR EQUAL TO WITH DOT ABOVE" #x2AC3)
- ("SUPERSET OF OR EQUAL TO WITH DOT ABOVE" #x2AC4)
- ("SUBSET OF ABOVE EQUALS SIGN" #x2AC5)
- ("SUPERSET OF ABOVE EQUALS SIGN" #x2AC6)
- ("SUBSET OF ABOVE TILDE OPERATOR" #x2AC7)
- ("SUPERSET OF ABOVE TILDE OPERATOR" #x2AC8)
- ("SUBSET OF ABOVE ALMOST EQUAL TO" #x2AC9)
- ("SUPERSET OF ABOVE ALMOST EQUAL TO" #x2ACA)
- ("SUBSET OF ABOVE NOT EQUAL TO" #x2ACB)
- ("SUPERSET OF ABOVE NOT EQUAL TO" #x2ACC)
- ("SQUARE LEFT OPEN BOX OPERATOR" #x2ACD)
- ("SQUARE RIGHT OPEN BOX OPERATOR" #x2ACE)
- ("CLOSED SUBSET" #x2ACF)
- ("CLOSED SUPERSET" #x2AD0)
- ("CLOSED SUBSET OR EQUAL TO" #x2AD1)
- ("CLOSED SUPERSET OR EQUAL TO" #x2AD2)
- ("SUBSET ABOVE SUPERSET" #x2AD3)
- ("SUPERSET ABOVE SUBSET" #x2AD4)
- ("SUBSET ABOVE SUBSET" #x2AD5)
- ("SUPERSET ABOVE SUPERSET" #x2AD6)
- ("SUPERSET BESIDE SUBSET" #x2AD7)
- ("SUPERSET BESIDE AND JOINED BY DASH WITH SUBSET" #x2AD8)
- ("ELEMENT OF OPENING DOWNWARDS" #x2AD9)
- ("PITCHFORK WITH TEE TOP" #x2ADA)
- ("TRANSVERSAL INTERSECTION" #x2ADB)
- ("FORKING" #x2ADC)
- ("NONFORKING" #x2ADD)
- ("SHORT LEFT TACK" #x2ADE)
- ("SHORT DOWN TACK" #x2ADF)
- ("SHORT UP TACK" #x2AE0)
- ("PERPENDICULAR WITH S" #x2AE1)
- ("VERTICAL BAR TRIPLE RIGHT TURNSTILE" #x2AE2)
- ("DOUBLE VERTICAL BAR LEFT TURNSTILE" #x2AE3)
- ("VERTICAL BAR DOUBLE LEFT TURNSTILE" #x2AE4)
- ("DOUBLE VERTICAL BAR DOUBLE LEFT TURNSTILE" #x2AE5)
- ("LONG DASH FROM LEFT MEMBER OF DOUBLE VERTICAL" #x2AE6)
- ("SHORT DOWN TACK WITH OVERBAR" #x2AE7)
- ("SHORT UP TACK WITH UNDERBAR" #x2AE8)
- ("SHORT UP TACK ABOVE SHORT DOWN TACK" #x2AE9)
- ("DOUBLE DOWN TACK" #x2AEA)
- ("DOUBLE UP TACK" #x2AEB)
- ("DOUBLE STROKE NOT SIGN" #x2AEC)
- ("REVERSED DOUBLE STROKE NOT SIGN" #x2AED)
- ("DOES NOT DIVIDE WITH REVERSED NEGATION SLASH" #x2AEE)
- ("VERTICAL LINE WITH CIRCLE ABOVE" #x2AEF)
- ("VERTICAL LINE WITH CIRCLE BELOW" #x2AF0)
- ("DOWN TACK WITH CIRCLE BELOW" #x2AF1)
- ("PARALLEL WITH HORIZONTAL STROKE" #x2AF2)
- ("PARALLEL WITH TILDE OPERATOR" #x2AF3)
- ("TRIPLE VERTICAL BAR BINARY RELATION" #x2AF4)
- ("TRIPLE VERTICAL BAR WITH HORIZONTAL STROKE" #x2AF5)
- ("TRIPLE COLON OPERATOR" #x2AF6)
- ("TRIPLE NESTED LESS-THAN" #x2AF7)
- ("TRIPLE NESTED GREATER-THAN" #x2AF8)
- ("DOUBLE-LINE SLANTED LESS-THAN OR EQUAL TO" #x2AF9)
- ("DOUBLE-LINE SLANTED GREATER-THAN OR EQUAL TO" #x2AFA)
- ("TRIPLE SOLIDUS BINARY RELATION" #x2AFB)
- ("LARGE TRIPLE VERTICAL BAR OPERATOR" #x2AFC)
- ("DOUBLE SOLIDUS OPERATOR" #x2AFD)
- ("WHITE VERTICAL BAR" #x2AFE)
- ("N-ARY WHITE VERTICAL BAR" #x2AFF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'cjk-radicals-supplement
- '(("CJK RADICAL REPEAT" #x2E80)
- ("CJK RADICAL CLIFF" #x2E81)
- ("CJK RADICAL SECOND ONE" #x2E82)
- ("CJK RADICAL SECOND TWO" #x2E83)
- ("CJK RADICAL SECOND THREE" #x2E84)
- ("CJK RADICAL PERSON" #x2E85)
- ("CJK RADICAL BOX" #x2E86)
- ("CJK RADICAL TABLE" #x2E87)
- ("CJK RADICAL KNIFE ONE" #x2E88)
- ("CJK RADICAL KNIFE TWO" #x2E89)
- ("CJK RADICAL DIVINATION" #x2E8A)
- ("CJK RADICAL SEAL" #x2E8B)
- ("CJK RADICAL SMALL ONE" #x2E8C)
- ("CJK RADICAL SMALL TWO" #x2E8D)
- ("CJK RADICAL LAME ONE" #x2E8E)
- ("CJK RADICAL LAME TWO" #x2E8F)
- ("CJK RADICAL LAME THREE" #x2E90)
- ("CJK RADICAL LAME FOUR" #x2E91)
- ("CJK RADICAL SNAKE" #x2E92)
- ("CJK RADICAL THREAD" #x2E93)
- ("CJK RADICAL SNOUT ONE" #x2E94)
- ("CJK RADICAL SNOUT TWO" #x2E95)
- ("CJK RADICAL HEART ONE" #x2E96)
- ("CJK RADICAL HEART TWO" #x2E97)
- ("CJK RADICAL HAND" #x2E98)
- ("CJK RADICAL RAP" #x2E99)
- ("CJK RADICAL CHOKE" #x2E9B)
- ("CJK RADICAL SUN" #x2E9C)
- ("CJK RADICAL MOON" #x2E9D)
- ("CJK RADICAL DEATH" #x2E9E)
- ("CJK RADICAL MOTHER" #x2E9F)
- ("CJK RADICAL CIVILIAN" #x2EA0)
- ("CJK RADICAL WATER ONE" #x2EA1)
- ("CJK RADICAL WATER TWO" #x2EA2)
- ("CJK RADICAL FIRE" #x2EA3)
- ("CJK RADICAL PAW ONE" #x2EA4)
- ("CJK RADICAL PAW TWO" #x2EA5)
- ("CJK RADICAL SIMPLIFIED HALF TREE TRUNK" #x2EA6)
- ("CJK RADICAL COW" #x2EA7)
- ("CJK RADICAL DOG" #x2EA8)
- ("CJK RADICAL JADE" #x2EA9)
- ("CJK RADICAL BOLT OF CLOTH" #x2EAA)
- ("CJK RADICAL EYE" #x2EAB)
- ("CJK RADICAL SPIRIT ONE" #x2EAC)
- ("CJK RADICAL SPIRIT TWO" #x2EAD)
- ("CJK RADICAL BAMBOO" #x2EAE)
- ("CJK RADICAL SILK" #x2EAF)
- ("CJK RADICAL C-SIMPLIFIED SILK" #x2EB0)
- ("CJK RADICAL NET ONE" #x2EB1)
- ("CJK RADICAL NET TWO" #x2EB2)
- ("CJK RADICAL NET THREE" #x2EB3)
- ("CJK RADICAL NET FOUR" #x2EB4)
- ("CJK RADICAL MESH" #x2EB5)
- ("CJK RADICAL SHEEP" #x2EB6)
- ("CJK RADICAL RAM" #x2EB7)
- ("CJK RADICAL EWE" #x2EB8)
- ("CJK RADICAL OLD" #x2EB9)
- ("CJK RADICAL BRUSH ONE" #x2EBA)
- ("CJK RADICAL BRUSH TWO" #x2EBB)
- ("CJK RADICAL MEAT" #x2EBC)
- ("CJK RADICAL MORTAR" #x2EBD)
- ("CJK RADICAL GRASS ONE" #x2EBE)
- ("CJK RADICAL GRASS TWO" #x2EBF)
- ("CJK RADICAL GRASS THREE" #x2EC0)
- ("CJK RADICAL TIGER" #x2EC1)
- ("CJK RADICAL CLOTHES" #x2EC2)
- ("CJK RADICAL WEST ONE" #x2EC3)
- ("CJK RADICAL WEST TWO" #x2EC4)
- ("CJK RADICAL C-SIMPLIFIED SEE" #x2EC5)
- ("CJK RADICAL SIMPLIFIED HORN" #x2EC6)
- ("CJK RADICAL HORN" #x2EC7)
- ("CJK RADICAL C-SIMPLIFIED SPEECH" #x2EC8)
- ("CJK RADICAL C-SIMPLIFIED SHELL" #x2EC9)
- ("CJK RADICAL FOOT" #x2ECA)
- ("CJK RADICAL C-SIMPLIFIED CART" #x2ECB)
- ("CJK RADICAL SIMPLIFIED WALK" #x2ECC)
- ("CJK RADICAL WALK ONE" #x2ECD)
- ("CJK RADICAL WALK TWO" #x2ECE)
- ("CJK RADICAL CITY" #x2ECF)
- ("CJK RADICAL C-SIMPLIFIED GOLD" #x2ED0)
- ("CJK RADICAL LONG ONE" #x2ED1)
- ("CJK RADICAL LONG TWO" #x2ED2)
- ("CJK RADICAL C-SIMPLIFIED LONG" #x2ED3)
- ("CJK RADICAL C-SIMPLIFIED GATE" #x2ED4)
- ("CJK RADICAL MOUND ONE" #x2ED5)
- ("CJK RADICAL MOUND TWO" #x2ED6)
- ("CJK RADICAL RAIN" #x2ED7)
- ("CJK RADICAL BLUE" #x2ED8)
- ("CJK RADICAL C-SIMPLIFIED TANNED LEATHER" #x2ED9)
- ("CJK RADICAL C-SIMPLIFIED LEAF" #x2EDA)
- ("CJK RADICAL C-SIMPLIFIED WIND" #x2EDB)
- ("CJK RADICAL C-SIMPLIFIED FLY" #x2EDC)
- ("CJK RADICAL EAT ONE" #x2EDD)
- ("CJK RADICAL EAT TWO" #x2EDE)
- ("CJK RADICAL EAT THREE" #x2EDF)
- ("CJK RADICAL C-SIMPLIFIED EAT" #x2EE0)
- ("CJK RADICAL HEAD" #x2EE1)
- ("CJK RADICAL C-SIMPLIFIED HORSE" #x2EE2)
- ("CJK RADICAL BONE" #x2EE3)
- ("CJK RADICAL GHOST" #x2EE4)
- ("CJK RADICAL C-SIMPLIFIED FISH" #x2EE5)
- ("CJK RADICAL C-SIMPLIFIED BIRD" #x2EE6)
- ("CJK RADICAL C-SIMPLIFIED SALT" #x2EE7)
- ("CJK RADICAL SIMPLIFIED WHEAT" #x2EE8)
- ("CJK RADICAL SIMPLIFIED YELLOW" #x2EE9)
- ("CJK RADICAL C-SIMPLIFIED FROG" #x2EEA)
- ("CJK RADICAL J-SIMPLIFIED EVEN" #x2EEB)
- ("CJK RADICAL C-SIMPLIFIED EVEN" #x2EEC)
- ("CJK RADICAL J-SIMPLIFIED TOOTH" #x2EED)
- ("CJK RADICAL C-SIMPLIFIED TOOTH" #x2EEE)
- ("CJK RADICAL J-SIMPLIFIED DRAGON" #x2EEF)
- ("CJK RADICAL C-SIMPLIFIED DRAGON" #x2EF0)
- ("CJK RADICAL TURTLE" #x2EF1)
- ("CJK RADICAL J-SIMPLIFIED TURTLE" #x2EF2)
- ("CJK RADICAL C-SIMPLIFIED TURTLE" #x2EF3)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'kangxi-radicals
- '(("KANGXI RADICAL ONE" #x2F00)
- ("KANGXI RADICAL LINE" #x2F01)
- ("KANGXI RADICAL DOT" #x2F02)
- ("KANGXI RADICAL SLASH" #x2F03)
- ("KANGXI RADICAL SECOND" #x2F04)
- ("KANGXI RADICAL HOOK" #x2F05)
- ("KANGXI RADICAL TWO" #x2F06)
- ("KANGXI RADICAL LID" #x2F07)
- ("KANGXI RADICAL MAN" #x2F08)
- ("KANGXI RADICAL LEGS" #x2F09)
- ("KANGXI RADICAL ENTER" #x2F0A)
- ("KANGXI RADICAL EIGHT" #x2F0B)
- ("KANGXI RADICAL DOWN BOX" #x2F0C)
- ("KANGXI RADICAL COVER" #x2F0D)
- ("KANGXI RADICAL ICE" #x2F0E)
- ("KANGXI RADICAL TABLE" #x2F0F)
- ("KANGXI RADICAL OPEN BOX" #x2F10)
- ("KANGXI RADICAL KNIFE" #x2F11)
- ("KANGXI RADICAL POWER" #x2F12)
- ("KANGXI RADICAL WRAP" #x2F13)
- ("KANGXI RADICAL SPOON" #x2F14)
- ("KANGXI RADICAL RIGHT OPEN BOX" #x2F15)
- ("KANGXI RADICAL HIDING ENCLOSURE" #x2F16)
- ("KANGXI RADICAL TEN" #x2F17)
- ("KANGXI RADICAL DIVINATION" #x2F18)
- ("KANGXI RADICAL SEAL" #x2F19)
- ("KANGXI RADICAL CLIFF" #x2F1A)
- ("KANGXI RADICAL PRIVATE" #x2F1B)
- ("KANGXI RADICAL AGAIN" #x2F1C)
- ("KANGXI RADICAL MOUTH" #x2F1D)
- ("KANGXI RADICAL ENCLOSURE" #x2F1E)
- ("KANGXI RADICAL EARTH" #x2F1F)
- ("KANGXI RADICAL SCHOLAR" #x2F20)
- ("KANGXI RADICAL GO" #x2F21)
- ("KANGXI RADICAL GO SLOWLY" #x2F22)
- ("KANGXI RADICAL EVENING" #x2F23)
- ("KANGXI RADICAL BIG" #x2F24)
- ("KANGXI RADICAL WOMAN" #x2F25)
- ("KANGXI RADICAL CHILD" #x2F26)
- ("KANGXI RADICAL ROOF" #x2F27)
- ("KANGXI RADICAL INCH" #x2F28)
- ("KANGXI RADICAL SMALL" #x2F29)
- ("KANGXI RADICAL LAME" #x2F2A)
- ("KANGXI RADICAL CORPSE" #x2F2B)
- ("KANGXI RADICAL SPROUT" #x2F2C)
- ("KANGXI RADICAL MOUNTAIN" #x2F2D)
- ("KANGXI RADICAL RIVER" #x2F2E)
- ("KANGXI RADICAL WORK" #x2F2F)
- ("KANGXI RADICAL ONESELF" #x2F30)
- ("KANGXI RADICAL TURBAN" #x2F31)
- ("KANGXI RADICAL DRY" #x2F32)
- ("KANGXI RADICAL SHORT THREAD" #x2F33)
- ("KANGXI RADICAL DOTTED CLIFF" #x2F34)
- ("KANGXI RADICAL LONG STRIDE" #x2F35)
- ("KANGXI RADICAL TWO HANDS" #x2F36)
- ("KANGXI RADICAL SHOOT" #x2F37)
- ("KANGXI RADICAL BOW" #x2F38)
- ("KANGXI RADICAL SNOUT" #x2F39)
- ("KANGXI RADICAL BRISTLE" #x2F3A)
- ("KANGXI RADICAL STEP" #x2F3B)
- ("KANGXI RADICAL HEART" #x2F3C)
- ("KANGXI RADICAL HALBERD" #x2F3D)
- ("KANGXI RADICAL DOOR" #x2F3E)
- ("KANGXI RADICAL HAND" #x2F3F)
- ("KANGXI RADICAL BRANCH" #x2F40)
- ("KANGXI RADICAL RAP" #x2F41)
- ("KANGXI RADICAL SCRIPT" #x2F42)
- ("KANGXI RADICAL DIPPER" #x2F43)
- ("KANGXI RADICAL AXE" #x2F44)
- ("KANGXI RADICAL SQUARE" #x2F45)
- ("KANGXI RADICAL NOT" #x2F46)
- ("KANGXI RADICAL SUN" #x2F47)
- ("KANGXI RADICAL SAY" #x2F48)
- ("KANGXI RADICAL MOON" #x2F49)
- ("KANGXI RADICAL TREE" #x2F4A)
- ("KANGXI RADICAL LACK" #x2F4B)
- ("KANGXI RADICAL STOP" #x2F4C)
- ("KANGXI RADICAL DEATH" #x2F4D)
- ("KANGXI RADICAL WEAPON" #x2F4E)
- ("KANGXI RADICAL DO NOT" #x2F4F)
- ("KANGXI RADICAL COMPARE" #x2F50)
- ("KANGXI RADICAL FUR" #x2F51)
- ("KANGXI RADICAL CLAN" #x2F52)
- ("KANGXI RADICAL STEAM" #x2F53)
- ("KANGXI RADICAL WATER" #x2F54)
- ("KANGXI RADICAL FIRE" #x2F55)
- ("KANGXI RADICAL CLAW" #x2F56)
- ("KANGXI RADICAL FATHER" #x2F57)
- ("KANGXI RADICAL DOUBLE X" #x2F58)
- ("KANGXI RADICAL HALF TREE TRUNK" #x2F59)
- ("KANGXI RADICAL SLICE" #x2F5A)
- ("KANGXI RADICAL FANG" #x2F5B)
- ("KANGXI RADICAL COW" #x2F5C)
- ("KANGXI RADICAL DOG" #x2F5D)
- ("KANGXI RADICAL PROFOUND" #x2F5E)
- ("KANGXI RADICAL JADE" #x2F5F)
- ("KANGXI RADICAL MELON" #x2F60)
- ("KANGXI RADICAL TILE" #x2F61)
- ("KANGXI RADICAL SWEET" #x2F62)
- ("KANGXI RADICAL LIFE" #x2F63)
- ("KANGXI RADICAL USE" #x2F64)
- ("KANGXI RADICAL FIELD" #x2F65)
- ("KANGXI RADICAL BOLT OF CLOTH" #x2F66)
- ("KANGXI RADICAL SICKNESS" #x2F67)
- ("KANGXI RADICAL DOTTED TENT" #x2F68)
- ("KANGXI RADICAL WHITE" #x2F69)
- ("KANGXI RADICAL SKIN" #x2F6A)
- ("KANGXI RADICAL DISH" #x2F6B)
- ("KANGXI RADICAL EYE" #x2F6C)
- ("KANGXI RADICAL SPEAR" #x2F6D)
- ("KANGXI RADICAL ARROW" #x2F6E)
- ("KANGXI RADICAL STONE" #x2F6F)
- ("KANGXI RADICAL SPIRIT" #x2F70)
- ("KANGXI RADICAL TRACK" #x2F71)
- ("KANGXI RADICAL GRAIN" #x2F72)
- ("KANGXI RADICAL CAVE" #x2F73)
- ("KANGXI RADICAL STAND" #x2F74)
- ("KANGXI RADICAL BAMBOO" #x2F75)
- ("KANGXI RADICAL RICE" #x2F76)
- ("KANGXI RADICAL SILK" #x2F77)
- ("KANGXI RADICAL JAR" #x2F78)
- ("KANGXI RADICAL NET" #x2F79)
- ("KANGXI RADICAL SHEEP" #x2F7A)
- ("KANGXI RADICAL FEATHER" #x2F7B)
- ("KANGXI RADICAL OLD" #x2F7C)
- ("KANGXI RADICAL AND" #x2F7D)
- ("KANGXI RADICAL PLOW" #x2F7E)
- ("KANGXI RADICAL EAR" #x2F7F)
- ("KANGXI RADICAL BRUSH" #x2F80)
- ("KANGXI RADICAL MEAT" #x2F81)
- ("KANGXI RADICAL MINISTER" #x2F82)
- ("KANGXI RADICAL SELF" #x2F83)
- ("KANGXI RADICAL ARRIVE" #x2F84)
- ("KANGXI RADICAL MORTAR" #x2F85)
- ("KANGXI RADICAL TONGUE" #x2F86)
- ("KANGXI RADICAL OPPOSE" #x2F87)
- ("KANGXI RADICAL BOAT" #x2F88)
- ("KANGXI RADICAL STOPPING" #x2F89)
- ("KANGXI RADICAL COLOR" #x2F8A)
- ("KANGXI RADICAL GRASS" #x2F8B)
- ("KANGXI RADICAL TIGER" #x2F8C)
- ("KANGXI RADICAL INSECT" #x2F8D)
- ("KANGXI RADICAL BLOOD" #x2F8E)
- ("KANGXI RADICAL WALK ENCLOSURE" #x2F8F)
- ("KANGXI RADICAL CLOTHES" #x2F90)
- ("KANGXI RADICAL WEST" #x2F91)
- ("KANGXI RADICAL SEE" #x2F92)
- ("KANGXI RADICAL HORN" #x2F93)
- ("KANGXI RADICAL SPEECH" #x2F94)
- ("KANGXI RADICAL VALLEY" #x2F95)
- ("KANGXI RADICAL BEAN" #x2F96)
- ("KANGXI RADICAL PIG" #x2F97)
- ("KANGXI RADICAL BADGER" #x2F98)
- ("KANGXI RADICAL SHELL" #x2F99)
- ("KANGXI RADICAL RED" #x2F9A)
- ("KANGXI RADICAL RUN" #x2F9B)
- ("KANGXI RADICAL FOOT" #x2F9C)
- ("KANGXI RADICAL BODY" #x2F9D)
- ("KANGXI RADICAL CART" #x2F9E)
- ("KANGXI RADICAL BITTER" #x2F9F)
- ("KANGXI RADICAL MORNING" #x2FA0)
- ("KANGXI RADICAL WALK" #x2FA1)
- ("KANGXI RADICAL CITY" #x2FA2)
- ("KANGXI RADICAL WINE" #x2FA3)
- ("KANGXI RADICAL DISTINGUISH" #x2FA4)
- ("KANGXI RADICAL VILLAGE" #x2FA5)
- ("KANGXI RADICAL GOLD" #x2FA6)
- ("KANGXI RADICAL LONG" #x2FA7)
- ("KANGXI RADICAL GATE" #x2FA8)
- ("KANGXI RADICAL MOUND" #x2FA9)
- ("KANGXI RADICAL SLAVE" #x2FAA)
- ("KANGXI RADICAL SHORT TAILED BIRD" #x2FAB)
- ("KANGXI RADICAL RAIN" #x2FAC)
- ("KANGXI RADICAL BLUE" #x2FAD)
- ("KANGXI RADICAL WRONG" #x2FAE)
- ("KANGXI RADICAL FACE" #x2FAF)
- ("KANGXI RADICAL LEATHER" #x2FB0)
- ("KANGXI RADICAL TANNED LEATHER" #x2FB1)
- ("KANGXI RADICAL LEEK" #x2FB2)
- ("KANGXI RADICAL SOUND" #x2FB3)
- ("KANGXI RADICAL LEAF" #x2FB4)
- ("KANGXI RADICAL WIND" #x2FB5)
- ("KANGXI RADICAL FLY" #x2FB6)
- ("KANGXI RADICAL EAT" #x2FB7)
- ("KANGXI RADICAL HEAD" #x2FB8)
- ("KANGXI RADICAL FRAGRANT" #x2FB9)
- ("KANGXI RADICAL HORSE" #x2FBA)
- ("KANGXI RADICAL BONE" #x2FBB)
- ("KANGXI RADICAL TALL" #x2FBC)
- ("KANGXI RADICAL HAIR" #x2FBD)
- ("KANGXI RADICAL FIGHT" #x2FBE)
- ("KANGXI RADICAL SACRIFICIAL WINE" #x2FBF)
- ("KANGXI RADICAL CAULDRON" #x2FC0)
- ("KANGXI RADICAL GHOST" #x2FC1)
- ("KANGXI RADICAL FISH" #x2FC2)
- ("KANGXI RADICAL BIRD" #x2FC3)
- ("KANGXI RADICAL SALT" #x2FC4)
- ("KANGXI RADICAL DEER" #x2FC5)
- ("KANGXI RADICAL WHEAT" #x2FC6)
- ("KANGXI RADICAL HEMP" #x2FC7)
- ("KANGXI RADICAL YELLOW" #x2FC8)
- ("KANGXI RADICAL MILLET" #x2FC9)
- ("KANGXI RADICAL BLACK" #x2FCA)
- ("KANGXI RADICAL EMBROIDERY" #x2FCB)
- ("KANGXI RADICAL FROG" #x2FCC)
- ("KANGXI RADICAL TRIPOD" #x2FCD)
- ("KANGXI RADICAL DRUM" #x2FCE)
- ("KANGXI RADICAL RAT" #x2FCF)
- ("KANGXI RADICAL NOSE" #x2FD0)
- ("KANGXI RADICAL EVEN" #x2FD1)
- ("KANGXI RADICAL TOOTH" #x2FD2)
- ("KANGXI RADICAL DRAGON" #x2FD3)
- ("KANGXI RADICAL TURTLE" #x2FD4)
- ("KANGXI RADICAL FLUTE" #x2FD5)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'ideographic-description-characters
- '(("IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT" #x2FF0)
- ("IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW" #x2FF1)
- ("IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO MIDDLE AND RIGHT" #x2FF2)
- ("IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW" #x2FF3)
- ("IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND" #x2FF4)
- ("IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE" #x2FF5)
- ("IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM BELOW" #x2FF6)
- ("IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LEFT" #x2FF7)
- ("IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT" #x2FF8)
- ("IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT" #x2FF9)
- ("IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT" #x2FFA)
- ("IDEOGRAPHIC DESCRIPTION CHARACTER OVERLAID" #x2FFB)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'cjk-symbols-and-punctuation
- '(("IDEOGRAPHIC SPACE" #x3000)
- ("IDEOGRAPHIC COMMA" #x3001)
- ("IDEOGRAPHIC FULL STOP" #x3002)
- ("DITTO MARK" #x3003)
- ("JAPANESE INDUSTRIAL STANDARD SYMBOL" #x3004)
- ("IDEOGRAPHIC ITERATION MARK" #x3005)
- ("IDEOGRAPHIC CLOSING MARK" #x3006)
- ("IDEOGRAPHIC NUMBER ZERO" #x3007)
- ("LEFT ANGLE BRACKET" #x3008)
- ("RIGHT ANGLE BRACKET" #x3009)
- ("LEFT DOUBLE ANGLE BRACKET" #x300A)
- ("RIGHT DOUBLE ANGLE BRACKET" #x300B)
- ("LEFT CORNER BRACKET" #x300C)
- ("RIGHT CORNER BRACKET" #x300D)
- ("LEFT WHITE CORNER BRACKET" #x300E)
- ("RIGHT WHITE CORNER BRACKET" #x300F)
- ("LEFT BLACK LENTICULAR BRACKET" #x3010)
- ("RIGHT BLACK LENTICULAR BRACKET" #x3011)
- ("POSTAL MARK" #x3012)
- ("GETA MARK" #x3013)
- ("LEFT TORTOISE SHELL BRACKET" #x3014)
- ("RIGHT TORTOISE SHELL BRACKET" #x3015)
- ("LEFT WHITE LENTICULAR BRACKET" #x3016)
- ("RIGHT WHITE LENTICULAR BRACKET" #x3017)
- ("LEFT WHITE TORTOISE SHELL BRACKET" #x3018)
- ("RIGHT WHITE TORTOISE SHELL BRACKET" #x3019)
- ("LEFT WHITE SQUARE BRACKET" #x301A)
- ("RIGHT WHITE SQUARE BRACKET" #x301B)
- ("WAVE DASH" #x301C)
- ("REVERSED DOUBLE PRIME QUOTATION MARK" #x301D)
- ("DOUBLE PRIME QUOTATION MARK" #x301E)
- ("LOW DOUBLE PRIME QUOTATION MARK" #x301F)
- ("POSTAL MARK FACE" #x3020)
- ("HANGZHOU NUMERAL ONE" #x3021)
- ("HANGZHOU NUMERAL TWO" #x3022)
- ("HANGZHOU NUMERAL THREE" #x3023)
- ("HANGZHOU NUMERAL FOUR" #x3024)
- ("HANGZHOU NUMERAL FIVE" #x3025)
- ("HANGZHOU NUMERAL SIX" #x3026)
- ("HANGZHOU NUMERAL SEVEN" #x3027)
- ("HANGZHOU NUMERAL EIGHT" #x3028)
- ("HANGZHOU NUMERAL NINE" #x3029)
- ("IDEOGRAPHIC LEVEL TONE MARK" #x302A)
- ("IDEOGRAPHIC RISING TONE MARK" #x302B)
- ("IDEOGRAPHIC DEPARTING TONE MARK" #x302C)
- ("IDEOGRAPHIC ENTERING TONE MARK" #x302D)
- ("HANGUL SINGLE DOT TONE MARK" #x302E)
- ("HANGUL DOUBLE DOT TONE MARK" #x302F)
- ("WAVY DASH" #x3030)
- ("VERTICAL KANA REPEAT MARK" #x3031)
- ("VERTICAL KANA REPEAT WITH VOICED SOUND MARK" #x3032)
- ("VERTICAL KANA REPEAT MARK UPPER HALF" #x3033)
- ("VERTICAL KANA REPEAT WITH VOICED SOUND MARK UPPER HALF" #x3034)
- ("VERTICAL KANA REPEAT MARK LOWER HALF" #x3035)
- ("CIRCLED POSTAL MARK" #x3036)
- ("IDEOGRAPHIC TELEGRAPH LINE FEED SEPARATOR SYMBOL" #x3037)
- ("HANGZHOU NUMERAL TEN" #x3038)
- ("HANGZHOU NUMERAL TWENTY" #x3039)
- ("HANGZHOU NUMERAL THIRTY" #x303A)
- ("VERTICAL IDEOGRAPHIC ITERATION MARK" #x303B)
- ("MASU MARK" #x303C)
- ("PART ALTERNATION MARK" #x303D)
- ("IDEOGRAPHIC VARIATION INDICATOR" #x303E)
- ("IDEOGRAPHIC HALF FILL SPACE" #x303F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'hiragana
- '(("HIRAGANA LETTER SMALL A" #x3041)
- ("HIRAGANA LETTER A" #x3042)
- ("HIRAGANA LETTER SMALL I" #x3043)
- ("HIRAGANA LETTER I" #x3044)
- ("HIRAGANA LETTER SMALL U" #x3045)
- ("HIRAGANA LETTER U" #x3046)
- ("HIRAGANA LETTER SMALL E" #x3047)
- ("HIRAGANA LETTER E" #x3048)
- ("HIRAGANA LETTER SMALL O" #x3049)
- ("HIRAGANA LETTER O" #x304A)
- ("HIRAGANA LETTER KA" #x304B)
- ("HIRAGANA LETTER GA" #x304C)
- ("HIRAGANA LETTER KI" #x304D)
- ("HIRAGANA LETTER GI" #x304E)
- ("HIRAGANA LETTER KU" #x304F)
- ("HIRAGANA LETTER GU" #x3050)
- ("HIRAGANA LETTER KE" #x3051)
- ("HIRAGANA LETTER GE" #x3052)
- ("HIRAGANA LETTER KO" #x3053)
- ("HIRAGANA LETTER GO" #x3054)
- ("HIRAGANA LETTER SA" #x3055)
- ("HIRAGANA LETTER ZA" #x3056)
- ("HIRAGANA LETTER SI" #x3057)
- ("HIRAGANA LETTER ZI" #x3058)
- ("HIRAGANA LETTER SU" #x3059)
- ("HIRAGANA LETTER ZU" #x305A)
- ("HIRAGANA LETTER SE" #x305B)
- ("HIRAGANA LETTER ZE" #x305C)
- ("HIRAGANA LETTER SO" #x305D)
- ("HIRAGANA LETTER ZO" #x305E)
- ("HIRAGANA LETTER TA" #x305F)
- ("HIRAGANA LETTER DA" #x3060)
- ("HIRAGANA LETTER TI" #x3061)
- ("HIRAGANA LETTER DI" #x3062)
- ("HIRAGANA LETTER SMALL TU" #x3063)
- ("HIRAGANA LETTER TU" #x3064)
- ("HIRAGANA LETTER DU" #x3065)
- ("HIRAGANA LETTER TE" #x3066)
- ("HIRAGANA LETTER DE" #x3067)
- ("HIRAGANA LETTER TO" #x3068)
- ("HIRAGANA LETTER DO" #x3069)
- ("HIRAGANA LETTER NA" #x306A)
- ("HIRAGANA LETTER NI" #x306B)
- ("HIRAGANA LETTER NU" #x306C)
- ("HIRAGANA LETTER NE" #x306D)
- ("HIRAGANA LETTER NO" #x306E)
- ("HIRAGANA LETTER HA" #x306F)
- ("HIRAGANA LETTER BA" #x3070)
- ("HIRAGANA LETTER PA" #x3071)
- ("HIRAGANA LETTER HI" #x3072)
- ("HIRAGANA LETTER BI" #x3073)
- ("HIRAGANA LETTER PI" #x3074)
- ("HIRAGANA LETTER HU" #x3075)
- ("HIRAGANA LETTER BU" #x3076)
- ("HIRAGANA LETTER PU" #x3077)
- ("HIRAGANA LETTER HE" #x3078)
- ("HIRAGANA LETTER BE" #x3079)
- ("HIRAGANA LETTER PE" #x307A)
- ("HIRAGANA LETTER HO" #x307B)
- ("HIRAGANA LETTER BO" #x307C)
- ("HIRAGANA LETTER PO" #x307D)
- ("HIRAGANA LETTER MA" #x307E)
- ("HIRAGANA LETTER MI" #x307F)
- ("HIRAGANA LETTER MU" #x3080)
- ("HIRAGANA LETTER ME" #x3081)
- ("HIRAGANA LETTER MO" #x3082)
- ("HIRAGANA LETTER SMALL YA" #x3083)
- ("HIRAGANA LETTER YA" #x3084)
- ("HIRAGANA LETTER SMALL YU" #x3085)
- ("HIRAGANA LETTER YU" #x3086)
- ("HIRAGANA LETTER SMALL YO" #x3087)
- ("HIRAGANA LETTER YO" #x3088)
- ("HIRAGANA LETTER RA" #x3089)
- ("HIRAGANA LETTER RI" #x308A)
- ("HIRAGANA LETTER RU" #x308B)
- ("HIRAGANA LETTER RE" #x308C)
- ("HIRAGANA LETTER RO" #x308D)
- ("HIRAGANA LETTER SMALL WA" #x308E)
- ("HIRAGANA LETTER WA" #x308F)
- ("HIRAGANA LETTER WI" #x3090)
- ("HIRAGANA LETTER WE" #x3091)
- ("HIRAGANA LETTER WO" #x3092)
- ("HIRAGANA LETTER N" #x3093)
- ("HIRAGANA LETTER VU" #x3094)
- ("HIRAGANA LETTER SMALL KA" #x3095)
- ("HIRAGANA LETTER SMALL KE" #x3096)
- ("COMBINING KATAKANA-HIRAGANA VOICED SOUND MARK" #x3099)
- ("COMBINING KATAKANA-HIRAGANA SEMI-VOICED SOUND MARK" #x309A)
- ("KATAKANA-HIRAGANA VOICED SOUND MARK" #x309B)
- ("KATAKANA-HIRAGANA SEMI-VOICED SOUND MARK" #x309C)
- ("HIRAGANA ITERATION MARK" #x309D)
- ("HIRAGANA VOICED ITERATION MARK" #x309E)
- ("HIRAGANA DIGRAPH YORI" #x309F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'katakana
- '(("KATAKANA-HIRAGANA DOUBLE HYPHEN" #x30A0)
- ("KATAKANA LETTER SMALL A" #x30A1)
- ("KATAKANA LETTER A" #x30A2)
- ("KATAKANA LETTER SMALL I" #x30A3)
- ("KATAKANA LETTER I" #x30A4)
- ("KATAKANA LETTER SMALL U" #x30A5)
- ("KATAKANA LETTER U" #x30A6)
- ("KATAKANA LETTER SMALL E" #x30A7)
- ("KATAKANA LETTER E" #x30A8)
- ("KATAKANA LETTER SMALL O" #x30A9)
- ("KATAKANA LETTER O" #x30AA)
- ("KATAKANA LETTER KA" #x30AB)
- ("KATAKANA LETTER GA" #x30AC)
- ("KATAKANA LETTER KI" #x30AD)
- ("KATAKANA LETTER GI" #x30AE)
- ("KATAKANA LETTER KU" #x30AF)
- ("KATAKANA LETTER GU" #x30B0)
- ("KATAKANA LETTER KE" #x30B1)
- ("KATAKANA LETTER GE" #x30B2)
- ("KATAKANA LETTER KO" #x30B3)
- ("KATAKANA LETTER GO" #x30B4)
- ("KATAKANA LETTER SA" #x30B5)
- ("KATAKANA LETTER ZA" #x30B6)
- ("KATAKANA LETTER SI" #x30B7)
- ("KATAKANA LETTER ZI" #x30B8)
- ("KATAKANA LETTER SU" #x30B9)
- ("KATAKANA LETTER ZU" #x30BA)
- ("KATAKANA LETTER SE" #x30BB)
- ("KATAKANA LETTER ZE" #x30BC)
- ("KATAKANA LETTER SO" #x30BD)
- ("KATAKANA LETTER ZO" #x30BE)
- ("KATAKANA LETTER TA" #x30BF)
- ("KATAKANA LETTER DA" #x30C0)
- ("KATAKANA LETTER TI" #x30C1)
- ("KATAKANA LETTER DI" #x30C2)
- ("KATAKANA LETTER SMALL TU" #x30C3)
- ("KATAKANA LETTER TU" #x30C4)
- ("KATAKANA LETTER DU" #x30C5)
- ("KATAKANA LETTER TE" #x30C6)
- ("KATAKANA LETTER DE" #x30C7)
- ("KATAKANA LETTER TO" #x30C8)
- ("KATAKANA LETTER DO" #x30C9)
- ("KATAKANA LETTER NA" #x30CA)
- ("KATAKANA LETTER NI" #x30CB)
- ("KATAKANA LETTER NU" #x30CC)
- ("KATAKANA LETTER NE" #x30CD)
- ("KATAKANA LETTER NO" #x30CE)
- ("KATAKANA LETTER HA" #x30CF)
- ("KATAKANA LETTER BA" #x30D0)
- ("KATAKANA LETTER PA" #x30D1)
- ("KATAKANA LETTER HI" #x30D2)
- ("KATAKANA LETTER BI" #x30D3)
- ("KATAKANA LETTER PI" #x30D4)
- ("KATAKANA LETTER HU" #x30D5)
- ("KATAKANA LETTER BU" #x30D6)
- ("KATAKANA LETTER PU" #x30D7)
- ("KATAKANA LETTER HE" #x30D8)
- ("KATAKANA LETTER BE" #x30D9)
- ("KATAKANA LETTER PE" #x30DA)
- ("KATAKANA LETTER HO" #x30DB)
- ("KATAKANA LETTER BO" #x30DC)
- ("KATAKANA LETTER PO" #x30DD)
- ("KATAKANA LETTER MA" #x30DE)
- ("KATAKANA LETTER MI" #x30DF)
- ("KATAKANA LETTER MU" #x30E0)
- ("KATAKANA LETTER ME" #x30E1)
- ("KATAKANA LETTER MO" #x30E2)
- ("KATAKANA LETTER SMALL YA" #x30E3)
- ("KATAKANA LETTER YA" #x30E4)
- ("KATAKANA LETTER SMALL YU" #x30E5)
- ("KATAKANA LETTER YU" #x30E6)
- ("KATAKANA LETTER SMALL YO" #x30E7)
- ("KATAKANA LETTER YO" #x30E8)
- ("KATAKANA LETTER RA" #x30E9)
- ("KATAKANA LETTER RI" #x30EA)
- ("KATAKANA LETTER RU" #x30EB)
- ("KATAKANA LETTER RE" #x30EC)
- ("KATAKANA LETTER RO" #x30ED)
- ("KATAKANA LETTER SMALL WA" #x30EE)
- ("KATAKANA LETTER WA" #x30EF)
- ("KATAKANA LETTER WI" #x30F0)
- ("KATAKANA LETTER WE" #x30F1)
- ("KATAKANA LETTER WO" #x30F2)
- ("KATAKANA LETTER N" #x30F3)
- ("KATAKANA LETTER VU" #x30F4)
- ("KATAKANA LETTER SMALL KA" #x30F5)
- ("KATAKANA LETTER SMALL KE" #x30F6)
- ("KATAKANA LETTER VA" #x30F7)
- ("KATAKANA LETTER VI" #x30F8)
- ("KATAKANA LETTER VE" #x30F9)
- ("KATAKANA LETTER VO" #x30FA)
- ("KATAKANA MIDDLE DOT" #x30FB)
- ("KATAKANA-HIRAGANA PROLONGED SOUND MARK" #x30FC)
- ("KATAKANA ITERATION MARK" #x30FD)
- ("KATAKANA VOICED ITERATION MARK" #x30FE)
- ("KATAKANA DIGRAPH KOTO" #x30FF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'bopomofo
- '(("BOPOMOFO LETTER B" #x3105)
- ("BOPOMOFO LETTER P" #x3106)
- ("BOPOMOFO LETTER M" #x3107)
- ("BOPOMOFO LETTER F" #x3108)
- ("BOPOMOFO LETTER D" #x3109)
- ("BOPOMOFO LETTER T" #x310A)
- ("BOPOMOFO LETTER N" #x310B)
- ("BOPOMOFO LETTER L" #x310C)
- ("BOPOMOFO LETTER G" #x310D)
- ("BOPOMOFO LETTER K" #x310E)
- ("BOPOMOFO LETTER H" #x310F)
- ("BOPOMOFO LETTER J" #x3110)
- ("BOPOMOFO LETTER Q" #x3111)
- ("BOPOMOFO LETTER X" #x3112)
- ("BOPOMOFO LETTER ZH" #x3113)
- ("BOPOMOFO LETTER CH" #x3114)
- ("BOPOMOFO LETTER SH" #x3115)
- ("BOPOMOFO LETTER R" #x3116)
- ("BOPOMOFO LETTER Z" #x3117)
- ("BOPOMOFO LETTER C" #x3118)
- ("BOPOMOFO LETTER S" #x3119)
- ("BOPOMOFO LETTER A" #x311A)
- ("BOPOMOFO LETTER O" #x311B)
- ("BOPOMOFO LETTER E" #x311C)
- ("BOPOMOFO LETTER EH" #x311D)
- ("BOPOMOFO LETTER AI" #x311E)
- ("BOPOMOFO LETTER EI" #x311F)
- ("BOPOMOFO LETTER AU" #x3120)
- ("BOPOMOFO LETTER OU" #x3121)
- ("BOPOMOFO LETTER AN" #x3122)
- ("BOPOMOFO LETTER EN" #x3123)
- ("BOPOMOFO LETTER ANG" #x3124)
- ("BOPOMOFO LETTER ENG" #x3125)
- ("BOPOMOFO LETTER ER" #x3126)
- ("BOPOMOFO LETTER I" #x3127)
- ("BOPOMOFO LETTER U" #x3128)
- ("BOPOMOFO LETTER IU" #x3129)
- ("BOPOMOFO LETTER V" #x312A)
- ("BOPOMOFO LETTER NG" #x312B)
- ("BOPOMOFO LETTER GN" #x312C)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'hangul-compatibility-jamo
- '(("HANGUL LETTER KIYEOK" #x3131)
- ("HANGUL LETTER SSANGKIYEOK" #x3132)
- ("HANGUL LETTER KIYEOK-SIOS" #x3133)
- ("HANGUL LETTER NIEUN" #x3134)
- ("HANGUL LETTER NIEUN-CIEUC" #x3135)
- ("HANGUL LETTER NIEUN-HIEUH" #x3136)
- ("HANGUL LETTER TIKEUT" #x3137)
- ("HANGUL LETTER SSANGTIKEUT" #x3138)
- ("HANGUL LETTER RIEUL" #x3139)
- ("HANGUL LETTER RIEUL-KIYEOK" #x313A)
- ("HANGUL LETTER RIEUL-MIEUM" #x313B)
- ("HANGUL LETTER RIEUL-PIEUP" #x313C)
- ("HANGUL LETTER RIEUL-SIOS" #x313D)
- ("HANGUL LETTER RIEUL-THIEUTH" #x313E)
- ("HANGUL LETTER RIEUL-PHIEUPH" #x313F)
- ("HANGUL LETTER RIEUL-HIEUH" #x3140)
- ("HANGUL LETTER MIEUM" #x3141)
- ("HANGUL LETTER PIEUP" #x3142)
- ("HANGUL LETTER SSANGPIEUP" #x3143)
- ("HANGUL LETTER PIEUP-SIOS" #x3144)
- ("HANGUL LETTER SIOS" #x3145)
- ("HANGUL LETTER SSANGSIOS" #x3146)
- ("HANGUL LETTER IEUNG" #x3147)
- ("HANGUL LETTER CIEUC" #x3148)
- ("HANGUL LETTER SSANGCIEUC" #x3149)
- ("HANGUL LETTER CHIEUCH" #x314A)
- ("HANGUL LETTER KHIEUKH" #x314B)
- ("HANGUL LETTER THIEUTH" #x314C)
- ("HANGUL LETTER PHIEUPH" #x314D)
- ("HANGUL LETTER HIEUH" #x314E)
- ("HANGUL LETTER A" #x314F)
- ("HANGUL LETTER AE" #x3150)
- ("HANGUL LETTER YA" #x3151)
- ("HANGUL LETTER YAE" #x3152)
- ("HANGUL LETTER EO" #x3153)
- ("HANGUL LETTER E" #x3154)
- ("HANGUL LETTER YEO" #x3155)
- ("HANGUL LETTER YE" #x3156)
- ("HANGUL LETTER O" #x3157)
- ("HANGUL LETTER WA" #x3158)
- ("HANGUL LETTER WAE" #x3159)
- ("HANGUL LETTER OE" #x315A)
- ("HANGUL LETTER YO" #x315B)
- ("HANGUL LETTER U" #x315C)
- ("HANGUL LETTER WEO" #x315D)
- ("HANGUL LETTER WE" #x315E)
- ("HANGUL LETTER WI" #x315F)
- ("HANGUL LETTER YU" #x3160)
- ("HANGUL LETTER EU" #x3161)
- ("HANGUL LETTER YI" #x3162)
- ("HANGUL LETTER I" #x3163)
- ("HANGUL FILLER" #x3164)
- ("HANGUL LETTER SSANGNIEUN" #x3165)
- ("HANGUL LETTER NIEUN-TIKEUT" #x3166)
- ("HANGUL LETTER NIEUN-SIOS" #x3167)
- ("HANGUL LETTER NIEUN-PANSIOS" #x3168)
- ("HANGUL LETTER RIEUL-KIYEOK-SIOS" #x3169)
- ("HANGUL LETTER RIEUL-TIKEUT" #x316A)
- ("HANGUL LETTER RIEUL-PIEUP-SIOS" #x316B)
- ("HANGUL LETTER RIEUL-PANSIOS" #x316C)
- ("HANGUL LETTER RIEUL-YEORINHIEUH" #x316D)
- ("HANGUL LETTER MIEUM-PIEUP" #x316E)
- ("HANGUL LETTER MIEUM-SIOS" #x316F)
- ("HANGUL LETTER MIEUM-PANSIOS" #x3170)
- ("HANGUL LETTER KAPYEOUNMIEUM" #x3171)
- ("HANGUL LETTER PIEUP-KIYEOK" #x3172)
- ("HANGUL LETTER PIEUP-TIKEUT" #x3173)
- ("HANGUL LETTER PIEUP-SIOS-KIYEOK" #x3174)
- ("HANGUL LETTER PIEUP-SIOS-TIKEUT" #x3175)
- ("HANGUL LETTER PIEUP-CIEUC" #x3176)
- ("HANGUL LETTER PIEUP-THIEUTH" #x3177)
- ("HANGUL LETTER KAPYEOUNPIEUP" #x3178)
- ("HANGUL LETTER KAPYEOUNSSANGPIEUP" #x3179)
- ("HANGUL LETTER SIOS-KIYEOK" #x317A)
- ("HANGUL LETTER SIOS-NIEUN" #x317B)
- ("HANGUL LETTER SIOS-TIKEUT" #x317C)
- ("HANGUL LETTER SIOS-PIEUP" #x317D)
- ("HANGUL LETTER SIOS-CIEUC" #x317E)
- ("HANGUL LETTER PANSIOS" #x317F)
- ("HANGUL LETTER SSANGIEUNG" #x3180)
- ("HANGUL LETTER YESIEUNG" #x3181)
- ("HANGUL LETTER YESIEUNG-SIOS" #x3182)
- ("HANGUL LETTER YESIEUNG-PANSIOS" #x3183)
- ("HANGUL LETTER KAPYEOUNPHIEUPH" #x3184)
- ("HANGUL LETTER SSANGHIEUH" #x3185)
- ("HANGUL LETTER YEORINHIEUH" #x3186)
- ("HANGUL LETTER YO-YA" #x3187)
- ("HANGUL LETTER YO-YAE" #x3188)
- ("HANGUL LETTER YO-I" #x3189)
- ("HANGUL LETTER YU-YEO" #x318A)
- ("HANGUL LETTER YU-YE" #x318B)
- ("HANGUL LETTER YU-I" #x318C)
- ("HANGUL LETTER ARAEA" #x318D)
- ("HANGUL LETTER ARAEAE" #x318E)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'kanbun
- '(("IDEOGRAPHIC ANNOTATION LINKING MARK" #x3190)
- ("IDEOGRAPHIC ANNOTATION REVERSE MARK" #x3191)
- ("IDEOGRAPHIC ANNOTATION ONE MARK" #x3192)
- ("IDEOGRAPHIC ANNOTATION TWO MARK" #x3193)
- ("IDEOGRAPHIC ANNOTATION THREE MARK" #x3194)
- ("IDEOGRAPHIC ANNOTATION FOUR MARK" #x3195)
- ("IDEOGRAPHIC ANNOTATION TOP MARK" #x3196)
- ("IDEOGRAPHIC ANNOTATION MIDDLE MARK" #x3197)
- ("IDEOGRAPHIC ANNOTATION BOTTOM MARK" #x3198)
- ("IDEOGRAPHIC ANNOTATION FIRST MARK" #x3199)
- ("IDEOGRAPHIC ANNOTATION SECOND MARK" #x319A)
- ("IDEOGRAPHIC ANNOTATION THIRD MARK" #x319B)
- ("IDEOGRAPHIC ANNOTATION FOURTH MARK" #x319C)
- ("IDEOGRAPHIC ANNOTATION HEAVEN MARK" #x319D)
- ("IDEOGRAPHIC ANNOTATION EARTH MARK" #x319E)
- ("IDEOGRAPHIC ANNOTATION MAN MARK" #x319F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'bopomofo-extended
- '(("BOPOMOFO LETTER BU" #x31A0)
- ("BOPOMOFO LETTER ZI" #x31A1)
- ("BOPOMOFO LETTER JI" #x31A2)
- ("BOPOMOFO LETTER GU" #x31A3)
- ("BOPOMOFO LETTER EE" #x31A4)
- ("BOPOMOFO LETTER ENN" #x31A5)
- ("BOPOMOFO LETTER OO" #x31A6)
- ("BOPOMOFO LETTER ONN" #x31A7)
- ("BOPOMOFO LETTER IR" #x31A8)
- ("BOPOMOFO LETTER ANN" #x31A9)
- ("BOPOMOFO LETTER INN" #x31AA)
- ("BOPOMOFO LETTER UNN" #x31AB)
- ("BOPOMOFO LETTER IM" #x31AC)
- ("BOPOMOFO LETTER NGG" #x31AD)
- ("BOPOMOFO LETTER AINN" #x31AE)
- ("BOPOMOFO LETTER AUNN" #x31AF)
- ("BOPOMOFO LETTER AM" #x31B0)
- ("BOPOMOFO LETTER OM" #x31B1)
- ("BOPOMOFO LETTER ONG" #x31B2)
- ("BOPOMOFO LETTER INNN" #x31B3)
- ("BOPOMOFO FINAL LETTER P" #x31B4)
- ("BOPOMOFO FINAL LETTER T" #x31B5)
- ("BOPOMOFO FINAL LETTER K" #x31B6)
- ("BOPOMOFO FINAL LETTER H" #x31B7)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'katakana-phonetic-extensions
- '(("KATAKANA LETTER SMALL KU" #x31F0)
- ("KATAKANA LETTER SMALL SI" #x31F1)
- ("KATAKANA LETTER SMALL SU" #x31F2)
- ("KATAKANA LETTER SMALL TO" #x31F3)
- ("KATAKANA LETTER SMALL NU" #x31F4)
- ("KATAKANA LETTER SMALL HA" #x31F5)
- ("KATAKANA LETTER SMALL HI" #x31F6)
- ("KATAKANA LETTER SMALL HU" #x31F7)
- ("KATAKANA LETTER SMALL HE" #x31F8)
- ("KATAKANA LETTER SMALL HO" #x31F9)
- ("KATAKANA LETTER SMALL MU" #x31FA)
- ("KATAKANA LETTER SMALL RA" #x31FB)
- ("KATAKANA LETTER SMALL RI" #x31FC)
- ("KATAKANA LETTER SMALL RU" #x31FD)
- ("KATAKANA LETTER SMALL RE" #x31FE)
- ("KATAKANA LETTER SMALL RO" #x31FF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'enclosed-cjk-letters-and-months
- '(("PARENTHESIZED HANGUL KIYEOK" #x3200)
- ("PARENTHESIZED HANGUL NIEUN" #x3201)
- ("PARENTHESIZED HANGUL TIKEUT" #x3202)
- ("PARENTHESIZED HANGUL RIEUL" #x3203)
- ("PARENTHESIZED HANGUL MIEUM" #x3204)
- ("PARENTHESIZED HANGUL PIEUP" #x3205)
- ("PARENTHESIZED HANGUL SIOS" #x3206)
- ("PARENTHESIZED HANGUL IEUNG" #x3207)
- ("PARENTHESIZED HANGUL CIEUC" #x3208)
- ("PARENTHESIZED HANGUL CHIEUCH" #x3209)
- ("PARENTHESIZED HANGUL KHIEUKH" #x320A)
- ("PARENTHESIZED HANGUL THIEUTH" #x320B)
- ("PARENTHESIZED HANGUL PHIEUPH" #x320C)
- ("PARENTHESIZED HANGUL HIEUH" #x320D)
- ("PARENTHESIZED HANGUL KIYEOK A" #x320E)
- ("PARENTHESIZED HANGUL NIEUN A" #x320F)
- ("PARENTHESIZED HANGUL TIKEUT A" #x3210)
- ("PARENTHESIZED HANGUL RIEUL A" #x3211)
- ("PARENTHESIZED HANGUL MIEUM A" #x3212)
- ("PARENTHESIZED HANGUL PIEUP A" #x3213)
- ("PARENTHESIZED HANGUL SIOS A" #x3214)
- ("PARENTHESIZED HANGUL IEUNG A" #x3215)
- ("PARENTHESIZED HANGUL CIEUC A" #x3216)
- ("PARENTHESIZED HANGUL CHIEUCH A" #x3217)
- ("PARENTHESIZED HANGUL KHIEUKH A" #x3218)
- ("PARENTHESIZED HANGUL THIEUTH A" #x3219)
- ("PARENTHESIZED HANGUL PHIEUPH A" #x321A)
- ("PARENTHESIZED HANGUL HIEUH A" #x321B)
- ("PARENTHESIZED HANGUL CIEUC U" #x321C)
- ("PARENTHESIZED IDEOGRAPH ONE" #x3220)
- ("PARENTHESIZED IDEOGRAPH TWO" #x3221)
- ("PARENTHESIZED IDEOGRAPH THREE" #x3222)
- ("PARENTHESIZED IDEOGRAPH FOUR" #x3223)
- ("PARENTHESIZED IDEOGRAPH FIVE" #x3224)
- ("PARENTHESIZED IDEOGRAPH SIX" #x3225)
- ("PARENTHESIZED IDEOGRAPH SEVEN" #x3226)
- ("PARENTHESIZED IDEOGRAPH EIGHT" #x3227)
- ("PARENTHESIZED IDEOGRAPH NINE" #x3228)
- ("PARENTHESIZED IDEOGRAPH TEN" #x3229)
- ("PARENTHESIZED IDEOGRAPH MOON" #x322A)
- ("PARENTHESIZED IDEOGRAPH FIRE" #x322B)
- ("PARENTHESIZED IDEOGRAPH WATER" #x322C)
- ("PARENTHESIZED IDEOGRAPH WOOD" #x322D)
- ("PARENTHESIZED IDEOGRAPH METAL" #x322E)
- ("PARENTHESIZED IDEOGRAPH EARTH" #x322F)
- ("PARENTHESIZED IDEOGRAPH SUN" #x3230)
- ("PARENTHESIZED IDEOGRAPH STOCK" #x3231)
- ("PARENTHESIZED IDEOGRAPH HAVE" #x3232)
- ("PARENTHESIZED IDEOGRAPH SOCIETY" #x3233)
- ("PARENTHESIZED IDEOGRAPH NAME" #x3234)
- ("PARENTHESIZED IDEOGRAPH SPECIAL" #x3235)
- ("PARENTHESIZED IDEOGRAPH FINANCIAL" #x3236)
- ("PARENTHESIZED IDEOGRAPH CONGRATULATION" #x3237)
- ("PARENTHESIZED IDEOGRAPH LABOR" #x3238)
- ("PARENTHESIZED IDEOGRAPH REPRESENT" #x3239)
- ("PARENTHESIZED IDEOGRAPH CALL" #x323A)
- ("PARENTHESIZED IDEOGRAPH STUDY" #x323B)
- ("PARENTHESIZED IDEOGRAPH SUPERVISE" #x323C)
- ("PARENTHESIZED IDEOGRAPH ENTERPRISE" #x323D)
- ("PARENTHESIZED IDEOGRAPH RESOURCE" #x323E)
- ("PARENTHESIZED IDEOGRAPH ALLIANCE" #x323F)
- ("PARENTHESIZED IDEOGRAPH FESTIVAL" #x3240)
- ("PARENTHESIZED IDEOGRAPH REST" #x3241)
- ("PARENTHESIZED IDEOGRAPH SELF" #x3242)
- ("PARENTHESIZED IDEOGRAPH REACH" #x3243)
- ("CIRCLED NUMBER TWENTY ONE" #x3251)
- ("CIRCLED NUMBER TWENTY TWO" #x3252)
- ("CIRCLED NUMBER TWENTY THREE" #x3253)
- ("CIRCLED NUMBER TWENTY FOUR" #x3254)
- ("CIRCLED NUMBER TWENTY FIVE" #x3255)
- ("CIRCLED NUMBER TWENTY SIX" #x3256)
- ("CIRCLED NUMBER TWENTY SEVEN" #x3257)
- ("CIRCLED NUMBER TWENTY EIGHT" #x3258)
- ("CIRCLED NUMBER TWENTY NINE" #x3259)
- ("CIRCLED NUMBER THIRTY" #x325A)
- ("CIRCLED NUMBER THIRTY ONE" #x325B)
- ("CIRCLED NUMBER THIRTY TWO" #x325C)
- ("CIRCLED NUMBER THIRTY THREE" #x325D)
- ("CIRCLED NUMBER THIRTY FOUR" #x325E)
- ("CIRCLED NUMBER THIRTY FIVE" #x325F)
- ("CIRCLED HANGUL KIYEOK" #x3260)
- ("CIRCLED HANGUL NIEUN" #x3261)
- ("CIRCLED HANGUL TIKEUT" #x3262)
- ("CIRCLED HANGUL RIEUL" #x3263)
- ("CIRCLED HANGUL MIEUM" #x3264)
- ("CIRCLED HANGUL PIEUP" #x3265)
- ("CIRCLED HANGUL SIOS" #x3266)
- ("CIRCLED HANGUL IEUNG" #x3267)
- ("CIRCLED HANGUL CIEUC" #x3268)
- ("CIRCLED HANGUL CHIEUCH" #x3269)
- ("CIRCLED HANGUL KHIEUKH" #x326A)
- ("CIRCLED HANGUL THIEUTH" #x326B)
- ("CIRCLED HANGUL PHIEUPH" #x326C)
- ("CIRCLED HANGUL HIEUH" #x326D)
- ("CIRCLED HANGUL KIYEOK A" #x326E)
- ("CIRCLED HANGUL NIEUN A" #x326F)
- ("CIRCLED HANGUL TIKEUT A" #x3270)
- ("CIRCLED HANGUL RIEUL A" #x3271)
- ("CIRCLED HANGUL MIEUM A" #x3272)
- ("CIRCLED HANGUL PIEUP A" #x3273)
- ("CIRCLED HANGUL SIOS A" #x3274)
- ("CIRCLED HANGUL IEUNG A" #x3275)
- ("CIRCLED HANGUL CIEUC A" #x3276)
- ("CIRCLED HANGUL CHIEUCH A" #x3277)
- ("CIRCLED HANGUL KHIEUKH A" #x3278)
- ("CIRCLED HANGUL THIEUTH A" #x3279)
- ("CIRCLED HANGUL PHIEUPH A" #x327A)
- ("CIRCLED HANGUL HIEUH A" #x327B)
- ("KOREAN STANDARD SYMBOL" #x327F)
- ("CIRCLED IDEOGRAPH ONE" #x3280)
- ("CIRCLED IDEOGRAPH TWO" #x3281)
- ("CIRCLED IDEOGRAPH THREE" #x3282)
- ("CIRCLED IDEOGRAPH FOUR" #x3283)
- ("CIRCLED IDEOGRAPH FIVE" #x3284)
- ("CIRCLED IDEOGRAPH SIX" #x3285)
- ("CIRCLED IDEOGRAPH SEVEN" #x3286)
- ("CIRCLED IDEOGRAPH EIGHT" #x3287)
- ("CIRCLED IDEOGRAPH NINE" #x3288)
- ("CIRCLED IDEOGRAPH TEN" #x3289)
- ("CIRCLED IDEOGRAPH MOON" #x328A)
- ("CIRCLED IDEOGRAPH FIRE" #x328B)
- ("CIRCLED IDEOGRAPH WATER" #x328C)
- ("CIRCLED IDEOGRAPH WOOD" #x328D)
- ("CIRCLED IDEOGRAPH METAL" #x328E)
- ("CIRCLED IDEOGRAPH EARTH" #x328F)
- ("CIRCLED IDEOGRAPH SUN" #x3290)
- ("CIRCLED IDEOGRAPH STOCK" #x3291)
- ("CIRCLED IDEOGRAPH HAVE" #x3292)
- ("CIRCLED IDEOGRAPH SOCIETY" #x3293)
- ("CIRCLED IDEOGRAPH NAME" #x3294)
- ("CIRCLED IDEOGRAPH SPECIAL" #x3295)
- ("CIRCLED IDEOGRAPH FINANCIAL" #x3296)
- ("CIRCLED IDEOGRAPH CONGRATULATION" #x3297)
- ("CIRCLED IDEOGRAPH LABOR" #x3298)
- ("CIRCLED IDEOGRAPH SECRET" #x3299)
- ("CIRCLED IDEOGRAPH MALE" #x329A)
- ("CIRCLED IDEOGRAPH FEMALE" #x329B)
- ("CIRCLED IDEOGRAPH SUITABLE" #x329C)
- ("CIRCLED IDEOGRAPH EXCELLENT" #x329D)
- ("CIRCLED IDEOGRAPH PRINT" #x329E)
- ("CIRCLED IDEOGRAPH ATTENTION" #x329F)
- ("CIRCLED IDEOGRAPH ITEM" #x32A0)
- ("CIRCLED IDEOGRAPH REST" #x32A1)
- ("CIRCLED IDEOGRAPH COPY" #x32A2)
- ("CIRCLED IDEOGRAPH CORRECT" #x32A3)
- ("CIRCLED IDEOGRAPH HIGH" #x32A4)
- ("CIRCLED IDEOGRAPH CENTRE" #x32A5)
- ("CIRCLED IDEOGRAPH LOW" #x32A6)
- ("CIRCLED IDEOGRAPH LEFT" #x32A7)
- ("CIRCLED IDEOGRAPH RIGHT" #x32A8)
- ("CIRCLED IDEOGRAPH MEDICINE" #x32A9)
- ("CIRCLED IDEOGRAPH RELIGION" #x32AA)
- ("CIRCLED IDEOGRAPH STUDY" #x32AB)
- ("CIRCLED IDEOGRAPH SUPERVISE" #x32AC)
- ("CIRCLED IDEOGRAPH ENTERPRISE" #x32AD)
- ("CIRCLED IDEOGRAPH RESOURCE" #x32AE)
- ("CIRCLED IDEOGRAPH ALLIANCE" #x32AF)
- ("CIRCLED IDEOGRAPH NIGHT" #x32B0)
- ("CIRCLED NUMBER THIRTY SIX" #x32B1)
- ("CIRCLED NUMBER THIRTY SEVEN" #x32B2)
- ("CIRCLED NUMBER THIRTY EIGHT" #x32B3)
- ("CIRCLED NUMBER THIRTY NINE" #x32B4)
- ("CIRCLED NUMBER FORTY" #x32B5)
- ("CIRCLED NUMBER FORTY ONE" #x32B6)
- ("CIRCLED NUMBER FORTY TWO" #x32B7)
- ("CIRCLED NUMBER FORTY THREE" #x32B8)
- ("CIRCLED NUMBER FORTY FOUR" #x32B9)
- ("CIRCLED NUMBER FORTY FIVE" #x32BA)
- ("CIRCLED NUMBER FORTY SIX" #x32BB)
- ("CIRCLED NUMBER FORTY SEVEN" #x32BC)
- ("CIRCLED NUMBER FORTY EIGHT" #x32BD)
- ("CIRCLED NUMBER FORTY NINE" #x32BE)
- ("CIRCLED NUMBER FIFTY" #x32BF)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR JANUARY" #x32C0)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR FEBRUARY" #x32C1)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR MARCH" #x32C2)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR APRIL" #x32C3)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR MAY" #x32C4)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR JUNE" #x32C5)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR JULY" #x32C6)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR AUGUST" #x32C7)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR SEPTEMBER" #x32C8)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR OCTOBER" #x32C9)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR NOVEMBER" #x32CA)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DECEMBER" #x32CB)
- ("CIRCLED KATAKANA A" #x32D0)
- ("CIRCLED KATAKANA I" #x32D1)
- ("CIRCLED KATAKANA U" #x32D2)
- ("CIRCLED KATAKANA E" #x32D3)
- ("CIRCLED KATAKANA O" #x32D4)
- ("CIRCLED KATAKANA KA" #x32D5)
- ("CIRCLED KATAKANA KI" #x32D6)
- ("CIRCLED KATAKANA KU" #x32D7)
- ("CIRCLED KATAKANA KE" #x32D8)
- ("CIRCLED KATAKANA KO" #x32D9)
- ("CIRCLED KATAKANA SA" #x32DA)
- ("CIRCLED KATAKANA SI" #x32DB)
- ("CIRCLED KATAKANA SU" #x32DC)
- ("CIRCLED KATAKANA SE" #x32DD)
- ("CIRCLED KATAKANA SO" #x32DE)
- ("CIRCLED KATAKANA TA" #x32DF)
- ("CIRCLED KATAKANA TI" #x32E0)
- ("CIRCLED KATAKANA TU" #x32E1)
- ("CIRCLED KATAKANA TE" #x32E2)
- ("CIRCLED KATAKANA TO" #x32E3)
- ("CIRCLED KATAKANA NA" #x32E4)
- ("CIRCLED KATAKANA NI" #x32E5)
- ("CIRCLED KATAKANA NU" #x32E6)
- ("CIRCLED KATAKANA NE" #x32E7)
- ("CIRCLED KATAKANA NO" #x32E8)
- ("CIRCLED KATAKANA HA" #x32E9)
- ("CIRCLED KATAKANA HI" #x32EA)
- ("CIRCLED KATAKANA HU" #x32EB)
- ("CIRCLED KATAKANA HE" #x32EC)
- ("CIRCLED KATAKANA HO" #x32ED)
- ("CIRCLED KATAKANA MA" #x32EE)
- ("CIRCLED KATAKANA MI" #x32EF)
- ("CIRCLED KATAKANA MU" #x32F0)
- ("CIRCLED KATAKANA ME" #x32F1)
- ("CIRCLED KATAKANA MO" #x32F2)
- ("CIRCLED KATAKANA YA" #x32F3)
- ("CIRCLED KATAKANA YU" #x32F4)
- ("CIRCLED KATAKANA YO" #x32F5)
- ("CIRCLED KATAKANA RA" #x32F6)
- ("CIRCLED KATAKANA RI" #x32F7)
- ("CIRCLED KATAKANA RU" #x32F8)
- ("CIRCLED KATAKANA RE" #x32F9)
- ("CIRCLED KATAKANA RO" #x32FA)
- ("CIRCLED KATAKANA WA" #x32FB)
- ("CIRCLED KATAKANA WI" #x32FC)
- ("CIRCLED KATAKANA WE" #x32FD)
- ("CIRCLED KATAKANA WO" #x32FE)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'cjk-compatibility
- '(("SQUARE APAATO" #x3300)
- ("SQUARE ARUHUA" #x3301)
- ("SQUARE ANPEA" #x3302)
- ("SQUARE AARU" #x3303)
- ("SQUARE ININGU" #x3304)
- ("SQUARE INTI" #x3305)
- ("SQUARE UON" #x3306)
- ("SQUARE ESUKUUDO" #x3307)
- ("SQUARE EEKAA" #x3308)
- ("SQUARE ONSU" #x3309)
- ("SQUARE OOMU" #x330A)
- ("SQUARE KAIRI" #x330B)
- ("SQUARE KARATTO" #x330C)
- ("SQUARE KARORII" #x330D)
- ("SQUARE GARON" #x330E)
- ("SQUARE GANMA" #x330F)
- ("SQUARE GIGA" #x3310)
- ("SQUARE GINII" #x3311)
- ("SQUARE KYURII" #x3312)
- ("SQUARE GIRUDAA" #x3313)
- ("SQUARE KIRO" #x3314)
- ("SQUARE KIROGURAMU" #x3315)
- ("SQUARE KIROMEETORU" #x3316)
- ("SQUARE KIROWATTO" #x3317)
- ("SQUARE GURAMU" #x3318)
- ("SQUARE GURAMUTON" #x3319)
- ("SQUARE KURUZEIRO" #x331A)
- ("SQUARE KUROONE" #x331B)
- ("SQUARE KEESU" #x331C)
- ("SQUARE KORUNA" #x331D)
- ("SQUARE KOOPO" #x331E)
- ("SQUARE SAIKURU" #x331F)
- ("SQUARE SANTIIMU" #x3320)
- ("SQUARE SIRINGU" #x3321)
- ("SQUARE SENTI" #x3322)
- ("SQUARE SENTO" #x3323)
- ("SQUARE DAASU" #x3324)
- ("SQUARE DESI" #x3325)
- ("SQUARE DORU" #x3326)
- ("SQUARE TON" #x3327)
- ("SQUARE NANO" #x3328)
- ("SQUARE NOTTO" #x3329)
- ("SQUARE HAITU" #x332A)
- ("SQUARE PAASENTO" #x332B)
- ("SQUARE PAATU" #x332C)
- ("SQUARE BAARERU" #x332D)
- ("SQUARE PIASUTORU" #x332E)
- ("SQUARE PIKURU" #x332F)
- ("SQUARE PIKO" #x3330)
- ("SQUARE BIRU" #x3331)
- ("SQUARE HUARADDO" #x3332)
- ("SQUARE HUIITO" #x3333)
- ("SQUARE BUSSYERU" #x3334)
- ("SQUARE HURAN" #x3335)
- ("SQUARE HEKUTAARU" #x3336)
- ("SQUARE PESO" #x3337)
- ("SQUARE PENIHI" #x3338)
- ("SQUARE HERUTU" #x3339)
- ("SQUARE PENSU" #x333A)
- ("SQUARE PEEZI" #x333B)
- ("SQUARE BEETA" #x333C)
- ("SQUARE POINTO" #x333D)
- ("SQUARE BORUTO" #x333E)
- ("SQUARE HON" #x333F)
- ("SQUARE PONDO" #x3340)
- ("SQUARE HOORU" #x3341)
- ("SQUARE HOON" #x3342)
- ("SQUARE MAIKURO" #x3343)
- ("SQUARE MAIRU" #x3344)
- ("SQUARE MAHHA" #x3345)
- ("SQUARE MARUKU" #x3346)
- ("SQUARE MANSYON" #x3347)
- ("SQUARE MIKURON" #x3348)
- ("SQUARE MIRI" #x3349)
- ("SQUARE MIRIBAARU" #x334A)
- ("SQUARE MEGA" #x334B)
- ("SQUARE MEGATON" #x334C)
- ("SQUARE MEETORU" #x334D)
- ("SQUARE YAADO" #x334E)
- ("SQUARE YAARU" #x334F)
- ("SQUARE YUAN" #x3350)
- ("SQUARE RITTORU" #x3351)
- ("SQUARE RIRA" #x3352)
- ("SQUARE RUPII" #x3353)
- ("SQUARE RUUBURU" #x3354)
- ("SQUARE REMU" #x3355)
- ("SQUARE RENTOGEN" #x3356)
- ("SQUARE WATTO" #x3357)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR ZERO" #x3358)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR ONE" #x3359)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWO" #x335A)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR THREE" #x335B)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR FOUR" #x335C)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR FIVE" #x335D)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR SIX" #x335E)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR SEVEN" #x335F)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR EIGHT" #x3360)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR NINE" #x3361)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TEN" #x3362)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR ELEVEN" #x3363)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWELVE" #x3364)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR THIRTEEN" #x3365)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR FOURTEEN" #x3366)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR FIFTEEN" #x3367)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR SIXTEEN" #x3368)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR SEVENTEEN" #x3369)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR EIGHTEEN" #x336A)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR NINETEEN" #x336B)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWENTY" #x336C)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWENTY-ONE" #x336D)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWENTY-TWO" #x336E)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWENTY-THREE" #x336F)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR HOUR TWENTY-FOUR" #x3370)
- ("SQUARE HPA" #x3371)
- ("SQUARE DA" #x3372)
- ("SQUARE AU" #x3373)
- ("SQUARE BAR" #x3374)
- ("SQUARE OV" #x3375)
- ("SQUARE PC" #x3376)
- ("SQUARE ERA NAME HEISEI" #x337B)
- ("SQUARE ERA NAME SYOUWA" #x337C)
- ("SQUARE ERA NAME TAISYOU" #x337D)
- ("SQUARE ERA NAME MEIZI" #x337E)
- ("SQUARE CORPORATION" #x337F)
- ("SQUARE PA AMPS" #x3380)
- ("SQUARE NA" #x3381)
- ("SQUARE MU A" #x3382)
- ("SQUARE MA" #x3383)
- ("SQUARE KA" #x3384)
- ("SQUARE KB" #x3385)
- ("SQUARE MB" #x3386)
- ("SQUARE GB" #x3387)
- ("SQUARE CAL" #x3388)
- ("SQUARE KCAL" #x3389)
- ("SQUARE PF" #x338A)
- ("SQUARE NF" #x338B)
- ("SQUARE MU F" #x338C)
- ("SQUARE MU G" #x338D)
- ("SQUARE MG" #x338E)
- ("SQUARE KG" #x338F)
- ("SQUARE HZ" #x3390)
- ("SQUARE KHZ" #x3391)
- ("SQUARE MHZ" #x3392)
- ("SQUARE GHZ" #x3393)
- ("SQUARE THZ" #x3394)
- ("SQUARE MU L" #x3395)
- ("SQUARE ML" #x3396)
- ("SQUARE DL" #x3397)
- ("SQUARE KL" #x3398)
- ("SQUARE FM" #x3399)
- ("SQUARE NM" #x339A)
- ("SQUARE MU M" #x339B)
- ("SQUARE MM" #x339C)
- ("SQUARE CM" #x339D)
- ("SQUARE KM" #x339E)
- ("SQUARE MM SQUARED" #x339F)
- ("SQUARE CM SQUARED" #x33A0)
- ("SQUARE M SQUARED" #x33A1)
- ("SQUARE KM SQUARED" #x33A2)
- ("SQUARE MM CUBED" #x33A3)
- ("SQUARE CM CUBED" #x33A4)
- ("SQUARE M CUBED" #x33A5)
- ("SQUARE KM CUBED" #x33A6)
- ("SQUARE M OVER S" #x33A7)
- ("SQUARE M OVER S SQUARED" #x33A8)
- ("SQUARE PA" #x33A9)
- ("SQUARE KPA" #x33AA)
- ("SQUARE MPA" #x33AB)
- ("SQUARE GPA" #x33AC)
- ("SQUARE RAD" #x33AD)
- ("SQUARE RAD OVER S" #x33AE)
- ("SQUARE RAD OVER S SQUARED" #x33AF)
- ("SQUARE PS" #x33B0)
- ("SQUARE NS" #x33B1)
- ("SQUARE MU S" #x33B2)
- ("SQUARE MS" #x33B3)
- ("SQUARE PV" #x33B4)
- ("SQUARE NV" #x33B5)
- ("SQUARE MU V" #x33B6)
- ("SQUARE MV" #x33B7)
- ("SQUARE KV" #x33B8)
- ("SQUARE MV MEGA" #x33B9)
- ("SQUARE PW" #x33BA)
- ("SQUARE NW" #x33BB)
- ("SQUARE MU W" #x33BC)
- ("SQUARE MW" #x33BD)
- ("SQUARE KW" #x33BE)
- ("SQUARE MW MEGA" #x33BF)
- ("SQUARE K OHM" #x33C0)
- ("SQUARE M OHM" #x33C1)
- ("SQUARE AM" #x33C2)
- ("SQUARE BQ" #x33C3)
- ("SQUARE CC" #x33C4)
- ("SQUARE CD" #x33C5)
- ("SQUARE C OVER KG" #x33C6)
- ("SQUARE CO" #x33C7)
- ("SQUARE DB" #x33C8)
- ("SQUARE GY" #x33C9)
- ("SQUARE HA" #x33CA)
- ("SQUARE HP" #x33CB)
- ("SQUARE IN" #x33CC)
- ("SQUARE KK" #x33CD)
- ("SQUARE KM CAPITAL" #x33CE)
- ("SQUARE KT" #x33CF)
- ("SQUARE LM" #x33D0)
- ("SQUARE LN" #x33D1)
- ("SQUARE LOG" #x33D2)
- ("SQUARE LX" #x33D3)
- ("SQUARE MB SMALL" #x33D4)
- ("SQUARE MIL" #x33D5)
- ("SQUARE MOL" #x33D6)
- ("SQUARE PH" #x33D7)
- ("SQUARE PM" #x33D8)
- ("SQUARE PPM" #x33D9)
- ("SQUARE PR" #x33DA)
- ("SQUARE SR" #x33DB)
- ("SQUARE SV" #x33DC)
- ("SQUARE WB" #x33DD)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY ONE" #x33E0)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWO" #x33E1)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY THREE" #x33E2)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY FOUR" #x33E3)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY FIVE" #x33E4)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY SIX" #x33E5)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY SEVEN" #x33E6)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY EIGHT" #x33E7)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY NINE" #x33E8)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TEN" #x33E9)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY ELEVEN" #x33EA)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWELVE" #x33EB)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY THIRTEEN" #x33EC)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY FOURTEEN" #x33ED)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY FIFTEEN" #x33EE)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY SIXTEEN" #x33EF)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY SEVENTEEN" #x33F0)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY EIGHTEEN" #x33F1)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY NINETEEN" #x33F2)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY" #x33F3)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-ONE" #x33F4)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-TWO" #x33F5)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-THREE" #x33F6)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-FOUR" #x33F7)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-FIVE" #x33F8)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-SIX" #x33F9)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-SEVEN" #x33FA)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-EIGHT" #x33FB)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY TWENTY-NINE" #x33FC)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY THIRTY" #x33FD)
- ("IDEOGRAPHIC TELEGRAPH SYMBOL FOR DAY THIRTY-ONE" #x33FE)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'cjk-unified-ideographs-extension-a
- '())
-
+++ /dev/null
-(nxml-define-char-name-set 'yi-syllables
- '(("YI SYLLABLE IT" #xA000)
- ("YI SYLLABLE IX" #xA001)
- ("YI SYLLABLE I" #xA002)
- ("YI SYLLABLE IP" #xA003)
- ("YI SYLLABLE IET" #xA004)
- ("YI SYLLABLE IEX" #xA005)
- ("YI SYLLABLE IE" #xA006)
- ("YI SYLLABLE IEP" #xA007)
- ("YI SYLLABLE AT" #xA008)
- ("YI SYLLABLE AX" #xA009)
- ("YI SYLLABLE A" #xA00A)
- ("YI SYLLABLE AP" #xA00B)
- ("YI SYLLABLE UOX" #xA00C)
- ("YI SYLLABLE UO" #xA00D)
- ("YI SYLLABLE UOP" #xA00E)
- ("YI SYLLABLE OT" #xA00F)
- ("YI SYLLABLE OX" #xA010)
- ("YI SYLLABLE O" #xA011)
- ("YI SYLLABLE OP" #xA012)
- ("YI SYLLABLE EX" #xA013)
- ("YI SYLLABLE E" #xA014)
- ("YI SYLLABLE WU" #xA015)
- ("YI SYLLABLE BIT" #xA016)
- ("YI SYLLABLE BIX" #xA017)
- ("YI SYLLABLE BI" #xA018)
- ("YI SYLLABLE BIP" #xA019)
- ("YI SYLLABLE BIET" #xA01A)
- ("YI SYLLABLE BIEX" #xA01B)
- ("YI SYLLABLE BIE" #xA01C)
- ("YI SYLLABLE BIEP" #xA01D)
- ("YI SYLLABLE BAT" #xA01E)
- ("YI SYLLABLE BAX" #xA01F)
- ("YI SYLLABLE BA" #xA020)
- ("YI SYLLABLE BAP" #xA021)
- ("YI SYLLABLE BUOX" #xA022)
- ("YI SYLLABLE BUO" #xA023)
- ("YI SYLLABLE BUOP" #xA024)
- ("YI SYLLABLE BOT" #xA025)
- ("YI SYLLABLE BOX" #xA026)
- ("YI SYLLABLE BO" #xA027)
- ("YI SYLLABLE BOP" #xA028)
- ("YI SYLLABLE BEX" #xA029)
- ("YI SYLLABLE BE" #xA02A)
- ("YI SYLLABLE BEP" #xA02B)
- ("YI SYLLABLE BUT" #xA02C)
- ("YI SYLLABLE BUX" #xA02D)
- ("YI SYLLABLE BU" #xA02E)
- ("YI SYLLABLE BUP" #xA02F)
- ("YI SYLLABLE BURX" #xA030)
- ("YI SYLLABLE BUR" #xA031)
- ("YI SYLLABLE BYT" #xA032)
- ("YI SYLLABLE BYX" #xA033)
- ("YI SYLLABLE BY" #xA034)
- ("YI SYLLABLE BYP" #xA035)
- ("YI SYLLABLE BYRX" #xA036)
- ("YI SYLLABLE BYR" #xA037)
- ("YI SYLLABLE PIT" #xA038)
- ("YI SYLLABLE PIX" #xA039)
- ("YI SYLLABLE PI" #xA03A)
- ("YI SYLLABLE PIP" #xA03B)
- ("YI SYLLABLE PIEX" #xA03C)
- ("YI SYLLABLE PIE" #xA03D)
- ("YI SYLLABLE PIEP" #xA03E)
- ("YI SYLLABLE PAT" #xA03F)
- ("YI SYLLABLE PAX" #xA040)
- ("YI SYLLABLE PA" #xA041)
- ("YI SYLLABLE PAP" #xA042)
- ("YI SYLLABLE PUOX" #xA043)
- ("YI SYLLABLE PUO" #xA044)
- ("YI SYLLABLE PUOP" #xA045)
- ("YI SYLLABLE POT" #xA046)
- ("YI SYLLABLE POX" #xA047)
- ("YI SYLLABLE PO" #xA048)
- ("YI SYLLABLE POP" #xA049)
- ("YI SYLLABLE PUT" #xA04A)
- ("YI SYLLABLE PUX" #xA04B)
- ("YI SYLLABLE PU" #xA04C)
- ("YI SYLLABLE PUP" #xA04D)
- ("YI SYLLABLE PURX" #xA04E)
- ("YI SYLLABLE PUR" #xA04F)
- ("YI SYLLABLE PYT" #xA050)
- ("YI SYLLABLE PYX" #xA051)
- ("YI SYLLABLE PY" #xA052)
- ("YI SYLLABLE PYP" #xA053)
- ("YI SYLLABLE PYRX" #xA054)
- ("YI SYLLABLE PYR" #xA055)
- ("YI SYLLABLE BBIT" #xA056)
- ("YI SYLLABLE BBIX" #xA057)
- ("YI SYLLABLE BBI" #xA058)
- ("YI SYLLABLE BBIP" #xA059)
- ("YI SYLLABLE BBIET" #xA05A)
- ("YI SYLLABLE BBIEX" #xA05B)
- ("YI SYLLABLE BBIE" #xA05C)
- ("YI SYLLABLE BBIEP" #xA05D)
- ("YI SYLLABLE BBAT" #xA05E)
- ("YI SYLLABLE BBAX" #xA05F)
- ("YI SYLLABLE BBA" #xA060)
- ("YI SYLLABLE BBAP" #xA061)
- ("YI SYLLABLE BBUOX" #xA062)
- ("YI SYLLABLE BBUO" #xA063)
- ("YI SYLLABLE BBUOP" #xA064)
- ("YI SYLLABLE BBOT" #xA065)
- ("YI SYLLABLE BBOX" #xA066)
- ("YI SYLLABLE BBO" #xA067)
- ("YI SYLLABLE BBOP" #xA068)
- ("YI SYLLABLE BBEX" #xA069)
- ("YI SYLLABLE BBE" #xA06A)
- ("YI SYLLABLE BBEP" #xA06B)
- ("YI SYLLABLE BBUT" #xA06C)
- ("YI SYLLABLE BBUX" #xA06D)
- ("YI SYLLABLE BBU" #xA06E)
- ("YI SYLLABLE BBUP" #xA06F)
- ("YI SYLLABLE BBURX" #xA070)
- ("YI SYLLABLE BBUR" #xA071)
- ("YI SYLLABLE BBYT" #xA072)
- ("YI SYLLABLE BBYX" #xA073)
- ("YI SYLLABLE BBY" #xA074)
- ("YI SYLLABLE BBYP" #xA075)
- ("YI SYLLABLE NBIT" #xA076)
- ("YI SYLLABLE NBIX" #xA077)
- ("YI SYLLABLE NBI" #xA078)
- ("YI SYLLABLE NBIP" #xA079)
- ("YI SYLLABLE NBIEX" #xA07A)
- ("YI SYLLABLE NBIE" #xA07B)
- ("YI SYLLABLE NBIEP" #xA07C)
- ("YI SYLLABLE NBAT" #xA07D)
- ("YI SYLLABLE NBAX" #xA07E)
- ("YI SYLLABLE NBA" #xA07F)
- ("YI SYLLABLE NBAP" #xA080)
- ("YI SYLLABLE NBOT" #xA081)
- ("YI SYLLABLE NBOX" #xA082)
- ("YI SYLLABLE NBO" #xA083)
- ("YI SYLLABLE NBOP" #xA084)
- ("YI SYLLABLE NBUT" #xA085)
- ("YI SYLLABLE NBUX" #xA086)
- ("YI SYLLABLE NBU" #xA087)
- ("YI SYLLABLE NBUP" #xA088)
- ("YI SYLLABLE NBURX" #xA089)
- ("YI SYLLABLE NBUR" #xA08A)
- ("YI SYLLABLE NBYT" #xA08B)
- ("YI SYLLABLE NBYX" #xA08C)
- ("YI SYLLABLE NBY" #xA08D)
- ("YI SYLLABLE NBYP" #xA08E)
- ("YI SYLLABLE NBYRX" #xA08F)
- ("YI SYLLABLE NBYR" #xA090)
- ("YI SYLLABLE HMIT" #xA091)
- ("YI SYLLABLE HMIX" #xA092)
- ("YI SYLLABLE HMI" #xA093)
- ("YI SYLLABLE HMIP" #xA094)
- ("YI SYLLABLE HMIEX" #xA095)
- ("YI SYLLABLE HMIE" #xA096)
- ("YI SYLLABLE HMIEP" #xA097)
- ("YI SYLLABLE HMAT" #xA098)
- ("YI SYLLABLE HMAX" #xA099)
- ("YI SYLLABLE HMA" #xA09A)
- ("YI SYLLABLE HMAP" #xA09B)
- ("YI SYLLABLE HMUOX" #xA09C)
- ("YI SYLLABLE HMUO" #xA09D)
- ("YI SYLLABLE HMUOP" #xA09E)
- ("YI SYLLABLE HMOT" #xA09F)
- ("YI SYLLABLE HMOX" #xA0A0)
- ("YI SYLLABLE HMO" #xA0A1)
- ("YI SYLLABLE HMOP" #xA0A2)
- ("YI SYLLABLE HMUT" #xA0A3)
- ("YI SYLLABLE HMUX" #xA0A4)
- ("YI SYLLABLE HMU" #xA0A5)
- ("YI SYLLABLE HMUP" #xA0A6)
- ("YI SYLLABLE HMURX" #xA0A7)
- ("YI SYLLABLE HMUR" #xA0A8)
- ("YI SYLLABLE HMYX" #xA0A9)
- ("YI SYLLABLE HMY" #xA0AA)
- ("YI SYLLABLE HMYP" #xA0AB)
- ("YI SYLLABLE HMYRX" #xA0AC)
- ("YI SYLLABLE HMYR" #xA0AD)
- ("YI SYLLABLE MIT" #xA0AE)
- ("YI SYLLABLE MIX" #xA0AF)
- ("YI SYLLABLE MI" #xA0B0)
- ("YI SYLLABLE MIP" #xA0B1)
- ("YI SYLLABLE MIEX" #xA0B2)
- ("YI SYLLABLE MIE" #xA0B3)
- ("YI SYLLABLE MIEP" #xA0B4)
- ("YI SYLLABLE MAT" #xA0B5)
- ("YI SYLLABLE MAX" #xA0B6)
- ("YI SYLLABLE MA" #xA0B7)
- ("YI SYLLABLE MAP" #xA0B8)
- ("YI SYLLABLE MUOT" #xA0B9)
- ("YI SYLLABLE MUOX" #xA0BA)
- ("YI SYLLABLE MUO" #xA0BB)
- ("YI SYLLABLE MUOP" #xA0BC)
- ("YI SYLLABLE MOT" #xA0BD)
- ("YI SYLLABLE MOX" #xA0BE)
- ("YI SYLLABLE MO" #xA0BF)
- ("YI SYLLABLE MOP" #xA0C0)
- ("YI SYLLABLE MEX" #xA0C1)
- ("YI SYLLABLE ME" #xA0C2)
- ("YI SYLLABLE MUT" #xA0C3)
- ("YI SYLLABLE MUX" #xA0C4)
- ("YI SYLLABLE MU" #xA0C5)
- ("YI SYLLABLE MUP" #xA0C6)
- ("YI SYLLABLE MURX" #xA0C7)
- ("YI SYLLABLE MUR" #xA0C8)
- ("YI SYLLABLE MYT" #xA0C9)
- ("YI SYLLABLE MYX" #xA0CA)
- ("YI SYLLABLE MY" #xA0CB)
- ("YI SYLLABLE MYP" #xA0CC)
- ("YI SYLLABLE FIT" #xA0CD)
- ("YI SYLLABLE FIX" #xA0CE)
- ("YI SYLLABLE FI" #xA0CF)
- ("YI SYLLABLE FIP" #xA0D0)
- ("YI SYLLABLE FAT" #xA0D1)
- ("YI SYLLABLE FAX" #xA0D2)
- ("YI SYLLABLE FA" #xA0D3)
- ("YI SYLLABLE FAP" #xA0D4)
- ("YI SYLLABLE FOX" #xA0D5)
- ("YI SYLLABLE FO" #xA0D6)
- ("YI SYLLABLE FOP" #xA0D7)
- ("YI SYLLABLE FUT" #xA0D8)
- ("YI SYLLABLE FUX" #xA0D9)
- ("YI SYLLABLE FU" #xA0DA)
- ("YI SYLLABLE FUP" #xA0DB)
- ("YI SYLLABLE FURX" #xA0DC)
- ("YI SYLLABLE FUR" #xA0DD)
- ("YI SYLLABLE FYT" #xA0DE)
- ("YI SYLLABLE FYX" #xA0DF)
- ("YI SYLLABLE FY" #xA0E0)
- ("YI SYLLABLE FYP" #xA0E1)
- ("YI SYLLABLE VIT" #xA0E2)
- ("YI SYLLABLE VIX" #xA0E3)
- ("YI SYLLABLE VI" #xA0E4)
- ("YI SYLLABLE VIP" #xA0E5)
- ("YI SYLLABLE VIET" #xA0E6)
- ("YI SYLLABLE VIEX" #xA0E7)
- ("YI SYLLABLE VIE" #xA0E8)
- ("YI SYLLABLE VIEP" #xA0E9)
- ("YI SYLLABLE VAT" #xA0EA)
- ("YI SYLLABLE VAX" #xA0EB)
- ("YI SYLLABLE VA" #xA0EC)
- ("YI SYLLABLE VAP" #xA0ED)
- ("YI SYLLABLE VOT" #xA0EE)
- ("YI SYLLABLE VOX" #xA0EF)
- ("YI SYLLABLE VO" #xA0F0)
- ("YI SYLLABLE VOP" #xA0F1)
- ("YI SYLLABLE VEX" #xA0F2)
- ("YI SYLLABLE VEP" #xA0F3)
- ("YI SYLLABLE VUT" #xA0F4)
- ("YI SYLLABLE VUX" #xA0F5)
- ("YI SYLLABLE VU" #xA0F6)
- ("YI SYLLABLE VUP" #xA0F7)
- ("YI SYLLABLE VURX" #xA0F8)
- ("YI SYLLABLE VUR" #xA0F9)
- ("YI SYLLABLE VYT" #xA0FA)
- ("YI SYLLABLE VYX" #xA0FB)
- ("YI SYLLABLE VY" #xA0FC)
- ("YI SYLLABLE VYP" #xA0FD)
- ("YI SYLLABLE VYRX" #xA0FE)
- ("YI SYLLABLE VYR" #xA0FF)
- ("YI SYLLABLE DIT" #xA100)
- ("YI SYLLABLE DIX" #xA101)
- ("YI SYLLABLE DI" #xA102)
- ("YI SYLLABLE DIP" #xA103)
- ("YI SYLLABLE DIEX" #xA104)
- ("YI SYLLABLE DIE" #xA105)
- ("YI SYLLABLE DIEP" #xA106)
- ("YI SYLLABLE DAT" #xA107)
- ("YI SYLLABLE DAX" #xA108)
- ("YI SYLLABLE DA" #xA109)
- ("YI SYLLABLE DAP" #xA10A)
- ("YI SYLLABLE DUOX" #xA10B)
- ("YI SYLLABLE DUO" #xA10C)
- ("YI SYLLABLE DOT" #xA10D)
- ("YI SYLLABLE DOX" #xA10E)
- ("YI SYLLABLE DO" #xA10F)
- ("YI SYLLABLE DOP" #xA110)
- ("YI SYLLABLE DEX" #xA111)
- ("YI SYLLABLE DE" #xA112)
- ("YI SYLLABLE DEP" #xA113)
- ("YI SYLLABLE DUT" #xA114)
- ("YI SYLLABLE DUX" #xA115)
- ("YI SYLLABLE DU" #xA116)
- ("YI SYLLABLE DUP" #xA117)
- ("YI SYLLABLE DURX" #xA118)
- ("YI SYLLABLE DUR" #xA119)
- ("YI SYLLABLE TIT" #xA11A)
- ("YI SYLLABLE TIX" #xA11B)
- ("YI SYLLABLE TI" #xA11C)
- ("YI SYLLABLE TIP" #xA11D)
- ("YI SYLLABLE TIEX" #xA11E)
- ("YI SYLLABLE TIE" #xA11F)
- ("YI SYLLABLE TIEP" #xA120)
- ("YI SYLLABLE TAT" #xA121)
- ("YI SYLLABLE TAX" #xA122)
- ("YI SYLLABLE TA" #xA123)
- ("YI SYLLABLE TAP" #xA124)
- ("YI SYLLABLE TUOT" #xA125)
- ("YI SYLLABLE TUOX" #xA126)
- ("YI SYLLABLE TUO" #xA127)
- ("YI SYLLABLE TUOP" #xA128)
- ("YI SYLLABLE TOT" #xA129)
- ("YI SYLLABLE TOX" #xA12A)
- ("YI SYLLABLE TO" #xA12B)
- ("YI SYLLABLE TOP" #xA12C)
- ("YI SYLLABLE TEX" #xA12D)
- ("YI SYLLABLE TE" #xA12E)
- ("YI SYLLABLE TEP" #xA12F)
- ("YI SYLLABLE TUT" #xA130)
- ("YI SYLLABLE TUX" #xA131)
- ("YI SYLLABLE TU" #xA132)
- ("YI SYLLABLE TUP" #xA133)
- ("YI SYLLABLE TURX" #xA134)
- ("YI SYLLABLE TUR" #xA135)
- ("YI SYLLABLE DDIT" #xA136)
- ("YI SYLLABLE DDIX" #xA137)
- ("YI SYLLABLE DDI" #xA138)
- ("YI SYLLABLE DDIP" #xA139)
- ("YI SYLLABLE DDIEX" #xA13A)
- ("YI SYLLABLE DDIE" #xA13B)
- ("YI SYLLABLE DDIEP" #xA13C)
- ("YI SYLLABLE DDAT" #xA13D)
- ("YI SYLLABLE DDAX" #xA13E)
- ("YI SYLLABLE DDA" #xA13F)
- ("YI SYLLABLE DDAP" #xA140)
- ("YI SYLLABLE DDUOX" #xA141)
- ("YI SYLLABLE DDUO" #xA142)
- ("YI SYLLABLE DDUOP" #xA143)
- ("YI SYLLABLE DDOT" #xA144)
- ("YI SYLLABLE DDOX" #xA145)
- ("YI SYLLABLE DDO" #xA146)
- ("YI SYLLABLE DDOP" #xA147)
- ("YI SYLLABLE DDEX" #xA148)
- ("YI SYLLABLE DDE" #xA149)
- ("YI SYLLABLE DDEP" #xA14A)
- ("YI SYLLABLE DDUT" #xA14B)
- ("YI SYLLABLE DDUX" #xA14C)
- ("YI SYLLABLE DDU" #xA14D)
- ("YI SYLLABLE DDUP" #xA14E)
- ("YI SYLLABLE DDURX" #xA14F)
- ("YI SYLLABLE DDUR" #xA150)
- ("YI SYLLABLE NDIT" #xA151)
- ("YI SYLLABLE NDIX" #xA152)
- ("YI SYLLABLE NDI" #xA153)
- ("YI SYLLABLE NDIP" #xA154)
- ("YI SYLLABLE NDIEX" #xA155)
- ("YI SYLLABLE NDIE" #xA156)
- ("YI SYLLABLE NDAT" #xA157)
- ("YI SYLLABLE NDAX" #xA158)
- ("YI SYLLABLE NDA" #xA159)
- ("YI SYLLABLE NDAP" #xA15A)
- ("YI SYLLABLE NDOT" #xA15B)
- ("YI SYLLABLE NDOX" #xA15C)
- ("YI SYLLABLE NDO" #xA15D)
- ("YI SYLLABLE NDOP" #xA15E)
- ("YI SYLLABLE NDEX" #xA15F)
- ("YI SYLLABLE NDE" #xA160)
- ("YI SYLLABLE NDEP" #xA161)
- ("YI SYLLABLE NDUT" #xA162)
- ("YI SYLLABLE NDUX" #xA163)
- ("YI SYLLABLE NDU" #xA164)
- ("YI SYLLABLE NDUP" #xA165)
- ("YI SYLLABLE NDURX" #xA166)
- ("YI SYLLABLE NDUR" #xA167)
- ("YI SYLLABLE HNIT" #xA168)
- ("YI SYLLABLE HNIX" #xA169)
- ("YI SYLLABLE HNI" #xA16A)
- ("YI SYLLABLE HNIP" #xA16B)
- ("YI SYLLABLE HNIET" #xA16C)
- ("YI SYLLABLE HNIEX" #xA16D)
- ("YI SYLLABLE HNIE" #xA16E)
- ("YI SYLLABLE HNIEP" #xA16F)
- ("YI SYLLABLE HNAT" #xA170)
- ("YI SYLLABLE HNAX" #xA171)
- ("YI SYLLABLE HNA" #xA172)
- ("YI SYLLABLE HNAP" #xA173)
- ("YI SYLLABLE HNUOX" #xA174)
- ("YI SYLLABLE HNUO" #xA175)
- ("YI SYLLABLE HNOT" #xA176)
- ("YI SYLLABLE HNOX" #xA177)
- ("YI SYLLABLE HNOP" #xA178)
- ("YI SYLLABLE HNEX" #xA179)
- ("YI SYLLABLE HNE" #xA17A)
- ("YI SYLLABLE HNEP" #xA17B)
- ("YI SYLLABLE HNUT" #xA17C)
- ("YI SYLLABLE NIT" #xA17D)
- ("YI SYLLABLE NIX" #xA17E)
- ("YI SYLLABLE NI" #xA17F)
- ("YI SYLLABLE NIP" #xA180)
- ("YI SYLLABLE NIEX" #xA181)
- ("YI SYLLABLE NIE" #xA182)
- ("YI SYLLABLE NIEP" #xA183)
- ("YI SYLLABLE NAX" #xA184)
- ("YI SYLLABLE NA" #xA185)
- ("YI SYLLABLE NAP" #xA186)
- ("YI SYLLABLE NUOX" #xA187)
- ("YI SYLLABLE NUO" #xA188)
- ("YI SYLLABLE NUOP" #xA189)
- ("YI SYLLABLE NOT" #xA18A)
- ("YI SYLLABLE NOX" #xA18B)
- ("YI SYLLABLE NO" #xA18C)
- ("YI SYLLABLE NOP" #xA18D)
- ("YI SYLLABLE NEX" #xA18E)
- ("YI SYLLABLE NE" #xA18F)
- ("YI SYLLABLE NEP" #xA190)
- ("YI SYLLABLE NUT" #xA191)
- ("YI SYLLABLE NUX" #xA192)
- ("YI SYLLABLE NU" #xA193)
- ("YI SYLLABLE NUP" #xA194)
- ("YI SYLLABLE NURX" #xA195)
- ("YI SYLLABLE NUR" #xA196)
- ("YI SYLLABLE HLIT" #xA197)
- ("YI SYLLABLE HLIX" #xA198)
- ("YI SYLLABLE HLI" #xA199)
- ("YI SYLLABLE HLIP" #xA19A)
- ("YI SYLLABLE HLIEX" #xA19B)
- ("YI SYLLABLE HLIE" #xA19C)
- ("YI SYLLABLE HLIEP" #xA19D)
- ("YI SYLLABLE HLAT" #xA19E)
- ("YI SYLLABLE HLAX" #xA19F)
- ("YI SYLLABLE HLA" #xA1A0)
- ("YI SYLLABLE HLAP" #xA1A1)
- ("YI SYLLABLE HLUOX" #xA1A2)
- ("YI SYLLABLE HLUO" #xA1A3)
- ("YI SYLLABLE HLUOP" #xA1A4)
- ("YI SYLLABLE HLOX" #xA1A5)
- ("YI SYLLABLE HLO" #xA1A6)
- ("YI SYLLABLE HLOP" #xA1A7)
- ("YI SYLLABLE HLEX" #xA1A8)
- ("YI SYLLABLE HLE" #xA1A9)
- ("YI SYLLABLE HLEP" #xA1AA)
- ("YI SYLLABLE HLUT" #xA1AB)
- ("YI SYLLABLE HLUX" #xA1AC)
- ("YI SYLLABLE HLU" #xA1AD)
- ("YI SYLLABLE HLUP" #xA1AE)
- ("YI SYLLABLE HLURX" #xA1AF)
- ("YI SYLLABLE HLUR" #xA1B0)
- ("YI SYLLABLE HLYT" #xA1B1)
- ("YI SYLLABLE HLYX" #xA1B2)
- ("YI SYLLABLE HLY" #xA1B3)
- ("YI SYLLABLE HLYP" #xA1B4)
- ("YI SYLLABLE HLYRX" #xA1B5)
- ("YI SYLLABLE HLYR" #xA1B6)
- ("YI SYLLABLE LIT" #xA1B7)
- ("YI SYLLABLE LIX" #xA1B8)
- ("YI SYLLABLE LI" #xA1B9)
- ("YI SYLLABLE LIP" #xA1BA)
- ("YI SYLLABLE LIET" #xA1BB)
- ("YI SYLLABLE LIEX" #xA1BC)
- ("YI SYLLABLE LIE" #xA1BD)
- ("YI SYLLABLE LIEP" #xA1BE)
- ("YI SYLLABLE LAT" #xA1BF)
- ("YI SYLLABLE LAX" #xA1C0)
- ("YI SYLLABLE LA" #xA1C1)
- ("YI SYLLABLE LAP" #xA1C2)
- ("YI SYLLABLE LUOT" #xA1C3)
- ("YI SYLLABLE LUOX" #xA1C4)
- ("YI SYLLABLE LUO" #xA1C5)
- ("YI SYLLABLE LUOP" #xA1C6)
- ("YI SYLLABLE LOT" #xA1C7)
- ("YI SYLLABLE LOX" #xA1C8)
- ("YI SYLLABLE LO" #xA1C9)
- ("YI SYLLABLE LOP" #xA1CA)
- ("YI SYLLABLE LEX" #xA1CB)
- ("YI SYLLABLE LE" #xA1CC)
- ("YI SYLLABLE LEP" #xA1CD)
- ("YI SYLLABLE LUT" #xA1CE)
- ("YI SYLLABLE LUX" #xA1CF)
- ("YI SYLLABLE LU" #xA1D0)
- ("YI SYLLABLE LUP" #xA1D1)
- ("YI SYLLABLE LURX" #xA1D2)
- ("YI SYLLABLE LUR" #xA1D3)
- ("YI SYLLABLE LYT" #xA1D4)
- ("YI SYLLABLE LYX" #xA1D5)
- ("YI SYLLABLE LY" #xA1D6)
- ("YI SYLLABLE LYP" #xA1D7)
- ("YI SYLLABLE LYRX" #xA1D8)
- ("YI SYLLABLE LYR" #xA1D9)
- ("YI SYLLABLE GIT" #xA1DA)
- ("YI SYLLABLE GIX" #xA1DB)
- ("YI SYLLABLE GI" #xA1DC)
- ("YI SYLLABLE GIP" #xA1DD)
- ("YI SYLLABLE GIET" #xA1DE)
- ("YI SYLLABLE GIEX" #xA1DF)
- ("YI SYLLABLE GIE" #xA1E0)
- ("YI SYLLABLE GIEP" #xA1E1)
- ("YI SYLLABLE GAT" #xA1E2)
- ("YI SYLLABLE GAX" #xA1E3)
- ("YI SYLLABLE GA" #xA1E4)
- ("YI SYLLABLE GAP" #xA1E5)
- ("YI SYLLABLE GUOT" #xA1E6)
- ("YI SYLLABLE GUOX" #xA1E7)
- ("YI SYLLABLE GUO" #xA1E8)
- ("YI SYLLABLE GUOP" #xA1E9)
- ("YI SYLLABLE GOT" #xA1EA)
- ("YI SYLLABLE GOX" #xA1EB)
- ("YI SYLLABLE GO" #xA1EC)
- ("YI SYLLABLE GOP" #xA1ED)
- ("YI SYLLABLE GET" #xA1EE)
- ("YI SYLLABLE GEX" #xA1EF)
- ("YI SYLLABLE GE" #xA1F0)
- ("YI SYLLABLE GEP" #xA1F1)
- ("YI SYLLABLE GUT" #xA1F2)
- ("YI SYLLABLE GUX" #xA1F3)
- ("YI SYLLABLE GU" #xA1F4)
- ("YI SYLLABLE GUP" #xA1F5)
- ("YI SYLLABLE GURX" #xA1F6)
- ("YI SYLLABLE GUR" #xA1F7)
- ("YI SYLLABLE KIT" #xA1F8)
- ("YI SYLLABLE KIX" #xA1F9)
- ("YI SYLLABLE KI" #xA1FA)
- ("YI SYLLABLE KIP" #xA1FB)
- ("YI SYLLABLE KIEX" #xA1FC)
- ("YI SYLLABLE KIE" #xA1FD)
- ("YI SYLLABLE KIEP" #xA1FE)
- ("YI SYLLABLE KAT" #xA1FF)
- ("YI SYLLABLE KAX" #xA200)
- ("YI SYLLABLE KA" #xA201)
- ("YI SYLLABLE KAP" #xA202)
- ("YI SYLLABLE KUOX" #xA203)
- ("YI SYLLABLE KUO" #xA204)
- ("YI SYLLABLE KUOP" #xA205)
- ("YI SYLLABLE KOT" #xA206)
- ("YI SYLLABLE KOX" #xA207)
- ("YI SYLLABLE KO" #xA208)
- ("YI SYLLABLE KOP" #xA209)
- ("YI SYLLABLE KET" #xA20A)
- ("YI SYLLABLE KEX" #xA20B)
- ("YI SYLLABLE KE" #xA20C)
- ("YI SYLLABLE KEP" #xA20D)
- ("YI SYLLABLE KUT" #xA20E)
- ("YI SYLLABLE KUX" #xA20F)
- ("YI SYLLABLE KU" #xA210)
- ("YI SYLLABLE KUP" #xA211)
- ("YI SYLLABLE KURX" #xA212)
- ("YI SYLLABLE KUR" #xA213)
- ("YI SYLLABLE GGIT" #xA214)
- ("YI SYLLABLE GGIX" #xA215)
- ("YI SYLLABLE GGI" #xA216)
- ("YI SYLLABLE GGIEX" #xA217)
- ("YI SYLLABLE GGIE" #xA218)
- ("YI SYLLABLE GGIEP" #xA219)
- ("YI SYLLABLE GGAT" #xA21A)
- ("YI SYLLABLE GGAX" #xA21B)
- ("YI SYLLABLE GGA" #xA21C)
- ("YI SYLLABLE GGAP" #xA21D)
- ("YI SYLLABLE GGUOT" #xA21E)
- ("YI SYLLABLE GGUOX" #xA21F)
- ("YI SYLLABLE GGUO" #xA220)
- ("YI SYLLABLE GGUOP" #xA221)
- ("YI SYLLABLE GGOT" #xA222)
- ("YI SYLLABLE GGOX" #xA223)
- ("YI SYLLABLE GGO" #xA224)
- ("YI SYLLABLE GGOP" #xA225)
- ("YI SYLLABLE GGET" #xA226)
- ("YI SYLLABLE GGEX" #xA227)
- ("YI SYLLABLE GGE" #xA228)
- ("YI SYLLABLE GGEP" #xA229)
- ("YI SYLLABLE GGUT" #xA22A)
- ("YI SYLLABLE GGUX" #xA22B)
- ("YI SYLLABLE GGU" #xA22C)
- ("YI SYLLABLE GGUP" #xA22D)
- ("YI SYLLABLE GGURX" #xA22E)
- ("YI SYLLABLE GGUR" #xA22F)
- ("YI SYLLABLE MGIEX" #xA230)
- ("YI SYLLABLE MGIE" #xA231)
- ("YI SYLLABLE MGAT" #xA232)
- ("YI SYLLABLE MGAX" #xA233)
- ("YI SYLLABLE MGA" #xA234)
- ("YI SYLLABLE MGAP" #xA235)
- ("YI SYLLABLE MGUOX" #xA236)
- ("YI SYLLABLE MGUO" #xA237)
- ("YI SYLLABLE MGUOP" #xA238)
- ("YI SYLLABLE MGOT" #xA239)
- ("YI SYLLABLE MGOX" #xA23A)
- ("YI SYLLABLE MGO" #xA23B)
- ("YI SYLLABLE MGOP" #xA23C)
- ("YI SYLLABLE MGEX" #xA23D)
- ("YI SYLLABLE MGE" #xA23E)
- ("YI SYLLABLE MGEP" #xA23F)
- ("YI SYLLABLE MGUT" #xA240)
- ("YI SYLLABLE MGUX" #xA241)
- ("YI SYLLABLE MGU" #xA242)
- ("YI SYLLABLE MGUP" #xA243)
- ("YI SYLLABLE MGURX" #xA244)
- ("YI SYLLABLE MGUR" #xA245)
- ("YI SYLLABLE HXIT" #xA246)
- ("YI SYLLABLE HXIX" #xA247)
- ("YI SYLLABLE HXI" #xA248)
- ("YI SYLLABLE HXIP" #xA249)
- ("YI SYLLABLE HXIET" #xA24A)
- ("YI SYLLABLE HXIEX" #xA24B)
- ("YI SYLLABLE HXIE" #xA24C)
- ("YI SYLLABLE HXIEP" #xA24D)
- ("YI SYLLABLE HXAT" #xA24E)
- ("YI SYLLABLE HXAX" #xA24F)
- ("YI SYLLABLE HXA" #xA250)
- ("YI SYLLABLE HXAP" #xA251)
- ("YI SYLLABLE HXUOT" #xA252)
- ("YI SYLLABLE HXUOX" #xA253)
- ("YI SYLLABLE HXUO" #xA254)
- ("YI SYLLABLE HXUOP" #xA255)
- ("YI SYLLABLE HXOT" #xA256)
- ("YI SYLLABLE HXOX" #xA257)
- ("YI SYLLABLE HXO" #xA258)
- ("YI SYLLABLE HXOP" #xA259)
- ("YI SYLLABLE HXEX" #xA25A)
- ("YI SYLLABLE HXE" #xA25B)
- ("YI SYLLABLE HXEP" #xA25C)
- ("YI SYLLABLE NGIEX" #xA25D)
- ("YI SYLLABLE NGIE" #xA25E)
- ("YI SYLLABLE NGIEP" #xA25F)
- ("YI SYLLABLE NGAT" #xA260)
- ("YI SYLLABLE NGAX" #xA261)
- ("YI SYLLABLE NGA" #xA262)
- ("YI SYLLABLE NGAP" #xA263)
- ("YI SYLLABLE NGUOT" #xA264)
- ("YI SYLLABLE NGUOX" #xA265)
- ("YI SYLLABLE NGUO" #xA266)
- ("YI SYLLABLE NGOT" #xA267)
- ("YI SYLLABLE NGOX" #xA268)
- ("YI SYLLABLE NGO" #xA269)
- ("YI SYLLABLE NGOP" #xA26A)
- ("YI SYLLABLE NGEX" #xA26B)
- ("YI SYLLABLE NGE" #xA26C)
- ("YI SYLLABLE NGEP" #xA26D)
- ("YI SYLLABLE HIT" #xA26E)
- ("YI SYLLABLE HIEX" #xA26F)
- ("YI SYLLABLE HIE" #xA270)
- ("YI SYLLABLE HAT" #xA271)
- ("YI SYLLABLE HAX" #xA272)
- ("YI SYLLABLE HA" #xA273)
- ("YI SYLLABLE HAP" #xA274)
- ("YI SYLLABLE HUOT" #xA275)
- ("YI SYLLABLE HUOX" #xA276)
- ("YI SYLLABLE HUO" #xA277)
- ("YI SYLLABLE HUOP" #xA278)
- ("YI SYLLABLE HOT" #xA279)
- ("YI SYLLABLE HOX" #xA27A)
- ("YI SYLLABLE HO" #xA27B)
- ("YI SYLLABLE HOP" #xA27C)
- ("YI SYLLABLE HEX" #xA27D)
- ("YI SYLLABLE HE" #xA27E)
- ("YI SYLLABLE HEP" #xA27F)
- ("YI SYLLABLE WAT" #xA280)
- ("YI SYLLABLE WAX" #xA281)
- ("YI SYLLABLE WA" #xA282)
- ("YI SYLLABLE WAP" #xA283)
- ("YI SYLLABLE WUOX" #xA284)
- ("YI SYLLABLE WUO" #xA285)
- ("YI SYLLABLE WUOP" #xA286)
- ("YI SYLLABLE WOX" #xA287)
- ("YI SYLLABLE WO" #xA288)
- ("YI SYLLABLE WOP" #xA289)
- ("YI SYLLABLE WEX" #xA28A)
- ("YI SYLLABLE WE" #xA28B)
- ("YI SYLLABLE WEP" #xA28C)
- ("YI SYLLABLE ZIT" #xA28D)
- ("YI SYLLABLE ZIX" #xA28E)
- ("YI SYLLABLE ZI" #xA28F)
- ("YI SYLLABLE ZIP" #xA290)
- ("YI SYLLABLE ZIEX" #xA291)
- ("YI SYLLABLE ZIE" #xA292)
- ("YI SYLLABLE ZIEP" #xA293)
- ("YI SYLLABLE ZAT" #xA294)
- ("YI SYLLABLE ZAX" #xA295)
- ("YI SYLLABLE ZA" #xA296)
- ("YI SYLLABLE ZAP" #xA297)
- ("YI SYLLABLE ZUOX" #xA298)
- ("YI SYLLABLE ZUO" #xA299)
- ("YI SYLLABLE ZUOP" #xA29A)
- ("YI SYLLABLE ZOT" #xA29B)
- ("YI SYLLABLE ZOX" #xA29C)
- ("YI SYLLABLE ZO" #xA29D)
- ("YI SYLLABLE ZOP" #xA29E)
- ("YI SYLLABLE ZEX" #xA29F)
- ("YI SYLLABLE ZE" #xA2A0)
- ("YI SYLLABLE ZEP" #xA2A1)
- ("YI SYLLABLE ZUT" #xA2A2)
- ("YI SYLLABLE ZUX" #xA2A3)
- ("YI SYLLABLE ZU" #xA2A4)
- ("YI SYLLABLE ZUP" #xA2A5)
- ("YI SYLLABLE ZURX" #xA2A6)
- ("YI SYLLABLE ZUR" #xA2A7)
- ("YI SYLLABLE ZYT" #xA2A8)
- ("YI SYLLABLE ZYX" #xA2A9)
- ("YI SYLLABLE ZY" #xA2AA)
- ("YI SYLLABLE ZYP" #xA2AB)
- ("YI SYLLABLE ZYRX" #xA2AC)
- ("YI SYLLABLE ZYR" #xA2AD)
- ("YI SYLLABLE CIT" #xA2AE)
- ("YI SYLLABLE CIX" #xA2AF)
- ("YI SYLLABLE CI" #xA2B0)
- ("YI SYLLABLE CIP" #xA2B1)
- ("YI SYLLABLE CIET" #xA2B2)
- ("YI SYLLABLE CIEX" #xA2B3)
- ("YI SYLLABLE CIE" #xA2B4)
- ("YI SYLLABLE CIEP" #xA2B5)
- ("YI SYLLABLE CAT" #xA2B6)
- ("YI SYLLABLE CAX" #xA2B7)
- ("YI SYLLABLE CA" #xA2B8)
- ("YI SYLLABLE CAP" #xA2B9)
- ("YI SYLLABLE CUOX" #xA2BA)
- ("YI SYLLABLE CUO" #xA2BB)
- ("YI SYLLABLE CUOP" #xA2BC)
- ("YI SYLLABLE COT" #xA2BD)
- ("YI SYLLABLE COX" #xA2BE)
- ("YI SYLLABLE CO" #xA2BF)
- ("YI SYLLABLE COP" #xA2C0)
- ("YI SYLLABLE CEX" #xA2C1)
- ("YI SYLLABLE CE" #xA2C2)
- ("YI SYLLABLE CEP" #xA2C3)
- ("YI SYLLABLE CUT" #xA2C4)
- ("YI SYLLABLE CUX" #xA2C5)
- ("YI SYLLABLE CU" #xA2C6)
- ("YI SYLLABLE CUP" #xA2C7)
- ("YI SYLLABLE CURX" #xA2C8)
- ("YI SYLLABLE CUR" #xA2C9)
- ("YI SYLLABLE CYT" #xA2CA)
- ("YI SYLLABLE CYX" #xA2CB)
- ("YI SYLLABLE CY" #xA2CC)
- ("YI SYLLABLE CYP" #xA2CD)
- ("YI SYLLABLE CYRX" #xA2CE)
- ("YI SYLLABLE CYR" #xA2CF)
- ("YI SYLLABLE ZZIT" #xA2D0)
- ("YI SYLLABLE ZZIX" #xA2D1)
- ("YI SYLLABLE ZZI" #xA2D2)
- ("YI SYLLABLE ZZIP" #xA2D3)
- ("YI SYLLABLE ZZIET" #xA2D4)
- ("YI SYLLABLE ZZIEX" #xA2D5)
- ("YI SYLLABLE ZZIE" #xA2D6)
- ("YI SYLLABLE ZZIEP" #xA2D7)
- ("YI SYLLABLE ZZAT" #xA2D8)
- ("YI SYLLABLE ZZAX" #xA2D9)
- ("YI SYLLABLE ZZA" #xA2DA)
- ("YI SYLLABLE ZZAP" #xA2DB)
- ("YI SYLLABLE ZZOX" #xA2DC)
- ("YI SYLLABLE ZZO" #xA2DD)
- ("YI SYLLABLE ZZOP" #xA2DE)
- ("YI SYLLABLE ZZEX" #xA2DF)
- ("YI SYLLABLE ZZE" #xA2E0)
- ("YI SYLLABLE ZZEP" #xA2E1)
- ("YI SYLLABLE ZZUX" #xA2E2)
- ("YI SYLLABLE ZZU" #xA2E3)
- ("YI SYLLABLE ZZUP" #xA2E4)
- ("YI SYLLABLE ZZURX" #xA2E5)
- ("YI SYLLABLE ZZUR" #xA2E6)
- ("YI SYLLABLE ZZYT" #xA2E7)
- ("YI SYLLABLE ZZYX" #xA2E8)
- ("YI SYLLABLE ZZY" #xA2E9)
- ("YI SYLLABLE ZZYP" #xA2EA)
- ("YI SYLLABLE ZZYRX" #xA2EB)
- ("YI SYLLABLE ZZYR" #xA2EC)
- ("YI SYLLABLE NZIT" #xA2ED)
- ("YI SYLLABLE NZIX" #xA2EE)
- ("YI SYLLABLE NZI" #xA2EF)
- ("YI SYLLABLE NZIP" #xA2F0)
- ("YI SYLLABLE NZIEX" #xA2F1)
- ("YI SYLLABLE NZIE" #xA2F2)
- ("YI SYLLABLE NZIEP" #xA2F3)
- ("YI SYLLABLE NZAT" #xA2F4)
- ("YI SYLLABLE NZAX" #xA2F5)
- ("YI SYLLABLE NZA" #xA2F6)
- ("YI SYLLABLE NZAP" #xA2F7)
- ("YI SYLLABLE NZUOX" #xA2F8)
- ("YI SYLLABLE NZUO" #xA2F9)
- ("YI SYLLABLE NZOX" #xA2FA)
- ("YI SYLLABLE NZOP" #xA2FB)
- ("YI SYLLABLE NZEX" #xA2FC)
- ("YI SYLLABLE NZE" #xA2FD)
- ("YI SYLLABLE NZUX" #xA2FE)
- ("YI SYLLABLE NZU" #xA2FF)
- ("YI SYLLABLE NZUP" #xA300)
- ("YI SYLLABLE NZURX" #xA301)
- ("YI SYLLABLE NZUR" #xA302)
- ("YI SYLLABLE NZYT" #xA303)
- ("YI SYLLABLE NZYX" #xA304)
- ("YI SYLLABLE NZY" #xA305)
- ("YI SYLLABLE NZYP" #xA306)
- ("YI SYLLABLE NZYRX" #xA307)
- ("YI SYLLABLE NZYR" #xA308)
- ("YI SYLLABLE SIT" #xA309)
- ("YI SYLLABLE SIX" #xA30A)
- ("YI SYLLABLE SI" #xA30B)
- ("YI SYLLABLE SIP" #xA30C)
- ("YI SYLLABLE SIEX" #xA30D)
- ("YI SYLLABLE SIE" #xA30E)
- ("YI SYLLABLE SIEP" #xA30F)
- ("YI SYLLABLE SAT" #xA310)
- ("YI SYLLABLE SAX" #xA311)
- ("YI SYLLABLE SA" #xA312)
- ("YI SYLLABLE SAP" #xA313)
- ("YI SYLLABLE SUOX" #xA314)
- ("YI SYLLABLE SUO" #xA315)
- ("YI SYLLABLE SUOP" #xA316)
- ("YI SYLLABLE SOT" #xA317)
- ("YI SYLLABLE SOX" #xA318)
- ("YI SYLLABLE SO" #xA319)
- ("YI SYLLABLE SOP" #xA31A)
- ("YI SYLLABLE SEX" #xA31B)
- ("YI SYLLABLE SE" #xA31C)
- ("YI SYLLABLE SEP" #xA31D)
- ("YI SYLLABLE SUT" #xA31E)
- ("YI SYLLABLE SUX" #xA31F)
- ("YI SYLLABLE SU" #xA320)
- ("YI SYLLABLE SUP" #xA321)
- ("YI SYLLABLE SURX" #xA322)
- ("YI SYLLABLE SUR" #xA323)
- ("YI SYLLABLE SYT" #xA324)
- ("YI SYLLABLE SYX" #xA325)
- ("YI SYLLABLE SY" #xA326)
- ("YI SYLLABLE SYP" #xA327)
- ("YI SYLLABLE SYRX" #xA328)
- ("YI SYLLABLE SYR" #xA329)
- ("YI SYLLABLE SSIT" #xA32A)
- ("YI SYLLABLE SSIX" #xA32B)
- ("YI SYLLABLE SSI" #xA32C)
- ("YI SYLLABLE SSIP" #xA32D)
- ("YI SYLLABLE SSIEX" #xA32E)
- ("YI SYLLABLE SSIE" #xA32F)
- ("YI SYLLABLE SSIEP" #xA330)
- ("YI SYLLABLE SSAT" #xA331)
- ("YI SYLLABLE SSAX" #xA332)
- ("YI SYLLABLE SSA" #xA333)
- ("YI SYLLABLE SSAP" #xA334)
- ("YI SYLLABLE SSOT" #xA335)
- ("YI SYLLABLE SSOX" #xA336)
- ("YI SYLLABLE SSO" #xA337)
- ("YI SYLLABLE SSOP" #xA338)
- ("YI SYLLABLE SSEX" #xA339)
- ("YI SYLLABLE SSE" #xA33A)
- ("YI SYLLABLE SSEP" #xA33B)
- ("YI SYLLABLE SSUT" #xA33C)
- ("YI SYLLABLE SSUX" #xA33D)
- ("YI SYLLABLE SSU" #xA33E)
- ("YI SYLLABLE SSUP" #xA33F)
- ("YI SYLLABLE SSYT" #xA340)
- ("YI SYLLABLE SSYX" #xA341)
- ("YI SYLLABLE SSY" #xA342)
- ("YI SYLLABLE SSYP" #xA343)
- ("YI SYLLABLE SSYRX" #xA344)
- ("YI SYLLABLE SSYR" #xA345)
- ("YI SYLLABLE ZHAT" #xA346)
- ("YI SYLLABLE ZHAX" #xA347)
- ("YI SYLLABLE ZHA" #xA348)
- ("YI SYLLABLE ZHAP" #xA349)
- ("YI SYLLABLE ZHUOX" #xA34A)
- ("YI SYLLABLE ZHUO" #xA34B)
- ("YI SYLLABLE ZHUOP" #xA34C)
- ("YI SYLLABLE ZHOT" #xA34D)
- ("YI SYLLABLE ZHOX" #xA34E)
- ("YI SYLLABLE ZHO" #xA34F)
- ("YI SYLLABLE ZHOP" #xA350)
- ("YI SYLLABLE ZHET" #xA351)
- ("YI SYLLABLE ZHEX" #xA352)
- ("YI SYLLABLE ZHE" #xA353)
- ("YI SYLLABLE ZHEP" #xA354)
- ("YI SYLLABLE ZHUT" #xA355)
- ("YI SYLLABLE ZHUX" #xA356)
- ("YI SYLLABLE ZHU" #xA357)
- ("YI SYLLABLE ZHUP" #xA358)
- ("YI SYLLABLE ZHURX" #xA359)
- ("YI SYLLABLE ZHUR" #xA35A)
- ("YI SYLLABLE ZHYT" #xA35B)
- ("YI SYLLABLE ZHYX" #xA35C)
- ("YI SYLLABLE ZHY" #xA35D)
- ("YI SYLLABLE ZHYP" #xA35E)
- ("YI SYLLABLE ZHYRX" #xA35F)
- ("YI SYLLABLE ZHYR" #xA360)
- ("YI SYLLABLE CHAT" #xA361)
- ("YI SYLLABLE CHAX" #xA362)
- ("YI SYLLABLE CHA" #xA363)
- ("YI SYLLABLE CHAP" #xA364)
- ("YI SYLLABLE CHUOT" #xA365)
- ("YI SYLLABLE CHUOX" #xA366)
- ("YI SYLLABLE CHUO" #xA367)
- ("YI SYLLABLE CHUOP" #xA368)
- ("YI SYLLABLE CHOT" #xA369)
- ("YI SYLLABLE CHOX" #xA36A)
- ("YI SYLLABLE CHO" #xA36B)
- ("YI SYLLABLE CHOP" #xA36C)
- ("YI SYLLABLE CHET" #xA36D)
- ("YI SYLLABLE CHEX" #xA36E)
- ("YI SYLLABLE CHE" #xA36F)
- ("YI SYLLABLE CHEP" #xA370)
- ("YI SYLLABLE CHUX" #xA371)
- ("YI SYLLABLE CHU" #xA372)
- ("YI SYLLABLE CHUP" #xA373)
- ("YI SYLLABLE CHURX" #xA374)
- ("YI SYLLABLE CHUR" #xA375)
- ("YI SYLLABLE CHYT" #xA376)
- ("YI SYLLABLE CHYX" #xA377)
- ("YI SYLLABLE CHY" #xA378)
- ("YI SYLLABLE CHYP" #xA379)
- ("YI SYLLABLE CHYRX" #xA37A)
- ("YI SYLLABLE CHYR" #xA37B)
- ("YI SYLLABLE RRAX" #xA37C)
- ("YI SYLLABLE RRA" #xA37D)
- ("YI SYLLABLE RRUOX" #xA37E)
- ("YI SYLLABLE RRUO" #xA37F)
- ("YI SYLLABLE RROT" #xA380)
- ("YI SYLLABLE RROX" #xA381)
- ("YI SYLLABLE RRO" #xA382)
- ("YI SYLLABLE RROP" #xA383)
- ("YI SYLLABLE RRET" #xA384)
- ("YI SYLLABLE RREX" #xA385)
- ("YI SYLLABLE RRE" #xA386)
- ("YI SYLLABLE RREP" #xA387)
- ("YI SYLLABLE RRUT" #xA388)
- ("YI SYLLABLE RRUX" #xA389)
- ("YI SYLLABLE RRU" #xA38A)
- ("YI SYLLABLE RRUP" #xA38B)
- ("YI SYLLABLE RRURX" #xA38C)
- ("YI SYLLABLE RRUR" #xA38D)
- ("YI SYLLABLE RRYT" #xA38E)
- ("YI SYLLABLE RRYX" #xA38F)
- ("YI SYLLABLE RRY" #xA390)
- ("YI SYLLABLE RRYP" #xA391)
- ("YI SYLLABLE RRYRX" #xA392)
- ("YI SYLLABLE RRYR" #xA393)
- ("YI SYLLABLE NRAT" #xA394)
- ("YI SYLLABLE NRAX" #xA395)
- ("YI SYLLABLE NRA" #xA396)
- ("YI SYLLABLE NRAP" #xA397)
- ("YI SYLLABLE NROX" #xA398)
- ("YI SYLLABLE NRO" #xA399)
- ("YI SYLLABLE NROP" #xA39A)
- ("YI SYLLABLE NRET" #xA39B)
- ("YI SYLLABLE NREX" #xA39C)
- ("YI SYLLABLE NRE" #xA39D)
- ("YI SYLLABLE NREP" #xA39E)
- ("YI SYLLABLE NRUT" #xA39F)
- ("YI SYLLABLE NRUX" #xA3A0)
- ("YI SYLLABLE NRU" #xA3A1)
- ("YI SYLLABLE NRUP" #xA3A2)
- ("YI SYLLABLE NRURX" #xA3A3)
- ("YI SYLLABLE NRUR" #xA3A4)
- ("YI SYLLABLE NRYT" #xA3A5)
- ("YI SYLLABLE NRYX" #xA3A6)
- ("YI SYLLABLE NRY" #xA3A7)
- ("YI SYLLABLE NRYP" #xA3A8)
- ("YI SYLLABLE NRYRX" #xA3A9)
- ("YI SYLLABLE NRYR" #xA3AA)
- ("YI SYLLABLE SHAT" #xA3AB)
- ("YI SYLLABLE SHAX" #xA3AC)
- ("YI SYLLABLE SHA" #xA3AD)
- ("YI SYLLABLE SHAP" #xA3AE)
- ("YI SYLLABLE SHUOX" #xA3AF)
- ("YI SYLLABLE SHUO" #xA3B0)
- ("YI SYLLABLE SHUOP" #xA3B1)
- ("YI SYLLABLE SHOT" #xA3B2)
- ("YI SYLLABLE SHOX" #xA3B3)
- ("YI SYLLABLE SHO" #xA3B4)
- ("YI SYLLABLE SHOP" #xA3B5)
- ("YI SYLLABLE SHET" #xA3B6)
- ("YI SYLLABLE SHEX" #xA3B7)
- ("YI SYLLABLE SHE" #xA3B8)
- ("YI SYLLABLE SHEP" #xA3B9)
- ("YI SYLLABLE SHUT" #xA3BA)
- ("YI SYLLABLE SHUX" #xA3BB)
- ("YI SYLLABLE SHU" #xA3BC)
- ("YI SYLLABLE SHUP" #xA3BD)
- ("YI SYLLABLE SHURX" #xA3BE)
- ("YI SYLLABLE SHUR" #xA3BF)
- ("YI SYLLABLE SHYT" #xA3C0)
- ("YI SYLLABLE SHYX" #xA3C1)
- ("YI SYLLABLE SHY" #xA3C2)
- ("YI SYLLABLE SHYP" #xA3C3)
- ("YI SYLLABLE SHYRX" #xA3C4)
- ("YI SYLLABLE SHYR" #xA3C5)
- ("YI SYLLABLE RAT" #xA3C6)
- ("YI SYLLABLE RAX" #xA3C7)
- ("YI SYLLABLE RA" #xA3C8)
- ("YI SYLLABLE RAP" #xA3C9)
- ("YI SYLLABLE RUOX" #xA3CA)
- ("YI SYLLABLE RUO" #xA3CB)
- ("YI SYLLABLE RUOP" #xA3CC)
- ("YI SYLLABLE ROT" #xA3CD)
- ("YI SYLLABLE ROX" #xA3CE)
- ("YI SYLLABLE RO" #xA3CF)
- ("YI SYLLABLE ROP" #xA3D0)
- ("YI SYLLABLE REX" #xA3D1)
- ("YI SYLLABLE RE" #xA3D2)
- ("YI SYLLABLE REP" #xA3D3)
- ("YI SYLLABLE RUT" #xA3D4)
- ("YI SYLLABLE RUX" #xA3D5)
- ("YI SYLLABLE RU" #xA3D6)
- ("YI SYLLABLE RUP" #xA3D7)
- ("YI SYLLABLE RURX" #xA3D8)
- ("YI SYLLABLE RUR" #xA3D9)
- ("YI SYLLABLE RYT" #xA3DA)
- ("YI SYLLABLE RYX" #xA3DB)
- ("YI SYLLABLE RY" #xA3DC)
- ("YI SYLLABLE RYP" #xA3DD)
- ("YI SYLLABLE RYRX" #xA3DE)
- ("YI SYLLABLE RYR" #xA3DF)
- ("YI SYLLABLE JIT" #xA3E0)
- ("YI SYLLABLE JIX" #xA3E1)
- ("YI SYLLABLE JI" #xA3E2)
- ("YI SYLLABLE JIP" #xA3E3)
- ("YI SYLLABLE JIET" #xA3E4)
- ("YI SYLLABLE JIEX" #xA3E5)
- ("YI SYLLABLE JIE" #xA3E6)
- ("YI SYLLABLE JIEP" #xA3E7)
- ("YI SYLLABLE JUOT" #xA3E8)
- ("YI SYLLABLE JUOX" #xA3E9)
- ("YI SYLLABLE JUO" #xA3EA)
- ("YI SYLLABLE JUOP" #xA3EB)
- ("YI SYLLABLE JOT" #xA3EC)
- ("YI SYLLABLE JOX" #xA3ED)
- ("YI SYLLABLE JO" #xA3EE)
- ("YI SYLLABLE JOP" #xA3EF)
- ("YI SYLLABLE JUT" #xA3F0)
- ("YI SYLLABLE JUX" #xA3F1)
- ("YI SYLLABLE JU" #xA3F2)
- ("YI SYLLABLE JUP" #xA3F3)
- ("YI SYLLABLE JURX" #xA3F4)
- ("YI SYLLABLE JUR" #xA3F5)
- ("YI SYLLABLE JYT" #xA3F6)
- ("YI SYLLABLE JYX" #xA3F7)
- ("YI SYLLABLE JY" #xA3F8)
- ("YI SYLLABLE JYP" #xA3F9)
- ("YI SYLLABLE JYRX" #xA3FA)
- ("YI SYLLABLE JYR" #xA3FB)
- ("YI SYLLABLE QIT" #xA3FC)
- ("YI SYLLABLE QIX" #xA3FD)
- ("YI SYLLABLE QI" #xA3FE)
- ("YI SYLLABLE QIP" #xA3FF)
- ("YI SYLLABLE QIET" #xA400)
- ("YI SYLLABLE QIEX" #xA401)
- ("YI SYLLABLE QIE" #xA402)
- ("YI SYLLABLE QIEP" #xA403)
- ("YI SYLLABLE QUOT" #xA404)
- ("YI SYLLABLE QUOX" #xA405)
- ("YI SYLLABLE QUO" #xA406)
- ("YI SYLLABLE QUOP" #xA407)
- ("YI SYLLABLE QOT" #xA408)
- ("YI SYLLABLE QOX" #xA409)
- ("YI SYLLABLE QO" #xA40A)
- ("YI SYLLABLE QOP" #xA40B)
- ("YI SYLLABLE QUT" #xA40C)
- ("YI SYLLABLE QUX" #xA40D)
- ("YI SYLLABLE QU" #xA40E)
- ("YI SYLLABLE QUP" #xA40F)
- ("YI SYLLABLE QURX" #xA410)
- ("YI SYLLABLE QUR" #xA411)
- ("YI SYLLABLE QYT" #xA412)
- ("YI SYLLABLE QYX" #xA413)
- ("YI SYLLABLE QY" #xA414)
- ("YI SYLLABLE QYP" #xA415)
- ("YI SYLLABLE QYRX" #xA416)
- ("YI SYLLABLE QYR" #xA417)
- ("YI SYLLABLE JJIT" #xA418)
- ("YI SYLLABLE JJIX" #xA419)
- ("YI SYLLABLE JJI" #xA41A)
- ("YI SYLLABLE JJIP" #xA41B)
- ("YI SYLLABLE JJIET" #xA41C)
- ("YI SYLLABLE JJIEX" #xA41D)
- ("YI SYLLABLE JJIE" #xA41E)
- ("YI SYLLABLE JJIEP" #xA41F)
- ("YI SYLLABLE JJUOX" #xA420)
- ("YI SYLLABLE JJUO" #xA421)
- ("YI SYLLABLE JJUOP" #xA422)
- ("YI SYLLABLE JJOT" #xA423)
- ("YI SYLLABLE JJOX" #xA424)
- ("YI SYLLABLE JJO" #xA425)
- ("YI SYLLABLE JJOP" #xA426)
- ("YI SYLLABLE JJUT" #xA427)
- ("YI SYLLABLE JJUX" #xA428)
- ("YI SYLLABLE JJU" #xA429)
- ("YI SYLLABLE JJUP" #xA42A)
- ("YI SYLLABLE JJURX" #xA42B)
- ("YI SYLLABLE JJUR" #xA42C)
- ("YI SYLLABLE JJYT" #xA42D)
- ("YI SYLLABLE JJYX" #xA42E)
- ("YI SYLLABLE JJY" #xA42F)
- ("YI SYLLABLE JJYP" #xA430)
- ("YI SYLLABLE NJIT" #xA431)
- ("YI SYLLABLE NJIX" #xA432)
- ("YI SYLLABLE NJI" #xA433)
- ("YI SYLLABLE NJIP" #xA434)
- ("YI SYLLABLE NJIET" #xA435)
- ("YI SYLLABLE NJIEX" #xA436)
- ("YI SYLLABLE NJIE" #xA437)
- ("YI SYLLABLE NJIEP" #xA438)
- ("YI SYLLABLE NJUOX" #xA439)
- ("YI SYLLABLE NJUO" #xA43A)
- ("YI SYLLABLE NJOT" #xA43B)
- ("YI SYLLABLE NJOX" #xA43C)
- ("YI SYLLABLE NJO" #xA43D)
- ("YI SYLLABLE NJOP" #xA43E)
- ("YI SYLLABLE NJUX" #xA43F)
- ("YI SYLLABLE NJU" #xA440)
- ("YI SYLLABLE NJUP" #xA441)
- ("YI SYLLABLE NJURX" #xA442)
- ("YI SYLLABLE NJUR" #xA443)
- ("YI SYLLABLE NJYT" #xA444)
- ("YI SYLLABLE NJYX" #xA445)
- ("YI SYLLABLE NJY" #xA446)
- ("YI SYLLABLE NJYP" #xA447)
- ("YI SYLLABLE NJYRX" #xA448)
- ("YI SYLLABLE NJYR" #xA449)
- ("YI SYLLABLE NYIT" #xA44A)
- ("YI SYLLABLE NYIX" #xA44B)
- ("YI SYLLABLE NYI" #xA44C)
- ("YI SYLLABLE NYIP" #xA44D)
- ("YI SYLLABLE NYIET" #xA44E)
- ("YI SYLLABLE NYIEX" #xA44F)
- ("YI SYLLABLE NYIE" #xA450)
- ("YI SYLLABLE NYIEP" #xA451)
- ("YI SYLLABLE NYUOX" #xA452)
- ("YI SYLLABLE NYUO" #xA453)
- ("YI SYLLABLE NYUOP" #xA454)
- ("YI SYLLABLE NYOT" #xA455)
- ("YI SYLLABLE NYOX" #xA456)
- ("YI SYLLABLE NYO" #xA457)
- ("YI SYLLABLE NYOP" #xA458)
- ("YI SYLLABLE NYUT" #xA459)
- ("YI SYLLABLE NYUX" #xA45A)
- ("YI SYLLABLE NYU" #xA45B)
- ("YI SYLLABLE NYUP" #xA45C)
- ("YI SYLLABLE XIT" #xA45D)
- ("YI SYLLABLE XIX" #xA45E)
- ("YI SYLLABLE XI" #xA45F)
- ("YI SYLLABLE XIP" #xA460)
- ("YI SYLLABLE XIET" #xA461)
- ("YI SYLLABLE XIEX" #xA462)
- ("YI SYLLABLE XIE" #xA463)
- ("YI SYLLABLE XIEP" #xA464)
- ("YI SYLLABLE XUOX" #xA465)
- ("YI SYLLABLE XUO" #xA466)
- ("YI SYLLABLE XOT" #xA467)
- ("YI SYLLABLE XOX" #xA468)
- ("YI SYLLABLE XO" #xA469)
- ("YI SYLLABLE XOP" #xA46A)
- ("YI SYLLABLE XYT" #xA46B)
- ("YI SYLLABLE XYX" #xA46C)
- ("YI SYLLABLE XY" #xA46D)
- ("YI SYLLABLE XYP" #xA46E)
- ("YI SYLLABLE XYRX" #xA46F)
- ("YI SYLLABLE XYR" #xA470)
- ("YI SYLLABLE YIT" #xA471)
- ("YI SYLLABLE YIX" #xA472)
- ("YI SYLLABLE YI" #xA473)
- ("YI SYLLABLE YIP" #xA474)
- ("YI SYLLABLE YIET" #xA475)
- ("YI SYLLABLE YIEX" #xA476)
- ("YI SYLLABLE YIE" #xA477)
- ("YI SYLLABLE YIEP" #xA478)
- ("YI SYLLABLE YUOT" #xA479)
- ("YI SYLLABLE YUOX" #xA47A)
- ("YI SYLLABLE YUO" #xA47B)
- ("YI SYLLABLE YUOP" #xA47C)
- ("YI SYLLABLE YOT" #xA47D)
- ("YI SYLLABLE YOX" #xA47E)
- ("YI SYLLABLE YO" #xA47F)
- ("YI SYLLABLE YOP" #xA480)
- ("YI SYLLABLE YUT" #xA481)
- ("YI SYLLABLE YUX" #xA482)
- ("YI SYLLABLE YU" #xA483)
- ("YI SYLLABLE YUP" #xA484)
- ("YI SYLLABLE YURX" #xA485)
- ("YI SYLLABLE YUR" #xA486)
- ("YI SYLLABLE YYT" #xA487)
- ("YI SYLLABLE YYX" #xA488)
- ("YI SYLLABLE YY" #xA489)
- ("YI SYLLABLE YYP" #xA48A)
- ("YI SYLLABLE YYRX" #xA48B)
- ("YI SYLLABLE YYR" #xA48C)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'yi-radicals
- '(("YI RADICAL QOT" #xA490)
- ("YI RADICAL LI" #xA491)
- ("YI RADICAL KIT" #xA492)
- ("YI RADICAL NYIP" #xA493)
- ("YI RADICAL CYP" #xA494)
- ("YI RADICAL SSI" #xA495)
- ("YI RADICAL GGOP" #xA496)
- ("YI RADICAL GEP" #xA497)
- ("YI RADICAL MI" #xA498)
- ("YI RADICAL HXIT" #xA499)
- ("YI RADICAL LYR" #xA49A)
- ("YI RADICAL BBUT" #xA49B)
- ("YI RADICAL MOP" #xA49C)
- ("YI RADICAL YO" #xA49D)
- ("YI RADICAL PUT" #xA49E)
- ("YI RADICAL HXUO" #xA49F)
- ("YI RADICAL TAT" #xA4A0)
- ("YI RADICAL GA" #xA4A1)
- ("YI RADICAL ZUP" #xA4A2)
- ("YI RADICAL CYT" #xA4A3)
- ("YI RADICAL DDUR" #xA4A4)
- ("YI RADICAL BUR" #xA4A5)
- ("YI RADICAL GGUO" #xA4A6)
- ("YI RADICAL NYOP" #xA4A7)
- ("YI RADICAL TU" #xA4A8)
- ("YI RADICAL OP" #xA4A9)
- ("YI RADICAL JJUT" #xA4AA)
- ("YI RADICAL ZOT" #xA4AB)
- ("YI RADICAL PYT" #xA4AC)
- ("YI RADICAL HMO" #xA4AD)
- ("YI RADICAL YIT" #xA4AE)
- ("YI RADICAL VUR" #xA4AF)
- ("YI RADICAL SHY" #xA4B0)
- ("YI RADICAL VEP" #xA4B1)
- ("YI RADICAL ZA" #xA4B2)
- ("YI RADICAL JO" #xA4B3)
- ("YI RADICAL NZUP" #xA4B4)
- ("YI RADICAL JJY" #xA4B5)
- ("YI RADICAL GOT" #xA4B6)
- ("YI RADICAL JJIE" #xA4B7)
- ("YI RADICAL WO" #xA4B8)
- ("YI RADICAL DU" #xA4B9)
- ("YI RADICAL SHUR" #xA4BA)
- ("YI RADICAL LIE" #xA4BB)
- ("YI RADICAL CY" #xA4BC)
- ("YI RADICAL CUOP" #xA4BD)
- ("YI RADICAL CIP" #xA4BE)
- ("YI RADICAL HXOP" #xA4BF)
- ("YI RADICAL SHAT" #xA4C0)
- ("YI RADICAL ZUR" #xA4C1)
- ("YI RADICAL SHOP" #xA4C2)
- ("YI RADICAL CHE" #xA4C3)
- ("YI RADICAL ZZIET" #xA4C4)
- ("YI RADICAL NBIE" #xA4C5)
- ("YI RADICAL KE" #xA4C6)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'alphabetic-presentation-forms
- '(("LATIN SMALL LIGATURE FF" #xFB00)
- ("LATIN SMALL LIGATURE FI" #xFB01)
- ("LATIN SMALL LIGATURE FL" #xFB02)
- ("LATIN SMALL LIGATURE FFI" #xFB03)
- ("LATIN SMALL LIGATURE FFL" #xFB04)
- ("LATIN SMALL LIGATURE LONG S T" #xFB05)
- ("LATIN SMALL LIGATURE ST" #xFB06)
- ("ARMENIAN SMALL LIGATURE MEN NOW" #xFB13)
- ("ARMENIAN SMALL LIGATURE MEN ECH" #xFB14)
- ("ARMENIAN SMALL LIGATURE MEN INI" #xFB15)
- ("ARMENIAN SMALL LIGATURE VEW NOW" #xFB16)
- ("ARMENIAN SMALL LIGATURE MEN XEH" #xFB17)
- ("HEBREW LETTER YOD WITH HIRIQ" #xFB1D)
- ("HEBREW POINT JUDEO-SPANISH VARIKA" #xFB1E)
- ("HEBREW LIGATURE YIDDISH YOD YOD PATAH" #xFB1F)
- ("HEBREW LETTER ALTERNATIVE AYIN" #xFB20)
- ("HEBREW LETTER WIDE ALEF" #xFB21)
- ("HEBREW LETTER WIDE DALET" #xFB22)
- ("HEBREW LETTER WIDE HE" #xFB23)
- ("HEBREW LETTER WIDE KAF" #xFB24)
- ("HEBREW LETTER WIDE LAMED" #xFB25)
- ("HEBREW LETTER WIDE FINAL MEM" #xFB26)
- ("HEBREW LETTER WIDE RESH" #xFB27)
- ("HEBREW LETTER WIDE TAV" #xFB28)
- ("HEBREW LETTER ALTERNATIVE PLUS SIGN" #xFB29)
- ("HEBREW LETTER SHIN WITH SHIN DOT" #xFB2A)
- ("HEBREW LETTER SHIN WITH SIN DOT" #xFB2B)
- ("HEBREW LETTER SHIN WITH DAGESH AND SHIN DOT" #xFB2C)
- ("HEBREW LETTER SHIN WITH DAGESH AND SIN DOT" #xFB2D)
- ("HEBREW LETTER ALEF WITH PATAH" #xFB2E)
- ("HEBREW LETTER ALEF WITH QAMATS" #xFB2F)
- ("HEBREW LETTER ALEF WITH MAPIQ" #xFB30)
- ("HEBREW LETTER BET WITH DAGESH" #xFB31)
- ("HEBREW LETTER GIMEL WITH DAGESH" #xFB32)
- ("HEBREW LETTER DALET WITH DAGESH" #xFB33)
- ("HEBREW LETTER HE WITH MAPIQ" #xFB34)
- ("HEBREW LETTER VAV WITH DAGESH" #xFB35)
- ("HEBREW LETTER ZAYIN WITH DAGESH" #xFB36)
- ("HEBREW LETTER TET WITH DAGESH" #xFB38)
- ("HEBREW LETTER YOD WITH DAGESH" #xFB39)
- ("HEBREW LETTER FINAL KAF WITH DAGESH" #xFB3A)
- ("HEBREW LETTER KAF WITH DAGESH" #xFB3B)
- ("HEBREW LETTER LAMED WITH DAGESH" #xFB3C)
- ("HEBREW LETTER MEM WITH DAGESH" #xFB3E)
- ("HEBREW LETTER NUN WITH DAGESH" #xFB40)
- ("HEBREW LETTER SAMEKH WITH DAGESH" #xFB41)
- ("HEBREW LETTER FINAL PE WITH DAGESH" #xFB43)
- ("HEBREW LETTER PE WITH DAGESH" #xFB44)
- ("HEBREW LETTER TSADI WITH DAGESH" #xFB46)
- ("HEBREW LETTER QOF WITH DAGESH" #xFB47)
- ("HEBREW LETTER RESH WITH DAGESH" #xFB48)
- ("HEBREW LETTER SHIN WITH DAGESH" #xFB49)
- ("HEBREW LETTER TAV WITH DAGESH" #xFB4A)
- ("HEBREW LETTER VAV WITH HOLAM" #xFB4B)
- ("HEBREW LETTER BET WITH RAFE" #xFB4C)
- ("HEBREW LETTER KAF WITH RAFE" #xFB4D)
- ("HEBREW LETTER PE WITH RAFE" #xFB4E)
- ("HEBREW LIGATURE ALEF LAMED" #xFB4F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'arabic-presentation-forms-a
- '(("ARABIC LETTER ALEF WASLA ISOLATED FORM" #xFB50)
- ("ARABIC LETTER ALEF WASLA FINAL FORM" #xFB51)
- ("ARABIC LETTER BEEH ISOLATED FORM" #xFB52)
- ("ARABIC LETTER BEEH FINAL FORM" #xFB53)
- ("ARABIC LETTER BEEH INITIAL FORM" #xFB54)
- ("ARABIC LETTER BEEH MEDIAL FORM" #xFB55)
- ("ARABIC LETTER PEH ISOLATED FORM" #xFB56)
- ("ARABIC LETTER PEH FINAL FORM" #xFB57)
- ("ARABIC LETTER PEH INITIAL FORM" #xFB58)
- ("ARABIC LETTER PEH MEDIAL FORM" #xFB59)
- ("ARABIC LETTER BEHEH ISOLATED FORM" #xFB5A)
- ("ARABIC LETTER BEHEH FINAL FORM" #xFB5B)
- ("ARABIC LETTER BEHEH INITIAL FORM" #xFB5C)
- ("ARABIC LETTER BEHEH MEDIAL FORM" #xFB5D)
- ("ARABIC LETTER TTEHEH ISOLATED FORM" #xFB5E)
- ("ARABIC LETTER TTEHEH FINAL FORM" #xFB5F)
- ("ARABIC LETTER TTEHEH INITIAL FORM" #xFB60)
- ("ARABIC LETTER TTEHEH MEDIAL FORM" #xFB61)
- ("ARABIC LETTER TEHEH ISOLATED FORM" #xFB62)
- ("ARABIC LETTER TEHEH FINAL FORM" #xFB63)
- ("ARABIC LETTER TEHEH INITIAL FORM" #xFB64)
- ("ARABIC LETTER TEHEH MEDIAL FORM" #xFB65)
- ("ARABIC LETTER TTEH ISOLATED FORM" #xFB66)
- ("ARABIC LETTER TTEH FINAL FORM" #xFB67)
- ("ARABIC LETTER TTEH INITIAL FORM" #xFB68)
- ("ARABIC LETTER TTEH MEDIAL FORM" #xFB69)
- ("ARABIC LETTER VEH ISOLATED FORM" #xFB6A)
- ("ARABIC LETTER VEH FINAL FORM" #xFB6B)
- ("ARABIC LETTER VEH INITIAL FORM" #xFB6C)
- ("ARABIC LETTER VEH MEDIAL FORM" #xFB6D)
- ("ARABIC LETTER PEHEH ISOLATED FORM" #xFB6E)
- ("ARABIC LETTER PEHEH FINAL FORM" #xFB6F)
- ("ARABIC LETTER PEHEH INITIAL FORM" #xFB70)
- ("ARABIC LETTER PEHEH MEDIAL FORM" #xFB71)
- ("ARABIC LETTER DYEH ISOLATED FORM" #xFB72)
- ("ARABIC LETTER DYEH FINAL FORM" #xFB73)
- ("ARABIC LETTER DYEH INITIAL FORM" #xFB74)
- ("ARABIC LETTER DYEH MEDIAL FORM" #xFB75)
- ("ARABIC LETTER NYEH ISOLATED FORM" #xFB76)
- ("ARABIC LETTER NYEH FINAL FORM" #xFB77)
- ("ARABIC LETTER NYEH INITIAL FORM" #xFB78)
- ("ARABIC LETTER NYEH MEDIAL FORM" #xFB79)
- ("ARABIC LETTER TCHEH ISOLATED FORM" #xFB7A)
- ("ARABIC LETTER TCHEH FINAL FORM" #xFB7B)
- ("ARABIC LETTER TCHEH INITIAL FORM" #xFB7C)
- ("ARABIC LETTER TCHEH MEDIAL FORM" #xFB7D)
- ("ARABIC LETTER TCHEHEH ISOLATED FORM" #xFB7E)
- ("ARABIC LETTER TCHEHEH FINAL FORM" #xFB7F)
- ("ARABIC LETTER TCHEHEH INITIAL FORM" #xFB80)
- ("ARABIC LETTER TCHEHEH MEDIAL FORM" #xFB81)
- ("ARABIC LETTER DDAHAL ISOLATED FORM" #xFB82)
- ("ARABIC LETTER DDAHAL FINAL FORM" #xFB83)
- ("ARABIC LETTER DAHAL ISOLATED FORM" #xFB84)
- ("ARABIC LETTER DAHAL FINAL FORM" #xFB85)
- ("ARABIC LETTER DUL ISOLATED FORM" #xFB86)
- ("ARABIC LETTER DUL FINAL FORM" #xFB87)
- ("ARABIC LETTER DDAL ISOLATED FORM" #xFB88)
- ("ARABIC LETTER DDAL FINAL FORM" #xFB89)
- ("ARABIC LETTER JEH ISOLATED FORM" #xFB8A)
- ("ARABIC LETTER JEH FINAL FORM" #xFB8B)
- ("ARABIC LETTER RREH ISOLATED FORM" #xFB8C)
- ("ARABIC LETTER RREH FINAL FORM" #xFB8D)
- ("ARABIC LETTER KEHEH ISOLATED FORM" #xFB8E)
- ("ARABIC LETTER KEHEH FINAL FORM" #xFB8F)
- ("ARABIC LETTER KEHEH INITIAL FORM" #xFB90)
- ("ARABIC LETTER KEHEH MEDIAL FORM" #xFB91)
- ("ARABIC LETTER GAF ISOLATED FORM" #xFB92)
- ("ARABIC LETTER GAF FINAL FORM" #xFB93)
- ("ARABIC LETTER GAF INITIAL FORM" #xFB94)
- ("ARABIC LETTER GAF MEDIAL FORM" #xFB95)
- ("ARABIC LETTER GUEH ISOLATED FORM" #xFB96)
- ("ARABIC LETTER GUEH FINAL FORM" #xFB97)
- ("ARABIC LETTER GUEH INITIAL FORM" #xFB98)
- ("ARABIC LETTER GUEH MEDIAL FORM" #xFB99)
- ("ARABIC LETTER NGOEH ISOLATED FORM" #xFB9A)
- ("ARABIC LETTER NGOEH FINAL FORM" #xFB9B)
- ("ARABIC LETTER NGOEH INITIAL FORM" #xFB9C)
- ("ARABIC LETTER NGOEH MEDIAL FORM" #xFB9D)
- ("ARABIC LETTER NOON GHUNNA ISOLATED FORM" #xFB9E)
- ("ARABIC LETTER NOON GHUNNA FINAL FORM" #xFB9F)
- ("ARABIC LETTER RNOON ISOLATED FORM" #xFBA0)
- ("ARABIC LETTER RNOON FINAL FORM" #xFBA1)
- ("ARABIC LETTER RNOON INITIAL FORM" #xFBA2)
- ("ARABIC LETTER RNOON MEDIAL FORM" #xFBA3)
- ("ARABIC LETTER HEH WITH YEH ABOVE ISOLATED FORM" #xFBA4)
- ("ARABIC LETTER HEH WITH YEH ABOVE FINAL FORM" #xFBA5)
- ("ARABIC LETTER HEH GOAL ISOLATED FORM" #xFBA6)
- ("ARABIC LETTER HEH GOAL FINAL FORM" #xFBA7)
- ("ARABIC LETTER HEH GOAL INITIAL FORM" #xFBA8)
- ("ARABIC LETTER HEH GOAL MEDIAL FORM" #xFBA9)
- ("ARABIC LETTER HEH DOACHASHMEE ISOLATED FORM" #xFBAA)
- ("ARABIC LETTER HEH DOACHASHMEE FINAL FORM" #xFBAB)
- ("ARABIC LETTER HEH DOACHASHMEE INITIAL FORM" #xFBAC)
- ("ARABIC LETTER HEH DOACHASHMEE MEDIAL FORM" #xFBAD)
- ("ARABIC LETTER YEH BARREE ISOLATED FORM" #xFBAE)
- ("ARABIC LETTER YEH BARREE FINAL FORM" #xFBAF)
- ("ARABIC LETTER YEH BARREE WITH HAMZA ABOVE ISOLATED FORM" #xFBB0)
- ("ARABIC LETTER YEH BARREE WITH HAMZA ABOVE FINAL FORM" #xFBB1)
- ("ARABIC LETTER NG ISOLATED FORM" #xFBD3)
- ("ARABIC LETTER NG FINAL FORM" #xFBD4)
- ("ARABIC LETTER NG INITIAL FORM" #xFBD5)
- ("ARABIC LETTER NG MEDIAL FORM" #xFBD6)
- ("ARABIC LETTER U ISOLATED FORM" #xFBD7)
- ("ARABIC LETTER U FINAL FORM" #xFBD8)
- ("ARABIC LETTER OE ISOLATED FORM" #xFBD9)
- ("ARABIC LETTER OE FINAL FORM" #xFBDA)
- ("ARABIC LETTER YU ISOLATED FORM" #xFBDB)
- ("ARABIC LETTER YU FINAL FORM" #xFBDC)
- ("ARABIC LETTER U WITH HAMZA ABOVE ISOLATED FORM" #xFBDD)
- ("ARABIC LETTER VE ISOLATED FORM" #xFBDE)
- ("ARABIC LETTER VE FINAL FORM" #xFBDF)
- ("ARABIC LETTER KIRGHIZ OE ISOLATED FORM" #xFBE0)
- ("ARABIC LETTER KIRGHIZ OE FINAL FORM" #xFBE1)
- ("ARABIC LETTER KIRGHIZ YU ISOLATED FORM" #xFBE2)
- ("ARABIC LETTER KIRGHIZ YU FINAL FORM" #xFBE3)
- ("ARABIC LETTER E ISOLATED FORM" #xFBE4)
- ("ARABIC LETTER E FINAL FORM" #xFBE5)
- ("ARABIC LETTER E INITIAL FORM" #xFBE6)
- ("ARABIC LETTER E MEDIAL FORM" #xFBE7)
- ("ARABIC LETTER UIGHUR KAZAKH KIRGHIZ ALEF MAKSURA INITIAL FORM" #xFBE8)
- ("ARABIC LETTER UIGHUR KAZAKH KIRGHIZ ALEF MAKSURA MEDIAL FORM" #xFBE9)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH ALEF ISOLATED FORM" #xFBEA)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH ALEF FINAL FORM" #xFBEB)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH AE ISOLATED FORM" #xFBEC)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH AE FINAL FORM" #xFBED)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH WAW ISOLATED FORM" #xFBEE)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH WAW FINAL FORM" #xFBEF)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH U ISOLATED FORM" #xFBF0)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH U FINAL FORM" #xFBF1)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH OE ISOLATED FORM" #xFBF2)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH OE FINAL FORM" #xFBF3)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH YU ISOLATED FORM" #xFBF4)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH YU FINAL FORM" #xFBF5)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH E ISOLATED FORM" #xFBF6)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH E FINAL FORM" #xFBF7)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH E INITIAL FORM" #xFBF8)
- ("ARABIC LIGATURE UIGHUR KIRGHIZ YEH WITH HAMZA ABOVE WITH ALEF MAKSURA ISOLATED FORM" #xFBF9)
- ("ARABIC LIGATURE UIGHUR KIRGHIZ YEH WITH HAMZA ABOVE WITH ALEF MAKSURA FINAL FORM" #xFBFA)
- ("ARABIC LIGATURE UIGHUR KIRGHIZ YEH WITH HAMZA ABOVE WITH ALEF MAKSURA INITIAL FORM" #xFBFB)
- ("ARABIC LETTER FARSI YEH ISOLATED FORM" #xFBFC)
- ("ARABIC LETTER FARSI YEH FINAL FORM" #xFBFD)
- ("ARABIC LETTER FARSI YEH INITIAL FORM" #xFBFE)
- ("ARABIC LETTER FARSI YEH MEDIAL FORM" #xFBFF)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH JEEM ISOLATED FORM" #xFC00)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH HAH ISOLATED FORM" #xFC01)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH MEEM ISOLATED FORM" #xFC02)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH ALEF MAKSURA ISOLATED FORM" #xFC03)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH YEH ISOLATED FORM" #xFC04)
- ("ARABIC LIGATURE BEH WITH JEEM ISOLATED FORM" #xFC05)
- ("ARABIC LIGATURE BEH WITH HAH ISOLATED FORM" #xFC06)
- ("ARABIC LIGATURE BEH WITH KHAH ISOLATED FORM" #xFC07)
- ("ARABIC LIGATURE BEH WITH MEEM ISOLATED FORM" #xFC08)
- ("ARABIC LIGATURE BEH WITH ALEF MAKSURA ISOLATED FORM" #xFC09)
- ("ARABIC LIGATURE BEH WITH YEH ISOLATED FORM" #xFC0A)
- ("ARABIC LIGATURE TEH WITH JEEM ISOLATED FORM" #xFC0B)
- ("ARABIC LIGATURE TEH WITH HAH ISOLATED FORM" #xFC0C)
- ("ARABIC LIGATURE TEH WITH KHAH ISOLATED FORM" #xFC0D)
- ("ARABIC LIGATURE TEH WITH MEEM ISOLATED FORM" #xFC0E)
- ("ARABIC LIGATURE TEH WITH ALEF MAKSURA ISOLATED FORM" #xFC0F)
- ("ARABIC LIGATURE TEH WITH YEH ISOLATED FORM" #xFC10)
- ("ARABIC LIGATURE THEH WITH JEEM ISOLATED FORM" #xFC11)
- ("ARABIC LIGATURE THEH WITH MEEM ISOLATED FORM" #xFC12)
- ("ARABIC LIGATURE THEH WITH ALEF MAKSURA ISOLATED FORM" #xFC13)
- ("ARABIC LIGATURE THEH WITH YEH ISOLATED FORM" #xFC14)
- ("ARABIC LIGATURE JEEM WITH HAH ISOLATED FORM" #xFC15)
- ("ARABIC LIGATURE JEEM WITH MEEM ISOLATED FORM" #xFC16)
- ("ARABIC LIGATURE HAH WITH JEEM ISOLATED FORM" #xFC17)
- ("ARABIC LIGATURE HAH WITH MEEM ISOLATED FORM" #xFC18)
- ("ARABIC LIGATURE KHAH WITH JEEM ISOLATED FORM" #xFC19)
- ("ARABIC LIGATURE KHAH WITH HAH ISOLATED FORM" #xFC1A)
- ("ARABIC LIGATURE KHAH WITH MEEM ISOLATED FORM" #xFC1B)
- ("ARABIC LIGATURE SEEN WITH JEEM ISOLATED FORM" #xFC1C)
- ("ARABIC LIGATURE SEEN WITH HAH ISOLATED FORM" #xFC1D)
- ("ARABIC LIGATURE SEEN WITH KHAH ISOLATED FORM" #xFC1E)
- ("ARABIC LIGATURE SEEN WITH MEEM ISOLATED FORM" #xFC1F)
- ("ARABIC LIGATURE SAD WITH HAH ISOLATED FORM" #xFC20)
- ("ARABIC LIGATURE SAD WITH MEEM ISOLATED FORM" #xFC21)
- ("ARABIC LIGATURE DAD WITH JEEM ISOLATED FORM" #xFC22)
- ("ARABIC LIGATURE DAD WITH HAH ISOLATED FORM" #xFC23)
- ("ARABIC LIGATURE DAD WITH KHAH ISOLATED FORM" #xFC24)
- ("ARABIC LIGATURE DAD WITH MEEM ISOLATED FORM" #xFC25)
- ("ARABIC LIGATURE TAH WITH HAH ISOLATED FORM" #xFC26)
- ("ARABIC LIGATURE TAH WITH MEEM ISOLATED FORM" #xFC27)
- ("ARABIC LIGATURE ZAH WITH MEEM ISOLATED FORM" #xFC28)
- ("ARABIC LIGATURE AIN WITH JEEM ISOLATED FORM" #xFC29)
- ("ARABIC LIGATURE AIN WITH MEEM ISOLATED FORM" #xFC2A)
- ("ARABIC LIGATURE GHAIN WITH JEEM ISOLATED FORM" #xFC2B)
- ("ARABIC LIGATURE GHAIN WITH MEEM ISOLATED FORM" #xFC2C)
- ("ARABIC LIGATURE FEH WITH JEEM ISOLATED FORM" #xFC2D)
- ("ARABIC LIGATURE FEH WITH HAH ISOLATED FORM" #xFC2E)
- ("ARABIC LIGATURE FEH WITH KHAH ISOLATED FORM" #xFC2F)
- ("ARABIC LIGATURE FEH WITH MEEM ISOLATED FORM" #xFC30)
- ("ARABIC LIGATURE FEH WITH ALEF MAKSURA ISOLATED FORM" #xFC31)
- ("ARABIC LIGATURE FEH WITH YEH ISOLATED FORM" #xFC32)
- ("ARABIC LIGATURE QAF WITH HAH ISOLATED FORM" #xFC33)
- ("ARABIC LIGATURE QAF WITH MEEM ISOLATED FORM" #xFC34)
- ("ARABIC LIGATURE QAF WITH ALEF MAKSURA ISOLATED FORM" #xFC35)
- ("ARABIC LIGATURE QAF WITH YEH ISOLATED FORM" #xFC36)
- ("ARABIC LIGATURE KAF WITH ALEF ISOLATED FORM" #xFC37)
- ("ARABIC LIGATURE KAF WITH JEEM ISOLATED FORM" #xFC38)
- ("ARABIC LIGATURE KAF WITH HAH ISOLATED FORM" #xFC39)
- ("ARABIC LIGATURE KAF WITH KHAH ISOLATED FORM" #xFC3A)
- ("ARABIC LIGATURE KAF WITH LAM ISOLATED FORM" #xFC3B)
- ("ARABIC LIGATURE KAF WITH MEEM ISOLATED FORM" #xFC3C)
- ("ARABIC LIGATURE KAF WITH ALEF MAKSURA ISOLATED FORM" #xFC3D)
- ("ARABIC LIGATURE KAF WITH YEH ISOLATED FORM" #xFC3E)
- ("ARABIC LIGATURE LAM WITH JEEM ISOLATED FORM" #xFC3F)
- ("ARABIC LIGATURE LAM WITH HAH ISOLATED FORM" #xFC40)
- ("ARABIC LIGATURE LAM WITH KHAH ISOLATED FORM" #xFC41)
- ("ARABIC LIGATURE LAM WITH MEEM ISOLATED FORM" #xFC42)
- ("ARABIC LIGATURE LAM WITH ALEF MAKSURA ISOLATED FORM" #xFC43)
- ("ARABIC LIGATURE LAM WITH YEH ISOLATED FORM" #xFC44)
- ("ARABIC LIGATURE MEEM WITH JEEM ISOLATED FORM" #xFC45)
- ("ARABIC LIGATURE MEEM WITH HAH ISOLATED FORM" #xFC46)
- ("ARABIC LIGATURE MEEM WITH KHAH ISOLATED FORM" #xFC47)
- ("ARABIC LIGATURE MEEM WITH MEEM ISOLATED FORM" #xFC48)
- ("ARABIC LIGATURE MEEM WITH ALEF MAKSURA ISOLATED FORM" #xFC49)
- ("ARABIC LIGATURE MEEM WITH YEH ISOLATED FORM" #xFC4A)
- ("ARABIC LIGATURE NOON WITH JEEM ISOLATED FORM" #xFC4B)
- ("ARABIC LIGATURE NOON WITH HAH ISOLATED FORM" #xFC4C)
- ("ARABIC LIGATURE NOON WITH KHAH ISOLATED FORM" #xFC4D)
- ("ARABIC LIGATURE NOON WITH MEEM ISOLATED FORM" #xFC4E)
- ("ARABIC LIGATURE NOON WITH ALEF MAKSURA ISOLATED FORM" #xFC4F)
- ("ARABIC LIGATURE NOON WITH YEH ISOLATED FORM" #xFC50)
- ("ARABIC LIGATURE HEH WITH JEEM ISOLATED FORM" #xFC51)
- ("ARABIC LIGATURE HEH WITH MEEM ISOLATED FORM" #xFC52)
- ("ARABIC LIGATURE HEH WITH ALEF MAKSURA ISOLATED FORM" #xFC53)
- ("ARABIC LIGATURE HEH WITH YEH ISOLATED FORM" #xFC54)
- ("ARABIC LIGATURE YEH WITH JEEM ISOLATED FORM" #xFC55)
- ("ARABIC LIGATURE YEH WITH HAH ISOLATED FORM" #xFC56)
- ("ARABIC LIGATURE YEH WITH KHAH ISOLATED FORM" #xFC57)
- ("ARABIC LIGATURE YEH WITH MEEM ISOLATED FORM" #xFC58)
- ("ARABIC LIGATURE YEH WITH ALEF MAKSURA ISOLATED FORM" #xFC59)
- ("ARABIC LIGATURE YEH WITH YEH ISOLATED FORM" #xFC5A)
- ("ARABIC LIGATURE THAL WITH SUPERSCRIPT ALEF ISOLATED FORM" #xFC5B)
- ("ARABIC LIGATURE REH WITH SUPERSCRIPT ALEF ISOLATED FORM" #xFC5C)
- ("ARABIC LIGATURE ALEF MAKSURA WITH SUPERSCRIPT ALEF ISOLATED FORM" #xFC5D)
- ("ARABIC LIGATURE SHADDA WITH DAMMATAN ISOLATED FORM" #xFC5E)
- ("ARABIC LIGATURE SHADDA WITH KASRATAN ISOLATED FORM" #xFC5F)
- ("ARABIC LIGATURE SHADDA WITH FATHA ISOLATED FORM" #xFC60)
- ("ARABIC LIGATURE SHADDA WITH DAMMA ISOLATED FORM" #xFC61)
- ("ARABIC LIGATURE SHADDA WITH KASRA ISOLATED FORM" #xFC62)
- ("ARABIC LIGATURE SHADDA WITH SUPERSCRIPT ALEF ISOLATED FORM" #xFC63)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH REH FINAL FORM" #xFC64)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH ZAIN FINAL FORM" #xFC65)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH MEEM FINAL FORM" #xFC66)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH NOON FINAL FORM" #xFC67)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH ALEF MAKSURA FINAL FORM" #xFC68)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH YEH FINAL FORM" #xFC69)
- ("ARABIC LIGATURE BEH WITH REH FINAL FORM" #xFC6A)
- ("ARABIC LIGATURE BEH WITH ZAIN FINAL FORM" #xFC6B)
- ("ARABIC LIGATURE BEH WITH MEEM FINAL FORM" #xFC6C)
- ("ARABIC LIGATURE BEH WITH NOON FINAL FORM" #xFC6D)
- ("ARABIC LIGATURE BEH WITH ALEF MAKSURA FINAL FORM" #xFC6E)
- ("ARABIC LIGATURE BEH WITH YEH FINAL FORM" #xFC6F)
- ("ARABIC LIGATURE TEH WITH REH FINAL FORM" #xFC70)
- ("ARABIC LIGATURE TEH WITH ZAIN FINAL FORM" #xFC71)
- ("ARABIC LIGATURE TEH WITH MEEM FINAL FORM" #xFC72)
- ("ARABIC LIGATURE TEH WITH NOON FINAL FORM" #xFC73)
- ("ARABIC LIGATURE TEH WITH ALEF MAKSURA FINAL FORM" #xFC74)
- ("ARABIC LIGATURE TEH WITH YEH FINAL FORM" #xFC75)
- ("ARABIC LIGATURE THEH WITH REH FINAL FORM" #xFC76)
- ("ARABIC LIGATURE THEH WITH ZAIN FINAL FORM" #xFC77)
- ("ARABIC LIGATURE THEH WITH MEEM FINAL FORM" #xFC78)
- ("ARABIC LIGATURE THEH WITH NOON FINAL FORM" #xFC79)
- ("ARABIC LIGATURE THEH WITH ALEF MAKSURA FINAL FORM" #xFC7A)
- ("ARABIC LIGATURE THEH WITH YEH FINAL FORM" #xFC7B)
- ("ARABIC LIGATURE FEH WITH ALEF MAKSURA FINAL FORM" #xFC7C)
- ("ARABIC LIGATURE FEH WITH YEH FINAL FORM" #xFC7D)
- ("ARABIC LIGATURE QAF WITH ALEF MAKSURA FINAL FORM" #xFC7E)
- ("ARABIC LIGATURE QAF WITH YEH FINAL FORM" #xFC7F)
- ("ARABIC LIGATURE KAF WITH ALEF FINAL FORM" #xFC80)
- ("ARABIC LIGATURE KAF WITH LAM FINAL FORM" #xFC81)
- ("ARABIC LIGATURE KAF WITH MEEM FINAL FORM" #xFC82)
- ("ARABIC LIGATURE KAF WITH ALEF MAKSURA FINAL FORM" #xFC83)
- ("ARABIC LIGATURE KAF WITH YEH FINAL FORM" #xFC84)
- ("ARABIC LIGATURE LAM WITH MEEM FINAL FORM" #xFC85)
- ("ARABIC LIGATURE LAM WITH ALEF MAKSURA FINAL FORM" #xFC86)
- ("ARABIC LIGATURE LAM WITH YEH FINAL FORM" #xFC87)
- ("ARABIC LIGATURE MEEM WITH ALEF FINAL FORM" #xFC88)
- ("ARABIC LIGATURE MEEM WITH MEEM FINAL FORM" #xFC89)
- ("ARABIC LIGATURE NOON WITH REH FINAL FORM" #xFC8A)
- ("ARABIC LIGATURE NOON WITH ZAIN FINAL FORM" #xFC8B)
- ("ARABIC LIGATURE NOON WITH MEEM FINAL FORM" #xFC8C)
- ("ARABIC LIGATURE NOON WITH NOON FINAL FORM" #xFC8D)
- ("ARABIC LIGATURE NOON WITH ALEF MAKSURA FINAL FORM" #xFC8E)
- ("ARABIC LIGATURE NOON WITH YEH FINAL FORM" #xFC8F)
- ("ARABIC LIGATURE ALEF MAKSURA WITH SUPERSCRIPT ALEF FINAL FORM" #xFC90)
- ("ARABIC LIGATURE YEH WITH REH FINAL FORM" #xFC91)
- ("ARABIC LIGATURE YEH WITH ZAIN FINAL FORM" #xFC92)
- ("ARABIC LIGATURE YEH WITH MEEM FINAL FORM" #xFC93)
- ("ARABIC LIGATURE YEH WITH NOON FINAL FORM" #xFC94)
- ("ARABIC LIGATURE YEH WITH ALEF MAKSURA FINAL FORM" #xFC95)
- ("ARABIC LIGATURE YEH WITH YEH FINAL FORM" #xFC96)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH JEEM INITIAL FORM" #xFC97)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH HAH INITIAL FORM" #xFC98)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH KHAH INITIAL FORM" #xFC99)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH MEEM INITIAL FORM" #xFC9A)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH HEH INITIAL FORM" #xFC9B)
- ("ARABIC LIGATURE BEH WITH JEEM INITIAL FORM" #xFC9C)
- ("ARABIC LIGATURE BEH WITH HAH INITIAL FORM" #xFC9D)
- ("ARABIC LIGATURE BEH WITH KHAH INITIAL FORM" #xFC9E)
- ("ARABIC LIGATURE BEH WITH MEEM INITIAL FORM" #xFC9F)
- ("ARABIC LIGATURE BEH WITH HEH INITIAL FORM" #xFCA0)
- ("ARABIC LIGATURE TEH WITH JEEM INITIAL FORM" #xFCA1)
- ("ARABIC LIGATURE TEH WITH HAH INITIAL FORM" #xFCA2)
- ("ARABIC LIGATURE TEH WITH KHAH INITIAL FORM" #xFCA3)
- ("ARABIC LIGATURE TEH WITH MEEM INITIAL FORM" #xFCA4)
- ("ARABIC LIGATURE TEH WITH HEH INITIAL FORM" #xFCA5)
- ("ARABIC LIGATURE THEH WITH MEEM INITIAL FORM" #xFCA6)
- ("ARABIC LIGATURE JEEM WITH HAH INITIAL FORM" #xFCA7)
- ("ARABIC LIGATURE JEEM WITH MEEM INITIAL FORM" #xFCA8)
- ("ARABIC LIGATURE HAH WITH JEEM INITIAL FORM" #xFCA9)
- ("ARABIC LIGATURE HAH WITH MEEM INITIAL FORM" #xFCAA)
- ("ARABIC LIGATURE KHAH WITH JEEM INITIAL FORM" #xFCAB)
- ("ARABIC LIGATURE KHAH WITH MEEM INITIAL FORM" #xFCAC)
- ("ARABIC LIGATURE SEEN WITH JEEM INITIAL FORM" #xFCAD)
- ("ARABIC LIGATURE SEEN WITH HAH INITIAL FORM" #xFCAE)
- ("ARABIC LIGATURE SEEN WITH KHAH INITIAL FORM" #xFCAF)
- ("ARABIC LIGATURE SEEN WITH MEEM INITIAL FORM" #xFCB0)
- ("ARABIC LIGATURE SAD WITH HAH INITIAL FORM" #xFCB1)
- ("ARABIC LIGATURE SAD WITH KHAH INITIAL FORM" #xFCB2)
- ("ARABIC LIGATURE SAD WITH MEEM INITIAL FORM" #xFCB3)
- ("ARABIC LIGATURE DAD WITH JEEM INITIAL FORM" #xFCB4)
- ("ARABIC LIGATURE DAD WITH HAH INITIAL FORM" #xFCB5)
- ("ARABIC LIGATURE DAD WITH KHAH INITIAL FORM" #xFCB6)
- ("ARABIC LIGATURE DAD WITH MEEM INITIAL FORM" #xFCB7)
- ("ARABIC LIGATURE TAH WITH HAH INITIAL FORM" #xFCB8)
- ("ARABIC LIGATURE ZAH WITH MEEM INITIAL FORM" #xFCB9)
- ("ARABIC LIGATURE AIN WITH JEEM INITIAL FORM" #xFCBA)
- ("ARABIC LIGATURE AIN WITH MEEM INITIAL FORM" #xFCBB)
- ("ARABIC LIGATURE GHAIN WITH JEEM INITIAL FORM" #xFCBC)
- ("ARABIC LIGATURE GHAIN WITH MEEM INITIAL FORM" #xFCBD)
- ("ARABIC LIGATURE FEH WITH JEEM INITIAL FORM" #xFCBE)
- ("ARABIC LIGATURE FEH WITH HAH INITIAL FORM" #xFCBF)
- ("ARABIC LIGATURE FEH WITH KHAH INITIAL FORM" #xFCC0)
- ("ARABIC LIGATURE FEH WITH MEEM INITIAL FORM" #xFCC1)
- ("ARABIC LIGATURE QAF WITH HAH INITIAL FORM" #xFCC2)
- ("ARABIC LIGATURE QAF WITH MEEM INITIAL FORM" #xFCC3)
- ("ARABIC LIGATURE KAF WITH JEEM INITIAL FORM" #xFCC4)
- ("ARABIC LIGATURE KAF WITH HAH INITIAL FORM" #xFCC5)
- ("ARABIC LIGATURE KAF WITH KHAH INITIAL FORM" #xFCC6)
- ("ARABIC LIGATURE KAF WITH LAM INITIAL FORM" #xFCC7)
- ("ARABIC LIGATURE KAF WITH MEEM INITIAL FORM" #xFCC8)
- ("ARABIC LIGATURE LAM WITH JEEM INITIAL FORM" #xFCC9)
- ("ARABIC LIGATURE LAM WITH HAH INITIAL FORM" #xFCCA)
- ("ARABIC LIGATURE LAM WITH KHAH INITIAL FORM" #xFCCB)
- ("ARABIC LIGATURE LAM WITH MEEM INITIAL FORM" #xFCCC)
- ("ARABIC LIGATURE LAM WITH HEH INITIAL FORM" #xFCCD)
- ("ARABIC LIGATURE MEEM WITH JEEM INITIAL FORM" #xFCCE)
- ("ARABIC LIGATURE MEEM WITH HAH INITIAL FORM" #xFCCF)
- ("ARABIC LIGATURE MEEM WITH KHAH INITIAL FORM" #xFCD0)
- ("ARABIC LIGATURE MEEM WITH MEEM INITIAL FORM" #xFCD1)
- ("ARABIC LIGATURE NOON WITH JEEM INITIAL FORM" #xFCD2)
- ("ARABIC LIGATURE NOON WITH HAH INITIAL FORM" #xFCD3)
- ("ARABIC LIGATURE NOON WITH KHAH INITIAL FORM" #xFCD4)
- ("ARABIC LIGATURE NOON WITH MEEM INITIAL FORM" #xFCD5)
- ("ARABIC LIGATURE NOON WITH HEH INITIAL FORM" #xFCD6)
- ("ARABIC LIGATURE HEH WITH JEEM INITIAL FORM" #xFCD7)
- ("ARABIC LIGATURE HEH WITH MEEM INITIAL FORM" #xFCD8)
- ("ARABIC LIGATURE HEH WITH SUPERSCRIPT ALEF INITIAL FORM" #xFCD9)
- ("ARABIC LIGATURE YEH WITH JEEM INITIAL FORM" #xFCDA)
- ("ARABIC LIGATURE YEH WITH HAH INITIAL FORM" #xFCDB)
- ("ARABIC LIGATURE YEH WITH KHAH INITIAL FORM" #xFCDC)
- ("ARABIC LIGATURE YEH WITH MEEM INITIAL FORM" #xFCDD)
- ("ARABIC LIGATURE YEH WITH HEH INITIAL FORM" #xFCDE)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH MEEM MEDIAL FORM" #xFCDF)
- ("ARABIC LIGATURE YEH WITH HAMZA ABOVE WITH HEH MEDIAL FORM" #xFCE0)
- ("ARABIC LIGATURE BEH WITH MEEM MEDIAL FORM" #xFCE1)
- ("ARABIC LIGATURE BEH WITH HEH MEDIAL FORM" #xFCE2)
- ("ARABIC LIGATURE TEH WITH MEEM MEDIAL FORM" #xFCE3)
- ("ARABIC LIGATURE TEH WITH HEH MEDIAL FORM" #xFCE4)
- ("ARABIC LIGATURE THEH WITH MEEM MEDIAL FORM" #xFCE5)
- ("ARABIC LIGATURE THEH WITH HEH MEDIAL FORM" #xFCE6)
- ("ARABIC LIGATURE SEEN WITH MEEM MEDIAL FORM" #xFCE7)
- ("ARABIC LIGATURE SEEN WITH HEH MEDIAL FORM" #xFCE8)
- ("ARABIC LIGATURE SHEEN WITH MEEM MEDIAL FORM" #xFCE9)
- ("ARABIC LIGATURE SHEEN WITH HEH MEDIAL FORM" #xFCEA)
- ("ARABIC LIGATURE KAF WITH LAM MEDIAL FORM" #xFCEB)
- ("ARABIC LIGATURE KAF WITH MEEM MEDIAL FORM" #xFCEC)
- ("ARABIC LIGATURE LAM WITH MEEM MEDIAL FORM" #xFCED)
- ("ARABIC LIGATURE NOON WITH MEEM MEDIAL FORM" #xFCEE)
- ("ARABIC LIGATURE NOON WITH HEH MEDIAL FORM" #xFCEF)
- ("ARABIC LIGATURE YEH WITH MEEM MEDIAL FORM" #xFCF0)
- ("ARABIC LIGATURE YEH WITH HEH MEDIAL FORM" #xFCF1)
- ("ARABIC LIGATURE SHADDA WITH FATHA MEDIAL FORM" #xFCF2)
- ("ARABIC LIGATURE SHADDA WITH DAMMA MEDIAL FORM" #xFCF3)
- ("ARABIC LIGATURE SHADDA WITH KASRA MEDIAL FORM" #xFCF4)
- ("ARABIC LIGATURE TAH WITH ALEF MAKSURA ISOLATED FORM" #xFCF5)
- ("ARABIC LIGATURE TAH WITH YEH ISOLATED FORM" #xFCF6)
- ("ARABIC LIGATURE AIN WITH ALEF MAKSURA ISOLATED FORM" #xFCF7)
- ("ARABIC LIGATURE AIN WITH YEH ISOLATED FORM" #xFCF8)
- ("ARABIC LIGATURE GHAIN WITH ALEF MAKSURA ISOLATED FORM" #xFCF9)
- ("ARABIC LIGATURE GHAIN WITH YEH ISOLATED FORM" #xFCFA)
- ("ARABIC LIGATURE SEEN WITH ALEF MAKSURA ISOLATED FORM" #xFCFB)
- ("ARABIC LIGATURE SEEN WITH YEH ISOLATED FORM" #xFCFC)
- ("ARABIC LIGATURE SHEEN WITH ALEF MAKSURA ISOLATED FORM" #xFCFD)
- ("ARABIC LIGATURE SHEEN WITH YEH ISOLATED FORM" #xFCFE)
- ("ARABIC LIGATURE HAH WITH ALEF MAKSURA ISOLATED FORM" #xFCFF)
- ("ARABIC LIGATURE HAH WITH YEH ISOLATED FORM" #xFD00)
- ("ARABIC LIGATURE JEEM WITH ALEF MAKSURA ISOLATED FORM" #xFD01)
- ("ARABIC LIGATURE JEEM WITH YEH ISOLATED FORM" #xFD02)
- ("ARABIC LIGATURE KHAH WITH ALEF MAKSURA ISOLATED FORM" #xFD03)
- ("ARABIC LIGATURE KHAH WITH YEH ISOLATED FORM" #xFD04)
- ("ARABIC LIGATURE SAD WITH ALEF MAKSURA ISOLATED FORM" #xFD05)
- ("ARABIC LIGATURE SAD WITH YEH ISOLATED FORM" #xFD06)
- ("ARABIC LIGATURE DAD WITH ALEF MAKSURA ISOLATED FORM" #xFD07)
- ("ARABIC LIGATURE DAD WITH YEH ISOLATED FORM" #xFD08)
- ("ARABIC LIGATURE SHEEN WITH JEEM ISOLATED FORM" #xFD09)
- ("ARABIC LIGATURE SHEEN WITH HAH ISOLATED FORM" #xFD0A)
- ("ARABIC LIGATURE SHEEN WITH KHAH ISOLATED FORM" #xFD0B)
- ("ARABIC LIGATURE SHEEN WITH MEEM ISOLATED FORM" #xFD0C)
- ("ARABIC LIGATURE SHEEN WITH REH ISOLATED FORM" #xFD0D)
- ("ARABIC LIGATURE SEEN WITH REH ISOLATED FORM" #xFD0E)
- ("ARABIC LIGATURE SAD WITH REH ISOLATED FORM" #xFD0F)
- ("ARABIC LIGATURE DAD WITH REH ISOLATED FORM" #xFD10)
- ("ARABIC LIGATURE TAH WITH ALEF MAKSURA FINAL FORM" #xFD11)
- ("ARABIC LIGATURE TAH WITH YEH FINAL FORM" #xFD12)
- ("ARABIC LIGATURE AIN WITH ALEF MAKSURA FINAL FORM" #xFD13)
- ("ARABIC LIGATURE AIN WITH YEH FINAL FORM" #xFD14)
- ("ARABIC LIGATURE GHAIN WITH ALEF MAKSURA FINAL FORM" #xFD15)
- ("ARABIC LIGATURE GHAIN WITH YEH FINAL FORM" #xFD16)
- ("ARABIC LIGATURE SEEN WITH ALEF MAKSURA FINAL FORM" #xFD17)
- ("ARABIC LIGATURE SEEN WITH YEH FINAL FORM" #xFD18)
- ("ARABIC LIGATURE SHEEN WITH ALEF MAKSURA FINAL FORM" #xFD19)
- ("ARABIC LIGATURE SHEEN WITH YEH FINAL FORM" #xFD1A)
- ("ARABIC LIGATURE HAH WITH ALEF MAKSURA FINAL FORM" #xFD1B)
- ("ARABIC LIGATURE HAH WITH YEH FINAL FORM" #xFD1C)
- ("ARABIC LIGATURE JEEM WITH ALEF MAKSURA FINAL FORM" #xFD1D)
- ("ARABIC LIGATURE JEEM WITH YEH FINAL FORM" #xFD1E)
- ("ARABIC LIGATURE KHAH WITH ALEF MAKSURA FINAL FORM" #xFD1F)
- ("ARABIC LIGATURE KHAH WITH YEH FINAL FORM" #xFD20)
- ("ARABIC LIGATURE SAD WITH ALEF MAKSURA FINAL FORM" #xFD21)
- ("ARABIC LIGATURE SAD WITH YEH FINAL FORM" #xFD22)
- ("ARABIC LIGATURE DAD WITH ALEF MAKSURA FINAL FORM" #xFD23)
- ("ARABIC LIGATURE DAD WITH YEH FINAL FORM" #xFD24)
- ("ARABIC LIGATURE SHEEN WITH JEEM FINAL FORM" #xFD25)
- ("ARABIC LIGATURE SHEEN WITH HAH FINAL FORM" #xFD26)
- ("ARABIC LIGATURE SHEEN WITH KHAH FINAL FORM" #xFD27)
- ("ARABIC LIGATURE SHEEN WITH MEEM FINAL FORM" #xFD28)
- ("ARABIC LIGATURE SHEEN WITH REH FINAL FORM" #xFD29)
- ("ARABIC LIGATURE SEEN WITH REH FINAL FORM" #xFD2A)
- ("ARABIC LIGATURE SAD WITH REH FINAL FORM" #xFD2B)
- ("ARABIC LIGATURE DAD WITH REH FINAL FORM" #xFD2C)
- ("ARABIC LIGATURE SHEEN WITH JEEM INITIAL FORM" #xFD2D)
- ("ARABIC LIGATURE SHEEN WITH HAH INITIAL FORM" #xFD2E)
- ("ARABIC LIGATURE SHEEN WITH KHAH INITIAL FORM" #xFD2F)
- ("ARABIC LIGATURE SHEEN WITH MEEM INITIAL FORM" #xFD30)
- ("ARABIC LIGATURE SEEN WITH HEH INITIAL FORM" #xFD31)
- ("ARABIC LIGATURE SHEEN WITH HEH INITIAL FORM" #xFD32)
- ("ARABIC LIGATURE TAH WITH MEEM INITIAL FORM" #xFD33)
- ("ARABIC LIGATURE SEEN WITH JEEM MEDIAL FORM" #xFD34)
- ("ARABIC LIGATURE SEEN WITH HAH MEDIAL FORM" #xFD35)
- ("ARABIC LIGATURE SEEN WITH KHAH MEDIAL FORM" #xFD36)
- ("ARABIC LIGATURE SHEEN WITH JEEM MEDIAL FORM" #xFD37)
- ("ARABIC LIGATURE SHEEN WITH HAH MEDIAL FORM" #xFD38)
- ("ARABIC LIGATURE SHEEN WITH KHAH MEDIAL FORM" #xFD39)
- ("ARABIC LIGATURE TAH WITH MEEM MEDIAL FORM" #xFD3A)
- ("ARABIC LIGATURE ZAH WITH MEEM MEDIAL FORM" #xFD3B)
- ("ARABIC LIGATURE ALEF WITH FATHATAN FINAL FORM" #xFD3C)
- ("ARABIC LIGATURE ALEF WITH FATHATAN ISOLATED FORM" #xFD3D)
- ("ORNATE LEFT PARENTHESIS" #xFD3E)
- ("ORNATE RIGHT PARENTHESIS" #xFD3F)
- ("ARABIC LIGATURE TEH WITH JEEM WITH MEEM INITIAL FORM" #xFD50)
- ("ARABIC LIGATURE TEH WITH HAH WITH JEEM FINAL FORM" #xFD51)
- ("ARABIC LIGATURE TEH WITH HAH WITH JEEM INITIAL FORM" #xFD52)
- ("ARABIC LIGATURE TEH WITH HAH WITH MEEM INITIAL FORM" #xFD53)
- ("ARABIC LIGATURE TEH WITH KHAH WITH MEEM INITIAL FORM" #xFD54)
- ("ARABIC LIGATURE TEH WITH MEEM WITH JEEM INITIAL FORM" #xFD55)
- ("ARABIC LIGATURE TEH WITH MEEM WITH HAH INITIAL FORM" #xFD56)
- ("ARABIC LIGATURE TEH WITH MEEM WITH KHAH INITIAL FORM" #xFD57)
- ("ARABIC LIGATURE JEEM WITH MEEM WITH HAH FINAL FORM" #xFD58)
- ("ARABIC LIGATURE JEEM WITH MEEM WITH HAH INITIAL FORM" #xFD59)
- ("ARABIC LIGATURE HAH WITH MEEM WITH YEH FINAL FORM" #xFD5A)
- ("ARABIC LIGATURE HAH WITH MEEM WITH ALEF MAKSURA FINAL FORM" #xFD5B)
- ("ARABIC LIGATURE SEEN WITH HAH WITH JEEM INITIAL FORM" #xFD5C)
- ("ARABIC LIGATURE SEEN WITH JEEM WITH HAH INITIAL FORM" #xFD5D)
- ("ARABIC LIGATURE SEEN WITH JEEM WITH ALEF MAKSURA FINAL FORM" #xFD5E)
- ("ARABIC LIGATURE SEEN WITH MEEM WITH HAH FINAL FORM" #xFD5F)
- ("ARABIC LIGATURE SEEN WITH MEEM WITH HAH INITIAL FORM" #xFD60)
- ("ARABIC LIGATURE SEEN WITH MEEM WITH JEEM INITIAL FORM" #xFD61)
- ("ARABIC LIGATURE SEEN WITH MEEM WITH MEEM FINAL FORM" #xFD62)
- ("ARABIC LIGATURE SEEN WITH MEEM WITH MEEM INITIAL FORM" #xFD63)
- ("ARABIC LIGATURE SAD WITH HAH WITH HAH FINAL FORM" #xFD64)
- ("ARABIC LIGATURE SAD WITH HAH WITH HAH INITIAL FORM" #xFD65)
- ("ARABIC LIGATURE SAD WITH MEEM WITH MEEM FINAL FORM" #xFD66)
- ("ARABIC LIGATURE SHEEN WITH HAH WITH MEEM FINAL FORM" #xFD67)
- ("ARABIC LIGATURE SHEEN WITH HAH WITH MEEM INITIAL FORM" #xFD68)
- ("ARABIC LIGATURE SHEEN WITH JEEM WITH YEH FINAL FORM" #xFD69)
- ("ARABIC LIGATURE SHEEN WITH MEEM WITH KHAH FINAL FORM" #xFD6A)
- ("ARABIC LIGATURE SHEEN WITH MEEM WITH KHAH INITIAL FORM" #xFD6B)
- ("ARABIC LIGATURE SHEEN WITH MEEM WITH MEEM FINAL FORM" #xFD6C)
- ("ARABIC LIGATURE SHEEN WITH MEEM WITH MEEM INITIAL FORM" #xFD6D)
- ("ARABIC LIGATURE DAD WITH HAH WITH ALEF MAKSURA FINAL FORM" #xFD6E)
- ("ARABIC LIGATURE DAD WITH KHAH WITH MEEM FINAL FORM" #xFD6F)
- ("ARABIC LIGATURE DAD WITH KHAH WITH MEEM INITIAL FORM" #xFD70)
- ("ARABIC LIGATURE TAH WITH MEEM WITH HAH FINAL FORM" #xFD71)
- ("ARABIC LIGATURE TAH WITH MEEM WITH HAH INITIAL FORM" #xFD72)
- ("ARABIC LIGATURE TAH WITH MEEM WITH MEEM INITIAL FORM" #xFD73)
- ("ARABIC LIGATURE TAH WITH MEEM WITH YEH FINAL FORM" #xFD74)
- ("ARABIC LIGATURE AIN WITH JEEM WITH MEEM FINAL FORM" #xFD75)
- ("ARABIC LIGATURE AIN WITH MEEM WITH MEEM FINAL FORM" #xFD76)
- ("ARABIC LIGATURE AIN WITH MEEM WITH MEEM INITIAL FORM" #xFD77)
- ("ARABIC LIGATURE AIN WITH MEEM WITH ALEF MAKSURA FINAL FORM" #xFD78)
- ("ARABIC LIGATURE GHAIN WITH MEEM WITH MEEM FINAL FORM" #xFD79)
- ("ARABIC LIGATURE GHAIN WITH MEEM WITH YEH FINAL FORM" #xFD7A)
- ("ARABIC LIGATURE GHAIN WITH MEEM WITH ALEF MAKSURA FINAL FORM" #xFD7B)
- ("ARABIC LIGATURE FEH WITH KHAH WITH MEEM FINAL FORM" #xFD7C)
- ("ARABIC LIGATURE FEH WITH KHAH WITH MEEM INITIAL FORM" #xFD7D)
- ("ARABIC LIGATURE QAF WITH MEEM WITH HAH FINAL FORM" #xFD7E)
- ("ARABIC LIGATURE QAF WITH MEEM WITH MEEM FINAL FORM" #xFD7F)
- ("ARABIC LIGATURE LAM WITH HAH WITH MEEM FINAL FORM" #xFD80)
- ("ARABIC LIGATURE LAM WITH HAH WITH YEH FINAL FORM" #xFD81)
- ("ARABIC LIGATURE LAM WITH HAH WITH ALEF MAKSURA FINAL FORM" #xFD82)
- ("ARABIC LIGATURE LAM WITH JEEM WITH JEEM INITIAL FORM" #xFD83)
- ("ARABIC LIGATURE LAM WITH JEEM WITH JEEM FINAL FORM" #xFD84)
- ("ARABIC LIGATURE LAM WITH KHAH WITH MEEM FINAL FORM" #xFD85)
- ("ARABIC LIGATURE LAM WITH KHAH WITH MEEM INITIAL FORM" #xFD86)
- ("ARABIC LIGATURE LAM WITH MEEM WITH HAH FINAL FORM" #xFD87)
- ("ARABIC LIGATURE LAM WITH MEEM WITH HAH INITIAL FORM" #xFD88)
- ("ARABIC LIGATURE MEEM WITH HAH WITH JEEM INITIAL FORM" #xFD89)
- ("ARABIC LIGATURE MEEM WITH HAH WITH MEEM INITIAL FORM" #xFD8A)
- ("ARABIC LIGATURE MEEM WITH HAH WITH YEH FINAL FORM" #xFD8B)
- ("ARABIC LIGATURE MEEM WITH JEEM WITH HAH INITIAL FORM" #xFD8C)
- ("ARABIC LIGATURE MEEM WITH JEEM WITH MEEM INITIAL FORM" #xFD8D)
- ("ARABIC LIGATURE MEEM WITH KHAH WITH JEEM INITIAL FORM" #xFD8E)
- ("ARABIC LIGATURE MEEM WITH KHAH WITH MEEM INITIAL FORM" #xFD8F)
- ("ARABIC LIGATURE MEEM WITH JEEM WITH KHAH INITIAL FORM" #xFD92)
- ("ARABIC LIGATURE HEH WITH MEEM WITH JEEM INITIAL FORM" #xFD93)
- ("ARABIC LIGATURE HEH WITH MEEM WITH MEEM INITIAL FORM" #xFD94)
- ("ARABIC LIGATURE NOON WITH HAH WITH MEEM INITIAL FORM" #xFD95)
- ("ARABIC LIGATURE NOON WITH HAH WITH ALEF MAKSURA FINAL FORM" #xFD96)
- ("ARABIC LIGATURE NOON WITH JEEM WITH MEEM FINAL FORM" #xFD97)
- ("ARABIC LIGATURE NOON WITH JEEM WITH MEEM INITIAL FORM" #xFD98)
- ("ARABIC LIGATURE NOON WITH JEEM WITH ALEF MAKSURA FINAL FORM" #xFD99)
- ("ARABIC LIGATURE NOON WITH MEEM WITH YEH FINAL FORM" #xFD9A)
- ("ARABIC LIGATURE NOON WITH MEEM WITH ALEF MAKSURA FINAL FORM" #xFD9B)
- ("ARABIC LIGATURE YEH WITH MEEM WITH MEEM FINAL FORM" #xFD9C)
- ("ARABIC LIGATURE YEH WITH MEEM WITH MEEM INITIAL FORM" #xFD9D)
- ("ARABIC LIGATURE BEH WITH KHAH WITH YEH FINAL FORM" #xFD9E)
- ("ARABIC LIGATURE TEH WITH JEEM WITH YEH FINAL FORM" #xFD9F)
- ("ARABIC LIGATURE TEH WITH JEEM WITH ALEF MAKSURA FINAL FORM" #xFDA0)
- ("ARABIC LIGATURE TEH WITH KHAH WITH YEH FINAL FORM" #xFDA1)
- ("ARABIC LIGATURE TEH WITH KHAH WITH ALEF MAKSURA FINAL FORM" #xFDA2)
- ("ARABIC LIGATURE TEH WITH MEEM WITH YEH FINAL FORM" #xFDA3)
- ("ARABIC LIGATURE TEH WITH MEEM WITH ALEF MAKSURA FINAL FORM" #xFDA4)
- ("ARABIC LIGATURE JEEM WITH MEEM WITH YEH FINAL FORM" #xFDA5)
- ("ARABIC LIGATURE JEEM WITH HAH WITH ALEF MAKSURA FINAL FORM" #xFDA6)
- ("ARABIC LIGATURE JEEM WITH MEEM WITH ALEF MAKSURA FINAL FORM" #xFDA7)
- ("ARABIC LIGATURE SEEN WITH KHAH WITH ALEF MAKSURA FINAL FORM" #xFDA8)
- ("ARABIC LIGATURE SAD WITH HAH WITH YEH FINAL FORM" #xFDA9)
- ("ARABIC LIGATURE SHEEN WITH HAH WITH YEH FINAL FORM" #xFDAA)
- ("ARABIC LIGATURE DAD WITH HAH WITH YEH FINAL FORM" #xFDAB)
- ("ARABIC LIGATURE LAM WITH JEEM WITH YEH FINAL FORM" #xFDAC)
- ("ARABIC LIGATURE LAM WITH MEEM WITH YEH FINAL FORM" #xFDAD)
- ("ARABIC LIGATURE YEH WITH HAH WITH YEH FINAL FORM" #xFDAE)
- ("ARABIC LIGATURE YEH WITH JEEM WITH YEH FINAL FORM" #xFDAF)
- ("ARABIC LIGATURE YEH WITH MEEM WITH YEH FINAL FORM" #xFDB0)
- ("ARABIC LIGATURE MEEM WITH MEEM WITH YEH FINAL FORM" #xFDB1)
- ("ARABIC LIGATURE QAF WITH MEEM WITH YEH FINAL FORM" #xFDB2)
- ("ARABIC LIGATURE NOON WITH HAH WITH YEH FINAL FORM" #xFDB3)
- ("ARABIC LIGATURE QAF WITH MEEM WITH HAH INITIAL FORM" #xFDB4)
- ("ARABIC LIGATURE LAM WITH HAH WITH MEEM INITIAL FORM" #xFDB5)
- ("ARABIC LIGATURE AIN WITH MEEM WITH YEH FINAL FORM" #xFDB6)
- ("ARABIC LIGATURE KAF WITH MEEM WITH YEH FINAL FORM" #xFDB7)
- ("ARABIC LIGATURE NOON WITH JEEM WITH HAH INITIAL FORM" #xFDB8)
- ("ARABIC LIGATURE MEEM WITH KHAH WITH YEH FINAL FORM" #xFDB9)
- ("ARABIC LIGATURE LAM WITH JEEM WITH MEEM INITIAL FORM" #xFDBA)
- ("ARABIC LIGATURE KAF WITH MEEM WITH MEEM FINAL FORM" #xFDBB)
- ("ARABIC LIGATURE LAM WITH JEEM WITH MEEM FINAL FORM" #xFDBC)
- ("ARABIC LIGATURE NOON WITH JEEM WITH HAH FINAL FORM" #xFDBD)
- ("ARABIC LIGATURE JEEM WITH HAH WITH YEH FINAL FORM" #xFDBE)
- ("ARABIC LIGATURE HAH WITH JEEM WITH YEH FINAL FORM" #xFDBF)
- ("ARABIC LIGATURE MEEM WITH JEEM WITH YEH FINAL FORM" #xFDC0)
- ("ARABIC LIGATURE FEH WITH MEEM WITH YEH FINAL FORM" #xFDC1)
- ("ARABIC LIGATURE BEH WITH HAH WITH YEH FINAL FORM" #xFDC2)
- ("ARABIC LIGATURE KAF WITH MEEM WITH MEEM INITIAL FORM" #xFDC3)
- ("ARABIC LIGATURE AIN WITH JEEM WITH MEEM INITIAL FORM" #xFDC4)
- ("ARABIC LIGATURE SAD WITH MEEM WITH MEEM INITIAL FORM" #xFDC5)
- ("ARABIC LIGATURE SEEN WITH KHAH WITH YEH FINAL FORM" #xFDC6)
- ("ARABIC LIGATURE NOON WITH JEEM WITH YEH FINAL FORM" #xFDC7)
- ("ARABIC LIGATURE SALLA USED AS KORANIC STOP SIGN ISOLATED FORM" #xFDF0)
- ("ARABIC LIGATURE QALA USED AS KORANIC STOP SIGN ISOLATED FORM" #xFDF1)
- ("ARABIC LIGATURE ALLAH ISOLATED FORM" #xFDF2)
- ("ARABIC LIGATURE AKBAR ISOLATED FORM" #xFDF3)
- ("ARABIC LIGATURE MOHAMMAD ISOLATED FORM" #xFDF4)
- ("ARABIC LIGATURE SALAM ISOLATED FORM" #xFDF5)
- ("ARABIC LIGATURE RASOUL ISOLATED FORM" #xFDF6)
- ("ARABIC LIGATURE ALAYHE ISOLATED FORM" #xFDF7)
- ("ARABIC LIGATURE WASALLAM ISOLATED FORM" #xFDF8)
- ("ARABIC LIGATURE SALLA ISOLATED FORM" #xFDF9)
- ("ARABIC LIGATURE SALLALLAHOU ALAYHE WASALLAM" #xFDFA)
- ("ARABIC LIGATURE JALLAJALALOUHOU" #xFDFB)
- ("RIAL SIGN" #xFDFC)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'variation-selectors
- '(("VARIATION SELECTOR-1" #xFE00)
- ("VARIATION SELECTOR-2" #xFE01)
- ("VARIATION SELECTOR-3" #xFE02)
- ("VARIATION SELECTOR-4" #xFE03)
- ("VARIATION SELECTOR-5" #xFE04)
- ("VARIATION SELECTOR-6" #xFE05)
- ("VARIATION SELECTOR-7" #xFE06)
- ("VARIATION SELECTOR-8" #xFE07)
- ("VARIATION SELECTOR-9" #xFE08)
- ("VARIATION SELECTOR-10" #xFE09)
- ("VARIATION SELECTOR-11" #xFE0A)
- ("VARIATION SELECTOR-12" #xFE0B)
- ("VARIATION SELECTOR-13" #xFE0C)
- ("VARIATION SELECTOR-14" #xFE0D)
- ("VARIATION SELECTOR-15" #xFE0E)
- ("VARIATION SELECTOR-16" #xFE0F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'combining-half-marks
- '(("COMBINING LIGATURE LEFT HALF" #xFE20)
- ("COMBINING LIGATURE RIGHT HALF" #xFE21)
- ("COMBINING DOUBLE TILDE LEFT HALF" #xFE22)
- ("COMBINING DOUBLE TILDE RIGHT HALF" #xFE23)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'cjk-compatibility-forms
- '(("PRESENTATION FORM FOR VERTICAL TWO DOT LEADER" #xFE30)
- ("PRESENTATION FORM FOR VERTICAL EM DASH" #xFE31)
- ("PRESENTATION FORM FOR VERTICAL EN DASH" #xFE32)
- ("PRESENTATION FORM FOR VERTICAL LOW LINE" #xFE33)
- ("PRESENTATION FORM FOR VERTICAL WAVY LOW LINE" #xFE34)
- ("PRESENTATION FORM FOR VERTICAL LEFT PARENTHESIS" #xFE35)
- ("PRESENTATION FORM FOR VERTICAL RIGHT PARENTHESIS" #xFE36)
- ("PRESENTATION FORM FOR VERTICAL LEFT CURLY BRACKET" #xFE37)
- ("PRESENTATION FORM FOR VERTICAL RIGHT CURLY BRACKET" #xFE38)
- ("PRESENTATION FORM FOR VERTICAL LEFT TORTOISE SHELL BRACKET" #xFE39)
- ("PRESENTATION FORM FOR VERTICAL RIGHT TORTOISE SHELL BRACKET" #xFE3A)
- ("PRESENTATION FORM FOR VERTICAL LEFT BLACK LENTICULAR BRACKET" #xFE3B)
- ("PRESENTATION FORM FOR VERTICAL RIGHT BLACK LENTICULAR BRACKET" #xFE3C)
- ("PRESENTATION FORM FOR VERTICAL LEFT DOUBLE ANGLE BRACKET" #xFE3D)
- ("PRESENTATION FORM FOR VERTICAL RIGHT DOUBLE ANGLE BRACKET" #xFE3E)
- ("PRESENTATION FORM FOR VERTICAL LEFT ANGLE BRACKET" #xFE3F)
- ("PRESENTATION FORM FOR VERTICAL RIGHT ANGLE BRACKET" #xFE40)
- ("PRESENTATION FORM FOR VERTICAL LEFT CORNER BRACKET" #xFE41)
- ("PRESENTATION FORM FOR VERTICAL RIGHT CORNER BRACKET" #xFE42)
- ("PRESENTATION FORM FOR VERTICAL LEFT WHITE CORNER BRACKET" #xFE43)
- ("PRESENTATION FORM FOR VERTICAL RIGHT WHITE CORNER BRACKET" #xFE44)
- ("SESAME DOT" #xFE45)
- ("WHITE SESAME DOT" #xFE46)
- ("DASHED OVERLINE" #xFE49)
- ("CENTRELINE OVERLINE" #xFE4A)
- ("WAVY OVERLINE" #xFE4B)
- ("DOUBLE WAVY OVERLINE" #xFE4C)
- ("DASHED LOW LINE" #xFE4D)
- ("CENTRELINE LOW LINE" #xFE4E)
- ("WAVY LOW LINE" #xFE4F)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'small-form-variants
- '(("SMALL COMMA" #xFE50)
- ("SMALL IDEOGRAPHIC COMMA" #xFE51)
- ("SMALL FULL STOP" #xFE52)
- ("SMALL SEMICOLON" #xFE54)
- ("SMALL COLON" #xFE55)
- ("SMALL QUESTION MARK" #xFE56)
- ("SMALL EXCLAMATION MARK" #xFE57)
- ("SMALL EM DASH" #xFE58)
- ("SMALL LEFT PARENTHESIS" #xFE59)
- ("SMALL RIGHT PARENTHESIS" #xFE5A)
- ("SMALL LEFT CURLY BRACKET" #xFE5B)
- ("SMALL RIGHT CURLY BRACKET" #xFE5C)
- ("SMALL LEFT TORTOISE SHELL BRACKET" #xFE5D)
- ("SMALL RIGHT TORTOISE SHELL BRACKET" #xFE5E)
- ("SMALL NUMBER SIGN" #xFE5F)
- ("SMALL AMPERSAND" #xFE60)
- ("SMALL ASTERISK" #xFE61)
- ("SMALL PLUS SIGN" #xFE62)
- ("SMALL HYPHEN-MINUS" #xFE63)
- ("SMALL LESS-THAN SIGN" #xFE64)
- ("SMALL GREATER-THAN SIGN" #xFE65)
- ("SMALL EQUALS SIGN" #xFE66)
- ("SMALL REVERSE SOLIDUS" #xFE68)
- ("SMALL DOLLAR SIGN" #xFE69)
- ("SMALL PERCENT SIGN" #xFE6A)
- ("SMALL COMMERCIAL AT" #xFE6B)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'arabic-presentation-forms-b
- '(("ARABIC FATHATAN ISOLATED FORM" #xFE70)
- ("ARABIC TATWEEL WITH FATHATAN ABOVE" #xFE71)
- ("ARABIC DAMMATAN ISOLATED FORM" #xFE72)
- ("ARABIC TAIL FRAGMENT" #xFE73)
- ("ARABIC KASRATAN ISOLATED FORM" #xFE74)
- ("ARABIC FATHA ISOLATED FORM" #xFE76)
- ("ARABIC FATHA MEDIAL FORM" #xFE77)
- ("ARABIC DAMMA ISOLATED FORM" #xFE78)
- ("ARABIC DAMMA MEDIAL FORM" #xFE79)
- ("ARABIC KASRA ISOLATED FORM" #xFE7A)
- ("ARABIC KASRA MEDIAL FORM" #xFE7B)
- ("ARABIC SHADDA ISOLATED FORM" #xFE7C)
- ("ARABIC SHADDA MEDIAL FORM" #xFE7D)
- ("ARABIC SUKUN ISOLATED FORM" #xFE7E)
- ("ARABIC SUKUN MEDIAL FORM" #xFE7F)
- ("ARABIC LETTER HAMZA ISOLATED FORM" #xFE80)
- ("ARABIC LETTER ALEF WITH MADDA ABOVE ISOLATED FORM" #xFE81)
- ("ARABIC LETTER ALEF WITH MADDA ABOVE FINAL FORM" #xFE82)
- ("ARABIC LETTER ALEF WITH HAMZA ABOVE ISOLATED FORM" #xFE83)
- ("ARABIC LETTER ALEF WITH HAMZA ABOVE FINAL FORM" #xFE84)
- ("ARABIC LETTER WAW WITH HAMZA ABOVE ISOLATED FORM" #xFE85)
- ("ARABIC LETTER WAW WITH HAMZA ABOVE FINAL FORM" #xFE86)
- ("ARABIC LETTER ALEF WITH HAMZA BELOW ISOLATED FORM" #xFE87)
- ("ARABIC LETTER ALEF WITH HAMZA BELOW FINAL FORM" #xFE88)
- ("ARABIC LETTER YEH WITH HAMZA ABOVE ISOLATED FORM" #xFE89)
- ("ARABIC LETTER YEH WITH HAMZA ABOVE FINAL FORM" #xFE8A)
- ("ARABIC LETTER YEH WITH HAMZA ABOVE INITIAL FORM" #xFE8B)
- ("ARABIC LETTER YEH WITH HAMZA ABOVE MEDIAL FORM" #xFE8C)
- ("ARABIC LETTER ALEF ISOLATED FORM" #xFE8D)
- ("ARABIC LETTER ALEF FINAL FORM" #xFE8E)
- ("ARABIC LETTER BEH ISOLATED FORM" #xFE8F)
- ("ARABIC LETTER BEH FINAL FORM" #xFE90)
- ("ARABIC LETTER BEH INITIAL FORM" #xFE91)
- ("ARABIC LETTER BEH MEDIAL FORM" #xFE92)
- ("ARABIC LETTER TEH MARBUTA ISOLATED FORM" #xFE93)
- ("ARABIC LETTER TEH MARBUTA FINAL FORM" #xFE94)
- ("ARABIC LETTER TEH ISOLATED FORM" #xFE95)
- ("ARABIC LETTER TEH FINAL FORM" #xFE96)
- ("ARABIC LETTER TEH INITIAL FORM" #xFE97)
- ("ARABIC LETTER TEH MEDIAL FORM" #xFE98)
- ("ARABIC LETTER THEH ISOLATED FORM" #xFE99)
- ("ARABIC LETTER THEH FINAL FORM" #xFE9A)
- ("ARABIC LETTER THEH INITIAL FORM" #xFE9B)
- ("ARABIC LETTER THEH MEDIAL FORM" #xFE9C)
- ("ARABIC LETTER JEEM ISOLATED FORM" #xFE9D)
- ("ARABIC LETTER JEEM FINAL FORM" #xFE9E)
- ("ARABIC LETTER JEEM INITIAL FORM" #xFE9F)
- ("ARABIC LETTER JEEM MEDIAL FORM" #xFEA0)
- ("ARABIC LETTER HAH ISOLATED FORM" #xFEA1)
- ("ARABIC LETTER HAH FINAL FORM" #xFEA2)
- ("ARABIC LETTER HAH INITIAL FORM" #xFEA3)
- ("ARABIC LETTER HAH MEDIAL FORM" #xFEA4)
- ("ARABIC LETTER KHAH ISOLATED FORM" #xFEA5)
- ("ARABIC LETTER KHAH FINAL FORM" #xFEA6)
- ("ARABIC LETTER KHAH INITIAL FORM" #xFEA7)
- ("ARABIC LETTER KHAH MEDIAL FORM" #xFEA8)
- ("ARABIC LETTER DAL ISOLATED FORM" #xFEA9)
- ("ARABIC LETTER DAL FINAL FORM" #xFEAA)
- ("ARABIC LETTER THAL ISOLATED FORM" #xFEAB)
- ("ARABIC LETTER THAL FINAL FORM" #xFEAC)
- ("ARABIC LETTER REH ISOLATED FORM" #xFEAD)
- ("ARABIC LETTER REH FINAL FORM" #xFEAE)
- ("ARABIC LETTER ZAIN ISOLATED FORM" #xFEAF)
- ("ARABIC LETTER ZAIN FINAL FORM" #xFEB0)
- ("ARABIC LETTER SEEN ISOLATED FORM" #xFEB1)
- ("ARABIC LETTER SEEN FINAL FORM" #xFEB2)
- ("ARABIC LETTER SEEN INITIAL FORM" #xFEB3)
- ("ARABIC LETTER SEEN MEDIAL FORM" #xFEB4)
- ("ARABIC LETTER SHEEN ISOLATED FORM" #xFEB5)
- ("ARABIC LETTER SHEEN FINAL FORM" #xFEB6)
- ("ARABIC LETTER SHEEN INITIAL FORM" #xFEB7)
- ("ARABIC LETTER SHEEN MEDIAL FORM" #xFEB8)
- ("ARABIC LETTER SAD ISOLATED FORM" #xFEB9)
- ("ARABIC LETTER SAD FINAL FORM" #xFEBA)
- ("ARABIC LETTER SAD INITIAL FORM" #xFEBB)
- ("ARABIC LETTER SAD MEDIAL FORM" #xFEBC)
- ("ARABIC LETTER DAD ISOLATED FORM" #xFEBD)
- ("ARABIC LETTER DAD FINAL FORM" #xFEBE)
- ("ARABIC LETTER DAD INITIAL FORM" #xFEBF)
- ("ARABIC LETTER DAD MEDIAL FORM" #xFEC0)
- ("ARABIC LETTER TAH ISOLATED FORM" #xFEC1)
- ("ARABIC LETTER TAH FINAL FORM" #xFEC2)
- ("ARABIC LETTER TAH INITIAL FORM" #xFEC3)
- ("ARABIC LETTER TAH MEDIAL FORM" #xFEC4)
- ("ARABIC LETTER ZAH ISOLATED FORM" #xFEC5)
- ("ARABIC LETTER ZAH FINAL FORM" #xFEC6)
- ("ARABIC LETTER ZAH INITIAL FORM" #xFEC7)
- ("ARABIC LETTER ZAH MEDIAL FORM" #xFEC8)
- ("ARABIC LETTER AIN ISOLATED FORM" #xFEC9)
- ("ARABIC LETTER AIN FINAL FORM" #xFECA)
- ("ARABIC LETTER AIN INITIAL FORM" #xFECB)
- ("ARABIC LETTER AIN MEDIAL FORM" #xFECC)
- ("ARABIC LETTER GHAIN ISOLATED FORM" #xFECD)
- ("ARABIC LETTER GHAIN FINAL FORM" #xFECE)
- ("ARABIC LETTER GHAIN INITIAL FORM" #xFECF)
- ("ARABIC LETTER GHAIN MEDIAL FORM" #xFED0)
- ("ARABIC LETTER FEH ISOLATED FORM" #xFED1)
- ("ARABIC LETTER FEH FINAL FORM" #xFED2)
- ("ARABIC LETTER FEH INITIAL FORM" #xFED3)
- ("ARABIC LETTER FEH MEDIAL FORM" #xFED4)
- ("ARABIC LETTER QAF ISOLATED FORM" #xFED5)
- ("ARABIC LETTER QAF FINAL FORM" #xFED6)
- ("ARABIC LETTER QAF INITIAL FORM" #xFED7)
- ("ARABIC LETTER QAF MEDIAL FORM" #xFED8)
- ("ARABIC LETTER KAF ISOLATED FORM" #xFED9)
- ("ARABIC LETTER KAF FINAL FORM" #xFEDA)
- ("ARABIC LETTER KAF INITIAL FORM" #xFEDB)
- ("ARABIC LETTER KAF MEDIAL FORM" #xFEDC)
- ("ARABIC LETTER LAM ISOLATED FORM" #xFEDD)
- ("ARABIC LETTER LAM FINAL FORM" #xFEDE)
- ("ARABIC LETTER LAM INITIAL FORM" #xFEDF)
- ("ARABIC LETTER LAM MEDIAL FORM" #xFEE0)
- ("ARABIC LETTER MEEM ISOLATED FORM" #xFEE1)
- ("ARABIC LETTER MEEM FINAL FORM" #xFEE2)
- ("ARABIC LETTER MEEM INITIAL FORM" #xFEE3)
- ("ARABIC LETTER MEEM MEDIAL FORM" #xFEE4)
- ("ARABIC LETTER NOON ISOLATED FORM" #xFEE5)
- ("ARABIC LETTER NOON FINAL FORM" #xFEE6)
- ("ARABIC LETTER NOON INITIAL FORM" #xFEE7)
- ("ARABIC LETTER NOON MEDIAL FORM" #xFEE8)
- ("ARABIC LETTER HEH ISOLATED FORM" #xFEE9)
- ("ARABIC LETTER HEH FINAL FORM" #xFEEA)
- ("ARABIC LETTER HEH INITIAL FORM" #xFEEB)
- ("ARABIC LETTER HEH MEDIAL FORM" #xFEEC)
- ("ARABIC LETTER WAW ISOLATED FORM" #xFEED)
- ("ARABIC LETTER WAW FINAL FORM" #xFEEE)
- ("ARABIC LETTER ALEF MAKSURA ISOLATED FORM" #xFEEF)
- ("ARABIC LETTER ALEF MAKSURA FINAL FORM" #xFEF0)
- ("ARABIC LETTER YEH ISOLATED FORM" #xFEF1)
- ("ARABIC LETTER YEH FINAL FORM" #xFEF2)
- ("ARABIC LETTER YEH INITIAL FORM" #xFEF3)
- ("ARABIC LETTER YEH MEDIAL FORM" #xFEF4)
- ("ARABIC LIGATURE LAM WITH ALEF WITH MADDA ABOVE ISOLATED FORM" #xFEF5)
- ("ARABIC LIGATURE LAM WITH ALEF WITH MADDA ABOVE FINAL FORM" #xFEF6)
- ("ARABIC LIGATURE LAM WITH ALEF WITH HAMZA ABOVE ISOLATED FORM" #xFEF7)
- ("ARABIC LIGATURE LAM WITH ALEF WITH HAMZA ABOVE FINAL FORM" #xFEF8)
- ("ARABIC LIGATURE LAM WITH ALEF WITH HAMZA BELOW ISOLATED FORM" #xFEF9)
- ("ARABIC LIGATURE LAM WITH ALEF WITH HAMZA BELOW FINAL FORM" #xFEFA)
- ("ARABIC LIGATURE LAM WITH ALEF ISOLATED FORM" #xFEFB)
- ("ARABIC LIGATURE LAM WITH ALEF FINAL FORM" #xFEFC)
- ("ZERO WIDTH NO-BREAK SPACE" #xFEFF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'halfwidth-and-fullwidth-forms
- '(("FULLWIDTH EXCLAMATION MARK" #xFF01)
- ("FULLWIDTH QUOTATION MARK" #xFF02)
- ("FULLWIDTH NUMBER SIGN" #xFF03)
- ("FULLWIDTH DOLLAR SIGN" #xFF04)
- ("FULLWIDTH PERCENT SIGN" #xFF05)
- ("FULLWIDTH AMPERSAND" #xFF06)
- ("FULLWIDTH APOSTROPHE" #xFF07)
- ("FULLWIDTH LEFT PARENTHESIS" #xFF08)
- ("FULLWIDTH RIGHT PARENTHESIS" #xFF09)
- ("FULLWIDTH ASTERISK" #xFF0A)
- ("FULLWIDTH PLUS SIGN" #xFF0B)
- ("FULLWIDTH COMMA" #xFF0C)
- ("FULLWIDTH HYPHEN-MINUS" #xFF0D)
- ("FULLWIDTH FULL STOP" #xFF0E)
- ("FULLWIDTH SOLIDUS" #xFF0F)
- ("FULLWIDTH DIGIT ZERO" #xFF10)
- ("FULLWIDTH DIGIT ONE" #xFF11)
- ("FULLWIDTH DIGIT TWO" #xFF12)
- ("FULLWIDTH DIGIT THREE" #xFF13)
- ("FULLWIDTH DIGIT FOUR" #xFF14)
- ("FULLWIDTH DIGIT FIVE" #xFF15)
- ("FULLWIDTH DIGIT SIX" #xFF16)
- ("FULLWIDTH DIGIT SEVEN" #xFF17)
- ("FULLWIDTH DIGIT EIGHT" #xFF18)
- ("FULLWIDTH DIGIT NINE" #xFF19)
- ("FULLWIDTH COLON" #xFF1A)
- ("FULLWIDTH SEMICOLON" #xFF1B)
- ("FULLWIDTH LESS-THAN SIGN" #xFF1C)
- ("FULLWIDTH EQUALS SIGN" #xFF1D)
- ("FULLWIDTH GREATER-THAN SIGN" #xFF1E)
- ("FULLWIDTH QUESTION MARK" #xFF1F)
- ("FULLWIDTH COMMERCIAL AT" #xFF20)
- ("FULLWIDTH LATIN CAPITAL LETTER A" #xFF21)
- ("FULLWIDTH LATIN CAPITAL LETTER B" #xFF22)
- ("FULLWIDTH LATIN CAPITAL LETTER C" #xFF23)
- ("FULLWIDTH LATIN CAPITAL LETTER D" #xFF24)
- ("FULLWIDTH LATIN CAPITAL LETTER E" #xFF25)
- ("FULLWIDTH LATIN CAPITAL LETTER F" #xFF26)
- ("FULLWIDTH LATIN CAPITAL LETTER G" #xFF27)
- ("FULLWIDTH LATIN CAPITAL LETTER H" #xFF28)
- ("FULLWIDTH LATIN CAPITAL LETTER I" #xFF29)
- ("FULLWIDTH LATIN CAPITAL LETTER J" #xFF2A)
- ("FULLWIDTH LATIN CAPITAL LETTER K" #xFF2B)
- ("FULLWIDTH LATIN CAPITAL LETTER L" #xFF2C)
- ("FULLWIDTH LATIN CAPITAL LETTER M" #xFF2D)
- ("FULLWIDTH LATIN CAPITAL LETTER N" #xFF2E)
- ("FULLWIDTH LATIN CAPITAL LETTER O" #xFF2F)
- ("FULLWIDTH LATIN CAPITAL LETTER P" #xFF30)
- ("FULLWIDTH LATIN CAPITAL LETTER Q" #xFF31)
- ("FULLWIDTH LATIN CAPITAL LETTER R" #xFF32)
- ("FULLWIDTH LATIN CAPITAL LETTER S" #xFF33)
- ("FULLWIDTH LATIN CAPITAL LETTER T" #xFF34)
- ("FULLWIDTH LATIN CAPITAL LETTER U" #xFF35)
- ("FULLWIDTH LATIN CAPITAL LETTER V" #xFF36)
- ("FULLWIDTH LATIN CAPITAL LETTER W" #xFF37)
- ("FULLWIDTH LATIN CAPITAL LETTER X" #xFF38)
- ("FULLWIDTH LATIN CAPITAL LETTER Y" #xFF39)
- ("FULLWIDTH LATIN CAPITAL LETTER Z" #xFF3A)
- ("FULLWIDTH LEFT SQUARE BRACKET" #xFF3B)
- ("FULLWIDTH REVERSE SOLIDUS" #xFF3C)
- ("FULLWIDTH RIGHT SQUARE BRACKET" #xFF3D)
- ("FULLWIDTH CIRCUMFLEX ACCENT" #xFF3E)
- ("FULLWIDTH LOW LINE" #xFF3F)
- ("FULLWIDTH GRAVE ACCENT" #xFF40)
- ("FULLWIDTH LATIN SMALL LETTER A" #xFF41)
- ("FULLWIDTH LATIN SMALL LETTER B" #xFF42)
- ("FULLWIDTH LATIN SMALL LETTER C" #xFF43)
- ("FULLWIDTH LATIN SMALL LETTER D" #xFF44)
- ("FULLWIDTH LATIN SMALL LETTER E" #xFF45)
- ("FULLWIDTH LATIN SMALL LETTER F" #xFF46)
- ("FULLWIDTH LATIN SMALL LETTER G" #xFF47)
- ("FULLWIDTH LATIN SMALL LETTER H" #xFF48)
- ("FULLWIDTH LATIN SMALL LETTER I" #xFF49)
- ("FULLWIDTH LATIN SMALL LETTER J" #xFF4A)
- ("FULLWIDTH LATIN SMALL LETTER K" #xFF4B)
- ("FULLWIDTH LATIN SMALL LETTER L" #xFF4C)
- ("FULLWIDTH LATIN SMALL LETTER M" #xFF4D)
- ("FULLWIDTH LATIN SMALL LETTER N" #xFF4E)
- ("FULLWIDTH LATIN SMALL LETTER O" #xFF4F)
- ("FULLWIDTH LATIN SMALL LETTER P" #xFF50)
- ("FULLWIDTH LATIN SMALL LETTER Q" #xFF51)
- ("FULLWIDTH LATIN SMALL LETTER R" #xFF52)
- ("FULLWIDTH LATIN SMALL LETTER S" #xFF53)
- ("FULLWIDTH LATIN SMALL LETTER T" #xFF54)
- ("FULLWIDTH LATIN SMALL LETTER U" #xFF55)
- ("FULLWIDTH LATIN SMALL LETTER V" #xFF56)
- ("FULLWIDTH LATIN SMALL LETTER W" #xFF57)
- ("FULLWIDTH LATIN SMALL LETTER X" #xFF58)
- ("FULLWIDTH LATIN SMALL LETTER Y" #xFF59)
- ("FULLWIDTH LATIN SMALL LETTER Z" #xFF5A)
- ("FULLWIDTH LEFT CURLY BRACKET" #xFF5B)
- ("FULLWIDTH VERTICAL LINE" #xFF5C)
- ("FULLWIDTH RIGHT CURLY BRACKET" #xFF5D)
- ("FULLWIDTH TILDE" #xFF5E)
- ("FULLWIDTH LEFT WHITE PARENTHESIS" #xFF5F)
- ("FULLWIDTH RIGHT WHITE PARENTHESIS" #xFF60)
- ("HALFWIDTH IDEOGRAPHIC FULL STOP" #xFF61)
- ("HALFWIDTH LEFT CORNER BRACKET" #xFF62)
- ("HALFWIDTH RIGHT CORNER BRACKET" #xFF63)
- ("HALFWIDTH IDEOGRAPHIC COMMA" #xFF64)
- ("HALFWIDTH KATAKANA MIDDLE DOT" #xFF65)
- ("HALFWIDTH KATAKANA LETTER WO" #xFF66)
- ("HALFWIDTH KATAKANA LETTER SMALL A" #xFF67)
- ("HALFWIDTH KATAKANA LETTER SMALL I" #xFF68)
- ("HALFWIDTH KATAKANA LETTER SMALL U" #xFF69)
- ("HALFWIDTH KATAKANA LETTER SMALL E" #xFF6A)
- ("HALFWIDTH KATAKANA LETTER SMALL O" #xFF6B)
- ("HALFWIDTH KATAKANA LETTER SMALL YA" #xFF6C)
- ("HALFWIDTH KATAKANA LETTER SMALL YU" #xFF6D)
- ("HALFWIDTH KATAKANA LETTER SMALL YO" #xFF6E)
- ("HALFWIDTH KATAKANA LETTER SMALL TU" #xFF6F)
- ("HALFWIDTH KATAKANA-HIRAGANA PROLONGED SOUND MARK" #xFF70)
- ("HALFWIDTH KATAKANA LETTER A" #xFF71)
- ("HALFWIDTH KATAKANA LETTER I" #xFF72)
- ("HALFWIDTH KATAKANA LETTER U" #xFF73)
- ("HALFWIDTH KATAKANA LETTER E" #xFF74)
- ("HALFWIDTH KATAKANA LETTER O" #xFF75)
- ("HALFWIDTH KATAKANA LETTER KA" #xFF76)
- ("HALFWIDTH KATAKANA LETTER KI" #xFF77)
- ("HALFWIDTH KATAKANA LETTER KU" #xFF78)
- ("HALFWIDTH KATAKANA LETTER KE" #xFF79)
- ("HALFWIDTH KATAKANA LETTER KO" #xFF7A)
- ("HALFWIDTH KATAKANA LETTER SA" #xFF7B)
- ("HALFWIDTH KATAKANA LETTER SI" #xFF7C)
- ("HALFWIDTH KATAKANA LETTER SU" #xFF7D)
- ("HALFWIDTH KATAKANA LETTER SE" #xFF7E)
- ("HALFWIDTH KATAKANA LETTER SO" #xFF7F)
- ("HALFWIDTH KATAKANA LETTER TA" #xFF80)
- ("HALFWIDTH KATAKANA LETTER TI" #xFF81)
- ("HALFWIDTH KATAKANA LETTER TU" #xFF82)
- ("HALFWIDTH KATAKANA LETTER TE" #xFF83)
- ("HALFWIDTH KATAKANA LETTER TO" #xFF84)
- ("HALFWIDTH KATAKANA LETTER NA" #xFF85)
- ("HALFWIDTH KATAKANA LETTER NI" #xFF86)
- ("HALFWIDTH KATAKANA LETTER NU" #xFF87)
- ("HALFWIDTH KATAKANA LETTER NE" #xFF88)
- ("HALFWIDTH KATAKANA LETTER NO" #xFF89)
- ("HALFWIDTH KATAKANA LETTER HA" #xFF8A)
- ("HALFWIDTH KATAKANA LETTER HI" #xFF8B)
- ("HALFWIDTH KATAKANA LETTER HU" #xFF8C)
- ("HALFWIDTH KATAKANA LETTER HE" #xFF8D)
- ("HALFWIDTH KATAKANA LETTER HO" #xFF8E)
- ("HALFWIDTH KATAKANA LETTER MA" #xFF8F)
- ("HALFWIDTH KATAKANA LETTER MI" #xFF90)
- ("HALFWIDTH KATAKANA LETTER MU" #xFF91)
- ("HALFWIDTH KATAKANA LETTER ME" #xFF92)
- ("HALFWIDTH KATAKANA LETTER MO" #xFF93)
- ("HALFWIDTH KATAKANA LETTER YA" #xFF94)
- ("HALFWIDTH KATAKANA LETTER YU" #xFF95)
- ("HALFWIDTH KATAKANA LETTER YO" #xFF96)
- ("HALFWIDTH KATAKANA LETTER RA" #xFF97)
- ("HALFWIDTH KATAKANA LETTER RI" #xFF98)
- ("HALFWIDTH KATAKANA LETTER RU" #xFF99)
- ("HALFWIDTH KATAKANA LETTER RE" #xFF9A)
- ("HALFWIDTH KATAKANA LETTER RO" #xFF9B)
- ("HALFWIDTH KATAKANA LETTER WA" #xFF9C)
- ("HALFWIDTH KATAKANA LETTER N" #xFF9D)
- ("HALFWIDTH KATAKANA VOICED SOUND MARK" #xFF9E)
- ("HALFWIDTH KATAKANA SEMI-VOICED SOUND MARK" #xFF9F)
- ("HALFWIDTH HANGUL FILLER" #xFFA0)
- ("HALFWIDTH HANGUL LETTER KIYEOK" #xFFA1)
- ("HALFWIDTH HANGUL LETTER SSANGKIYEOK" #xFFA2)
- ("HALFWIDTH HANGUL LETTER KIYEOK-SIOS" #xFFA3)
- ("HALFWIDTH HANGUL LETTER NIEUN" #xFFA4)
- ("HALFWIDTH HANGUL LETTER NIEUN-CIEUC" #xFFA5)
- ("HALFWIDTH HANGUL LETTER NIEUN-HIEUH" #xFFA6)
- ("HALFWIDTH HANGUL LETTER TIKEUT" #xFFA7)
- ("HALFWIDTH HANGUL LETTER SSANGTIKEUT" #xFFA8)
- ("HALFWIDTH HANGUL LETTER RIEUL" #xFFA9)
- ("HALFWIDTH HANGUL LETTER RIEUL-KIYEOK" #xFFAA)
- ("HALFWIDTH HANGUL LETTER RIEUL-MIEUM" #xFFAB)
- ("HALFWIDTH HANGUL LETTER RIEUL-PIEUP" #xFFAC)
- ("HALFWIDTH HANGUL LETTER RIEUL-SIOS" #xFFAD)
- ("HALFWIDTH HANGUL LETTER RIEUL-THIEUTH" #xFFAE)
- ("HALFWIDTH HANGUL LETTER RIEUL-PHIEUPH" #xFFAF)
- ("HALFWIDTH HANGUL LETTER RIEUL-HIEUH" #xFFB0)
- ("HALFWIDTH HANGUL LETTER MIEUM" #xFFB1)
- ("HALFWIDTH HANGUL LETTER PIEUP" #xFFB2)
- ("HALFWIDTH HANGUL LETTER SSANGPIEUP" #xFFB3)
- ("HALFWIDTH HANGUL LETTER PIEUP-SIOS" #xFFB4)
- ("HALFWIDTH HANGUL LETTER SIOS" #xFFB5)
- ("HALFWIDTH HANGUL LETTER SSANGSIOS" #xFFB6)
- ("HALFWIDTH HANGUL LETTER IEUNG" #xFFB7)
- ("HALFWIDTH HANGUL LETTER CIEUC" #xFFB8)
- ("HALFWIDTH HANGUL LETTER SSANGCIEUC" #xFFB9)
- ("HALFWIDTH HANGUL LETTER CHIEUCH" #xFFBA)
- ("HALFWIDTH HANGUL LETTER KHIEUKH" #xFFBB)
- ("HALFWIDTH HANGUL LETTER THIEUTH" #xFFBC)
- ("HALFWIDTH HANGUL LETTER PHIEUPH" #xFFBD)
- ("HALFWIDTH HANGUL LETTER HIEUH" #xFFBE)
- ("HALFWIDTH HANGUL LETTER A" #xFFC2)
- ("HALFWIDTH HANGUL LETTER AE" #xFFC3)
- ("HALFWIDTH HANGUL LETTER YA" #xFFC4)
- ("HALFWIDTH HANGUL LETTER YAE" #xFFC5)
- ("HALFWIDTH HANGUL LETTER EO" #xFFC6)
- ("HALFWIDTH HANGUL LETTER E" #xFFC7)
- ("HALFWIDTH HANGUL LETTER YEO" #xFFCA)
- ("HALFWIDTH HANGUL LETTER YE" #xFFCB)
- ("HALFWIDTH HANGUL LETTER O" #xFFCC)
- ("HALFWIDTH HANGUL LETTER WA" #xFFCD)
- ("HALFWIDTH HANGUL LETTER WAE" #xFFCE)
- ("HALFWIDTH HANGUL LETTER OE" #xFFCF)
- ("HALFWIDTH HANGUL LETTER YO" #xFFD2)
- ("HALFWIDTH HANGUL LETTER U" #xFFD3)
- ("HALFWIDTH HANGUL LETTER WEO" #xFFD4)
- ("HALFWIDTH HANGUL LETTER WE" #xFFD5)
- ("HALFWIDTH HANGUL LETTER WI" #xFFD6)
- ("HALFWIDTH HANGUL LETTER YU" #xFFD7)
- ("HALFWIDTH HANGUL LETTER EU" #xFFDA)
- ("HALFWIDTH HANGUL LETTER YI" #xFFDB)
- ("HALFWIDTH HANGUL LETTER I" #xFFDC)
- ("FULLWIDTH CENT SIGN" #xFFE0)
- ("FULLWIDTH POUND SIGN" #xFFE1)
- ("FULLWIDTH NOT SIGN" #xFFE2)
- ("FULLWIDTH MACRON" #xFFE3)
- ("FULLWIDTH BROKEN BAR" #xFFE4)
- ("FULLWIDTH YEN SIGN" #xFFE5)
- ("FULLWIDTH WON SIGN" #xFFE6)
- ("HALFWIDTH FORMS LIGHT VERTICAL" #xFFE8)
- ("HALFWIDTH LEFTWARDS ARROW" #xFFE9)
- ("HALFWIDTH UPWARDS ARROW" #xFFEA)
- ("HALFWIDTH RIGHTWARDS ARROW" #xFFEB)
- ("HALFWIDTH DOWNWARDS ARROW" #xFFEC)
- ("HALFWIDTH BLACK SQUARE" #xFFED)
- ("HALFWIDTH WHITE CIRCLE" #xFFEE)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'specials
- '(("INTERLINEAR ANNOTATION ANCHOR" #xFFF9)
- ("INTERLINEAR ANNOTATION SEPARATOR" #xFFFA)
- ("INTERLINEAR ANNOTATION TERMINATOR" #xFFFB)
- ("OBJECT REPLACEMENT CHARACTER" #xFFFC)
- ("REPLACEMENT CHARACTER" #xFFFD)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'old-italic
- '(("OLD ITALIC LETTER A" #x10300)
- ("OLD ITALIC LETTER BE" #x10301)
- ("OLD ITALIC LETTER KE" #x10302)
- ("OLD ITALIC LETTER DE" #x10303)
- ("OLD ITALIC LETTER E" #x10304)
- ("OLD ITALIC LETTER VE" #x10305)
- ("OLD ITALIC LETTER ZE" #x10306)
- ("OLD ITALIC LETTER HE" #x10307)
- ("OLD ITALIC LETTER THE" #x10308)
- ("OLD ITALIC LETTER I" #x10309)
- ("OLD ITALIC LETTER KA" #x1030A)
- ("OLD ITALIC LETTER EL" #x1030B)
- ("OLD ITALIC LETTER EM" #x1030C)
- ("OLD ITALIC LETTER EN" #x1030D)
- ("OLD ITALIC LETTER ESH" #x1030E)
- ("OLD ITALIC LETTER O" #x1030F)
- ("OLD ITALIC LETTER PE" #x10310)
- ("OLD ITALIC LETTER SHE" #x10311)
- ("OLD ITALIC LETTER KU" #x10312)
- ("OLD ITALIC LETTER ER" #x10313)
- ("OLD ITALIC LETTER ES" #x10314)
- ("OLD ITALIC LETTER TE" #x10315)
- ("OLD ITALIC LETTER U" #x10316)
- ("OLD ITALIC LETTER EKS" #x10317)
- ("OLD ITALIC LETTER PHE" #x10318)
- ("OLD ITALIC LETTER KHE" #x10319)
- ("OLD ITALIC LETTER EF" #x1031A)
- ("OLD ITALIC LETTER ERS" #x1031B)
- ("OLD ITALIC LETTER CHE" #x1031C)
- ("OLD ITALIC LETTER II" #x1031D)
- ("OLD ITALIC LETTER UU" #x1031E)
- ("OLD ITALIC NUMERAL ONE" #x10320)
- ("OLD ITALIC NUMERAL FIVE" #x10321)
- ("OLD ITALIC NUMERAL TEN" #x10322)
- ("OLD ITALIC NUMERAL FIFTY" #x10323)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'gothic
- '(("GOTHIC LETTER AHSA" #x10330)
- ("GOTHIC LETTER BAIRKAN" #x10331)
- ("GOTHIC LETTER GIBA" #x10332)
- ("GOTHIC LETTER DAGS" #x10333)
- ("GOTHIC LETTER AIHVUS" #x10334)
- ("GOTHIC LETTER QAIRTHRA" #x10335)
- ("GOTHIC LETTER IUJA" #x10336)
- ("GOTHIC LETTER HAGL" #x10337)
- ("GOTHIC LETTER THIUTH" #x10338)
- ("GOTHIC LETTER EIS" #x10339)
- ("GOTHIC LETTER KUSMA" #x1033A)
- ("GOTHIC LETTER LAGUS" #x1033B)
- ("GOTHIC LETTER MANNA" #x1033C)
- ("GOTHIC LETTER NAUTHS" #x1033D)
- ("GOTHIC LETTER JER" #x1033E)
- ("GOTHIC LETTER URUS" #x1033F)
- ("GOTHIC LETTER PAIRTHRA" #x10340)
- ("GOTHIC LETTER NINETY" #x10341)
- ("GOTHIC LETTER RAIDA" #x10342)
- ("GOTHIC LETTER SAUIL" #x10343)
- ("GOTHIC LETTER TEIWS" #x10344)
- ("GOTHIC LETTER WINJA" #x10345)
- ("GOTHIC LETTER FAIHU" #x10346)
- ("GOTHIC LETTER IGGWS" #x10347)
- ("GOTHIC LETTER HWAIR" #x10348)
- ("GOTHIC LETTER OTHAL" #x10349)
- ("GOTHIC LETTER NINE HUNDRED" #x1034A)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'deseret
- '(("DESERET CAPITAL LETTER LONG I" #x10400)
- ("DESERET CAPITAL LETTER LONG E" #x10401)
- ("DESERET CAPITAL LETTER LONG A" #x10402)
- ("DESERET CAPITAL LETTER LONG AH" #x10403)
- ("DESERET CAPITAL LETTER LONG O" #x10404)
- ("DESERET CAPITAL LETTER LONG OO" #x10405)
- ("DESERET CAPITAL LETTER SHORT I" #x10406)
- ("DESERET CAPITAL LETTER SHORT E" #x10407)
- ("DESERET CAPITAL LETTER SHORT A" #x10408)
- ("DESERET CAPITAL LETTER SHORT AH" #x10409)
- ("DESERET CAPITAL LETTER SHORT O" #x1040A)
- ("DESERET CAPITAL LETTER SHORT OO" #x1040B)
- ("DESERET CAPITAL LETTER AY" #x1040C)
- ("DESERET CAPITAL LETTER OW" #x1040D)
- ("DESERET CAPITAL LETTER WU" #x1040E)
- ("DESERET CAPITAL LETTER YEE" #x1040F)
- ("DESERET CAPITAL LETTER H" #x10410)
- ("DESERET CAPITAL LETTER PEE" #x10411)
- ("DESERET CAPITAL LETTER BEE" #x10412)
- ("DESERET CAPITAL LETTER TEE" #x10413)
- ("DESERET CAPITAL LETTER DEE" #x10414)
- ("DESERET CAPITAL LETTER CHEE" #x10415)
- ("DESERET CAPITAL LETTER JEE" #x10416)
- ("DESERET CAPITAL LETTER KAY" #x10417)
- ("DESERET CAPITAL LETTER GAY" #x10418)
- ("DESERET CAPITAL LETTER EF" #x10419)
- ("DESERET CAPITAL LETTER VEE" #x1041A)
- ("DESERET CAPITAL LETTER ETH" #x1041B)
- ("DESERET CAPITAL LETTER THEE" #x1041C)
- ("DESERET CAPITAL LETTER ES" #x1041D)
- ("DESERET CAPITAL LETTER ZEE" #x1041E)
- ("DESERET CAPITAL LETTER ESH" #x1041F)
- ("DESERET CAPITAL LETTER ZHEE" #x10420)
- ("DESERET CAPITAL LETTER ER" #x10421)
- ("DESERET CAPITAL LETTER EL" #x10422)
- ("DESERET CAPITAL LETTER EM" #x10423)
- ("DESERET CAPITAL LETTER EN" #x10424)
- ("DESERET CAPITAL LETTER ENG" #x10425)
- ("DESERET SMALL LETTER LONG I" #x10428)
- ("DESERET SMALL LETTER LONG E" #x10429)
- ("DESERET SMALL LETTER LONG A" #x1042A)
- ("DESERET SMALL LETTER LONG AH" #x1042B)
- ("DESERET SMALL LETTER LONG O" #x1042C)
- ("DESERET SMALL LETTER LONG OO" #x1042D)
- ("DESERET SMALL LETTER SHORT I" #x1042E)
- ("DESERET SMALL LETTER SHORT E" #x1042F)
- ("DESERET SMALL LETTER SHORT A" #x10430)
- ("DESERET SMALL LETTER SHORT AH" #x10431)
- ("DESERET SMALL LETTER SHORT O" #x10432)
- ("DESERET SMALL LETTER SHORT OO" #x10433)
- ("DESERET SMALL LETTER AY" #x10434)
- ("DESERET SMALL LETTER OW" #x10435)
- ("DESERET SMALL LETTER WU" #x10436)
- ("DESERET SMALL LETTER YEE" #x10437)
- ("DESERET SMALL LETTER H" #x10438)
- ("DESERET SMALL LETTER PEE" #x10439)
- ("DESERET SMALL LETTER BEE" #x1043A)
- ("DESERET SMALL LETTER TEE" #x1043B)
- ("DESERET SMALL LETTER DEE" #x1043C)
- ("DESERET SMALL LETTER CHEE" #x1043D)
- ("DESERET SMALL LETTER JEE" #x1043E)
- ("DESERET SMALL LETTER KAY" #x1043F)
- ("DESERET SMALL LETTER GAY" #x10440)
- ("DESERET SMALL LETTER EF" #x10441)
- ("DESERET SMALL LETTER VEE" #x10442)
- ("DESERET SMALL LETTER ETH" #x10443)
- ("DESERET SMALL LETTER THEE" #x10444)
- ("DESERET SMALL LETTER ES" #x10445)
- ("DESERET SMALL LETTER ZEE" #x10446)
- ("DESERET SMALL LETTER ESH" #x10447)
- ("DESERET SMALL LETTER ZHEE" #x10448)
- ("DESERET SMALL LETTER ER" #x10449)
- ("DESERET SMALL LETTER EL" #x1044A)
- ("DESERET SMALL LETTER EM" #x1044B)
- ("DESERET SMALL LETTER EN" #x1044C)
- ("DESERET SMALL LETTER ENG" #x1044D)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'byzantine-musical-symbols
- '(("BYZANTINE MUSICAL SYMBOL PSILI" #x1D000)
- ("BYZANTINE MUSICAL SYMBOL DASEIA" #x1D001)
- ("BYZANTINE MUSICAL SYMBOL PERISPOMENI" #x1D002)
- ("BYZANTINE MUSICAL SYMBOL OXEIA EKFONITIKON" #x1D003)
- ("BYZANTINE MUSICAL SYMBOL OXEIA DIPLI" #x1D004)
- ("BYZANTINE MUSICAL SYMBOL VAREIA EKFONITIKON" #x1D005)
- ("BYZANTINE MUSICAL SYMBOL VAREIA DIPLI" #x1D006)
- ("BYZANTINE MUSICAL SYMBOL KATHISTI" #x1D007)
- ("BYZANTINE MUSICAL SYMBOL SYRMATIKI" #x1D008)
- ("BYZANTINE MUSICAL SYMBOL PARAKLITIKI" #x1D009)
- ("BYZANTINE MUSICAL SYMBOL YPOKRISIS" #x1D00A)
- ("BYZANTINE MUSICAL SYMBOL YPOKRISIS DIPLI" #x1D00B)
- ("BYZANTINE MUSICAL SYMBOL KREMASTI" #x1D00C)
- ("BYZANTINE MUSICAL SYMBOL APESO EKFONITIKON" #x1D00D)
- ("BYZANTINE MUSICAL SYMBOL EXO EKFONITIKON" #x1D00E)
- ("BYZANTINE MUSICAL SYMBOL TELEIA" #x1D00F)
- ("BYZANTINE MUSICAL SYMBOL KENTIMATA" #x1D010)
- ("BYZANTINE MUSICAL SYMBOL APOSTROFOS" #x1D011)
- ("BYZANTINE MUSICAL SYMBOL APOSTROFOS DIPLI" #x1D012)
- ("BYZANTINE MUSICAL SYMBOL SYNEVMA" #x1D013)
- ("BYZANTINE MUSICAL SYMBOL THITA" #x1D014)
- ("BYZANTINE MUSICAL SYMBOL OLIGON ARCHAION" #x1D015)
- ("BYZANTINE MUSICAL SYMBOL GORGON ARCHAION" #x1D016)
- ("BYZANTINE MUSICAL SYMBOL PSILON" #x1D017)
- ("BYZANTINE MUSICAL SYMBOL CHAMILON" #x1D018)
- ("BYZANTINE MUSICAL SYMBOL VATHY" #x1D019)
- ("BYZANTINE MUSICAL SYMBOL ISON ARCHAION" #x1D01A)
- ("BYZANTINE MUSICAL SYMBOL KENTIMA ARCHAION" #x1D01B)
- ("BYZANTINE MUSICAL SYMBOL KENTIMATA ARCHAION" #x1D01C)
- ("BYZANTINE MUSICAL SYMBOL SAXIMATA" #x1D01D)
- ("BYZANTINE MUSICAL SYMBOL PARICHON" #x1D01E)
- ("BYZANTINE MUSICAL SYMBOL STAVROS APODEXIA" #x1D01F)
- ("BYZANTINE MUSICAL SYMBOL OXEIAI ARCHAION" #x1D020)
- ("BYZANTINE MUSICAL SYMBOL VAREIAI ARCHAION" #x1D021)
- ("BYZANTINE MUSICAL SYMBOL APODERMA ARCHAION" #x1D022)
- ("BYZANTINE MUSICAL SYMBOL APOTHEMA" #x1D023)
- ("BYZANTINE MUSICAL SYMBOL KLASMA" #x1D024)
- ("BYZANTINE MUSICAL SYMBOL REVMA" #x1D025)
- ("BYZANTINE MUSICAL SYMBOL PIASMA ARCHAION" #x1D026)
- ("BYZANTINE MUSICAL SYMBOL TINAGMA" #x1D027)
- ("BYZANTINE MUSICAL SYMBOL ANATRICHISMA" #x1D028)
- ("BYZANTINE MUSICAL SYMBOL SEISMA" #x1D029)
- ("BYZANTINE MUSICAL SYMBOL SYNAGMA ARCHAION" #x1D02A)
- ("BYZANTINE MUSICAL SYMBOL SYNAGMA META STAVROU" #x1D02B)
- ("BYZANTINE MUSICAL SYMBOL OYRANISMA ARCHAION" #x1D02C)
- ("BYZANTINE MUSICAL SYMBOL THEMA" #x1D02D)
- ("BYZANTINE MUSICAL SYMBOL LEMOI" #x1D02E)
- ("BYZANTINE MUSICAL SYMBOL DYO" #x1D02F)
- ("BYZANTINE MUSICAL SYMBOL TRIA" #x1D030)
- ("BYZANTINE MUSICAL SYMBOL TESSERA" #x1D031)
- ("BYZANTINE MUSICAL SYMBOL KRATIMATA" #x1D032)
- ("BYZANTINE MUSICAL SYMBOL APESO EXO NEO" #x1D033)
- ("BYZANTINE MUSICAL SYMBOL FTHORA ARCHAION" #x1D034)
- ("BYZANTINE MUSICAL SYMBOL IMIFTHORA" #x1D035)
- ("BYZANTINE MUSICAL SYMBOL TROMIKON ARCHAION" #x1D036)
- ("BYZANTINE MUSICAL SYMBOL KATAVA TROMIKON" #x1D037)
- ("BYZANTINE MUSICAL SYMBOL PELASTON" #x1D038)
- ("BYZANTINE MUSICAL SYMBOL PSIFISTON" #x1D039)
- ("BYZANTINE MUSICAL SYMBOL KONTEVMA" #x1D03A)
- ("BYZANTINE MUSICAL SYMBOL CHOREVMA ARCHAION" #x1D03B)
- ("BYZANTINE MUSICAL SYMBOL RAPISMA" #x1D03C)
- ("BYZANTINE MUSICAL SYMBOL PARAKALESMA ARCHAION" #x1D03D)
- ("BYZANTINE MUSICAL SYMBOL PARAKLITIKI ARCHAION" #x1D03E)
- ("BYZANTINE MUSICAL SYMBOL ICHADIN" #x1D03F)
- ("BYZANTINE MUSICAL SYMBOL NANA" #x1D040)
- ("BYZANTINE MUSICAL SYMBOL PETASMA" #x1D041)
- ("BYZANTINE MUSICAL SYMBOL KONTEVMA ALLO" #x1D042)
- ("BYZANTINE MUSICAL SYMBOL TROMIKON ALLO" #x1D043)
- ("BYZANTINE MUSICAL SYMBOL STRAGGISMATA" #x1D044)
- ("BYZANTINE MUSICAL SYMBOL GRONTHISMATA" #x1D045)
- ("BYZANTINE MUSICAL SYMBOL ISON NEO" #x1D046)
- ("BYZANTINE MUSICAL SYMBOL OLIGON NEO" #x1D047)
- ("BYZANTINE MUSICAL SYMBOL OXEIA NEO" #x1D048)
- ("BYZANTINE MUSICAL SYMBOL PETASTI" #x1D049)
- ("BYZANTINE MUSICAL SYMBOL KOUFISMA" #x1D04A)
- ("BYZANTINE MUSICAL SYMBOL PETASTOKOUFISMA" #x1D04B)
- ("BYZANTINE MUSICAL SYMBOL KRATIMOKOUFISMA" #x1D04C)
- ("BYZANTINE MUSICAL SYMBOL PELASTON NEO" #x1D04D)
- ("BYZANTINE MUSICAL SYMBOL KENTIMATA NEO ANO" #x1D04E)
- ("BYZANTINE MUSICAL SYMBOL KENTIMA NEO ANO" #x1D04F)
- ("BYZANTINE MUSICAL SYMBOL YPSILI" #x1D050)
- ("BYZANTINE MUSICAL SYMBOL APOSTROFOS NEO" #x1D051)
- ("BYZANTINE MUSICAL SYMBOL APOSTROFOI SYNDESMOS NEO" #x1D052)
- ("BYZANTINE MUSICAL SYMBOL YPORROI" #x1D053)
- ("BYZANTINE MUSICAL SYMBOL KRATIMOYPORROON" #x1D054)
- ("BYZANTINE MUSICAL SYMBOL ELAFRON" #x1D055)
- ("BYZANTINE MUSICAL SYMBOL CHAMILI" #x1D056)
- ("BYZANTINE MUSICAL SYMBOL MIKRON ISON" #x1D057)
- ("BYZANTINE MUSICAL SYMBOL VAREIA NEO" #x1D058)
- ("BYZANTINE MUSICAL SYMBOL PIASMA NEO" #x1D059)
- ("BYZANTINE MUSICAL SYMBOL PSIFISTON NEO" #x1D05A)
- ("BYZANTINE MUSICAL SYMBOL OMALON" #x1D05B)
- ("BYZANTINE MUSICAL SYMBOL ANTIKENOMA" #x1D05C)
- ("BYZANTINE MUSICAL SYMBOL LYGISMA" #x1D05D)
- ("BYZANTINE MUSICAL SYMBOL PARAKLITIKI NEO" #x1D05E)
- ("BYZANTINE MUSICAL SYMBOL PARAKALESMA NEO" #x1D05F)
- ("BYZANTINE MUSICAL SYMBOL ETERON PARAKALESMA" #x1D060)
- ("BYZANTINE MUSICAL SYMBOL KYLISMA" #x1D061)
- ("BYZANTINE MUSICAL SYMBOL ANTIKENOKYLISMA" #x1D062)
- ("BYZANTINE MUSICAL SYMBOL TROMIKON NEO" #x1D063)
- ("BYZANTINE MUSICAL SYMBOL EKSTREPTON" #x1D064)
- ("BYZANTINE MUSICAL SYMBOL SYNAGMA NEO" #x1D065)
- ("BYZANTINE MUSICAL SYMBOL SYRMA" #x1D066)
- ("BYZANTINE MUSICAL SYMBOL CHOREVMA NEO" #x1D067)
- ("BYZANTINE MUSICAL SYMBOL EPEGERMA" #x1D068)
- ("BYZANTINE MUSICAL SYMBOL SEISMA NEO" #x1D069)
- ("BYZANTINE MUSICAL SYMBOL XIRON KLASMA" #x1D06A)
- ("BYZANTINE MUSICAL SYMBOL TROMIKOPSIFISTON" #x1D06B)
- ("BYZANTINE MUSICAL SYMBOL PSIFISTOLYGISMA" #x1D06C)
- ("BYZANTINE MUSICAL SYMBOL TROMIKOLYGISMA" #x1D06D)
- ("BYZANTINE MUSICAL SYMBOL TROMIKOPARAKALESMA" #x1D06E)
- ("BYZANTINE MUSICAL SYMBOL PSIFISTOPARAKALESMA" #x1D06F)
- ("BYZANTINE MUSICAL SYMBOL TROMIKOSYNAGMA" #x1D070)
- ("BYZANTINE MUSICAL SYMBOL PSIFISTOSYNAGMA" #x1D071)
- ("BYZANTINE MUSICAL SYMBOL GORGOSYNTHETON" #x1D072)
- ("BYZANTINE MUSICAL SYMBOL ARGOSYNTHETON" #x1D073)
- ("BYZANTINE MUSICAL SYMBOL ETERON ARGOSYNTHETON" #x1D074)
- ("BYZANTINE MUSICAL SYMBOL OYRANISMA NEO" #x1D075)
- ("BYZANTINE MUSICAL SYMBOL THEMATISMOS ESO" #x1D076)
- ("BYZANTINE MUSICAL SYMBOL THEMATISMOS EXO" #x1D077)
- ("BYZANTINE MUSICAL SYMBOL THEMA APLOUN" #x1D078)
- ("BYZANTINE MUSICAL SYMBOL THES KAI APOTHES" #x1D079)
- ("BYZANTINE MUSICAL SYMBOL KATAVASMA" #x1D07A)
- ("BYZANTINE MUSICAL SYMBOL ENDOFONON" #x1D07B)
- ("BYZANTINE MUSICAL SYMBOL YFEN KATO" #x1D07C)
- ("BYZANTINE MUSICAL SYMBOL YFEN ANO" #x1D07D)
- ("BYZANTINE MUSICAL SYMBOL STAVROS" #x1D07E)
- ("BYZANTINE MUSICAL SYMBOL KLASMA ANO" #x1D07F)
- ("BYZANTINE MUSICAL SYMBOL DIPLI ARCHAION" #x1D080)
- ("BYZANTINE MUSICAL SYMBOL KRATIMA ARCHAION" #x1D081)
- ("BYZANTINE MUSICAL SYMBOL KRATIMA ALLO" #x1D082)
- ("BYZANTINE MUSICAL SYMBOL KRATIMA NEO" #x1D083)
- ("BYZANTINE MUSICAL SYMBOL APODERMA NEO" #x1D084)
- ("BYZANTINE MUSICAL SYMBOL APLI" #x1D085)
- ("BYZANTINE MUSICAL SYMBOL DIPLI" #x1D086)
- ("BYZANTINE MUSICAL SYMBOL TRIPLI" #x1D087)
- ("BYZANTINE MUSICAL SYMBOL TETRAPLI" #x1D088)
- ("BYZANTINE MUSICAL SYMBOL KORONIS" #x1D089)
- ("BYZANTINE MUSICAL SYMBOL LEIMMA ENOS CHRONOU" #x1D08A)
- ("BYZANTINE MUSICAL SYMBOL LEIMMA DYO CHRONON" #x1D08B)
- ("BYZANTINE MUSICAL SYMBOL LEIMMA TRION CHRONON" #x1D08C)
- ("BYZANTINE MUSICAL SYMBOL LEIMMA TESSARON CHRONON" #x1D08D)
- ("BYZANTINE MUSICAL SYMBOL LEIMMA IMISEOS CHRONOU" #x1D08E)
- ("BYZANTINE MUSICAL SYMBOL GORGON NEO ANO" #x1D08F)
- ("BYZANTINE MUSICAL SYMBOL GORGON PARESTIGMENON ARISTERA" #x1D090)
- ("BYZANTINE MUSICAL SYMBOL GORGON PARESTIGMENON DEXIA" #x1D091)
- ("BYZANTINE MUSICAL SYMBOL DIGORGON" #x1D092)
- ("BYZANTINE MUSICAL SYMBOL DIGORGON PARESTIGMENON ARISTERA KATO" #x1D093)
- ("BYZANTINE MUSICAL SYMBOL DIGORGON PARESTIGMENON ARISTERA ANO" #x1D094)
- ("BYZANTINE MUSICAL SYMBOL DIGORGON PARESTIGMENON DEXIA" #x1D095)
- ("BYZANTINE MUSICAL SYMBOL TRIGORGON" #x1D096)
- ("BYZANTINE MUSICAL SYMBOL ARGON" #x1D097)
- ("BYZANTINE MUSICAL SYMBOL IMIDIARGON" #x1D098)
- ("BYZANTINE MUSICAL SYMBOL DIARGON" #x1D099)
- ("BYZANTINE MUSICAL SYMBOL AGOGI POLI ARGI" #x1D09A)
- ("BYZANTINE MUSICAL SYMBOL AGOGI ARGOTERI" #x1D09B)
- ("BYZANTINE MUSICAL SYMBOL AGOGI ARGI" #x1D09C)
- ("BYZANTINE MUSICAL SYMBOL AGOGI METRIA" #x1D09D)
- ("BYZANTINE MUSICAL SYMBOL AGOGI MESI" #x1D09E)
- ("BYZANTINE MUSICAL SYMBOL AGOGI GORGI" #x1D09F)
- ("BYZANTINE MUSICAL SYMBOL AGOGI GORGOTERI" #x1D0A0)
- ("BYZANTINE MUSICAL SYMBOL AGOGI POLI GORGI" #x1D0A1)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA PROTOS ICHOS" #x1D0A2)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA ALLI PROTOS ICHOS" #x1D0A3)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA DEYTEROS ICHOS" #x1D0A4)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA ALLI DEYTEROS ICHOS" #x1D0A5)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA TRITOS ICHOS" #x1D0A6)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA TRIFONIAS" #x1D0A7)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA TETARTOS ICHOS" #x1D0A8)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA TETARTOS LEGETOS ICHOS" #x1D0A9)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA LEGETOS ICHOS" #x1D0AA)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA PLAGIOS ICHOS" #x1D0AB)
- ("BYZANTINE MUSICAL SYMBOL ISAKIA TELOUS ICHIMATOS" #x1D0AC)
- ("BYZANTINE MUSICAL SYMBOL APOSTROFOI TELOUS ICHIMATOS" #x1D0AD)
- ("BYZANTINE MUSICAL SYMBOL FANEROSIS TETRAFONIAS" #x1D0AE)
- ("BYZANTINE MUSICAL SYMBOL FANEROSIS MONOFONIAS" #x1D0AF)
- ("BYZANTINE MUSICAL SYMBOL FANEROSIS DIFONIAS" #x1D0B0)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA VARYS ICHOS" #x1D0B1)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA PROTOVARYS ICHOS" #x1D0B2)
- ("BYZANTINE MUSICAL SYMBOL MARTYRIA PLAGIOS TETARTOS ICHOS" #x1D0B3)
- ("BYZANTINE MUSICAL SYMBOL GORTHMIKON N APLOUN" #x1D0B4)
- ("BYZANTINE MUSICAL SYMBOL GORTHMIKON N DIPLOUN" #x1D0B5)
- ("BYZANTINE MUSICAL SYMBOL ENARXIS KAI FTHORA VOU" #x1D0B6)
- ("BYZANTINE MUSICAL SYMBOL IMIFONON" #x1D0B7)
- ("BYZANTINE MUSICAL SYMBOL IMIFTHORON" #x1D0B8)
- ("BYZANTINE MUSICAL SYMBOL FTHORA ARCHAION DEYTEROU ICHOU" #x1D0B9)
- ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI PA" #x1D0BA)
- ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI NANA" #x1D0BB)
- ("BYZANTINE MUSICAL SYMBOL FTHORA NAOS ICHOS" #x1D0BC)
- ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI DI" #x1D0BD)
- ("BYZANTINE MUSICAL SYMBOL FTHORA SKLIRON DIATONON DI" #x1D0BE)
- ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI KE" #x1D0BF)
- ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI ZO" #x1D0C0)
- ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI NI KATO" #x1D0C1)
- ("BYZANTINE MUSICAL SYMBOL FTHORA DIATONIKI NI ANO" #x1D0C2)
- ("BYZANTINE MUSICAL SYMBOL FTHORA MALAKON CHROMA DIFONIAS" #x1D0C3)
- ("BYZANTINE MUSICAL SYMBOL FTHORA MALAKON CHROMA MONOFONIAS" #x1D0C4)
- ("BYZANTINE MUSICAL SYMBOL FHTORA SKLIRON CHROMA VASIS" #x1D0C5)
- ("BYZANTINE MUSICAL SYMBOL FTHORA SKLIRON CHROMA SYNAFI" #x1D0C6)
- ("BYZANTINE MUSICAL SYMBOL FTHORA NENANO" #x1D0C7)
- ("BYZANTINE MUSICAL SYMBOL CHROA ZYGOS" #x1D0C8)
- ("BYZANTINE MUSICAL SYMBOL CHROA KLITON" #x1D0C9)
- ("BYZANTINE MUSICAL SYMBOL CHROA SPATHI" #x1D0CA)
- ("BYZANTINE MUSICAL SYMBOL FTHORA I YFESIS TETARTIMORION" #x1D0CB)
- ("BYZANTINE MUSICAL SYMBOL FTHORA ENARMONIOS ANTIFONIA" #x1D0CC)
- ("BYZANTINE MUSICAL SYMBOL YFESIS TRITIMORION" #x1D0CD)
- ("BYZANTINE MUSICAL SYMBOL DIESIS TRITIMORION" #x1D0CE)
- ("BYZANTINE MUSICAL SYMBOL DIESIS TETARTIMORION" #x1D0CF)
- ("BYZANTINE MUSICAL SYMBOL DIESIS APLI DYO DODEKATA" #x1D0D0)
- ("BYZANTINE MUSICAL SYMBOL DIESIS MONOGRAMMOS TESSERA DODEKATA" #x1D0D1)
- ("BYZANTINE MUSICAL SYMBOL DIESIS DIGRAMMOS EX DODEKATA" #x1D0D2)
- ("BYZANTINE MUSICAL SYMBOL DIESIS TRIGRAMMOS OKTO DODEKATA" #x1D0D3)
- ("BYZANTINE MUSICAL SYMBOL YFESIS APLI DYO DODEKATA" #x1D0D4)
- ("BYZANTINE MUSICAL SYMBOL YFESIS MONOGRAMMOS TESSERA DODEKATA" #x1D0D5)
- ("BYZANTINE MUSICAL SYMBOL YFESIS DIGRAMMOS EX DODEKATA" #x1D0D6)
- ("BYZANTINE MUSICAL SYMBOL YFESIS TRIGRAMMOS OKTO DODEKATA" #x1D0D7)
- ("BYZANTINE MUSICAL SYMBOL GENIKI DIESIS" #x1D0D8)
- ("BYZANTINE MUSICAL SYMBOL GENIKI YFESIS" #x1D0D9)
- ("BYZANTINE MUSICAL SYMBOL DIASTOLI APLI MIKRI" #x1D0DA)
- ("BYZANTINE MUSICAL SYMBOL DIASTOLI APLI MEGALI" #x1D0DB)
- ("BYZANTINE MUSICAL SYMBOL DIASTOLI DIPLI" #x1D0DC)
- ("BYZANTINE MUSICAL SYMBOL DIASTOLI THESEOS" #x1D0DD)
- ("BYZANTINE MUSICAL SYMBOL SIMANSIS THESEOS" #x1D0DE)
- ("BYZANTINE MUSICAL SYMBOL SIMANSIS THESEOS DISIMOU" #x1D0DF)
- ("BYZANTINE MUSICAL SYMBOL SIMANSIS THESEOS TRISIMOU" #x1D0E0)
- ("BYZANTINE MUSICAL SYMBOL SIMANSIS THESEOS TETRASIMOU" #x1D0E1)
- ("BYZANTINE MUSICAL SYMBOL SIMANSIS ARSEOS" #x1D0E2)
- ("BYZANTINE MUSICAL SYMBOL SIMANSIS ARSEOS DISIMOU" #x1D0E3)
- ("BYZANTINE MUSICAL SYMBOL SIMANSIS ARSEOS TRISIMOU" #x1D0E4)
- ("BYZANTINE MUSICAL SYMBOL SIMANSIS ARSEOS TETRASIMOU" #x1D0E5)
- ("BYZANTINE MUSICAL SYMBOL DIGRAMMA GG" #x1D0E6)
- ("BYZANTINE MUSICAL SYMBOL DIFTOGGOS OU" #x1D0E7)
- ("BYZANTINE MUSICAL SYMBOL STIGMA" #x1D0E8)
- ("BYZANTINE MUSICAL SYMBOL ARKTIKO PA" #x1D0E9)
- ("BYZANTINE MUSICAL SYMBOL ARKTIKO VOU" #x1D0EA)
- ("BYZANTINE MUSICAL SYMBOL ARKTIKO GA" #x1D0EB)
- ("BYZANTINE MUSICAL SYMBOL ARKTIKO DI" #x1D0EC)
- ("BYZANTINE MUSICAL SYMBOL ARKTIKO KE" #x1D0ED)
- ("BYZANTINE MUSICAL SYMBOL ARKTIKO ZO" #x1D0EE)
- ("BYZANTINE MUSICAL SYMBOL ARKTIKO NI" #x1D0EF)
- ("BYZANTINE MUSICAL SYMBOL KENTIMATA NEO MESO" #x1D0F0)
- ("BYZANTINE MUSICAL SYMBOL KENTIMA NEO MESO" #x1D0F1)
- ("BYZANTINE MUSICAL SYMBOL KENTIMATA NEO KATO" #x1D0F2)
- ("BYZANTINE MUSICAL SYMBOL KENTIMA NEO KATO" #x1D0F3)
- ("BYZANTINE MUSICAL SYMBOL KLASMA KATO" #x1D0F4)
- ("BYZANTINE MUSICAL SYMBOL GORGON NEO KATO" #x1D0F5)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'musical-symbols
- '(("MUSICAL SYMBOL SINGLE BARLINE" #x1D100)
- ("MUSICAL SYMBOL DOUBLE BARLINE" #x1D101)
- ("MUSICAL SYMBOL FINAL BARLINE" #x1D102)
- ("MUSICAL SYMBOL REVERSE FINAL BARLINE" #x1D103)
- ("MUSICAL SYMBOL DASHED BARLINE" #x1D104)
- ("MUSICAL SYMBOL SHORT BARLINE" #x1D105)
- ("MUSICAL SYMBOL LEFT REPEAT SIGN" #x1D106)
- ("MUSICAL SYMBOL RIGHT REPEAT SIGN" #x1D107)
- ("MUSICAL SYMBOL REPEAT DOTS" #x1D108)
- ("MUSICAL SYMBOL DAL SEGNO" #x1D109)
- ("MUSICAL SYMBOL DA CAPO" #x1D10A)
- ("MUSICAL SYMBOL SEGNO" #x1D10B)
- ("MUSICAL SYMBOL CODA" #x1D10C)
- ("MUSICAL SYMBOL REPEATED FIGURE-1" #x1D10D)
- ("MUSICAL SYMBOL REPEATED FIGURE-2" #x1D10E)
- ("MUSICAL SYMBOL REPEATED FIGURE-3" #x1D10F)
- ("MUSICAL SYMBOL FERMATA" #x1D110)
- ("MUSICAL SYMBOL FERMATA BELOW" #x1D111)
- ("MUSICAL SYMBOL BREATH MARK" #x1D112)
- ("MUSICAL SYMBOL CAESURA" #x1D113)
- ("MUSICAL SYMBOL BRACE" #x1D114)
- ("MUSICAL SYMBOL BRACKET" #x1D115)
- ("MUSICAL SYMBOL ONE-LINE STAFF" #x1D116)
- ("MUSICAL SYMBOL TWO-LINE STAFF" #x1D117)
- ("MUSICAL SYMBOL THREE-LINE STAFF" #x1D118)
- ("MUSICAL SYMBOL FOUR-LINE STAFF" #x1D119)
- ("MUSICAL SYMBOL FIVE-LINE STAFF" #x1D11A)
- ("MUSICAL SYMBOL SIX-LINE STAFF" #x1D11B)
- ("MUSICAL SYMBOL SIX-STRING FRETBOARD" #x1D11C)
- ("MUSICAL SYMBOL FOUR-STRING FRETBOARD" #x1D11D)
- ("MUSICAL SYMBOL G CLEF" #x1D11E)
- ("MUSICAL SYMBOL G CLEF OTTAVA ALTA" #x1D11F)
- ("MUSICAL SYMBOL G CLEF OTTAVA BASSA" #x1D120)
- ("MUSICAL SYMBOL C CLEF" #x1D121)
- ("MUSICAL SYMBOL F CLEF" #x1D122)
- ("MUSICAL SYMBOL F CLEF OTTAVA ALTA" #x1D123)
- ("MUSICAL SYMBOL F CLEF OTTAVA BASSA" #x1D124)
- ("MUSICAL SYMBOL DRUM CLEF-1" #x1D125)
- ("MUSICAL SYMBOL DRUM CLEF-2" #x1D126)
- ("MUSICAL SYMBOL DOUBLE SHARP" #x1D12A)
- ("MUSICAL SYMBOL DOUBLE FLAT" #x1D12B)
- ("MUSICAL SYMBOL FLAT UP" #x1D12C)
- ("MUSICAL SYMBOL FLAT DOWN" #x1D12D)
- ("MUSICAL SYMBOL NATURAL UP" #x1D12E)
- ("MUSICAL SYMBOL NATURAL DOWN" #x1D12F)
- ("MUSICAL SYMBOL SHARP UP" #x1D130)
- ("MUSICAL SYMBOL SHARP DOWN" #x1D131)
- ("MUSICAL SYMBOL QUARTER TONE SHARP" #x1D132)
- ("MUSICAL SYMBOL QUARTER TONE FLAT" #x1D133)
- ("MUSICAL SYMBOL COMMON TIME" #x1D134)
- ("MUSICAL SYMBOL CUT TIME" #x1D135)
- ("MUSICAL SYMBOL OTTAVA ALTA" #x1D136)
- ("MUSICAL SYMBOL OTTAVA BASSA" #x1D137)
- ("MUSICAL SYMBOL QUINDICESIMA ALTA" #x1D138)
- ("MUSICAL SYMBOL QUINDICESIMA BASSA" #x1D139)
- ("MUSICAL SYMBOL MULTI REST" #x1D13A)
- ("MUSICAL SYMBOL WHOLE REST" #x1D13B)
- ("MUSICAL SYMBOL HALF REST" #x1D13C)
- ("MUSICAL SYMBOL QUARTER REST" #x1D13D)
- ("MUSICAL SYMBOL EIGHTH REST" #x1D13E)
- ("MUSICAL SYMBOL SIXTEENTH REST" #x1D13F)
- ("MUSICAL SYMBOL THIRTY-SECOND REST" #x1D140)
- ("MUSICAL SYMBOL SIXTY-FOURTH REST" #x1D141)
- ("MUSICAL SYMBOL ONE HUNDRED TWENTY-EIGHTH REST" #x1D142)
- ("MUSICAL SYMBOL X NOTEHEAD" #x1D143)
- ("MUSICAL SYMBOL PLUS NOTEHEAD" #x1D144)
- ("MUSICAL SYMBOL CIRCLE X NOTEHEAD" #x1D145)
- ("MUSICAL SYMBOL SQUARE NOTEHEAD WHITE" #x1D146)
- ("MUSICAL SYMBOL SQUARE NOTEHEAD BLACK" #x1D147)
- ("MUSICAL SYMBOL TRIANGLE NOTEHEAD UP WHITE" #x1D148)
- ("MUSICAL SYMBOL TRIANGLE NOTEHEAD UP BLACK" #x1D149)
- ("MUSICAL SYMBOL TRIANGLE NOTEHEAD LEFT WHITE" #x1D14A)
- ("MUSICAL SYMBOL TRIANGLE NOTEHEAD LEFT BLACK" #x1D14B)
- ("MUSICAL SYMBOL TRIANGLE NOTEHEAD RIGHT WHITE" #x1D14C)
- ("MUSICAL SYMBOL TRIANGLE NOTEHEAD RIGHT BLACK" #x1D14D)
- ("MUSICAL SYMBOL TRIANGLE NOTEHEAD DOWN WHITE" #x1D14E)
- ("MUSICAL SYMBOL TRIANGLE NOTEHEAD DOWN BLACK" #x1D14F)
- ("MUSICAL SYMBOL TRIANGLE NOTEHEAD UP RIGHT WHITE" #x1D150)
- ("MUSICAL SYMBOL TRIANGLE NOTEHEAD UP RIGHT BLACK" #x1D151)
- ("MUSICAL SYMBOL MOON NOTEHEAD WHITE" #x1D152)
- ("MUSICAL SYMBOL MOON NOTEHEAD BLACK" #x1D153)
- ("MUSICAL SYMBOL TRIANGLE-ROUND NOTEHEAD DOWN WHITE" #x1D154)
- ("MUSICAL SYMBOL TRIANGLE-ROUND NOTEHEAD DOWN BLACK" #x1D155)
- ("MUSICAL SYMBOL PARENTHESIS NOTEHEAD" #x1D156)
- ("MUSICAL SYMBOL VOID NOTEHEAD" #x1D157)
- ("MUSICAL SYMBOL NOTEHEAD BLACK" #x1D158)
- ("MUSICAL SYMBOL NULL NOTEHEAD" #x1D159)
- ("MUSICAL SYMBOL CLUSTER NOTEHEAD WHITE" #x1D15A)
- ("MUSICAL SYMBOL CLUSTER NOTEHEAD BLACK" #x1D15B)
- ("MUSICAL SYMBOL BREVE" #x1D15C)
- ("MUSICAL SYMBOL WHOLE NOTE" #x1D15D)
- ("MUSICAL SYMBOL HALF NOTE" #x1D15E)
- ("MUSICAL SYMBOL QUARTER NOTE" #x1D15F)
- ("MUSICAL SYMBOL EIGHTH NOTE" #x1D160)
- ("MUSICAL SYMBOL SIXTEENTH NOTE" #x1D161)
- ("MUSICAL SYMBOL THIRTY-SECOND NOTE" #x1D162)
- ("MUSICAL SYMBOL SIXTY-FOURTH NOTE" #x1D163)
- ("MUSICAL SYMBOL ONE HUNDRED TWENTY-EIGHTH NOTE" #x1D164)
- ("MUSICAL SYMBOL COMBINING STEM" #x1D165)
- ("MUSICAL SYMBOL COMBINING SPRECHGESANG STEM" #x1D166)
- ("MUSICAL SYMBOL COMBINING TREMOLO-1" #x1D167)
- ("MUSICAL SYMBOL COMBINING TREMOLO-2" #x1D168)
- ("MUSICAL SYMBOL COMBINING TREMOLO-3" #x1D169)
- ("MUSICAL SYMBOL FINGERED TREMOLO-1" #x1D16A)
- ("MUSICAL SYMBOL FINGERED TREMOLO-2" #x1D16B)
- ("MUSICAL SYMBOL FINGERED TREMOLO-3" #x1D16C)
- ("MUSICAL SYMBOL COMBINING AUGMENTATION DOT" #x1D16D)
- ("MUSICAL SYMBOL COMBINING FLAG-1" #x1D16E)
- ("MUSICAL SYMBOL COMBINING FLAG-2" #x1D16F)
- ("MUSICAL SYMBOL COMBINING FLAG-3" #x1D170)
- ("MUSICAL SYMBOL COMBINING FLAG-4" #x1D171)
- ("MUSICAL SYMBOL COMBINING FLAG-5" #x1D172)
- ("MUSICAL SYMBOL BEGIN BEAM" #x1D173)
- ("MUSICAL SYMBOL END BEAM" #x1D174)
- ("MUSICAL SYMBOL BEGIN TIE" #x1D175)
- ("MUSICAL SYMBOL END TIE" #x1D176)
- ("MUSICAL SYMBOL BEGIN SLUR" #x1D177)
- ("MUSICAL SYMBOL END SLUR" #x1D178)
- ("MUSICAL SYMBOL BEGIN PHRASE" #x1D179)
- ("MUSICAL SYMBOL END PHRASE" #x1D17A)
- ("MUSICAL SYMBOL COMBINING ACCENT" #x1D17B)
- ("MUSICAL SYMBOL COMBINING STACCATO" #x1D17C)
- ("MUSICAL SYMBOL COMBINING TENUTO" #x1D17D)
- ("MUSICAL SYMBOL COMBINING STACCATISSIMO" #x1D17E)
- ("MUSICAL SYMBOL COMBINING MARCATO" #x1D17F)
- ("MUSICAL SYMBOL COMBINING MARCATO-STACCATO" #x1D180)
- ("MUSICAL SYMBOL COMBINING ACCENT-STACCATO" #x1D181)
- ("MUSICAL SYMBOL COMBINING LOURE" #x1D182)
- ("MUSICAL SYMBOL ARPEGGIATO UP" #x1D183)
- ("MUSICAL SYMBOL ARPEGGIATO DOWN" #x1D184)
- ("MUSICAL SYMBOL COMBINING DOIT" #x1D185)
- ("MUSICAL SYMBOL COMBINING RIP" #x1D186)
- ("MUSICAL SYMBOL COMBINING FLIP" #x1D187)
- ("MUSICAL SYMBOL COMBINING SMEAR" #x1D188)
- ("MUSICAL SYMBOL COMBINING BEND" #x1D189)
- ("MUSICAL SYMBOL COMBINING DOUBLE TONGUE" #x1D18A)
- ("MUSICAL SYMBOL COMBINING TRIPLE TONGUE" #x1D18B)
- ("MUSICAL SYMBOL RINFORZANDO" #x1D18C)
- ("MUSICAL SYMBOL SUBITO" #x1D18D)
- ("MUSICAL SYMBOL Z" #x1D18E)
- ("MUSICAL SYMBOL PIANO" #x1D18F)
- ("MUSICAL SYMBOL MEZZO" #x1D190)
- ("MUSICAL SYMBOL FORTE" #x1D191)
- ("MUSICAL SYMBOL CRESCENDO" #x1D192)
- ("MUSICAL SYMBOL DECRESCENDO" #x1D193)
- ("MUSICAL SYMBOL GRACE NOTE SLASH" #x1D194)
- ("MUSICAL SYMBOL GRACE NOTE NO SLASH" #x1D195)
- ("MUSICAL SYMBOL TR" #x1D196)
- ("MUSICAL SYMBOL TURN" #x1D197)
- ("MUSICAL SYMBOL INVERTED TURN" #x1D198)
- ("MUSICAL SYMBOL TURN SLASH" #x1D199)
- ("MUSICAL SYMBOL TURN UP" #x1D19A)
- ("MUSICAL SYMBOL ORNAMENT STROKE-1" #x1D19B)
- ("MUSICAL SYMBOL ORNAMENT STROKE-2" #x1D19C)
- ("MUSICAL SYMBOL ORNAMENT STROKE-3" #x1D19D)
- ("MUSICAL SYMBOL ORNAMENT STROKE-4" #x1D19E)
- ("MUSICAL SYMBOL ORNAMENT STROKE-5" #x1D19F)
- ("MUSICAL SYMBOL ORNAMENT STROKE-6" #x1D1A0)
- ("MUSICAL SYMBOL ORNAMENT STROKE-7" #x1D1A1)
- ("MUSICAL SYMBOL ORNAMENT STROKE-8" #x1D1A2)
- ("MUSICAL SYMBOL ORNAMENT STROKE-9" #x1D1A3)
- ("MUSICAL SYMBOL ORNAMENT STROKE-10" #x1D1A4)
- ("MUSICAL SYMBOL ORNAMENT STROKE-11" #x1D1A5)
- ("MUSICAL SYMBOL HAUPTSTIMME" #x1D1A6)
- ("MUSICAL SYMBOL NEBENSTIMME" #x1D1A7)
- ("MUSICAL SYMBOL END OF STIMME" #x1D1A8)
- ("MUSICAL SYMBOL DEGREE SLASH" #x1D1A9)
- ("MUSICAL SYMBOL COMBINING DOWN BOW" #x1D1AA)
- ("MUSICAL SYMBOL COMBINING UP BOW" #x1D1AB)
- ("MUSICAL SYMBOL COMBINING HARMONIC" #x1D1AC)
- ("MUSICAL SYMBOL COMBINING SNAP PIZZICATO" #x1D1AD)
- ("MUSICAL SYMBOL PEDAL MARK" #x1D1AE)
- ("MUSICAL SYMBOL PEDAL UP MARK" #x1D1AF)
- ("MUSICAL SYMBOL HALF PEDAL MARK" #x1D1B0)
- ("MUSICAL SYMBOL GLISSANDO UP" #x1D1B1)
- ("MUSICAL SYMBOL GLISSANDO DOWN" #x1D1B2)
- ("MUSICAL SYMBOL WITH FINGERNAILS" #x1D1B3)
- ("MUSICAL SYMBOL DAMP" #x1D1B4)
- ("MUSICAL SYMBOL DAMP ALL" #x1D1B5)
- ("MUSICAL SYMBOL MAXIMA" #x1D1B6)
- ("MUSICAL SYMBOL LONGA" #x1D1B7)
- ("MUSICAL SYMBOL BREVIS" #x1D1B8)
- ("MUSICAL SYMBOL SEMIBREVIS WHITE" #x1D1B9)
- ("MUSICAL SYMBOL SEMIBREVIS BLACK" #x1D1BA)
- ("MUSICAL SYMBOL MINIMA" #x1D1BB)
- ("MUSICAL SYMBOL MINIMA BLACK" #x1D1BC)
- ("MUSICAL SYMBOL SEMIMINIMA WHITE" #x1D1BD)
- ("MUSICAL SYMBOL SEMIMINIMA BLACK" #x1D1BE)
- ("MUSICAL SYMBOL FUSA WHITE" #x1D1BF)
- ("MUSICAL SYMBOL FUSA BLACK" #x1D1C0)
- ("MUSICAL SYMBOL LONGA PERFECTA REST" #x1D1C1)
- ("MUSICAL SYMBOL LONGA IMPERFECTA REST" #x1D1C2)
- ("MUSICAL SYMBOL BREVIS REST" #x1D1C3)
- ("MUSICAL SYMBOL SEMIBREVIS REST" #x1D1C4)
- ("MUSICAL SYMBOL MINIMA REST" #x1D1C5)
- ("MUSICAL SYMBOL SEMIMINIMA REST" #x1D1C6)
- ("MUSICAL SYMBOL TEMPUS PERFECTUM CUM PROLATIONE PERFECTA" #x1D1C7)
- ("MUSICAL SYMBOL TEMPUS PERFECTUM CUM PROLATIONE IMPERFECTA" #x1D1C8)
- ("MUSICAL SYMBOL TEMPUS PERFECTUM CUM PROLATIONE PERFECTA DIMINUTION-1" #x1D1C9)
- ("MUSICAL SYMBOL TEMPUS IMPERFECTUM CUM PROLATIONE PERFECTA" #x1D1CA)
- ("MUSICAL SYMBOL TEMPUS IMPERFECTUM CUM PROLATIONE IMPERFECTA" #x1D1CB)
- ("MUSICAL SYMBOL TEMPUS IMPERFECTUM CUM PROLATIONE IMPERFECTA DIMINUTION-1" #x1D1CC)
- ("MUSICAL SYMBOL TEMPUS IMPERFECTUM CUM PROLATIONE IMPERFECTA DIMINUTION-2" #x1D1CD)
- ("MUSICAL SYMBOL TEMPUS IMPERFECTUM CUM PROLATIONE IMPERFECTA DIMINUTION-3" #x1D1CE)
- ("MUSICAL SYMBOL CROIX" #x1D1CF)
- ("MUSICAL SYMBOL GREGORIAN C CLEF" #x1D1D0)
- ("MUSICAL SYMBOL GREGORIAN F CLEF" #x1D1D1)
- ("MUSICAL SYMBOL SQUARE B" #x1D1D2)
- ("MUSICAL SYMBOL VIRGA" #x1D1D3)
- ("MUSICAL SYMBOL PODATUS" #x1D1D4)
- ("MUSICAL SYMBOL CLIVIS" #x1D1D5)
- ("MUSICAL SYMBOL SCANDICUS" #x1D1D6)
- ("MUSICAL SYMBOL CLIMACUS" #x1D1D7)
- ("MUSICAL SYMBOL TORCULUS" #x1D1D8)
- ("MUSICAL SYMBOL PORRECTUS" #x1D1D9)
- ("MUSICAL SYMBOL PORRECTUS FLEXUS" #x1D1DA)
- ("MUSICAL SYMBOL SCANDICUS FLEXUS" #x1D1DB)
- ("MUSICAL SYMBOL TORCULUS RESUPINUS" #x1D1DC)
- ("MUSICAL SYMBOL PES SUBPUNCTIS" #x1D1DD)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'mathematical-alphanumeric-symbols
- '(("MATHEMATICAL BOLD CAPITAL A" #x1D400)
- ("MATHEMATICAL BOLD CAPITAL B" #x1D401)
- ("MATHEMATICAL BOLD CAPITAL C" #x1D402)
- ("MATHEMATICAL BOLD CAPITAL D" #x1D403)
- ("MATHEMATICAL BOLD CAPITAL E" #x1D404)
- ("MATHEMATICAL BOLD CAPITAL F" #x1D405)
- ("MATHEMATICAL BOLD CAPITAL G" #x1D406)
- ("MATHEMATICAL BOLD CAPITAL H" #x1D407)
- ("MATHEMATICAL BOLD CAPITAL I" #x1D408)
- ("MATHEMATICAL BOLD CAPITAL J" #x1D409)
- ("MATHEMATICAL BOLD CAPITAL K" #x1D40A)
- ("MATHEMATICAL BOLD CAPITAL L" #x1D40B)
- ("MATHEMATICAL BOLD CAPITAL M" #x1D40C)
- ("MATHEMATICAL BOLD CAPITAL N" #x1D40D)
- ("MATHEMATICAL BOLD CAPITAL O" #x1D40E)
- ("MATHEMATICAL BOLD CAPITAL P" #x1D40F)
- ("MATHEMATICAL BOLD CAPITAL Q" #x1D410)
- ("MATHEMATICAL BOLD CAPITAL R" #x1D411)
- ("MATHEMATICAL BOLD CAPITAL S" #x1D412)
- ("MATHEMATICAL BOLD CAPITAL T" #x1D413)
- ("MATHEMATICAL BOLD CAPITAL U" #x1D414)
- ("MATHEMATICAL BOLD CAPITAL V" #x1D415)
- ("MATHEMATICAL BOLD CAPITAL W" #x1D416)
- ("MATHEMATICAL BOLD CAPITAL X" #x1D417)
- ("MATHEMATICAL BOLD CAPITAL Y" #x1D418)
- ("MATHEMATICAL BOLD CAPITAL Z" #x1D419)
- ("MATHEMATICAL BOLD SMALL A" #x1D41A)
- ("MATHEMATICAL BOLD SMALL B" #x1D41B)
- ("MATHEMATICAL BOLD SMALL C" #x1D41C)
- ("MATHEMATICAL BOLD SMALL D" #x1D41D)
- ("MATHEMATICAL BOLD SMALL E" #x1D41E)
- ("MATHEMATICAL BOLD SMALL F" #x1D41F)
- ("MATHEMATICAL BOLD SMALL G" #x1D420)
- ("MATHEMATICAL BOLD SMALL H" #x1D421)
- ("MATHEMATICAL BOLD SMALL I" #x1D422)
- ("MATHEMATICAL BOLD SMALL J" #x1D423)
- ("MATHEMATICAL BOLD SMALL K" #x1D424)
- ("MATHEMATICAL BOLD SMALL L" #x1D425)
- ("MATHEMATICAL BOLD SMALL M" #x1D426)
- ("MATHEMATICAL BOLD SMALL N" #x1D427)
- ("MATHEMATICAL BOLD SMALL O" #x1D428)
- ("MATHEMATICAL BOLD SMALL P" #x1D429)
- ("MATHEMATICAL BOLD SMALL Q" #x1D42A)
- ("MATHEMATICAL BOLD SMALL R" #x1D42B)
- ("MATHEMATICAL BOLD SMALL S" #x1D42C)
- ("MATHEMATICAL BOLD SMALL T" #x1D42D)
- ("MATHEMATICAL BOLD SMALL U" #x1D42E)
- ("MATHEMATICAL BOLD SMALL V" #x1D42F)
- ("MATHEMATICAL BOLD SMALL W" #x1D430)
- ("MATHEMATICAL BOLD SMALL X" #x1D431)
- ("MATHEMATICAL BOLD SMALL Y" #x1D432)
- ("MATHEMATICAL BOLD SMALL Z" #x1D433)
- ("MATHEMATICAL ITALIC CAPITAL A" #x1D434)
- ("MATHEMATICAL ITALIC CAPITAL B" #x1D435)
- ("MATHEMATICAL ITALIC CAPITAL C" #x1D436)
- ("MATHEMATICAL ITALIC CAPITAL D" #x1D437)
- ("MATHEMATICAL ITALIC CAPITAL E" #x1D438)
- ("MATHEMATICAL ITALIC CAPITAL F" #x1D439)
- ("MATHEMATICAL ITALIC CAPITAL G" #x1D43A)
- ("MATHEMATICAL ITALIC CAPITAL H" #x1D43B)
- ("MATHEMATICAL ITALIC CAPITAL I" #x1D43C)
- ("MATHEMATICAL ITALIC CAPITAL J" #x1D43D)
- ("MATHEMATICAL ITALIC CAPITAL K" #x1D43E)
- ("MATHEMATICAL ITALIC CAPITAL L" #x1D43F)
- ("MATHEMATICAL ITALIC CAPITAL M" #x1D440)
- ("MATHEMATICAL ITALIC CAPITAL N" #x1D441)
- ("MATHEMATICAL ITALIC CAPITAL O" #x1D442)
- ("MATHEMATICAL ITALIC CAPITAL P" #x1D443)
- ("MATHEMATICAL ITALIC CAPITAL Q" #x1D444)
- ("MATHEMATICAL ITALIC CAPITAL R" #x1D445)
- ("MATHEMATICAL ITALIC CAPITAL S" #x1D446)
- ("MATHEMATICAL ITALIC CAPITAL T" #x1D447)
- ("MATHEMATICAL ITALIC CAPITAL U" #x1D448)
- ("MATHEMATICAL ITALIC CAPITAL V" #x1D449)
- ("MATHEMATICAL ITALIC CAPITAL W" #x1D44A)
- ("MATHEMATICAL ITALIC CAPITAL X" #x1D44B)
- ("MATHEMATICAL ITALIC CAPITAL Y" #x1D44C)
- ("MATHEMATICAL ITALIC CAPITAL Z" #x1D44D)
- ("MATHEMATICAL ITALIC SMALL A" #x1D44E)
- ("MATHEMATICAL ITALIC SMALL B" #x1D44F)
- ("MATHEMATICAL ITALIC SMALL C" #x1D450)
- ("MATHEMATICAL ITALIC SMALL D" #x1D451)
- ("MATHEMATICAL ITALIC SMALL E" #x1D452)
- ("MATHEMATICAL ITALIC SMALL F" #x1D453)
- ("MATHEMATICAL ITALIC SMALL G" #x1D454)
- ("MATHEMATICAL ITALIC SMALL I" #x1D456)
- ("MATHEMATICAL ITALIC SMALL J" #x1D457)
- ("MATHEMATICAL ITALIC SMALL K" #x1D458)
- ("MATHEMATICAL ITALIC SMALL L" #x1D459)
- ("MATHEMATICAL ITALIC SMALL M" #x1D45A)
- ("MATHEMATICAL ITALIC SMALL N" #x1D45B)
- ("MATHEMATICAL ITALIC SMALL O" #x1D45C)
- ("MATHEMATICAL ITALIC SMALL P" #x1D45D)
- ("MATHEMATICAL ITALIC SMALL Q" #x1D45E)
- ("MATHEMATICAL ITALIC SMALL R" #x1D45F)
- ("MATHEMATICAL ITALIC SMALL S" #x1D460)
- ("MATHEMATICAL ITALIC SMALL T" #x1D461)
- ("MATHEMATICAL ITALIC SMALL U" #x1D462)
- ("MATHEMATICAL ITALIC SMALL V" #x1D463)
- ("MATHEMATICAL ITALIC SMALL W" #x1D464)
- ("MATHEMATICAL ITALIC SMALL X" #x1D465)
- ("MATHEMATICAL ITALIC SMALL Y" #x1D466)
- ("MATHEMATICAL ITALIC SMALL Z" #x1D467)
- ("MATHEMATICAL BOLD ITALIC CAPITAL A" #x1D468)
- ("MATHEMATICAL BOLD ITALIC CAPITAL B" #x1D469)
- ("MATHEMATICAL BOLD ITALIC CAPITAL C" #x1D46A)
- ("MATHEMATICAL BOLD ITALIC CAPITAL D" #x1D46B)
- ("MATHEMATICAL BOLD ITALIC CAPITAL E" #x1D46C)
- ("MATHEMATICAL BOLD ITALIC CAPITAL F" #x1D46D)
- ("MATHEMATICAL BOLD ITALIC CAPITAL G" #x1D46E)
- ("MATHEMATICAL BOLD ITALIC CAPITAL H" #x1D46F)
- ("MATHEMATICAL BOLD ITALIC CAPITAL I" #x1D470)
- ("MATHEMATICAL BOLD ITALIC CAPITAL J" #x1D471)
- ("MATHEMATICAL BOLD ITALIC CAPITAL K" #x1D472)
- ("MATHEMATICAL BOLD ITALIC CAPITAL L" #x1D473)
- ("MATHEMATICAL BOLD ITALIC CAPITAL M" #x1D474)
- ("MATHEMATICAL BOLD ITALIC CAPITAL N" #x1D475)
- ("MATHEMATICAL BOLD ITALIC CAPITAL O" #x1D476)
- ("MATHEMATICAL BOLD ITALIC CAPITAL P" #x1D477)
- ("MATHEMATICAL BOLD ITALIC CAPITAL Q" #x1D478)
- ("MATHEMATICAL BOLD ITALIC CAPITAL R" #x1D479)
- ("MATHEMATICAL BOLD ITALIC CAPITAL S" #x1D47A)
- ("MATHEMATICAL BOLD ITALIC CAPITAL T" #x1D47B)
- ("MATHEMATICAL BOLD ITALIC CAPITAL U" #x1D47C)
- ("MATHEMATICAL BOLD ITALIC CAPITAL V" #x1D47D)
- ("MATHEMATICAL BOLD ITALIC CAPITAL W" #x1D47E)
- ("MATHEMATICAL BOLD ITALIC CAPITAL X" #x1D47F)
- ("MATHEMATICAL BOLD ITALIC CAPITAL Y" #x1D480)
- ("MATHEMATICAL BOLD ITALIC CAPITAL Z" #x1D481)
- ("MATHEMATICAL BOLD ITALIC SMALL A" #x1D482)
- ("MATHEMATICAL BOLD ITALIC SMALL B" #x1D483)
- ("MATHEMATICAL BOLD ITALIC SMALL C" #x1D484)
- ("MATHEMATICAL BOLD ITALIC SMALL D" #x1D485)
- ("MATHEMATICAL BOLD ITALIC SMALL E" #x1D486)
- ("MATHEMATICAL BOLD ITALIC SMALL F" #x1D487)
- ("MATHEMATICAL BOLD ITALIC SMALL G" #x1D488)
- ("MATHEMATICAL BOLD ITALIC SMALL H" #x1D489)
- ("MATHEMATICAL BOLD ITALIC SMALL I" #x1D48A)
- ("MATHEMATICAL BOLD ITALIC SMALL J" #x1D48B)
- ("MATHEMATICAL BOLD ITALIC SMALL K" #x1D48C)
- ("MATHEMATICAL BOLD ITALIC SMALL L" #x1D48D)
- ("MATHEMATICAL BOLD ITALIC SMALL M" #x1D48E)
- ("MATHEMATICAL BOLD ITALIC SMALL N" #x1D48F)
- ("MATHEMATICAL BOLD ITALIC SMALL O" #x1D490)
- ("MATHEMATICAL BOLD ITALIC SMALL P" #x1D491)
- ("MATHEMATICAL BOLD ITALIC SMALL Q" #x1D492)
- ("MATHEMATICAL BOLD ITALIC SMALL R" #x1D493)
- ("MATHEMATICAL BOLD ITALIC SMALL S" #x1D494)
- ("MATHEMATICAL BOLD ITALIC SMALL T" #x1D495)
- ("MATHEMATICAL BOLD ITALIC SMALL U" #x1D496)
- ("MATHEMATICAL BOLD ITALIC SMALL V" #x1D497)
- ("MATHEMATICAL BOLD ITALIC SMALL W" #x1D498)
- ("MATHEMATICAL BOLD ITALIC SMALL X" #x1D499)
- ("MATHEMATICAL BOLD ITALIC SMALL Y" #x1D49A)
- ("MATHEMATICAL BOLD ITALIC SMALL Z" #x1D49B)
- ("MATHEMATICAL SCRIPT CAPITAL A" #x1D49C)
- ("MATHEMATICAL SCRIPT CAPITAL C" #x1D49E)
- ("MATHEMATICAL SCRIPT CAPITAL D" #x1D49F)
- ("MATHEMATICAL SCRIPT CAPITAL G" #x1D4A2)
- ("MATHEMATICAL SCRIPT CAPITAL J" #x1D4A5)
- ("MATHEMATICAL SCRIPT CAPITAL K" #x1D4A6)
- ("MATHEMATICAL SCRIPT CAPITAL N" #x1D4A9)
- ("MATHEMATICAL SCRIPT CAPITAL O" #x1D4AA)
- ("MATHEMATICAL SCRIPT CAPITAL P" #x1D4AB)
- ("MATHEMATICAL SCRIPT CAPITAL Q" #x1D4AC)
- ("MATHEMATICAL SCRIPT CAPITAL S" #x1D4AE)
- ("MATHEMATICAL SCRIPT CAPITAL T" #x1D4AF)
- ("MATHEMATICAL SCRIPT CAPITAL U" #x1D4B0)
- ("MATHEMATICAL SCRIPT CAPITAL V" #x1D4B1)
- ("MATHEMATICAL SCRIPT CAPITAL W" #x1D4B2)
- ("MATHEMATICAL SCRIPT CAPITAL X" #x1D4B3)
- ("MATHEMATICAL SCRIPT CAPITAL Y" #x1D4B4)
- ("MATHEMATICAL SCRIPT CAPITAL Z" #x1D4B5)
- ("MATHEMATICAL SCRIPT SMALL A" #x1D4B6)
- ("MATHEMATICAL SCRIPT SMALL B" #x1D4B7)
- ("MATHEMATICAL SCRIPT SMALL C" #x1D4B8)
- ("MATHEMATICAL SCRIPT SMALL D" #x1D4B9)
- ("MATHEMATICAL SCRIPT SMALL F" #x1D4BB)
- ("MATHEMATICAL SCRIPT SMALL H" #x1D4BD)
- ("MATHEMATICAL SCRIPT SMALL I" #x1D4BE)
- ("MATHEMATICAL SCRIPT SMALL J" #x1D4BF)
- ("MATHEMATICAL SCRIPT SMALL K" #x1D4C0)
- ("MATHEMATICAL SCRIPT SMALL M" #x1D4C2)
- ("MATHEMATICAL SCRIPT SMALL N" #x1D4C3)
- ("MATHEMATICAL SCRIPT SMALL P" #x1D4C5)
- ("MATHEMATICAL SCRIPT SMALL Q" #x1D4C6)
- ("MATHEMATICAL SCRIPT SMALL R" #x1D4C7)
- ("MATHEMATICAL SCRIPT SMALL S" #x1D4C8)
- ("MATHEMATICAL SCRIPT SMALL T" #x1D4C9)
- ("MATHEMATICAL SCRIPT SMALL U" #x1D4CA)
- ("MATHEMATICAL SCRIPT SMALL V" #x1D4CB)
- ("MATHEMATICAL SCRIPT SMALL W" #x1D4CC)
- ("MATHEMATICAL SCRIPT SMALL X" #x1D4CD)
- ("MATHEMATICAL SCRIPT SMALL Y" #x1D4CE)
- ("MATHEMATICAL SCRIPT SMALL Z" #x1D4CF)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL A" #x1D4D0)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL B" #x1D4D1)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL C" #x1D4D2)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL D" #x1D4D3)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL E" #x1D4D4)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL F" #x1D4D5)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL G" #x1D4D6)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL H" #x1D4D7)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL I" #x1D4D8)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL J" #x1D4D9)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL K" #x1D4DA)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL L" #x1D4DB)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL M" #x1D4DC)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL N" #x1D4DD)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL O" #x1D4DE)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL P" #x1D4DF)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL Q" #x1D4E0)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL R" #x1D4E1)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL S" #x1D4E2)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL T" #x1D4E3)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL U" #x1D4E4)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL V" #x1D4E5)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL W" #x1D4E6)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL X" #x1D4E7)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL Y" #x1D4E8)
- ("MATHEMATICAL BOLD SCRIPT CAPITAL Z" #x1D4E9)
- ("MATHEMATICAL BOLD SCRIPT SMALL A" #x1D4EA)
- ("MATHEMATICAL BOLD SCRIPT SMALL B" #x1D4EB)
- ("MATHEMATICAL BOLD SCRIPT SMALL C" #x1D4EC)
- ("MATHEMATICAL BOLD SCRIPT SMALL D" #x1D4ED)
- ("MATHEMATICAL BOLD SCRIPT SMALL E" #x1D4EE)
- ("MATHEMATICAL BOLD SCRIPT SMALL F" #x1D4EF)
- ("MATHEMATICAL BOLD SCRIPT SMALL G" #x1D4F0)
- ("MATHEMATICAL BOLD SCRIPT SMALL H" #x1D4F1)
- ("MATHEMATICAL BOLD SCRIPT SMALL I" #x1D4F2)
- ("MATHEMATICAL BOLD SCRIPT SMALL J" #x1D4F3)
- ("MATHEMATICAL BOLD SCRIPT SMALL K" #x1D4F4)
- ("MATHEMATICAL BOLD SCRIPT SMALL L" #x1D4F5)
- ("MATHEMATICAL BOLD SCRIPT SMALL M" #x1D4F6)
- ("MATHEMATICAL BOLD SCRIPT SMALL N" #x1D4F7)
- ("MATHEMATICAL BOLD SCRIPT SMALL O" #x1D4F8)
- ("MATHEMATICAL BOLD SCRIPT SMALL P" #x1D4F9)
- ("MATHEMATICAL BOLD SCRIPT SMALL Q" #x1D4FA)
- ("MATHEMATICAL BOLD SCRIPT SMALL R" #x1D4FB)
- ("MATHEMATICAL BOLD SCRIPT SMALL S" #x1D4FC)
- ("MATHEMATICAL BOLD SCRIPT SMALL T" #x1D4FD)
- ("MATHEMATICAL BOLD SCRIPT SMALL U" #x1D4FE)
- ("MATHEMATICAL BOLD SCRIPT SMALL V" #x1D4FF)
- ("MATHEMATICAL BOLD SCRIPT SMALL W" #x1D500)
- ("MATHEMATICAL BOLD SCRIPT SMALL X" #x1D501)
- ("MATHEMATICAL BOLD SCRIPT SMALL Y" #x1D502)
- ("MATHEMATICAL BOLD SCRIPT SMALL Z" #x1D503)
- ("MATHEMATICAL FRAKTUR CAPITAL A" #x1D504)
- ("MATHEMATICAL FRAKTUR CAPITAL B" #x1D505)
- ("MATHEMATICAL FRAKTUR CAPITAL D" #x1D507)
- ("MATHEMATICAL FRAKTUR CAPITAL E" #x1D508)
- ("MATHEMATICAL FRAKTUR CAPITAL F" #x1D509)
- ("MATHEMATICAL FRAKTUR CAPITAL G" #x1D50A)
- ("MATHEMATICAL FRAKTUR CAPITAL J" #x1D50D)
- ("MATHEMATICAL FRAKTUR CAPITAL K" #x1D50E)
- ("MATHEMATICAL FRAKTUR CAPITAL L" #x1D50F)
- ("MATHEMATICAL FRAKTUR CAPITAL M" #x1D510)
- ("MATHEMATICAL FRAKTUR CAPITAL N" #x1D511)
- ("MATHEMATICAL FRAKTUR CAPITAL O" #x1D512)
- ("MATHEMATICAL FRAKTUR CAPITAL P" #x1D513)
- ("MATHEMATICAL FRAKTUR CAPITAL Q" #x1D514)
- ("MATHEMATICAL FRAKTUR CAPITAL S" #x1D516)
- ("MATHEMATICAL FRAKTUR CAPITAL T" #x1D517)
- ("MATHEMATICAL FRAKTUR CAPITAL U" #x1D518)
- ("MATHEMATICAL FRAKTUR CAPITAL V" #x1D519)
- ("MATHEMATICAL FRAKTUR CAPITAL W" #x1D51A)
- ("MATHEMATICAL FRAKTUR CAPITAL X" #x1D51B)
- ("MATHEMATICAL FRAKTUR CAPITAL Y" #x1D51C)
- ("MATHEMATICAL FRAKTUR SMALL A" #x1D51E)
- ("MATHEMATICAL FRAKTUR SMALL B" #x1D51F)
- ("MATHEMATICAL FRAKTUR SMALL C" #x1D520)
- ("MATHEMATICAL FRAKTUR SMALL D" #x1D521)
- ("MATHEMATICAL FRAKTUR SMALL E" #x1D522)
- ("MATHEMATICAL FRAKTUR SMALL F" #x1D523)
- ("MATHEMATICAL FRAKTUR SMALL G" #x1D524)
- ("MATHEMATICAL FRAKTUR SMALL H" #x1D525)
- ("MATHEMATICAL FRAKTUR SMALL I" #x1D526)
- ("MATHEMATICAL FRAKTUR SMALL J" #x1D527)
- ("MATHEMATICAL FRAKTUR SMALL K" #x1D528)
- ("MATHEMATICAL FRAKTUR SMALL L" #x1D529)
- ("MATHEMATICAL FRAKTUR SMALL M" #x1D52A)
- ("MATHEMATICAL FRAKTUR SMALL N" #x1D52B)
- ("MATHEMATICAL FRAKTUR SMALL O" #x1D52C)
- ("MATHEMATICAL FRAKTUR SMALL P" #x1D52D)
- ("MATHEMATICAL FRAKTUR SMALL Q" #x1D52E)
- ("MATHEMATICAL FRAKTUR SMALL R" #x1D52F)
- ("MATHEMATICAL FRAKTUR SMALL S" #x1D530)
- ("MATHEMATICAL FRAKTUR SMALL T" #x1D531)
- ("MATHEMATICAL FRAKTUR SMALL U" #x1D532)
- ("MATHEMATICAL FRAKTUR SMALL V" #x1D533)
- ("MATHEMATICAL FRAKTUR SMALL W" #x1D534)
- ("MATHEMATICAL FRAKTUR SMALL X" #x1D535)
- ("MATHEMATICAL FRAKTUR SMALL Y" #x1D536)
- ("MATHEMATICAL FRAKTUR SMALL Z" #x1D537)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL A" #x1D538)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL B" #x1D539)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL D" #x1D53B)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL E" #x1D53C)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL F" #x1D53D)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL G" #x1D53E)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL I" #x1D540)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL J" #x1D541)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL K" #x1D542)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL L" #x1D543)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL M" #x1D544)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL O" #x1D546)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL S" #x1D54A)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL T" #x1D54B)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL U" #x1D54C)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL V" #x1D54D)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL W" #x1D54E)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL X" #x1D54F)
- ("MATHEMATICAL DOUBLE-STRUCK CAPITAL Y" #x1D550)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL A" #x1D552)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL B" #x1D553)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL C" #x1D554)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL D" #x1D555)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL E" #x1D556)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL F" #x1D557)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL G" #x1D558)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL H" #x1D559)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL I" #x1D55A)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL J" #x1D55B)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL K" #x1D55C)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL L" #x1D55D)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL M" #x1D55E)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL N" #x1D55F)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL O" #x1D560)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL P" #x1D561)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL Q" #x1D562)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL R" #x1D563)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL S" #x1D564)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL T" #x1D565)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL U" #x1D566)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL V" #x1D567)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL W" #x1D568)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL X" #x1D569)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL Y" #x1D56A)
- ("MATHEMATICAL DOUBLE-STRUCK SMALL Z" #x1D56B)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL A" #x1D56C)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL B" #x1D56D)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL C" #x1D56E)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL D" #x1D56F)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL E" #x1D570)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL F" #x1D571)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL G" #x1D572)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL H" #x1D573)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL I" #x1D574)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL J" #x1D575)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL K" #x1D576)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL L" #x1D577)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL M" #x1D578)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL N" #x1D579)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL O" #x1D57A)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL P" #x1D57B)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL Q" #x1D57C)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL R" #x1D57D)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL S" #x1D57E)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL T" #x1D57F)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL U" #x1D580)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL V" #x1D581)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL W" #x1D582)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL X" #x1D583)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL Y" #x1D584)
- ("MATHEMATICAL BOLD FRAKTUR CAPITAL Z" #x1D585)
- ("MATHEMATICAL BOLD FRAKTUR SMALL A" #x1D586)
- ("MATHEMATICAL BOLD FRAKTUR SMALL B" #x1D587)
- ("MATHEMATICAL BOLD FRAKTUR SMALL C" #x1D588)
- ("MATHEMATICAL BOLD FRAKTUR SMALL D" #x1D589)
- ("MATHEMATICAL BOLD FRAKTUR SMALL E" #x1D58A)
- ("MATHEMATICAL BOLD FRAKTUR SMALL F" #x1D58B)
- ("MATHEMATICAL BOLD FRAKTUR SMALL G" #x1D58C)
- ("MATHEMATICAL BOLD FRAKTUR SMALL H" #x1D58D)
- ("MATHEMATICAL BOLD FRAKTUR SMALL I" #x1D58E)
- ("MATHEMATICAL BOLD FRAKTUR SMALL J" #x1D58F)
- ("MATHEMATICAL BOLD FRAKTUR SMALL K" #x1D590)
- ("MATHEMATICAL BOLD FRAKTUR SMALL L" #x1D591)
- ("MATHEMATICAL BOLD FRAKTUR SMALL M" #x1D592)
- ("MATHEMATICAL BOLD FRAKTUR SMALL N" #x1D593)
- ("MATHEMATICAL BOLD FRAKTUR SMALL O" #x1D594)
- ("MATHEMATICAL BOLD FRAKTUR SMALL P" #x1D595)
- ("MATHEMATICAL BOLD FRAKTUR SMALL Q" #x1D596)
- ("MATHEMATICAL BOLD FRAKTUR SMALL R" #x1D597)
- ("MATHEMATICAL BOLD FRAKTUR SMALL S" #x1D598)
- ("MATHEMATICAL BOLD FRAKTUR SMALL T" #x1D599)
- ("MATHEMATICAL BOLD FRAKTUR SMALL U" #x1D59A)
- ("MATHEMATICAL BOLD FRAKTUR SMALL V" #x1D59B)
- ("MATHEMATICAL BOLD FRAKTUR SMALL W" #x1D59C)
- ("MATHEMATICAL BOLD FRAKTUR SMALL X" #x1D59D)
- ("MATHEMATICAL BOLD FRAKTUR SMALL Y" #x1D59E)
- ("MATHEMATICAL BOLD FRAKTUR SMALL Z" #x1D59F)
- ("MATHEMATICAL SANS-SERIF CAPITAL A" #x1D5A0)
- ("MATHEMATICAL SANS-SERIF CAPITAL B" #x1D5A1)
- ("MATHEMATICAL SANS-SERIF CAPITAL C" #x1D5A2)
- ("MATHEMATICAL SANS-SERIF CAPITAL D" #x1D5A3)
- ("MATHEMATICAL SANS-SERIF CAPITAL E" #x1D5A4)
- ("MATHEMATICAL SANS-SERIF CAPITAL F" #x1D5A5)
- ("MATHEMATICAL SANS-SERIF CAPITAL G" #x1D5A6)
- ("MATHEMATICAL SANS-SERIF CAPITAL H" #x1D5A7)
- ("MATHEMATICAL SANS-SERIF CAPITAL I" #x1D5A8)
- ("MATHEMATICAL SANS-SERIF CAPITAL J" #x1D5A9)
- ("MATHEMATICAL SANS-SERIF CAPITAL K" #x1D5AA)
- ("MATHEMATICAL SANS-SERIF CAPITAL L" #x1D5AB)
- ("MATHEMATICAL SANS-SERIF CAPITAL M" #x1D5AC)
- ("MATHEMATICAL SANS-SERIF CAPITAL N" #x1D5AD)
- ("MATHEMATICAL SANS-SERIF CAPITAL O" #x1D5AE)
- ("MATHEMATICAL SANS-SERIF CAPITAL P" #x1D5AF)
- ("MATHEMATICAL SANS-SERIF CAPITAL Q" #x1D5B0)
- ("MATHEMATICAL SANS-SERIF CAPITAL R" #x1D5B1)
- ("MATHEMATICAL SANS-SERIF CAPITAL S" #x1D5B2)
- ("MATHEMATICAL SANS-SERIF CAPITAL T" #x1D5B3)
- ("MATHEMATICAL SANS-SERIF CAPITAL U" #x1D5B4)
- ("MATHEMATICAL SANS-SERIF CAPITAL V" #x1D5B5)
- ("MATHEMATICAL SANS-SERIF CAPITAL W" #x1D5B6)
- ("MATHEMATICAL SANS-SERIF CAPITAL X" #x1D5B7)
- ("MATHEMATICAL SANS-SERIF CAPITAL Y" #x1D5B8)
- ("MATHEMATICAL SANS-SERIF CAPITAL Z" #x1D5B9)
- ("MATHEMATICAL SANS-SERIF SMALL A" #x1D5BA)
- ("MATHEMATICAL SANS-SERIF SMALL B" #x1D5BB)
- ("MATHEMATICAL SANS-SERIF SMALL C" #x1D5BC)
- ("MATHEMATICAL SANS-SERIF SMALL D" #x1D5BD)
- ("MATHEMATICAL SANS-SERIF SMALL E" #x1D5BE)
- ("MATHEMATICAL SANS-SERIF SMALL F" #x1D5BF)
- ("MATHEMATICAL SANS-SERIF SMALL G" #x1D5C0)
- ("MATHEMATICAL SANS-SERIF SMALL H" #x1D5C1)
- ("MATHEMATICAL SANS-SERIF SMALL I" #x1D5C2)
- ("MATHEMATICAL SANS-SERIF SMALL J" #x1D5C3)
- ("MATHEMATICAL SANS-SERIF SMALL K" #x1D5C4)
- ("MATHEMATICAL SANS-SERIF SMALL L" #x1D5C5)
- ("MATHEMATICAL SANS-SERIF SMALL M" #x1D5C6)
- ("MATHEMATICAL SANS-SERIF SMALL N" #x1D5C7)
- ("MATHEMATICAL SANS-SERIF SMALL O" #x1D5C8)
- ("MATHEMATICAL SANS-SERIF SMALL P" #x1D5C9)
- ("MATHEMATICAL SANS-SERIF SMALL Q" #x1D5CA)
- ("MATHEMATICAL SANS-SERIF SMALL R" #x1D5CB)
- ("MATHEMATICAL SANS-SERIF SMALL S" #x1D5CC)
- ("MATHEMATICAL SANS-SERIF SMALL T" #x1D5CD)
- ("MATHEMATICAL SANS-SERIF SMALL U" #x1D5CE)
- ("MATHEMATICAL SANS-SERIF SMALL V" #x1D5CF)
- ("MATHEMATICAL SANS-SERIF SMALL W" #x1D5D0)
- ("MATHEMATICAL SANS-SERIF SMALL X" #x1D5D1)
- ("MATHEMATICAL SANS-SERIF SMALL Y" #x1D5D2)
- ("MATHEMATICAL SANS-SERIF SMALL Z" #x1D5D3)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL A" #x1D5D4)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL B" #x1D5D5)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL C" #x1D5D6)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL D" #x1D5D7)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL E" #x1D5D8)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL F" #x1D5D9)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL G" #x1D5DA)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL H" #x1D5DB)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL I" #x1D5DC)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL J" #x1D5DD)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL K" #x1D5DE)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL L" #x1D5DF)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL M" #x1D5E0)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL N" #x1D5E1)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL O" #x1D5E2)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL P" #x1D5E3)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL Q" #x1D5E4)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL R" #x1D5E5)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL S" #x1D5E6)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL T" #x1D5E7)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL U" #x1D5E8)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL V" #x1D5E9)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL W" #x1D5EA)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL X" #x1D5EB)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL Y" #x1D5EC)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL Z" #x1D5ED)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL A" #x1D5EE)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL B" #x1D5EF)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL C" #x1D5F0)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL D" #x1D5F1)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL E" #x1D5F2)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL F" #x1D5F3)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL G" #x1D5F4)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL H" #x1D5F5)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL I" #x1D5F6)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL J" #x1D5F7)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL K" #x1D5F8)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL L" #x1D5F9)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL M" #x1D5FA)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL N" #x1D5FB)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL O" #x1D5FC)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL P" #x1D5FD)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL Q" #x1D5FE)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL R" #x1D5FF)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL S" #x1D600)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL T" #x1D601)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL U" #x1D602)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL V" #x1D603)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL W" #x1D604)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL X" #x1D605)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL Y" #x1D606)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL Z" #x1D607)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL A" #x1D608)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL B" #x1D609)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL C" #x1D60A)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL D" #x1D60B)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL E" #x1D60C)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL F" #x1D60D)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL G" #x1D60E)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL H" #x1D60F)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL I" #x1D610)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL J" #x1D611)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL K" #x1D612)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL L" #x1D613)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL M" #x1D614)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL N" #x1D615)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL O" #x1D616)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL P" #x1D617)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL Q" #x1D618)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL R" #x1D619)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL S" #x1D61A)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL T" #x1D61B)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL U" #x1D61C)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL V" #x1D61D)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL W" #x1D61E)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL X" #x1D61F)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL Y" #x1D620)
- ("MATHEMATICAL SANS-SERIF ITALIC CAPITAL Z" #x1D621)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL A" #x1D622)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL B" #x1D623)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL C" #x1D624)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL D" #x1D625)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL E" #x1D626)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL F" #x1D627)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL G" #x1D628)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL H" #x1D629)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL I" #x1D62A)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL J" #x1D62B)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL K" #x1D62C)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL L" #x1D62D)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL M" #x1D62E)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL N" #x1D62F)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL O" #x1D630)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL P" #x1D631)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL Q" #x1D632)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL R" #x1D633)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL S" #x1D634)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL T" #x1D635)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL U" #x1D636)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL V" #x1D637)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL W" #x1D638)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL X" #x1D639)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL Y" #x1D63A)
- ("MATHEMATICAL SANS-SERIF ITALIC SMALL Z" #x1D63B)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL A" #x1D63C)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL B" #x1D63D)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL C" #x1D63E)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL D" #x1D63F)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL E" #x1D640)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL F" #x1D641)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL G" #x1D642)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL H" #x1D643)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL I" #x1D644)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL J" #x1D645)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL K" #x1D646)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL L" #x1D647)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL M" #x1D648)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL N" #x1D649)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL O" #x1D64A)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL P" #x1D64B)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL Q" #x1D64C)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL R" #x1D64D)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL S" #x1D64E)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL T" #x1D64F)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL U" #x1D650)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL V" #x1D651)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL W" #x1D652)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL X" #x1D653)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL Y" #x1D654)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL Z" #x1D655)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL A" #x1D656)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL B" #x1D657)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL C" #x1D658)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL D" #x1D659)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL E" #x1D65A)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL F" #x1D65B)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL G" #x1D65C)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL H" #x1D65D)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL I" #x1D65E)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL J" #x1D65F)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL K" #x1D660)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL L" #x1D661)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL M" #x1D662)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL N" #x1D663)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL O" #x1D664)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL P" #x1D665)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL Q" #x1D666)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL R" #x1D667)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL S" #x1D668)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL T" #x1D669)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL U" #x1D66A)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL V" #x1D66B)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL W" #x1D66C)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL X" #x1D66D)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL Y" #x1D66E)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL Z" #x1D66F)
- ("MATHEMATICAL MONOSPACE CAPITAL A" #x1D670)
- ("MATHEMATICAL MONOSPACE CAPITAL B" #x1D671)
- ("MATHEMATICAL MONOSPACE CAPITAL C" #x1D672)
- ("MATHEMATICAL MONOSPACE CAPITAL D" #x1D673)
- ("MATHEMATICAL MONOSPACE CAPITAL E" #x1D674)
- ("MATHEMATICAL MONOSPACE CAPITAL F" #x1D675)
- ("MATHEMATICAL MONOSPACE CAPITAL G" #x1D676)
- ("MATHEMATICAL MONOSPACE CAPITAL H" #x1D677)
- ("MATHEMATICAL MONOSPACE CAPITAL I" #x1D678)
- ("MATHEMATICAL MONOSPACE CAPITAL J" #x1D679)
- ("MATHEMATICAL MONOSPACE CAPITAL K" #x1D67A)
- ("MATHEMATICAL MONOSPACE CAPITAL L" #x1D67B)
- ("MATHEMATICAL MONOSPACE CAPITAL M" #x1D67C)
- ("MATHEMATICAL MONOSPACE CAPITAL N" #x1D67D)
- ("MATHEMATICAL MONOSPACE CAPITAL O" #x1D67E)
- ("MATHEMATICAL MONOSPACE CAPITAL P" #x1D67F)
- ("MATHEMATICAL MONOSPACE CAPITAL Q" #x1D680)
- ("MATHEMATICAL MONOSPACE CAPITAL R" #x1D681)
- ("MATHEMATICAL MONOSPACE CAPITAL S" #x1D682)
- ("MATHEMATICAL MONOSPACE CAPITAL T" #x1D683)
- ("MATHEMATICAL MONOSPACE CAPITAL U" #x1D684)
- ("MATHEMATICAL MONOSPACE CAPITAL V" #x1D685)
- ("MATHEMATICAL MONOSPACE CAPITAL W" #x1D686)
- ("MATHEMATICAL MONOSPACE CAPITAL X" #x1D687)
- ("MATHEMATICAL MONOSPACE CAPITAL Y" #x1D688)
- ("MATHEMATICAL MONOSPACE CAPITAL Z" #x1D689)
- ("MATHEMATICAL MONOSPACE SMALL A" #x1D68A)
- ("MATHEMATICAL MONOSPACE SMALL B" #x1D68B)
- ("MATHEMATICAL MONOSPACE SMALL C" #x1D68C)
- ("MATHEMATICAL MONOSPACE SMALL D" #x1D68D)
- ("MATHEMATICAL MONOSPACE SMALL E" #x1D68E)
- ("MATHEMATICAL MONOSPACE SMALL F" #x1D68F)
- ("MATHEMATICAL MONOSPACE SMALL G" #x1D690)
- ("MATHEMATICAL MONOSPACE SMALL H" #x1D691)
- ("MATHEMATICAL MONOSPACE SMALL I" #x1D692)
- ("MATHEMATICAL MONOSPACE SMALL J" #x1D693)
- ("MATHEMATICAL MONOSPACE SMALL K" #x1D694)
- ("MATHEMATICAL MONOSPACE SMALL L" #x1D695)
- ("MATHEMATICAL MONOSPACE SMALL M" #x1D696)
- ("MATHEMATICAL MONOSPACE SMALL N" #x1D697)
- ("MATHEMATICAL MONOSPACE SMALL O" #x1D698)
- ("MATHEMATICAL MONOSPACE SMALL P" #x1D699)
- ("MATHEMATICAL MONOSPACE SMALL Q" #x1D69A)
- ("MATHEMATICAL MONOSPACE SMALL R" #x1D69B)
- ("MATHEMATICAL MONOSPACE SMALL S" #x1D69C)
- ("MATHEMATICAL MONOSPACE SMALL T" #x1D69D)
- ("MATHEMATICAL MONOSPACE SMALL U" #x1D69E)
- ("MATHEMATICAL MONOSPACE SMALL V" #x1D69F)
- ("MATHEMATICAL MONOSPACE SMALL W" #x1D6A0)
- ("MATHEMATICAL MONOSPACE SMALL X" #x1D6A1)
- ("MATHEMATICAL MONOSPACE SMALL Y" #x1D6A2)
- ("MATHEMATICAL MONOSPACE SMALL Z" #x1D6A3)
- ("MATHEMATICAL BOLD CAPITAL ALPHA" #x1D6A8)
- ("MATHEMATICAL BOLD CAPITAL BETA" #x1D6A9)
- ("MATHEMATICAL BOLD CAPITAL GAMMA" #x1D6AA)
- ("MATHEMATICAL BOLD CAPITAL DELTA" #x1D6AB)
- ("MATHEMATICAL BOLD CAPITAL EPSILON" #x1D6AC)
- ("MATHEMATICAL BOLD CAPITAL ZETA" #x1D6AD)
- ("MATHEMATICAL BOLD CAPITAL ETA" #x1D6AE)
- ("MATHEMATICAL BOLD CAPITAL THETA" #x1D6AF)
- ("MATHEMATICAL BOLD CAPITAL IOTA" #x1D6B0)
- ("MATHEMATICAL BOLD CAPITAL KAPPA" #x1D6B1)
- ("MATHEMATICAL BOLD CAPITAL LAMDA" #x1D6B2)
- ("MATHEMATICAL BOLD CAPITAL MU" #x1D6B3)
- ("MATHEMATICAL BOLD CAPITAL NU" #x1D6B4)
- ("MATHEMATICAL BOLD CAPITAL XI" #x1D6B5)
- ("MATHEMATICAL BOLD CAPITAL OMICRON" #x1D6B6)
- ("MATHEMATICAL BOLD CAPITAL PI" #x1D6B7)
- ("MATHEMATICAL BOLD CAPITAL RHO" #x1D6B8)
- ("MATHEMATICAL BOLD CAPITAL THETA SYMBOL" #x1D6B9)
- ("MATHEMATICAL BOLD CAPITAL SIGMA" #x1D6BA)
- ("MATHEMATICAL BOLD CAPITAL TAU" #x1D6BB)
- ("MATHEMATICAL BOLD CAPITAL UPSILON" #x1D6BC)
- ("MATHEMATICAL BOLD CAPITAL PHI" #x1D6BD)
- ("MATHEMATICAL BOLD CAPITAL CHI" #x1D6BE)
- ("MATHEMATICAL BOLD CAPITAL PSI" #x1D6BF)
- ("MATHEMATICAL BOLD CAPITAL OMEGA" #x1D6C0)
- ("MATHEMATICAL BOLD NABLA" #x1D6C1)
- ("MATHEMATICAL BOLD SMALL ALPHA" #x1D6C2)
- ("MATHEMATICAL BOLD SMALL BETA" #x1D6C3)
- ("MATHEMATICAL BOLD SMALL GAMMA" #x1D6C4)
- ("MATHEMATICAL BOLD SMALL DELTA" #x1D6C5)
- ("MATHEMATICAL BOLD SMALL EPSILON" #x1D6C6)
- ("MATHEMATICAL BOLD SMALL ZETA" #x1D6C7)
- ("MATHEMATICAL BOLD SMALL ETA" #x1D6C8)
- ("MATHEMATICAL BOLD SMALL THETA" #x1D6C9)
- ("MATHEMATICAL BOLD SMALL IOTA" #x1D6CA)
- ("MATHEMATICAL BOLD SMALL KAPPA" #x1D6CB)
- ("MATHEMATICAL BOLD SMALL LAMDA" #x1D6CC)
- ("MATHEMATICAL BOLD SMALL MU" #x1D6CD)
- ("MATHEMATICAL BOLD SMALL NU" #x1D6CE)
- ("MATHEMATICAL BOLD SMALL XI" #x1D6CF)
- ("MATHEMATICAL BOLD SMALL OMICRON" #x1D6D0)
- ("MATHEMATICAL BOLD SMALL PI" #x1D6D1)
- ("MATHEMATICAL BOLD SMALL RHO" #x1D6D2)
- ("MATHEMATICAL BOLD SMALL FINAL SIGMA" #x1D6D3)
- ("MATHEMATICAL BOLD SMALL SIGMA" #x1D6D4)
- ("MATHEMATICAL BOLD SMALL TAU" #x1D6D5)
- ("MATHEMATICAL BOLD SMALL UPSILON" #x1D6D6)
- ("MATHEMATICAL BOLD SMALL PHI" #x1D6D7)
- ("MATHEMATICAL BOLD SMALL CHI" #x1D6D8)
- ("MATHEMATICAL BOLD SMALL PSI" #x1D6D9)
- ("MATHEMATICAL BOLD SMALL OMEGA" #x1D6DA)
- ("MATHEMATICAL BOLD PARTIAL DIFFERENTIAL" #x1D6DB)
- ("MATHEMATICAL BOLD EPSILON SYMBOL" #x1D6DC)
- ("MATHEMATICAL BOLD THETA SYMBOL" #x1D6DD)
- ("MATHEMATICAL BOLD KAPPA SYMBOL" #x1D6DE)
- ("MATHEMATICAL BOLD PHI SYMBOL" #x1D6DF)
- ("MATHEMATICAL BOLD RHO SYMBOL" #x1D6E0)
- ("MATHEMATICAL BOLD PI SYMBOL" #x1D6E1)
- ("MATHEMATICAL ITALIC CAPITAL ALPHA" #x1D6E2)
- ("MATHEMATICAL ITALIC CAPITAL BETA" #x1D6E3)
- ("MATHEMATICAL ITALIC CAPITAL GAMMA" #x1D6E4)
- ("MATHEMATICAL ITALIC CAPITAL DELTA" #x1D6E5)
- ("MATHEMATICAL ITALIC CAPITAL EPSILON" #x1D6E6)
- ("MATHEMATICAL ITALIC CAPITAL ZETA" #x1D6E7)
- ("MATHEMATICAL ITALIC CAPITAL ETA" #x1D6E8)
- ("MATHEMATICAL ITALIC CAPITAL THETA" #x1D6E9)
- ("MATHEMATICAL ITALIC CAPITAL IOTA" #x1D6EA)
- ("MATHEMATICAL ITALIC CAPITAL KAPPA" #x1D6EB)
- ("MATHEMATICAL ITALIC CAPITAL LAMDA" #x1D6EC)
- ("MATHEMATICAL ITALIC CAPITAL MU" #x1D6ED)
- ("MATHEMATICAL ITALIC CAPITAL NU" #x1D6EE)
- ("MATHEMATICAL ITALIC CAPITAL XI" #x1D6EF)
- ("MATHEMATICAL ITALIC CAPITAL OMICRON" #x1D6F0)
- ("MATHEMATICAL ITALIC CAPITAL PI" #x1D6F1)
- ("MATHEMATICAL ITALIC CAPITAL RHO" #x1D6F2)
- ("MATHEMATICAL ITALIC CAPITAL THETA SYMBOL" #x1D6F3)
- ("MATHEMATICAL ITALIC CAPITAL SIGMA" #x1D6F4)
- ("MATHEMATICAL ITALIC CAPITAL TAU" #x1D6F5)
- ("MATHEMATICAL ITALIC CAPITAL UPSILON" #x1D6F6)
- ("MATHEMATICAL ITALIC CAPITAL PHI" #x1D6F7)
- ("MATHEMATICAL ITALIC CAPITAL CHI" #x1D6F8)
- ("MATHEMATICAL ITALIC CAPITAL PSI" #x1D6F9)
- ("MATHEMATICAL ITALIC CAPITAL OMEGA" #x1D6FA)
- ("MATHEMATICAL ITALIC NABLA" #x1D6FB)
- ("MATHEMATICAL ITALIC SMALL ALPHA" #x1D6FC)
- ("MATHEMATICAL ITALIC SMALL BETA" #x1D6FD)
- ("MATHEMATICAL ITALIC SMALL GAMMA" #x1D6FE)
- ("MATHEMATICAL ITALIC SMALL DELTA" #x1D6FF)
- ("MATHEMATICAL ITALIC SMALL EPSILON" #x1D700)
- ("MATHEMATICAL ITALIC SMALL ZETA" #x1D701)
- ("MATHEMATICAL ITALIC SMALL ETA" #x1D702)
- ("MATHEMATICAL ITALIC SMALL THETA" #x1D703)
- ("MATHEMATICAL ITALIC SMALL IOTA" #x1D704)
- ("MATHEMATICAL ITALIC SMALL KAPPA" #x1D705)
- ("MATHEMATICAL ITALIC SMALL LAMDA" #x1D706)
- ("MATHEMATICAL ITALIC SMALL MU" #x1D707)
- ("MATHEMATICAL ITALIC SMALL NU" #x1D708)
- ("MATHEMATICAL ITALIC SMALL XI" #x1D709)
- ("MATHEMATICAL ITALIC SMALL OMICRON" #x1D70A)
- ("MATHEMATICAL ITALIC SMALL PI" #x1D70B)
- ("MATHEMATICAL ITALIC SMALL RHO" #x1D70C)
- ("MATHEMATICAL ITALIC SMALL FINAL SIGMA" #x1D70D)
- ("MATHEMATICAL ITALIC SMALL SIGMA" #x1D70E)
- ("MATHEMATICAL ITALIC SMALL TAU" #x1D70F)
- ("MATHEMATICAL ITALIC SMALL UPSILON" #x1D710)
- ("MATHEMATICAL ITALIC SMALL PHI" #x1D711)
- ("MATHEMATICAL ITALIC SMALL CHI" #x1D712)
- ("MATHEMATICAL ITALIC SMALL PSI" #x1D713)
- ("MATHEMATICAL ITALIC SMALL OMEGA" #x1D714)
- ("MATHEMATICAL ITALIC PARTIAL DIFFERENTIAL" #x1D715)
- ("MATHEMATICAL ITALIC EPSILON SYMBOL" #x1D716)
- ("MATHEMATICAL ITALIC THETA SYMBOL" #x1D717)
- ("MATHEMATICAL ITALIC KAPPA SYMBOL" #x1D718)
- ("MATHEMATICAL ITALIC PHI SYMBOL" #x1D719)
- ("MATHEMATICAL ITALIC RHO SYMBOL" #x1D71A)
- ("MATHEMATICAL ITALIC PI SYMBOL" #x1D71B)
- ("MATHEMATICAL BOLD ITALIC CAPITAL ALPHA" #x1D71C)
- ("MATHEMATICAL BOLD ITALIC CAPITAL BETA" #x1D71D)
- ("MATHEMATICAL BOLD ITALIC CAPITAL GAMMA" #x1D71E)
- ("MATHEMATICAL BOLD ITALIC CAPITAL DELTA" #x1D71F)
- ("MATHEMATICAL BOLD ITALIC CAPITAL EPSILON" #x1D720)
- ("MATHEMATICAL BOLD ITALIC CAPITAL ZETA" #x1D721)
- ("MATHEMATICAL BOLD ITALIC CAPITAL ETA" #x1D722)
- ("MATHEMATICAL BOLD ITALIC CAPITAL THETA" #x1D723)
- ("MATHEMATICAL BOLD ITALIC CAPITAL IOTA" #x1D724)
- ("MATHEMATICAL BOLD ITALIC CAPITAL KAPPA" #x1D725)
- ("MATHEMATICAL BOLD ITALIC CAPITAL LAMDA" #x1D726)
- ("MATHEMATICAL BOLD ITALIC CAPITAL MU" #x1D727)
- ("MATHEMATICAL BOLD ITALIC CAPITAL NU" #x1D728)
- ("MATHEMATICAL BOLD ITALIC CAPITAL XI" #x1D729)
- ("MATHEMATICAL BOLD ITALIC CAPITAL OMICRON" #x1D72A)
- ("MATHEMATICAL BOLD ITALIC CAPITAL PI" #x1D72B)
- ("MATHEMATICAL BOLD ITALIC CAPITAL RHO" #x1D72C)
- ("MATHEMATICAL BOLD ITALIC CAPITAL THETA SYMBOL" #x1D72D)
- ("MATHEMATICAL BOLD ITALIC CAPITAL SIGMA" #x1D72E)
- ("MATHEMATICAL BOLD ITALIC CAPITAL TAU" #x1D72F)
- ("MATHEMATICAL BOLD ITALIC CAPITAL UPSILON" #x1D730)
- ("MATHEMATICAL BOLD ITALIC CAPITAL PHI" #x1D731)
- ("MATHEMATICAL BOLD ITALIC CAPITAL CHI" #x1D732)
- ("MATHEMATICAL BOLD ITALIC CAPITAL PSI" #x1D733)
- ("MATHEMATICAL BOLD ITALIC CAPITAL OMEGA" #x1D734)
- ("MATHEMATICAL BOLD ITALIC NABLA" #x1D735)
- ("MATHEMATICAL BOLD ITALIC SMALL ALPHA" #x1D736)
- ("MATHEMATICAL BOLD ITALIC SMALL BETA" #x1D737)
- ("MATHEMATICAL BOLD ITALIC SMALL GAMMA" #x1D738)
- ("MATHEMATICAL BOLD ITALIC SMALL DELTA" #x1D739)
- ("MATHEMATICAL BOLD ITALIC SMALL EPSILON" #x1D73A)
- ("MATHEMATICAL BOLD ITALIC SMALL ZETA" #x1D73B)
- ("MATHEMATICAL BOLD ITALIC SMALL ETA" #x1D73C)
- ("MATHEMATICAL BOLD ITALIC SMALL THETA" #x1D73D)
- ("MATHEMATICAL BOLD ITALIC SMALL IOTA" #x1D73E)
- ("MATHEMATICAL BOLD ITALIC SMALL KAPPA" #x1D73F)
- ("MATHEMATICAL BOLD ITALIC SMALL LAMDA" #x1D740)
- ("MATHEMATICAL BOLD ITALIC SMALL MU" #x1D741)
- ("MATHEMATICAL BOLD ITALIC SMALL NU" #x1D742)
- ("MATHEMATICAL BOLD ITALIC SMALL XI" #x1D743)
- ("MATHEMATICAL BOLD ITALIC SMALL OMICRON" #x1D744)
- ("MATHEMATICAL BOLD ITALIC SMALL PI" #x1D745)
- ("MATHEMATICAL BOLD ITALIC SMALL RHO" #x1D746)
- ("MATHEMATICAL BOLD ITALIC SMALL FINAL SIGMA" #x1D747)
- ("MATHEMATICAL BOLD ITALIC SMALL SIGMA" #x1D748)
- ("MATHEMATICAL BOLD ITALIC SMALL TAU" #x1D749)
- ("MATHEMATICAL BOLD ITALIC SMALL UPSILON" #x1D74A)
- ("MATHEMATICAL BOLD ITALIC SMALL PHI" #x1D74B)
- ("MATHEMATICAL BOLD ITALIC SMALL CHI" #x1D74C)
- ("MATHEMATICAL BOLD ITALIC SMALL PSI" #x1D74D)
- ("MATHEMATICAL BOLD ITALIC SMALL OMEGA" #x1D74E)
- ("MATHEMATICAL BOLD ITALIC PARTIAL DIFFERENTIAL" #x1D74F)
- ("MATHEMATICAL BOLD ITALIC EPSILON SYMBOL" #x1D750)
- ("MATHEMATICAL BOLD ITALIC THETA SYMBOL" #x1D751)
- ("MATHEMATICAL BOLD ITALIC KAPPA SYMBOL" #x1D752)
- ("MATHEMATICAL BOLD ITALIC PHI SYMBOL" #x1D753)
- ("MATHEMATICAL BOLD ITALIC RHO SYMBOL" #x1D754)
- ("MATHEMATICAL BOLD ITALIC PI SYMBOL" #x1D755)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL ALPHA" #x1D756)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL BETA" #x1D757)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL GAMMA" #x1D758)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL DELTA" #x1D759)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL EPSILON" #x1D75A)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL ZETA" #x1D75B)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL ETA" #x1D75C)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL THETA" #x1D75D)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL IOTA" #x1D75E)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL KAPPA" #x1D75F)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL LAMDA" #x1D760)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL MU" #x1D761)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL NU" #x1D762)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL XI" #x1D763)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL OMICRON" #x1D764)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL PI" #x1D765)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL RHO" #x1D766)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL THETA SYMBOL" #x1D767)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL SIGMA" #x1D768)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL TAU" #x1D769)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL UPSILON" #x1D76A)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL PHI" #x1D76B)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL CHI" #x1D76C)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL PSI" #x1D76D)
- ("MATHEMATICAL SANS-SERIF BOLD CAPITAL OMEGA" #x1D76E)
- ("MATHEMATICAL SANS-SERIF BOLD NABLA" #x1D76F)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL ALPHA" #x1D770)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL BETA" #x1D771)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL GAMMA" #x1D772)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL DELTA" #x1D773)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL EPSILON" #x1D774)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL ZETA" #x1D775)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL ETA" #x1D776)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL THETA" #x1D777)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL IOTA" #x1D778)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL KAPPA" #x1D779)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL LAMDA" #x1D77A)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL MU" #x1D77B)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL NU" #x1D77C)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL XI" #x1D77D)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL OMICRON" #x1D77E)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL PI" #x1D77F)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL RHO" #x1D780)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL FINAL SIGMA" #x1D781)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL SIGMA" #x1D782)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL TAU" #x1D783)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL UPSILON" #x1D784)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL PHI" #x1D785)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL CHI" #x1D786)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL PSI" #x1D787)
- ("MATHEMATICAL SANS-SERIF BOLD SMALL OMEGA" #x1D788)
- ("MATHEMATICAL SANS-SERIF BOLD PARTIAL DIFFERENTIAL" #x1D789)
- ("MATHEMATICAL SANS-SERIF BOLD EPSILON SYMBOL" #x1D78A)
- ("MATHEMATICAL SANS-SERIF BOLD THETA SYMBOL" #x1D78B)
- ("MATHEMATICAL SANS-SERIF BOLD KAPPA SYMBOL" #x1D78C)
- ("MATHEMATICAL SANS-SERIF BOLD PHI SYMBOL" #x1D78D)
- ("MATHEMATICAL SANS-SERIF BOLD RHO SYMBOL" #x1D78E)
- ("MATHEMATICAL SANS-SERIF BOLD PI SYMBOL" #x1D78F)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL ALPHA" #x1D790)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL BETA" #x1D791)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL GAMMA" #x1D792)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL DELTA" #x1D793)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL EPSILON" #x1D794)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL ZETA" #x1D795)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL ETA" #x1D796)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL THETA" #x1D797)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL IOTA" #x1D798)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL KAPPA" #x1D799)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL LAMDA" #x1D79A)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL MU" #x1D79B)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL NU" #x1D79C)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL XI" #x1D79D)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL OMICRON" #x1D79E)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL PI" #x1D79F)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL RHO" #x1D7A0)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL THETA SYMBOL" #x1D7A1)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL SIGMA" #x1D7A2)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL TAU" #x1D7A3)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL UPSILON" #x1D7A4)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL PHI" #x1D7A5)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL CHI" #x1D7A6)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL PSI" #x1D7A7)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC CAPITAL OMEGA" #x1D7A8)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC NABLA" #x1D7A9)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL ALPHA" #x1D7AA)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL BETA" #x1D7AB)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL GAMMA" #x1D7AC)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL DELTA" #x1D7AD)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL EPSILON" #x1D7AE)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL ZETA" #x1D7AF)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL ETA" #x1D7B0)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL THETA" #x1D7B1)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL IOTA" #x1D7B2)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL KAPPA" #x1D7B3)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL LAMDA" #x1D7B4)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL MU" #x1D7B5)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL NU" #x1D7B6)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL XI" #x1D7B7)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL OMICRON" #x1D7B8)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL PI" #x1D7B9)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL RHO" #x1D7BA)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL FINAL SIGMA" #x1D7BB)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL SIGMA" #x1D7BC)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL TAU" #x1D7BD)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL UPSILON" #x1D7BE)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL PHI" #x1D7BF)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL CHI" #x1D7C0)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL PSI" #x1D7C1)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC SMALL OMEGA" #x1D7C2)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC PARTIAL DIFFERENTIAL" #x1D7C3)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC EPSILON SYMBOL" #x1D7C4)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC THETA SYMBOL" #x1D7C5)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC KAPPA SYMBOL" #x1D7C6)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC PHI SYMBOL" #x1D7C7)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC RHO SYMBOL" #x1D7C8)
- ("MATHEMATICAL SANS-SERIF BOLD ITALIC PI SYMBOL" #x1D7C9)
- ("MATHEMATICAL BOLD DIGIT ZERO" #x1D7CE)
- ("MATHEMATICAL BOLD DIGIT ONE" #x1D7CF)
- ("MATHEMATICAL BOLD DIGIT TWO" #x1D7D0)
- ("MATHEMATICAL BOLD DIGIT THREE" #x1D7D1)
- ("MATHEMATICAL BOLD DIGIT FOUR" #x1D7D2)
- ("MATHEMATICAL BOLD DIGIT FIVE" #x1D7D3)
- ("MATHEMATICAL BOLD DIGIT SIX" #x1D7D4)
- ("MATHEMATICAL BOLD DIGIT SEVEN" #x1D7D5)
- ("MATHEMATICAL BOLD DIGIT EIGHT" #x1D7D6)
- ("MATHEMATICAL BOLD DIGIT NINE" #x1D7D7)
- ("MATHEMATICAL DOUBLE-STRUCK DIGIT ZERO" #x1D7D8)
- ("MATHEMATICAL DOUBLE-STRUCK DIGIT ONE" #x1D7D9)
- ("MATHEMATICAL DOUBLE-STRUCK DIGIT TWO" #x1D7DA)
- ("MATHEMATICAL DOUBLE-STRUCK DIGIT THREE" #x1D7DB)
- ("MATHEMATICAL DOUBLE-STRUCK DIGIT FOUR" #x1D7DC)
- ("MATHEMATICAL DOUBLE-STRUCK DIGIT FIVE" #x1D7DD)
- ("MATHEMATICAL DOUBLE-STRUCK DIGIT SIX" #x1D7DE)
- ("MATHEMATICAL DOUBLE-STRUCK DIGIT SEVEN" #x1D7DF)
- ("MATHEMATICAL DOUBLE-STRUCK DIGIT EIGHT" #x1D7E0)
- ("MATHEMATICAL DOUBLE-STRUCK DIGIT NINE" #x1D7E1)
- ("MATHEMATICAL SANS-SERIF DIGIT ZERO" #x1D7E2)
- ("MATHEMATICAL SANS-SERIF DIGIT ONE" #x1D7E3)
- ("MATHEMATICAL SANS-SERIF DIGIT TWO" #x1D7E4)
- ("MATHEMATICAL SANS-SERIF DIGIT THREE" #x1D7E5)
- ("MATHEMATICAL SANS-SERIF DIGIT FOUR" #x1D7E6)
- ("MATHEMATICAL SANS-SERIF DIGIT FIVE" #x1D7E7)
- ("MATHEMATICAL SANS-SERIF DIGIT SIX" #x1D7E8)
- ("MATHEMATICAL SANS-SERIF DIGIT SEVEN" #x1D7E9)
- ("MATHEMATICAL SANS-SERIF DIGIT EIGHT" #x1D7EA)
- ("MATHEMATICAL SANS-SERIF DIGIT NINE" #x1D7EB)
- ("MATHEMATICAL SANS-SERIF BOLD DIGIT ZERO" #x1D7EC)
- ("MATHEMATICAL SANS-SERIF BOLD DIGIT ONE" #x1D7ED)
- ("MATHEMATICAL SANS-SERIF BOLD DIGIT TWO" #x1D7EE)
- ("MATHEMATICAL SANS-SERIF BOLD DIGIT THREE" #x1D7EF)
- ("MATHEMATICAL SANS-SERIF BOLD DIGIT FOUR" #x1D7F0)
- ("MATHEMATICAL SANS-SERIF BOLD DIGIT FIVE" #x1D7F1)
- ("MATHEMATICAL SANS-SERIF BOLD DIGIT SIX" #x1D7F2)
- ("MATHEMATICAL SANS-SERIF BOLD DIGIT SEVEN" #x1D7F3)
- ("MATHEMATICAL SANS-SERIF BOLD DIGIT EIGHT" #x1D7F4)
- ("MATHEMATICAL SANS-SERIF BOLD DIGIT NINE" #x1D7F5)
- ("MATHEMATICAL MONOSPACE DIGIT ZERO" #x1D7F6)
- ("MATHEMATICAL MONOSPACE DIGIT ONE" #x1D7F7)
- ("MATHEMATICAL MONOSPACE DIGIT TWO" #x1D7F8)
- ("MATHEMATICAL MONOSPACE DIGIT THREE" #x1D7F9)
- ("MATHEMATICAL MONOSPACE DIGIT FOUR" #x1D7FA)
- ("MATHEMATICAL MONOSPACE DIGIT FIVE" #x1D7FB)
- ("MATHEMATICAL MONOSPACE DIGIT SIX" #x1D7FC)
- ("MATHEMATICAL MONOSPACE DIGIT SEVEN" #x1D7FD)
- ("MATHEMATICAL MONOSPACE DIGIT EIGHT" #x1D7FE)
- ("MATHEMATICAL MONOSPACE DIGIT NINE" #x1D7FF)
- ))
-
+++ /dev/null
-(nxml-define-char-name-set 'tags
- '(("LANGUAGE TAG" #xE0001)
- ("TAG SPACE" #xE0020)
- ("TAG EXCLAMATION MARK" #xE0021)
- ("TAG QUOTATION MARK" #xE0022)
- ("TAG NUMBER SIGN" #xE0023)
- ("TAG DOLLAR SIGN" #xE0024)
- ("TAG PERCENT SIGN" #xE0025)
- ("TAG AMPERSAND" #xE0026)
- ("TAG APOSTROPHE" #xE0027)
- ("TAG LEFT PARENTHESIS" #xE0028)
- ("TAG RIGHT PARENTHESIS" #xE0029)
- ("TAG ASTERISK" #xE002A)
- ("TAG PLUS SIGN" #xE002B)
- ("TAG COMMA" #xE002C)
- ("TAG HYPHEN-MINUS" #xE002D)
- ("TAG FULL STOP" #xE002E)
- ("TAG SOLIDUS" #xE002F)
- ("TAG DIGIT ZERO" #xE0030)
- ("TAG DIGIT ONE" #xE0031)
- ("TAG DIGIT TWO" #xE0032)
- ("TAG DIGIT THREE" #xE0033)
- ("TAG DIGIT FOUR" #xE0034)
- ("TAG DIGIT FIVE" #xE0035)
- ("TAG DIGIT SIX" #xE0036)
- ("TAG DIGIT SEVEN" #xE0037)
- ("TAG DIGIT EIGHT" #xE0038)
- ("TAG DIGIT NINE" #xE0039)
- ("TAG COLON" #xE003A)
- ("TAG SEMICOLON" #xE003B)
- ("TAG LESS-THAN SIGN" #xE003C)
- ("TAG EQUALS SIGN" #xE003D)
- ("TAG GREATER-THAN SIGN" #xE003E)
- ("TAG QUESTION MARK" #xE003F)
- ("TAG COMMERCIAL AT" #xE0040)
- ("TAG LATIN CAPITAL LETTER A" #xE0041)
- ("TAG LATIN CAPITAL LETTER B" #xE0042)
- ("TAG LATIN CAPITAL LETTER C" #xE0043)
- ("TAG LATIN CAPITAL LETTER D" #xE0044)
- ("TAG LATIN CAPITAL LETTER E" #xE0045)
- ("TAG LATIN CAPITAL LETTER F" #xE0046)
- ("TAG LATIN CAPITAL LETTER G" #xE0047)
- ("TAG LATIN CAPITAL LETTER H" #xE0048)
- ("TAG LATIN CAPITAL LETTER I" #xE0049)
- ("TAG LATIN CAPITAL LETTER J" #xE004A)
- ("TAG LATIN CAPITAL LETTER K" #xE004B)
- ("TAG LATIN CAPITAL LETTER L" #xE004C)
- ("TAG LATIN CAPITAL LETTER M" #xE004D)
- ("TAG LATIN CAPITAL LETTER N" #xE004E)
- ("TAG LATIN CAPITAL LETTER O" #xE004F)
- ("TAG LATIN CAPITAL LETTER P" #xE0050)
- ("TAG LATIN CAPITAL LETTER Q" #xE0051)
- ("TAG LATIN CAPITAL LETTER R" #xE0052)
- ("TAG LATIN CAPITAL LETTER S" #xE0053)
- ("TAG LATIN CAPITAL LETTER T" #xE0054)
- ("TAG LATIN CAPITAL LETTER U" #xE0055)
- ("TAG LATIN CAPITAL LETTER V" #xE0056)
- ("TAG LATIN CAPITAL LETTER W" #xE0057)
- ("TAG LATIN CAPITAL LETTER X" #xE0058)
- ("TAG LATIN CAPITAL LETTER Y" #xE0059)
- ("TAG LATIN CAPITAL LETTER Z" #xE005A)
- ("TAG LEFT SQUARE BRACKET" #xE005B)
- ("TAG REVERSE SOLIDUS" #xE005C)
- ("TAG RIGHT SQUARE BRACKET" #xE005D)
- ("TAG CIRCUMFLEX ACCENT" #xE005E)
- ("TAG LOW LINE" #xE005F)
- ("TAG GRAVE ACCENT" #xE0060)
- ("TAG LATIN SMALL LETTER A" #xE0061)
- ("TAG LATIN SMALL LETTER B" #xE0062)
- ("TAG LATIN SMALL LETTER C" #xE0063)
- ("TAG LATIN SMALL LETTER D" #xE0064)
- ("TAG LATIN SMALL LETTER E" #xE0065)
- ("TAG LATIN SMALL LETTER F" #xE0066)
- ("TAG LATIN SMALL LETTER G" #xE0067)
- ("TAG LATIN SMALL LETTER H" #xE0068)
- ("TAG LATIN SMALL LETTER I" #xE0069)
- ("TAG LATIN SMALL LETTER J" #xE006A)
- ("TAG LATIN SMALL LETTER K" #xE006B)
- ("TAG LATIN SMALL LETTER L" #xE006C)
- ("TAG LATIN SMALL LETTER M" #xE006D)
- ("TAG LATIN SMALL LETTER N" #xE006E)
- ("TAG LATIN SMALL LETTER O" #xE006F)
- ("TAG LATIN SMALL LETTER P" #xE0070)
- ("TAG LATIN SMALL LETTER Q" #xE0071)
- ("TAG LATIN SMALL LETTER R" #xE0072)
- ("TAG LATIN SMALL LETTER S" #xE0073)
- ("TAG LATIN SMALL LETTER T" #xE0074)
- ("TAG LATIN SMALL LETTER U" #xE0075)
- ("TAG LATIN SMALL LETTER V" #xE0076)
- ("TAG LATIN SMALL LETTER W" #xE0077)
- ("TAG LATIN SMALL LETTER X" #xE0078)
- ("TAG LATIN SMALL LETTER Y" #xE0079)
- ("TAG LATIN SMALL LETTER Z" #xE007A)
- ("TAG LEFT CURLY BRACKET" #xE007B)
- ("TAG VERTICAL LINE" #xE007C)
- ("TAG RIGHT CURLY BRACKET" #xE007D)
- ("TAG TILDE" #xE007E)
- ("CANCEL TAG" #xE007F)
- ))
-
check:
@echo "We don't have any tests for the lib-src/ directory yet."
+tagsfiles = $(wildcard ${srcdir}/*.[ch])
+
+.PHONY: tags
tags: TAGS
-TAGS: etags${EXEEXT}
- etags *.[ch]
+TAGS: etags${EXEEXT} ${tagsfiles}
+ ./etags ${tagsfiles}
../lib/libgnu.a: $(config_h)
$(MAKE) -C ../lib all
Do not create tag entries for global variables in some\n\
languages. This makes the tags file smaller.");
- puts ("--no-line-directive\n\
+ if (PRINT_UNDOCUMENTED_OPTIONS_HELP)
+ puts ("--no-line-directive\n\
Ignore #line preprocessor directives in C and derived languages.");
if (CTAGS)
+# Copyright 2016 Free Software Foundation, Inc.
+
+# This file is part of GNU Emacs.
+
+# GNU Emacs is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+
+# GNU Emacs is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
+
+# GNU Emacs assumes GNU Make.
+AUTOMAKE_OPTIONS = -Wno-portability
+
BUILT_SOURCES =
CLEANFILES =
EXTRA_DIST =
libgnu_a_SOURCES += openat-die.c save-cwd.c
endif
+if HYBRID_MALLOC_LIB
+noinst_LIBRARIES += libegnu.a
+endif
+
+libegnu_a_SOURCES = $(libgnu_a_SOURCES)
+libegnu_a_LIBADD = $(patsubst %.o,e-%.o,$(libgnu_a_LIBADD))
+EXTRA_libegnu_a_SOURCES = $(EXTRA_libgnu_a_SOURCES)
+libegnu_a_SHORTNAME = e
+libegnu_a_CPPFLAGS = -Demacs
+MOSTLYCLEANFILES += libegnu.a
+
.PHONY: bootstrap-clean
bootstrap-clean: maintainer-clean
# the same distribution terms as the rest of that program.
#
# Generated by gnulib-tool.
-# Reproduce by: gnulib-tool --import --lib=libgnu --source-base=lib --m4-base=m4 --doc-base=doc --tests-base=tests --aux-dir=build-aux --avoid=close --avoid=dup --avoid=fchdir --avoid=flexmember --avoid=fstat --avoid=malloc-posix --avoid=msvc-inval --avoid=msvc-nothrow --avoid=open --avoid=openat-die --avoid=opendir --avoid=raise --avoid=save-cwd --avoid=select --avoid=setenv --avoid=sigprocmask --avoid=stdarg --avoid=stdbool --avoid=threadlib --avoid=unsetenv --makefile-name=gnulib.mk --conditional-dependencies --no-libtool --macro-prefix=gl --no-vc-files alloca-opt binary-io byteswap c-ctype c-strcase careadlinkat close-stream count-one-bits count-trailing-zeros crypto/md5 crypto/sha1 crypto/sha256 crypto/sha512 dtoastr dtotimespec dup2 environ execinfo faccessat fcntl fcntl-h fdatasync fdopendir filemode fstatat fsync getloadavg getopt-gnu gettime gettimeofday gitlog-to-changelog ignore-value intprops largefile lstat manywarnings memrchr mkostemp mktime pipe2 pselect pthread_sigmask putenv qcopy-acl readlink readlinkat sig2str socklen stat-time stdalign stddef stdio stpcpy strftime strtoimax strtoumax symlink sys_stat sys_time time time_r time_rz timegm timer-time timespec-add timespec-sub unsetenv update-copyright utimens vla warnings
+# Reproduce by: gnulib-tool --import --lib=libgnu --source-base=lib --m4-base=m4 --doc-base=doc --tests-base=tests --aux-dir=build-aux --avoid=close --avoid=dup --avoid=fchdir --avoid=flexmember --avoid=fstat --avoid=malloc-posix --avoid=msvc-inval --avoid=msvc-nothrow --avoid=open --avoid=openat-die --avoid=opendir --avoid=raise --avoid=save-cwd --avoid=select --avoid=setenv --avoid=sigprocmask --avoid=stdarg --avoid=stdbool --avoid=threadlib --avoid=unsetenv --makefile-name=gnulib.mk --conditional-dependencies --no-libtool --macro-prefix=gl --no-vc-files alloca-opt binary-io byteswap c-ctype c-strcase careadlinkat close-stream count-one-bits count-trailing-zeros crypto/md5 crypto/sha1 crypto/sha256 crypto/sha512 dtoastr dtotimespec dup2 environ execinfo faccessat fcntl fcntl-h fdatasync fdopendir filemode fstatat fsync getloadavg getopt-gnu gettime gettimeofday gitlog-to-changelog ignore-value intprops largefile lstat manywarnings memrchr mkostemp mktime pipe2 pselect pthread_sigmask putenv qcopy-acl readlink readlinkat sig2str socklen stat-time std-gnu11 stdalign stddef stdio stpcpy strftime strtoimax strtoumax symlink sys_stat sys_time time time_r time_rz timegm timer-time timespec-add timespec-sub unsetenv update-copyright utimens vla warnings
MOSTLYCLEANFILES += core *.stackdump
cus-load.el \
finder-inf.el \
subdirs.el \
+ ps-print-loaddefs.el \
emacs-lisp/cl-loaddefs.el \
calc/calc-loaddefs.el \
eshell/esh-groups.el \
cedet/semantic/loaddefs.el \
cedet/ede/loaddefs.el \
cedet/srecode/loaddefs.el \
- org/org-loaddefs.el
-
-# Value of max-lisp-eval-depth when compiling initially.
-# During bootstrapping the byte-compiler is run interpreted when compiling
-# itself, and uses more stack than usual.
-#
-BIG_STACK_DEPTH = 2200
-BIG_STACK_OPTS = --eval "(setq max-lisp-eval-depth $(BIG_STACK_DEPTH))"
+ org/org-loaddefs.el \
+ textmodes/reftex-loaddefs.el \
+ mail/rmail-loaddefs.el \
+ ibuffer-loaddefs.el \
+ htmlfontify-loaddefs \
+ emacs-lisp/eieio-loaddefs.el \
+ dired-loaddefs.el
# Set load-prefer-newer for the benefit of the non-bootstrappers.
-BYTE_COMPILE_FLAGS = $(BIG_STACK_OPTS) \
+BYTE_COMPILE_FLAGS = \
--eval '(setq load-prefer-newer t)' $(BYTE_COMPILE_EXTRA_FLAGS)
# Files to compile before others during a bootstrap. This is done to
--eval '(setq generated-autoload-file (expand-file-name (unmsys--file-name "$@")))' \
-f batch-update-autoloads ${SUBDIRS_ALMOST}
+# autoloads only runs when loaddefs.el is nonexistent, although it
+# generates a number of different files. Provide a force option to enable
+# regeneration of all these files.
+autoloads-force .PHONY:
+ rm loaddefs.el
+ $(MAKE) autoloads
+
# This is required by the bootstrap-emacs target in ../src/Makefile, so
# we know that if we have an emacs executable, we also have a subdirs.el.
$(lisp)/subdirs.el:
$(emacs) -L "$(top_srcdir)/admin" -l authors \
-f batch-update-authors "$(top_srcdir)/etc/AUTHORS" "$(top_srcdir)"
+FORCE:
+.PHONY: FORCE
+
+tagsfiles = $(shell find ${srcdir} -name '*.el')
+tagsfiles := $(filter-out ${srcdir}/%loaddefs.el,${tagsfiles})
+tagsfiles := $(filter-out ${srcdir}/ldefs-boot.el,${tagsfiles})
+tagsfiles := $(filter-out ${srcdir}/eshell/esh-groups.el,${tagsfiles})
-ETAGS = ../lib-src/etags
+ETAGS = ../lib-src/etags${EXEEXT}
-lisptagsfiles1 = $(srcdir)/*.el
-lisptagsfiles2 = $(srcdir)/*/*.el
-lisptagsfiles3 = $(srcdir)/*/*/*.el
-lisptagsfiles4 = $(srcdir)/*/*/*/*.el
+${ETAGS}: FORCE
+ ${MAKE} -C ../lib-src $(notdir $@)
-## The ls | sed | xargs is to stop the command line getting too long
+## The use of xargs is to stop the command line getting too long
## on MS Windows, when the MSYS Bash passes it to a MinGW compiled
## etags. It might be better to use find in a similar way to
## compile-main. But maybe this is not even necessary any more now
## that this uses relative filenames.
-TAGS: $(lisptagsfiles1) $(lisptagsfiles2) $(lisptagsfiles3) $(lisptagsfiles4)
+TAGS: ${ETAGS} ${tagsfiles}
rm -f $@
touch $@
- ls $(lisptagsfiles1) $(lisptagsfiles2) \
- $(lisptagsfiles3) $(lisptagsfiles4) | \
- sed -e '/loaddefs/d; /\/ldefs-boot/d; /esh-groups\.el/d' | \
- xargs $(XARGS_LIMIT) "$(ETAGS)" -a -o $@
+ ls ${tagsfiles} | xargs $(XARGS_LIMIT) "${ETAGS}" -a -o $@
# The src/Makefile.in has its own set of dependencies and when they decide
CAL_DIR = $(lisp)/calendar
## Those files that may contain internal calendar autoload cookies.
CAL_SRC = $(addprefix ${CAL_DIR}/,diary-lib.el holidays.el lunar.el solar.el)
-CAL_SRC := $(sort ${CAL_SRC} $(wildcard ${CAL_DIR}/cal*.el))
+CAL_SRC := $(sort ${CAL_SRC} $(wildcard ${CAL_DIR}/cal-*.el))
CAL_SRC := $(filter-out ${CAL_DIR}/cal-loaddefs.el,${CAL_SRC})
$(CAL_DIR)/cal-loaddefs.el: $(CAL_SRC)
;;; Code:
(eval-when-compile (require 'cl-lib))
+(require 'obarray)
(defgroup abbrev-mode nil
"Word abbreviations mode."
"Make a new abbrev-table with the same abbrevs as TABLE.
Does not copy property lists."
(let ((new-table (make-abbrev-table)))
- (mapatoms
+ (obarray-map
(lambda (symbol)
(define-abbrev new-table
(symbol-name symbol)
(defun abbrev-table-get (table prop)
"Get the PROP property of abbrev table TABLE."
- (let ((sym (intern-soft "" table)))
+ (let ((sym (obarray-get table "")))
(if sym (get sym prop))))
(defun abbrev-table-put (table prop val)
"Set the PROP property of abbrev table TABLE to VAL."
- (let ((sym (intern "" table)))
+ (let ((sym (obarray-put table "")))
(set sym nil) ; Make sure it won't be confused for an abbrev.
(put sym prop val)))
(defun make-abbrev-table (&optional props)
"Create a new, empty abbrev table object.
PROPS is a list of properties."
- ;; The value 59 is an arbitrary prime number.
- (let ((table (make-vector 59 0)))
+ (let ((table (obarray-make)))
;; Each abbrev-table has a `modiff' counter which can be used to detect
;; when an abbreviation was added. An example of use would be to
;; construct :regexp dynamically as the union of all abbrev names, so
(defun abbrev-table-p (object)
"Return non-nil if OBJECT is an abbrev table."
- (and (vectorp object)
+ (and (obarrayp object)
(numberp (abbrev-table-get object :abbrev-table-modiff))))
(defun abbrev-table-empty-p (object &optional ignore-system)
(unless (abbrev-table-p object)
(error "Non abbrev table object"))
(not (catch 'some
- (mapatoms (lambda (abbrev)
- (unless (or (zerop (length (symbol-name abbrev)))
- (and ignore-system
- (abbrev-get abbrev :system)))
- (throw 'some t)))
- object))))
+ (obarray-map (lambda (abbrev)
+ (unless (or (zerop (length (symbol-name abbrev)))
+ (and ignore-system
+ (abbrev-get abbrev :system)))
+ (throw 'some t)))
+ object))))
(defvar global-abbrev-table (make-abbrev-table)
"The abbrev table whose abbrevs affect all buffers.
(defun clear-abbrev-table (table)
"Undefine all abbrevs in abbrev table TABLE, leaving it empty."
(setq abbrevs-changed t)
- (let* ((sym (intern-soft "" table)))
+ (let* ((sym (obarray-get table "")))
(dotimes (i (length table))
(aset table i 0))
;; Preserve the table's properties.
(cl-assert sym)
- (let ((newsym (intern "" table)))
+ (let ((newsym (obarray-put table "")))
(set newsym nil) ; Make sure it won't be confused for an abbrev.
(setplist newsym (symbol-plist sym)))
(abbrev-table-put table :abbrev-table-modiff
(setq props (plist-put props :abbrev-table-modiff
(abbrev-table-get table :abbrev-table-modiff)))
(let ((system-flag (plist-get props :system))
- (sym (intern name table)))
+ (sym (obarray-put table name)))
;; Don't override a prior user-defined abbrev with a system abbrev,
;; unless system-flag is `force'.
(unless (and (not (memq system-flag '(nil force)))
;; abbrevs do, we have to be careful.
(sym
;; First try without case-folding.
- (or (intern-soft abbrev table)
+ (or (obarray-get table abbrev)
(when case-fold
;; We didn't find any abbrev, try case-folding.
- (let ((sym (intern-soft (downcase abbrev) table)))
+ (let ((sym (obarray-get table (downcase abbrev))))
;; Only use it if it doesn't require :case-fixed.
(and sym (not (abbrev-get sym :case-fixed))
sym))))))
SORTFUN is passed to `sort' to change the default ordering."
(unless sortfun (setq sortfun 'string-lessp))
(let ((entries ()))
- (mapatoms (lambda (abbrev)
- (when (symbol-value abbrev)
- (let ((name (symbol-name abbrev)))
- (push `(,(intern name) menu-item ,name
- (lambda () (interactive)
- (abbrev-insert ',abbrev)))
- entries))))
- table)
+ (obarray-map (lambda (abbrev)
+ (when (symbol-value abbrev)
+ (let ((name (symbol-name abbrev)))
+ (push `(,(intern name) menu-item ,name
+ (lambda () (interactive)
+ (abbrev-insert ',abbrev)))
+ entries))))
+ table)
(nconc (make-sparse-keymap prompt)
(sort entries (lambda (x y)
- (funcall sortfun (nth 2 x) (nth 2 y)))))))
+ (funcall sortfun (nth 2 x) (nth 2 y)))))))
;; Keep it after define-abbrev-table, since define-derived-mode uses
;; define-abbrev-table.
(make-variable-buffer-local 'mode-line-buffer-identification)
(defvar mode-line-misc-info
- '((which-func-mode ("" which-func-format " "))
- (global-mode-string ("" global-mode-string " ")))
+ '((global-mode-string ("" global-mode-string " ")))
"Mode line construct for miscellaneous information.
-By default, this shows the information specified by
-`which-func-mode' and `global-mode-string'.")
+By default, this shows the information specified by `global-mode-string'.")
(put 'mode-line-misc-info 'risky-local-variable t)
(defvar mode-line-end-spaces '(:eval (unless (display-graphic-p) "-%-"))
floats, otherwise the Emacs reader will fail on them."
:type 'boolean
:group 'calculator)
+(make-obsolete-variable 'calculator-paste-decimals
+ "it is no longer used." nil)
(defcustom calculator-copy-displayer nil
"If non-nil, this is any value that can be used for
before you load calculator."
:type '(repeat (cons character number))
:set (lambda (_ val)
- (and (boundp 'calculator-registers)
- (setq calculator-registers
- (append val calculator-registers)))
+ (when (boundp 'calculator-registers)
+ (setq calculator-registers
+ (append val calculator-registers)))
(setq calculator-user-registers val))
:group 'calculator)
(\"tF\" mt-to-ft (/ X 0.3048) 1)
(\"tM\" ft-to-mt (* X 0.3048) 1)))
-* Using a function-like form is very simple: use `X' for the argument
- (`Y' for the second in case of a binary operator), `TX' is a truncated
+* Using a function-like form is simple: use `X' for the argument (`Y'
+ for a second one in case of a binary operator), `TX' is a truncated
version of `X' and `F' for a recursive call. Here is a [very
- inefficient] Fibonacci number calculation:
+ inefficient] Fibonacci number operator:
(add-to-list \\='calculator-user-operators
\\='(\"F\" fib
(defvar calculator-operators nil
"The calculator operators, each a list with:
-1. The key that is bound to for this operation (usually a string);
+1. The key(s) that is bound to for this operation, a string that is
+ used with `kbd';
2. The displayed symbol for this function;
It it possible have a unary prefix version of a binary operator if it
comes later in this list. If the list begins with the symbol `nobind',
-then no key binding will take place -- this is only useful for
-predefined keys.
+then no key binding will take place -- this is only used for predefined
+keys.
Use `calculator-user-operators' to add operators to this list, see its
documentation for an example.")
(list (cons ?e float-e) (cons ?p float-pi)))
"The association list of calculator register values.")
-(defvar calculator-saved-global-map nil
- "Saved global key map.")
-
(defvar calculator-restart-other-mode nil
"Used to hack restarting with the electric mode changed.")
;;;---------------------------------------------------------------------
;;; Key bindings
+(defun calculator-define-key (key cmd map)
+ ;; Arranges for unbound alphabetic keys to be used as their un/shifted
+ ;; versions if those are bound (mimics the usual Emacs global bindings).
+ ;; FIXME: We should adjust Emacs's native "fallback to unshifted binding"
+ ;; such that it can also be used here, rather than having to use a hack like
+ ;; this one.
+ (let* ((key (if (stringp key) (kbd key) key))
+ (omap (keymap-parent map)))
+ (define-key map key cmd)
+ ;; "other" map, used for case-flipped bindings
+ (unless omap
+ (setq omap (make-sparse-keymap))
+ (suppress-keymap omap t)
+ (set-keymap-parent map omap))
+ (let ((m omap))
+ ;; Bind all case-flipped versions.
+ (dotimes (i (length key))
+ (let* ((c (aref key i))
+ (k (vector c))
+ (b (lookup-key m k))
+ (defkey (lambda (x)
+ (define-key m k x)
+ (when (and (characterp c)
+ (or (<= ?A c ?Z) (<= ?a c ?z)))
+ (define-key m (vector (logxor 32 c)) x)))))
+ (cond ((= i (1- (length key)))
+ ;; Prefer longer sequences.
+ (unless (keymapp b) (funcall defkey cmd)))
+ ((keymapp b) (setq m b))
+ (t (let ((sub (make-sparse-keymap)))
+ (funcall defkey sub)
+ (setq m sub)))))))))
+
(defvar calculator-mode-map
(let ((map (make-sparse-keymap)))
(suppress-keymap map t)
- (define-key map "i" nil)
- (define-key map "o" nil)
- (let ((p
- '((calculator-open-paren "[")
- (calculator-close-paren "]")
- (calculator-op-or-exp "+" "-" [kp-add] [kp-subtract])
- (calculator-digit "0" "1" "2" "3" "4" "5" "6" "7" "8"
- "9" "a" "b" "c" "d" "f"
- [kp-0] [kp-1] [kp-2] [kp-3] [kp-4]
- [kp-5] [kp-6] [kp-7] [kp-8] [kp-9])
- (calculator-op [kp-divide] [kp-multiply])
- (calculator-decimal "." [kp-decimal])
- (calculator-exp "e")
- (calculator-dec/deg-mode "D")
- (calculator-set-register "s")
- (calculator-get-register "g")
- (calculator-radix-mode "H" "X" "O" "B")
- (calculator-radix-input-mode "id" "ih" "ix" "io" "ib"
- "iD" "iH" "iX" "iO" "iB")
- (calculator-radix-output-mode "od" "oh" "ox" "oo" "ob"
- "oD" "oH" "oX" "oO" "oB")
- (calculator-rotate-displayer "'")
- (calculator-rotate-displayer-back "\"")
- (calculator-displayer-prev "{")
- (calculator-displayer-next "}")
- (calculator-saved-up [up] [?\C-p])
- (calculator-saved-down [down] [?\C-n])
- (calculator-quit "q" [?\C-g])
- (calculator-enter [enter] [linefeed] [kp-enter]
- [return] [?\r] [?\n])
- (calculator-save-on-list " " [space])
- (calculator-clear-saved [?\C-c] [(control delete)])
- (calculator-save-and-quit [(control return)]
- [(control kp-enter)])
- (calculator-paste [insert] [(shift insert)]
- [paste] [mouse-2] [?\C-y])
- (calculator-clear [delete] [?\C-?] [?\C-d])
- (calculator-help [?h] [??] [f1] [help])
- (calculator-copy [(control insert)] [copy])
- (calculator-backspace [backspace])
- )))
- (while p
- ;; reverse the keys so earlier definitions come last -- makes
- ;; the more sensible bindings visible in the menu
- (let ((func (caar p)) (keys (reverse (cdar p))))
- (while keys
- (define-key map (car keys) func)
- (setq keys (cdr keys))))
- (setq p (cdr p))))
+ (dolist (x '((calculator-digit
+ "0" "1" "2" "3" "4" "5" "6" "7" "8" "9" "a" "b" "c"
+ "d" "f" "<kp-0>" "<kp-1>" "<kp-2>" "<kp-3>" "<kp-4>"
+ "<kp-5>" "<kp-6>" "<kp-7>" "<kp-8>" "<kp-9>")
+ (calculator-open-paren "[")
+ (calculator-close-paren "]")
+ (calculator-op-or-exp "+" "-"
+ "<kp-add>" "<kp-subtract>")
+ (calculator-op "<kp-divide>" "<kp-multiply>")
+ (calculator-decimal "." "<kp-decimal>")
+ (calculator-exp "e")
+ (calculator-dec/deg-mode "D")
+ (calculator-set-register "s")
+ (calculator-get-register "g")
+ (calculator-radix-mode "H" "X" "O" "B")
+ (calculator-radix-input-mode "iD" "iH" "iX" "iO" "iB")
+ (calculator-radix-output-mode "oD" "oH" "oX" "oO" "oB")
+ (calculator-rotate-displayer "'")
+ (calculator-rotate-displayer-back "\"")
+ (calculator-displayer-prev "{")
+ (calculator-displayer-next "}")
+ (calculator-saved-up "<up>" "C-p")
+ (calculator-saved-down "<down>" "C-n")
+ (calculator-quit "q" "C-g")
+ (calculator-enter "<enter>" "<linefeed>"
+ "<kp-enter>" "<return>"
+ "RET" "LFD")
+ (calculator-save-on-list "SPC" "<space>")
+ (calculator-clear-saved "C-c" "<C-delete>")
+ (calculator-save-and-quit "<C-return>" "<C-kp-enter>")
+ (calculator-paste "<insert>" "<S-insert>"
+ "<paste>" "<mouse-2>" "C-y")
+ (calculator-clear "<delete>" "DEL" "C-d")
+ (calculator-help "h" "?" "<f1>" "<help>")
+ (calculator-copy "<C-insert>" "<copy>")
+ (calculator-backspace "<backspace>")
+ ))
+ ;; reverse the keys so earlier definitions come last -- makes the
+ ;; more sensible bindings visible in the menu
+ (dolist (k (reverse (cdr x)))
+ (calculator-define-key k (car x) map)))
(if calculator-bind-escape
- (progn (define-key map [?\e] 'calculator-quit)
- (define-key map [escape] 'calculator-quit))
- (define-key map [?\e ?\e ?\e] 'calculator-quit))
+ (progn (calculator-define-key "ESC" 'calculator-quit map)
+ (calculator-define-key "<escape>" 'calculator-quit map))
+ (calculator-define-key "ESC ESC ESC" 'calculator-quit map))
;; make C-h work in text-mode
- (or window-system (define-key map [?\C-h] 'calculator-backspace))
+ (unless window-system
+ (calculator-define-key "C-h" 'calculator-backspace map))
;; set up a menu
(when (and calculator-use-menu (not (boundp 'calculator-menu)))
(let ((radix-selectors
("Modes"
["Radians"
(progn
- (and (or calculator-input-radix calculator-output-radix)
- (calculator-radix-mode "D"))
- (and calculator-deg (calculator-dec/deg-mode)))
+ (when (or calculator-input-radix calculator-output-radix)
+ (calculator-radix-mode "D"))
+ (when calculator-deg (calculator-dec/deg-mode)))
:keys "D"
:style radio
:selected (not (or calculator-input-radix
calculator-deg))]
["Degrees"
(progn
- (and (or calculator-input-radix calculator-output-radix)
- (calculator-radix-mode "D"))
- (or calculator-deg (calculator-dec/deg-mode)))
+ (when (or calculator-input-radix calculator-output-radix)
+ (calculator-radix-mode "D"))
+ (unless calculator-deg (calculator-dec/deg-mode)))
:keys "D"
:style radio
:selected (and calculator-deg
hex/oct/bin modes can be set for input and for display separately.
Another toggle-able mode is for using degrees instead of radians for
trigonometric functions.
-The keys to switch modes are (`X' is shortcut for `H'):
+The keys to switch modes are (both `H' and `X' are for hex):
* `D' switch to all-decimal mode, or toggle degrees/radians
* `B' `O' `H' `X' binary/octal/hexadecimal modes for input & display
* `i' `o' followed by one of `D' `B' `O' `H' `X' (case
insensitive) sets only the input or display radix mode
The prompt indicates the current modes:
-* \"D=\": degrees mode;
-* \"?=\": (? is B/O/H) this is the radix for both input and output;
-* \"=?\": (? is B/O/H) the display radix (when input is decimal);
-* \"??\": (? is D/B/O/H) 1st char for input radix, 2nd for display.
+* \"==\": decimal mode (using radians);
+* \"D=\": decimal mode using degrees;
+* \"?=\": ? is B/O/H, the radix for both input and output;
+* \"=?\": ? is B/O/H, the display radix (with decimal input);
+* \"??\": ? is D/B/O/H, 1st char for input radix, 2nd for display.
Also, the quote key can be used to switch display modes for decimal
numbers (double-quote rotates back), and the two brace characters
(if calculator-electric-mode
(save-window-excursion
(require 'electric) (message nil) ; hide load message
- (let (old-g-map old-l-map
- (old-buf (window-buffer (minibuffer-window)))
+ (let ((old-buf (window-buffer (minibuffer-window)))
(echo-keystrokes 0)
(garbage-collection-messages nil)) ; no gc msg when electric
(set-window-buffer (minibuffer-window) calculator-buffer)
(select-window (minibuffer-window))
(calculator-reset)
(calculator-update-display)
- (setq old-l-map (current-local-map))
- (setq old-g-map (current-global-map))
- (setq calculator-saved-global-map (current-global-map))
- (use-local-map nil)
- (use-global-map calculator-mode-map)
+ (use-local-map calculator-mode-map)
(run-hooks 'calculator-mode-hook)
(unwind-protect
(catch 'calculator-done
nil
(lambda (_x _y) (calculator-update-display))))
(set-window-buffer (minibuffer-window) old-buf)
- (kill-buffer calculator-buffer)
- (use-local-map old-l-map)
- (use-global-map old-g-map))))
+ (kill-buffer calculator-buffer))))
(progn
(cond
((not (get-buffer-window calculator-buffer))
Adds MORE-OPS to `calculator-operator', called initially to handle
`calculator-initial-operators' and `calculator-user-operators'."
(let ((added-ops nil))
- (while more-ops
- (or (eq (caar more-ops) 'nobind)
- (let ((i -1) (key (caar more-ops)))
- ;; make sure the key is undefined, so it's easy to define
- ;; prefix keys
- (while (< (setq i (1+ i)) (length key))
- (or (keymapp
- (lookup-key calculator-mode-map
- (substring key 0 (1+ i))))
- (progn
- (define-key
- calculator-mode-map (substring key 0 (1+ i)) nil)
- (setq i (length key)))))
- (define-key calculator-mode-map key 'calculator-op)))
- (setq added-ops (cons (if (eq (caar more-ops) 'nobind)
- (cdar more-ops)
- (car more-ops))
- added-ops))
- (setq more-ops (cdr more-ops)))
+ (dolist (op more-ops)
+ (unless (eq (car op) 'nobind)
+ (calculator-define-key (car op) 'calculator-op calculator-mode-map))
+ (push (if (eq (car op) 'nobind) (cdr op) op)
+ added-ops))
;; added-ops come first, but in correct order
(setq calculator-operators
(append (nreverse added-ops) calculator-operators))))
(defun calculator-reset ()
"Reset calculator variables."
- (or calculator-restart-other-mode
- (setq calculator-stack nil
- calculator-curnum nil
- calculator-stack-display nil
- calculator-display-fragile nil))
+ (unless calculator-restart-other-mode
+ (setq calculator-stack nil
+ calculator-curnum nil
+ calculator-stack-display nil
+ calculator-display-fragile nil))
(setq calculator-restart-other-mode nil)
(calculator-update-display))
(cond ((or in-r out-r)
(concat (or in-r "=")
(if (equal in-r out-r) "="
- (or out-r "="))))
+ (or out-r "D"))))
(calculator-deg "D=")
(t "=="))))
(expr
"Convert the given STR to a number, according to the value of
`calculator-input-radix'."
(if calculator-input-radix
- (let ((radix
- (cdr (assq calculator-input-radix
- '((bin . 2) (oct . 8) (hex . 16)))))
- (i -1) (value 0) (new-value 0))
- ;; assume mostly valid input (e.g., characters in range)
- (while (< (setq i (1+ i)) (length str))
- (setq new-value
- (let* ((ch (upcase (aref str i)))
- (n (cond ((< ch ?0) nil)
- ((<= ch ?9) (- ch ?0))
- ((< ch ?A) nil)
- ((<= ch ?Z) (- ch (- ?A 10)))
- (t nil))))
- (if (and n (<= 0 n) (< n radix))
- (+ n (* radix value))
- (progn
- (calculator-message
- "Warning: Ignoring bad input character `%c'." ch)
- (sit-for 1)
- value))))
- (when (if (< new-value 0) (> value 0) (< value 0))
- (calculator-message "Warning: Overflow in input."))
- (setq value new-value))
- value)
- (car (read-from-string
- (cond ((equal "." str) "0.0")
- ((string-match-p "[eE][+-]?$" str) (concat str "0"))
- ((string-match-p "\\.[0-9]\\|[eE]" str) str)
- ((string-match-p "\\." str)
- ;; do this because Emacs reads "23." as an integer
- (concat str "0"))
- ((stringp str) (concat str ".0"))
- (t "0.0"))))))
+ (string-to-number str (cadr (assq calculator-input-radix
+ '((bin 2) (oct 8) (hex 16)))))
+ (let* ((str (replace-regexp-in-string
+ "\\.\\([^0-9].*\\)?$" ".0\\1" str))
+ (str (replace-regexp-in-string
+ "[eE][+-]?\\([^0-9].*\\)?$" "e0\\1" str)))
+ (string-to-number str))))
(defun calculator-push-curnum ()
"Push the numeric value of the displayed number to the stack."
(if (and new-disp (memq new-disp calculator-displayers))
(let ((tmp nil))
(while (not (eq (car calculator-displayers) new-disp))
- (setq tmp (cons (car calculator-displayers) tmp))
- (setq calculator-displayers
- (cdr calculator-displayers)))
+ (push (pop calculator-displayers) tmp))
(setq calculator-displayers
(nconc calculator-displayers (nreverse tmp))))
(nconc (cdr calculator-displayers)
(progn (setq calculator-radix-grouping-digits
(1+ calculator-radix-grouping-digits))
(calculator-enter))
- (and (car calculator-displayers)
- (let ((disp (caar calculator-displayers)))
- (cond ((symbolp disp) (funcall disp 'left))
- ((and (consp disp) (eq 'std (car disp)))
- (calculator-standard-displayer 'left)))))))
+ (when (car calculator-displayers)
+ (let ((disp (caar calculator-displayers)))
+ (cond ((symbolp disp) (funcall disp 'left))
+ ((and (consp disp) (eq 'std (car disp)))
+ (calculator-standard-displayer 'left)))))))
(defun calculator-displayer-next ()
"Send the current displayer function a `right' argument.
(progn (setq calculator-radix-grouping-digits
(max 2 (1- calculator-radix-grouping-digits)))
(calculator-enter))
- (and (car calculator-displayers)
- (let ((disp (caar calculator-displayers)))
- (cond ((symbolp disp) (funcall disp 'right))
- ((and (consp disp) (eq 'std (car disp)))
- (calculator-standard-displayer 'right)))))))
+ (when (car calculator-displayers)
+ (let ((disp (caar calculator-displayers)))
+ (cond ((symbolp disp) (funcall disp 'right))
+ ((and (consp disp) (eq 'std (car disp)))
+ (calculator-standard-displayer 'right)))))))
(defun calculator-remove-zeros (numstr)
"Get a number string NUMSTR and remove unnecessary zeros.
number of digits displayed (`calculator-number-digits')."
(if (symbolp num)
(cond ((eq num 'left)
- (and (> calculator-number-digits 0)
- (setq calculator-number-digits
- (1- calculator-number-digits))
- (calculator-enter)))
+ (when (> calculator-number-digits 0)
+ (setq calculator-number-digits
+ (1- calculator-number-digits))
+ (calculator-enter)))
((eq num 'right)
(setq calculator-number-digits
(1+ calculator-number-digits))
(while (< i 0)
(setq num (/ num 1000.0)) (setq exp (+ exp 3))
(setq i (1+ i))))))
- (or calculator-eng-tmp-show (setq calculator-eng-extra nil))
+ (unless calculator-eng-tmp-show (setq calculator-eng-extra nil))
(let ((str (format (format "%%.%sf" calculator-number-digits)
num)))
(concat (let ((calculator-remove-zeros
(DX (if (and X calculator-deg) (degrees-to-radians X) X))
(L calculator-saved-list)
(fF `(calculator-funcall ',f x y))
- (fD `(if calculator-deg (* radians-to-degrees x) x)))
+ (fD `(if calculator-deg (radians-to-degrees x) x)))
(eval `(cl-flet ((F (&optional x y) ,fF) (D (x) ,fD))
(let ((X ,X) (Y ,Y) (DX ,DX) (TX ,TX) (TY ,TY) (L ',L))
,f))
;;; Input interaction
(defun calculator-last-input (&optional keys)
- "Last char (or event or event sequence) that was read.
-Use KEYS if given, otherwise use `this-command-keys'."
- (let ((inp (or keys (this-command-keys))))
- (if (or (stringp inp) (not (arrayp inp)))
+ "Return the last key sequence that was used to invoke this command, or
+the input KEYS. Uses the `function-key-map' translate keypad numbers to
+plain ones."
+ (let* ((inp (or keys (this-command-keys)))
+ (inp (or (and (arrayp inp) (not (stringp inp))
+ (lookup-key function-key-map inp))
+ inp)))
+ (if (or (not inp) (stringp inp) (not (arrayp inp))
+ (catch 'done ; any non-chars?
+ (dotimes (i (length inp))
+ (unless (characterp (aref inp i)) (throw 'done t)))
+ nil))
inp
- ;; Translates kp-x to x and [tries to] create a string to lookup
- ;; operators; assume all symbols are translatable via
- ;; `function-key-map'. This is needed because we have key
- ;; bindings for kp-* (which might be the wrong thing to do) so
- ;; they don't get translated in `this-command-keys'.
- (concat (mapcar (lambda (k)
- (if (numberp k) k (error "??bad key?? (%S)" k)))
- (or (lookup-key function-key-map inp) inp))))))
+ (concat inp))))
(defun calculator-clear-fragile (&optional op)
"Clear the fragile flag if it was set, then maybe reset all.
(calculator-update-display)))
(defun calculator-exp ()
- "Enter an `E' exponent character, or a digit in hex input mode."
+ "Enter an exponent, or an \"E\" digit in hex input mode."
(interactive)
(cond
(calculator-input-radix (calculator-digit))
(throw 'op-error nil))
(push op calculator-stack)
(calculator-reduce-stack (calculator-op-prec op))
- (and (= (length calculator-stack) 1)
- (numberp (car calculator-stack))
- ;; the display is fragile if it contains only one number
- (setq calculator-display-fragile t)
- ;; add number to the saved-list
- calculator-add-saved
- (if (= 0 calculator-saved-ptr)
- (setq calculator-saved-list
- (cons (car calculator-stack) calculator-saved-list))
- (let ((p (nthcdr (1- calculator-saved-ptr)
- calculator-saved-list)))
- (setcdr p (cons (car calculator-stack) (cdr p))))))
+ (when (and (= (length calculator-stack) 1)
+ (numberp (car calculator-stack)))
+ ;; the display is fragile if it contains only one number
+ (setq calculator-display-fragile t)
+ (when calculator-add-saved ; add number to the saved-list
+ (push (car calculator-stack)
+ (nthcdr calculator-saved-ptr calculator-saved-list))))
(calculator-update-display))))
(defun calculator-op-or-exp ()
no need for negative numbers since these are handled by unary
operators)."
(interactive)
- (if (and (not calculator-display-fragile)
+ (if (and (not calculator-input-radix)
+ (not calculator-display-fragile)
calculator-curnum
(string-match-p "[eE]$" calculator-curnum))
(calculator-digit)
(interactive)
(calculator-push-curnum)
(if (or calculator-input-radix calculator-output-radix)
- (progn (setq calculator-input-radix nil)
- (setq calculator-output-radix nil))
+ (setq calculator-input-radix nil
+ calculator-output-radix nil)
;; already decimal -- toggle degrees mode
(setq calculator-deg (not calculator-deg)))
(calculator-update-display t))
(defun calculator-clear-saved ()
"Clear the list of saved values in `calculator-saved-list'."
(interactive)
- (setq calculator-saved-list nil)
- (setq calculator-saved-ptr 0)
+ (setq calculator-saved-list nil
+ calculator-saved-ptr 0)
(calculator-update-display t))
(defun calculator-saved-move (n)
(kill-new (replace-regexp-in-string
"^\\([^ ]+\\) *\\(\\[[0-9/]+\\]\\)? *$" "\\1" s))))))
-(defun calculator-set-register (reg)
- "Set a register value for REG."
- ;; FIXME: this should use `register-read-with-preview', but it uses
- ;; calculator-registers rather than `register-alist'. (Maybe
- ;; dynamically rebinding it will get blessed?) Also in to
- ;; `calculator-get-register'.
- (interactive "cRegister to store into: ")
- (let* ((as (assq reg calculator-registers))
- (val (progn (calculator-enter) (car calculator-stack))))
- (if as
- (setcdr as val)
- (setq calculator-registers
- (cons (cons reg val) calculator-registers)))
- (calculator-message "[%c] := %S" reg val)))
-
(defun calculator-put-value (val)
"Paste VAL as if entered.
Used by `calculator-paste' and `get-register'."
(or calculator-display-fragile
(not (numberp (car calculator-stack)))))
(calculator-clear-fragile)
- (setq calculator-curnum (let ((calculator-displayer "%S"))
- (calculator-number-to-string val)))
+ (setq calculator-curnum
+ (let ((calculator-displayer "%S")
+ (calculator-radix-grouping-mode nil)
+ (calculator-output-radix calculator-input-radix))
+ (calculator-number-to-string val)))
(calculator-update-display)))
-(defun calculator-paste ()
- "Paste a value from the `kill-ring'."
- (interactive)
- (calculator-put-value
- (let ((str (replace-regexp-in-string
- "^ *\\(.+[^ ]\\) *$" "\\1" (current-kill 0))))
- (and (not calculator-input-radix)
- calculator-paste-decimals
- (string-match "\\([0-9]+\\)\\(\\.[0-9]+\\)?\\(e[0-9]+\\)?"
- str)
- (or (match-string 1 str)
- (match-string 2 str)
- (match-string 3 str))
- (setq str (concat (or (match-string 1 str) "0")
- (or (match-string 2 str) ".0")
- (or (match-string 3 str) ""))))
- (ignore-errors (calculator-string-to-number str)))))
+(defun calculator-paste (arg)
+ "Paste a value from the `kill-ring'.
+
+With a prefix argument, paste the raw string as a sequence of key
+presses, which can be used to paste expressions. Note that this
+is literal; examples: spaces will store values, pasting \"1+2\"
+will not produce 3 if it's done you're entering a number or after
+a multiplication."
+ (interactive "P")
+ (let ((str (current-kill 0)))
+ (if arg
+ (setq unread-command-events
+ `(,@(listify-key-sequence str) ,@unread-command-events))
+ (calculator-put-value (calculator-string-to-number str)))))
+
+(defun calculator-register-read-with-preview (prompt)
+ "Similar to `register-read-with-preview' but for calculator
+registers."
+ (let ((register-alist calculator-registers)
+ (register-preview-delay 1)
+ (register-preview-function
+ (lambda (r)
+ (format "%s: %s\n"
+ (single-key-description (car r))
+ (calculator-number-to-string (cdr r))))))
+ (register-read-with-preview prompt)))
+
+(defun calculator-set-register (reg)
+ "Set a register value for REG."
+ (interactive (list (calculator-register-read-with-preview
+ "Register to store value into: ")))
+ (let* ((as (assq reg calculator-registers))
+ (val (progn (calculator-enter) (car calculator-stack))))
+ (if as
+ (setcdr as val)
+ (push (cons reg val) calculator-registers))
+ (calculator-message "[%c] := %S" reg val)))
(defun calculator-get-register (reg)
"Get a value from a register REG."
- (interactive "cRegister to get value from: ")
+ (interactive (list (calculator-register-read-with-preview
+ "Register to get value from: ")))
(calculator-put-value (cdr (assq reg calculator-registers))))
(declare-function electric-describe-mode "ehelp" ())
+ - * / \\(div) %(rem) _(-X,postfix) ;(1/X,postfix) ^(exp) L(og)
Q(sqrt) !(fact) S(in) C(os) T(an) |(or) #(xor) &(and) ~(not)
* >/< repeats last binary operation with its 2nd (1st) arg as postfix op
-* I inverses next trig function * \\='/\"/{} - display/display args
+* I inverse the next trig function \
+* \\='/\"/{/} - display/display args
* D - switch to all-decimal, or toggle deg/rad mode
-* B/O/H/X - binary/octal/hex mode for i/o (X is a shortcut for H)
-* i/o - prefix for d/b/o/x - set only input/output modes
+* B/O/H/X - binary/octal/hex mode for i/o (both H and X are for hex)
+* i/o - prefix for D/B/O/X - set only input/output modes
* enter/= - evaluate current expr. * s/g - set/get a register
* space - evaluate & save on list * l/v - list total/average
* up/down/C-p/C-n - browse saved * C-delete - clear all saved
(if (eq last-command 'calculator-help)
(let ((mode-name "Calculator")
(major-mode 'calculator-mode)
- (g-map (current-global-map))
(win (selected-window)))
(require 'ehelp)
- (when calculator-electric-mode
- (use-global-map calculator-saved-global-map))
- (if calculator-electric-mode
- (electric-describe-mode)
- (describe-mode))
- (when calculator-electric-mode (use-global-map g-map))
+ (if (not calculator-electric-mode)
+ (describe-mode)
+ (electric-describe-mode))
(select-window win)
(message nil))
(let ((one (one-window-p t))
of the Hebrew calendar entries, except that the Hebrew month
names cannot be abbreviated. The Hebrew months are numbered
from 1 to 13 with Nisan being 1, 12 being Adar I and 13 being
-Adar II; you must use `Adar I' if you want Adar of a common
+Adar II; you must use \"Adar I\" if you want Adar of a common
Hebrew year. If a Hebrew date diary entry begins with
`diary-nonmarking-symbol', the entry will appear in the diary
listing, but will not be marked in the calendar. This function
(defun calendar-iso-to-absolute (date)
"The number of days elapsed between the Gregorian date 12/31/1 BC and DATE.
-The `ISO year' corresponds approximately to the Gregorian year, but
+The \"ISO year\" corresponds approximately to the Gregorian year, but
weeks start on Monday and end on Sunday. The first week of the ISO year is
the first such week in which at least 4 days are in a year. The ISO
commercial DATE has the form (week day year) in which week is in the range
;;;###cal-autoload
(defun calendar-iso-from-absolute (date)
- "Compute the `ISO commercial date' corresponding to the absolute DATE.
+ "Compute the \"ISO commercial date\" corresponding to the absolute DATE.
The ISO year corresponds approximately to the Gregorian year, but weeks
start on Monday and end on Sunday. The first week of the ISO year is the
first such week in which at least 4 days are in a year. The ISO commercial
(cal-tex-cmd "\\hspace*" space))
(defun cal-tex-comment (&optional comment)
- "Insert `% ', followed by optional string COMMENT, followed by newline.
-COMMENT may contain newlines, which are prefixed by `% ' in the output."
+ "Insert \"% \", followed by optional string COMMENT, followed by newline.
+COMMENT may contain newlines, which are prefixed by \"% \" in the output."
(insert (format "%% %s\n"
(if comment
(replace-regexp-in-string "\n" "\n% " comment)
For example, the form
- '(24-hours \":\" minutes
+ (24-hours \":\" minutes
(if time-zone \" (\") time-zone (if time-zone \")\"))
-would give military-style times like `21:07 (UTC)'."
+would give military-style times like \"21:07 (UTC)\"."
:type 'sexp
:risky t
:group 'calendar)
;; Snart args...
(up-list -1)
(forward-char 1)
- (forward-word-strictly 1)
+ (forward-word 1)
(skip-chars-forward "* \t\n")
(let ((arglst (read (buffer-substring-no-properties
(point)
(when (not parenthetical)
;; We are in parentheses. Are they the types of parens
;; belonging to a texinfo construct?
- (forward-word-strictly -1)
+ (forward-word -1)
(when (looking-at "@\\w+{")
(setq done (point))))))
;; If we are not in a parenthetical node, then find a block instead.
;; If we can't go up, we can't do this either.
t
;; We moved, so now we need to skip into whatever this thing is.
- (forward-word-strictly 1) ;; skip the command
+ (forward-word 1) ;; skip the command
(if (looking-at "\\s-*{")
;; In a short command. Go in.
(down-list 1)
;; Remove chars to ignore at the start.
(cond ((= (char-syntax (char-after cmpl-symbol-start)) ?w)
(goto-char cmpl-symbol-start)
- (forward-word-strictly 1)
+ (forward-word 1)
(setq cmpl-symbol-start (point))
(goto-char saved-point)))
;; Remove chars to ignore at the end.
(cond ((= (char-syntax (char-after (1- cmpl-symbol-end))) ?w)
(goto-char cmpl-symbol-end)
- (forward-word-strictly -1)
+ (forward-word -1)
(setq cmpl-symbol-end (point))
(goto-char saved-point)))
;; Return completion if the length is reasonable.
;; Remove chars to ignore at the start.
(cond ((= (char-syntax (char-after cmpl-symbol-start)) ?w)
(goto-char cmpl-symbol-start)
- (forward-word-strictly 1)
+ (forward-word 1)
(setq cmpl-symbol-start (point))
(goto-char cmpl-symbol-end)))
;; Return value if long enough.
(let ((saved-point (point)))
(setq cmpl-symbol-start (scan-sexps saved-point -1))
;; take off chars. from end
- (forward-word-strictly -1)
+ (forward-word -1)
(setq cmpl-symbol-end (point))
;; remove chars to ignore at the start
(cond ((= (char-syntax (char-after cmpl-symbol-start)) ?w)
(goto-char cmpl-symbol-start)
- (forward-word-strictly 1)
+ (forward-word 1)
(setq cmpl-symbol-start (point))))
;; Restore state.
(goto-char saved-point)
;; Remove chars to ignore at the start.
(cond ((= (char-syntax (char-after cmpl-symbol-start)) ?w)
(goto-char cmpl-symbol-start)
- (forward-word-strictly 1)
+ (forward-word 1)
(setq cmpl-symbol-start (point))
(goto-char cmpl-symbol-end)))
;; Return completion if the length is reasonable.
;; symbol char to ignore at end. Are we at end ?
(progn
(setq saved-point-2 (point))
- (forward-word-strictly -1)
+ (forward-word -1)
(prog1
(= (char-syntax (preceding-char)) ? )
(goto-char saved-point-2)))))
(cond ((looking-at "\\(define\\|ifdef\\)\\>")
;; skip forward over definition symbol
;; and add it to database
- (and (forward-word-strictly 2)
+ (and (forward-word 2)
(setq string (symbol-before-point))
;;(push string foo)
(add-completion-to-tail-if-new string)))))
;; move to next separator char.
(goto-char
(setq next-point (scan-sexps (point) 1))))
- (forward-word-strictly -1)
+ (forward-word -1)
;; add to database
(if (setq string (symbol-under-point))
;; (push string foo)
;; Local TMC hack (useful for parsing paris.h)
(if (and (looking-at "_AP") ;; "ansi prototype"
(progn
- (forward-word-strictly -1)
+ (forward-word -1)
(setq string
(symbol-under-point))))
(add-completion-to-tail-if-new string)))
(unless (eq symbol basevar)
(message "`%s' is an alias for `%s'" symbol basevar))))
-(defvar customize-changed-options-previous-release "24.1"
+(defvar customize-changed-options-previous-release "24.5"
"Version for `customize-changed-options' to refer back to by default.")
;; Packages will update this variable, so make it available.
;; Local Variables:
;; byte-compile-dynamic: t
-;; generated-autoload-file: "dired.el"
+;; generated-autoload-file: "dired-loaddefs.el"
;; End:
;;; dired-aux.el ends here
;; Local Variables:
;; byte-compile-dynamic: t
-;; generated-autoload-file: "dired.el"
+;; generated-autoload-file: "dired-loaddefs.el"
;; End:
;;; dired-x.el ends here
;;; Code:
+;; When bootstrapping dired-loaddefs has not been generated.
+(require 'dired-loaddefs nil t)
+
(declare-function dired-buffer-more-recently-used-p
"dired-x" (buffer1 buffer2))
(define-key map "u" 'dired-unmark)
(define-key map "v" 'dired-view-file)
(define-key map "w" 'dired-copy-filename-as-kill)
+ (define-key map "W" 'browse-url-of-dired-file)
(define-key map "x" 'dired-do-flagged-delete)
(define-key map "y" 'dired-show-file-type)
(define-key map "+" 'dired-create-directory)
(add-to-list 'desktop-buffer-mode-handlers
'(dired-mode . dired-restore-desktop-buffer))
-\f
-;;; Start of automatically extracted autoloads.
-\f
-;;;### (autoloads nil "dired-aux" "dired-aux.el" "11abafc4f164a0e7599096a5f8deb455")
-;;; Generated autoloads from dired-aux.el
-
-(autoload 'dired-diff "dired-aux" "\
-Compare file at point with file FILE using `diff'.
-If called interactively, prompt for FILE. If the file at point
-has a backup file, use that as the default. If the file at point
-is a backup file, use its original. If the mark is active
-in Transient Mark mode, use the file at the mark as the default.
-\(That's the mark set by \\[set-mark-command], not by Dired's
-\\[dired-mark] command.)
-
-FILE is the first file given to `diff'. The file at point
-is the second file given to `diff'.
-
-With prefix arg, prompt for second argument SWITCHES, which is
-the string of command switches for the third argument of `diff'.
-
-\(fn FILE &optional SWITCHES)" t nil)
-
-(autoload 'dired-backup-diff "dired-aux" "\
-Diff this file with its backup file or vice versa.
-Uses the latest backup, if there are several numerical backups.
-If this file is a backup, diff it with its original.
-The backup file is the first file given to `diff'.
-With prefix arg, prompt for argument SWITCHES which is options for `diff'.
-
-\(fn &optional SWITCHES)" t nil)
-
-(autoload 'dired-compare-directories "dired-aux" "\
-Mark files with different file attributes in two dired buffers.
-Compare file attributes of files in the current directory
-with file attributes in directory DIR2 using PREDICATE on pairs of files
-with the same name. Mark files for which PREDICATE returns non-nil.
-Mark files with different names if PREDICATE is nil (or interactively
-with empty input at the predicate prompt).
-
-PREDICATE is a Lisp expression that can refer to the following variables:
-
- size1, size2 - file size in bytes
- mtime1, mtime2 - last modification time in seconds, as a float
- fa1, fa2 - list of file attributes
- returned by function `file-attributes'
-
- where 1 refers to attribute of file in the current dired buffer
- and 2 to attribute of file in second dired buffer.
-
-Examples of PREDICATE:
-
- (> mtime1 mtime2) - mark newer files
- (not (= size1 size2)) - mark files with different sizes
- (not (string= (nth 8 fa1) (nth 8 fa2))) - mark files with different modes
- (not (and (= (nth 2 fa1) (nth 2 fa2)) - mark files with different UID
- (= (nth 3 fa1) (nth 3 fa2)))) and GID.
-
-\(fn DIR2 PREDICATE)" t nil)
-
-(autoload 'dired-do-chmod "dired-aux" "\
-Change the mode of the marked (or next ARG) files.
-Symbolic modes like `g+w' are allowed.
-Type M-n to pull the file attributes of the file at point
-into the minibuffer.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-do-chgrp "dired-aux" "\
-Change the group of the marked (or next ARG) files.
-Type M-n to pull the file attributes of the file at point
-into the minibuffer.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-do-chown "dired-aux" "\
-Change the owner of the marked (or next ARG) files.
-Type M-n to pull the file attributes of the file at point
-into the minibuffer.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-do-touch "dired-aux" "\
-Change the timestamp of the marked (or next ARG) files.
-This calls touch.
-Type M-n to pull the file attributes of the file at point
-into the minibuffer.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-do-print "dired-aux" "\
-Print the marked (or next ARG) files.
-Uses the shell command coming from variables `lpr-command' and
-`lpr-switches' as default.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-clean-directory "dired-aux" "\
-Flag numerical backups for deletion.
-Spares `dired-kept-versions' latest versions, and `kept-old-versions' oldest.
-Positive prefix arg KEEP overrides `dired-kept-versions';
-Negative prefix arg KEEP overrides `kept-old-versions' with KEEP made positive.
-
-To clear the flags on these files, you can use \\[dired-flag-backup-files]
-with a prefix argument.
-
-\(fn KEEP)" t nil)
-
-(autoload 'dired-do-async-shell-command "dired-aux" "\
-Run a shell command COMMAND on the marked files asynchronously.
-
-Like `dired-do-shell-command', but adds `&' at the end of COMMAND
-to execute it asynchronously.
-
-When operating on multiple files, asynchronous commands
-are executed in the background on each file in parallel.
-In shell syntax this means separating the individual commands
-with `&'. However, when COMMAND ends in `;' or `;&' then commands
-are executed in the background on each file sequentially waiting
-for each command to terminate before running the next command.
-In shell syntax this means separating the individual commands with `;'.
-
-The output appears in the buffer `*Async Shell Command*'.
-
-\(fn COMMAND &optional ARG FILE-LIST)" t nil)
-
-(autoload 'dired-do-shell-command "dired-aux" "\
-Run a shell command COMMAND on the marked files.
-If no files are marked or a numeric prefix arg is given,
-the next ARG files are used. Just \\[universal-argument] means the current file.
-The prompt mentions the file(s) or the marker, as appropriate.
-
-If there is a `*' in COMMAND, surrounded by whitespace, this runs
-COMMAND just once with the entire file list substituted there.
-
-If there is no `*', but there is a `?' in COMMAND, surrounded by
-whitespace, this runs COMMAND on each file individually with the
-file name substituted for `?'.
-
-Otherwise, this runs COMMAND on each file individually with the
-file name added at the end of COMMAND (separated by a space).
-
-`*' and `?' when not surrounded by whitespace have no special
-significance for `dired-do-shell-command', and are passed through
-normally to the shell, but you must confirm first.
-
-If you want to use `*' as a shell wildcard with whitespace around
-it, write `*\"\"' in place of just `*'. This is equivalent to just
-`*' in the shell, but avoids Dired's special handling.
-
-If COMMAND ends in `&', `;', or `;&', it is executed in the
-background asynchronously, and the output appears in the buffer
-`*Async Shell Command*'. When operating on multiple files and COMMAND
-ends in `&', the shell command is executed on each file in parallel.
-However, when COMMAND ends in `;' or `;&' then commands are executed
-in the background on each file sequentially waiting for each command
-to terminate before running the next command. You can also use
-`dired-do-async-shell-command' that automatically adds `&'.
-
-Otherwise, COMMAND is executed synchronously, and the output
-appears in the buffer `*Shell Command Output*'.
-
-This feature does not try to redisplay Dired buffers afterward, as
-there's no telling what files COMMAND may have changed.
-Type \\[dired-do-redisplay] to redisplay the marked files.
-
-When COMMAND runs, its working directory is the top-level directory
-of the Dired buffer, so output files usually are created there
-instead of in a subdir.
-
-In a noninteractive call (from Lisp code), you must specify
-the list of file names explicitly with the FILE-LIST argument, which
-can be produced by `dired-get-marked-files', for example.
-
-\(fn COMMAND &optional ARG FILE-LIST)" t nil)
-
-(autoload 'dired-run-shell-command "dired-aux" "\
-
-
-\(fn COMMAND)" nil nil)
-
-(autoload 'dired-do-kill-lines "dired-aux" "\
-Kill all marked lines (not the files).
-With a prefix argument, kill that many lines starting with the current line.
-\(A negative argument kills backward.)
-If you use this command with a prefix argument to kill the line
-for a file that is a directory, which you have inserted in the
-Dired buffer as a subdirectory, then it deletes that subdirectory
-from the buffer as well.
-To kill an entire subdirectory (without killing its line in the
-parent directory), go to its directory header line and use this
-command with a prefix argument (the value does not matter).
-
-\(fn &optional ARG FMT)" t nil)
-
-(autoload 'dired-do-compress-to "dired-aux" "\
-Compress selected files and directories to an archive.
-You are prompted for the archive name.
-The archiving command is chosen based on the archive name extension and
-`dired-compress-files-alist'.
-
-\(fn)" t nil)
-
-(autoload 'dired-compress-file "dired-aux" "\
-Compress or uncompress FILE.
-Return the name of the compressed or uncompressed file.
-Return nil if no change in files.
-
-\(fn FILE)" nil nil)
-
-(autoload 'dired-query "dired-aux" "\
-Format PROMPT with ARGS, query user, and store the result in SYM.
-The return value is either nil or t.
-
-The user may type y or SPC to accept once; n or DEL to skip once;
-! to accept this and subsequent queries; or q or ESC to decline
-this and subsequent queries.
-
-If SYM is already bound to a non-nil value, this function may
-return automatically without querying the user. If SYM is !,
-return t; if SYM is q or ESC, return nil.
-
-\(fn SYM PROMPT &rest ARGS)" nil nil)
-
-(autoload 'dired-do-compress "dired-aux" "\
-Compress or uncompress marked (or next ARG) files.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-do-byte-compile "dired-aux" "\
-Byte compile marked (or next ARG) Emacs Lisp files.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-do-load "dired-aux" "\
-Load the marked (or next ARG) Emacs Lisp files.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-do-redisplay "dired-aux" "\
-Redisplay all marked (or next ARG) files.
-If on a subdir line, redisplay that subdirectory. In that case,
-a prefix arg lets you edit the `ls' switches used for the new listing.
-
-Dired remembers switches specified with a prefix arg, so that reverting
-the buffer will not reset them. However, using `dired-undo' to re-insert
-or delete subdirectories can bypass this machinery. Hence, you sometimes
-may have to reset some subdirectory switches after a `dired-undo'.
-You can reset all subdirectory switches to the default using
-\\<dired-mode-map>\\[dired-reset-subdir-switches].
-See Info node `(emacs)Subdir switches' for more details.
-
-\(fn &optional ARG TEST-FOR-SUBDIR)" t nil)
-
-(autoload 'dired-add-file "dired-aux" "\
-
-
-\(fn FILENAME &optional MARKER-CHAR)" nil nil)
-
-(autoload 'dired-remove-file "dired-aux" "\
-
-
-\(fn FILE)" nil nil)
-
-(autoload 'dired-relist-file "dired-aux" "\
-Create or update the line for FILE in all Dired buffers it would belong in.
-
-\(fn FILE)" nil nil)
-
-(autoload 'dired-copy-file "dired-aux" "\
-
-
-\(fn FROM TO OK-FLAG)" nil nil)
-
-(autoload 'dired-rename-file "dired-aux" "\
-
-
-\(fn FILE NEWNAME OK-IF-ALREADY-EXISTS)" nil nil)
-
-(autoload 'dired-create-directory "dired-aux" "\
-Create a directory called DIRECTORY.
-If DIRECTORY already exists, signal an error.
-
-\(fn DIRECTORY)" t nil)
-
-(autoload 'dired-do-copy "dired-aux" "\
-Copy all marked (or next ARG) files, or copy the current file.
-When operating on just the current file, prompt for the new name.
-
-When operating on multiple or marked files, prompt for a target
-directory, and make the new copies in that directory, with the
-same names as the original files. The initial suggestion for the
-target directory is the Dired buffer's current directory (or, if
-`dired-dwim-target' is non-nil, the current directory of a
-neighboring Dired window).
-
-If `dired-copy-preserve-time' is non-nil, this command preserves
-the modification time of each old file in the copy, similar to
-the \"-p\" option for the \"cp\" shell command.
-
-This command copies symbolic links by creating new ones, similar
-to the \"-d\" option for the \"cp\" shell command.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-do-symlink "dired-aux" "\
-Make symbolic links to current file or all marked (or next ARG) files.
-When operating on just the current file, you specify the new name.
-When operating on multiple or marked files, you specify a directory
-and new symbolic links are made in that directory
-with the same names that the files currently have. The default
-suggested for the target directory depends on the value of
-`dired-dwim-target', which see.
-
-For relative symlinks, use \\[dired-do-relsymlink].
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-do-hardlink "dired-aux" "\
-Add names (hard links) current file or all marked (or next ARG) files.
-When operating on just the current file, you specify the new name.
-When operating on multiple or marked files, you specify a directory
-and new hard links are made in that directory
-with the same names that the files currently have. The default
-suggested for the target directory depends on the value of
-`dired-dwim-target', which see.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-do-rename "dired-aux" "\
-Rename current file or all marked (or next ARG) files.
-When renaming just the current file, you specify the new name.
-When renaming multiple or marked files, you specify a directory.
-This command also renames any buffers that are visiting the files.
-The default suggested for the target directory depends on the value
-of `dired-dwim-target', which see.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-do-rename-regexp "dired-aux" "\
-Rename selected files whose names match REGEXP to NEWNAME.
-
-With non-zero prefix argument ARG, the command operates on the next ARG
-files. Otherwise, it operates on all the marked files, or the current
-file if none are marked.
-
-As each match is found, the user must type a character saying
- what to do with it. For directions, type \\[help-command] at that time.
-NEWNAME may contain \\=\\<n> or \\& as in `query-replace-regexp'.
-REGEXP defaults to the last regexp used.
-
-With a zero prefix arg, renaming by regexp affects the absolute file name.
-Normally, only the non-directory part of the file name is used and changed.
-
-\(fn REGEXP NEWNAME &optional ARG WHOLE-NAME)" t nil)
-
-(autoload 'dired-do-copy-regexp "dired-aux" "\
-Copy selected files whose names match REGEXP to NEWNAME.
-See function `dired-do-rename-regexp' for more info.
-
-\(fn REGEXP NEWNAME &optional ARG WHOLE-NAME)" t nil)
-
-(autoload 'dired-do-hardlink-regexp "dired-aux" "\
-Hardlink selected files whose names match REGEXP to NEWNAME.
-See function `dired-do-rename-regexp' for more info.
-
-\(fn REGEXP NEWNAME &optional ARG WHOLE-NAME)" t nil)
-
-(autoload 'dired-do-symlink-regexp "dired-aux" "\
-Symlink selected files whose names match REGEXP to NEWNAME.
-See function `dired-do-rename-regexp' for more info.
-
-\(fn REGEXP NEWNAME &optional ARG WHOLE-NAME)" t nil)
-
-(autoload 'dired-upcase "dired-aux" "\
-Rename all marked (or next ARG) files to upper case.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-downcase "dired-aux" "\
-Rename all marked (or next ARG) files to lower case.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'dired-maybe-insert-subdir "dired-aux" "\
-Insert this subdirectory into the same dired buffer.
-If it is already present, just move to it (type \\[dired-do-redisplay] to refresh),
- else inserts it at its natural place (as `ls -lR' would have done).
-With a prefix arg, you may edit the ls switches used for this listing.
- You can add `R' to the switches to expand the whole tree starting at
- this subdirectory.
-This function takes some pains to conform to `ls -lR' output.
-
-Dired remembers switches specified with a prefix arg, so that reverting
-the buffer will not reset them. However, using `dired-undo' to re-insert
-or delete subdirectories can bypass this machinery. Hence, you sometimes
-may have to reset some subdirectory switches after a `dired-undo'.
-You can reset all subdirectory switches to the default using
-\\<dired-mode-map>\\[dired-reset-subdir-switches].
-See Info node `(emacs)Subdir switches' for more details.
-
-\(fn DIRNAME &optional SWITCHES NO-ERROR-IF-NOT-DIR-P)" t nil)
-
-(autoload 'dired-insert-subdir "dired-aux" "\
-Insert this subdirectory into the same Dired buffer.
-If it is already present, overwrite the previous entry;
- otherwise, insert it at its natural place (as `ls -lR' would
- have done).
-With a prefix arg, you may edit the `ls' switches used for this listing.
- You can add `R' to the switches to expand the whole tree starting at
- this subdirectory.
-This function takes some pains to conform to `ls -lR' output.
-
-\(fn DIRNAME &optional SWITCHES NO-ERROR-IF-NOT-DIR-P)" t nil)
-
-(autoload 'dired-prev-subdir "dired-aux" "\
-Go to previous subdirectory, regardless of level.
-When called interactively and not on a subdir line, go to this subdir's line.
-
-\(fn ARG &optional NO-ERROR-IF-NOT-FOUND NO-SKIP)" t nil)
-
-(autoload 'dired-goto-subdir "dired-aux" "\
-Go to end of header line of DIR in this dired buffer.
-Return value of point on success, otherwise return nil.
-The next char is either \\n, or \\r if DIR is hidden.
-
-\(fn DIR)" t nil)
-
-(autoload 'dired-mark-subdir-files "dired-aux" "\
-Mark all files except `.' and `..' in current subdirectory.
-If the Dired buffer shows multiple directories, this command
-marks the files listed in the subdirectory that point is in.
-
-\(fn)" t nil)
-
-(autoload 'dired-kill-subdir "dired-aux" "\
-Remove all lines of current subdirectory.
-Lower levels are unaffected.
-
-\(fn &optional REMEMBER-MARKS)" t nil)
-
-(autoload 'dired-tree-up "dired-aux" "\
-Go up ARG levels in the dired tree.
-
-\(fn ARG)" t nil)
-
-(autoload 'dired-tree-down "dired-aux" "\
-Go down in the dired tree.
-
-\(fn)" t nil)
-
-(autoload 'dired-hide-subdir "dired-aux" "\
-Hide or unhide the current subdirectory and move to next directory.
-Optional prefix arg is a repeat factor.
-Use \\[dired-hide-all] to (un)hide all directories.
-
-\(fn ARG)" t nil)
-
-(autoload 'dired-hide-all "dired-aux" "\
-Hide all subdirectories, leaving only their header lines.
-If there is already something hidden, make everything visible again.
-Use \\[dired-hide-subdir] to (un)hide a particular subdirectory.
-
-\(fn &optional IGNORED)" t nil)
-
-(autoload 'dired-isearch-filenames-setup "dired-aux" "\
-Set up isearch to search in Dired file names.
-Intended to be added to `isearch-mode-hook'.
-
-\(fn)" nil nil)
-
-(autoload 'dired-isearch-filenames "dired-aux" "\
-Search for a string using Isearch only in file names in the Dired buffer.
-
-\(fn)" t nil)
-
-(autoload 'dired-isearch-filenames-regexp "dired-aux" "\
-Search for a regexp using Isearch only in file names in the Dired buffer.
-
-\(fn)" t nil)
-
-(autoload 'dired-do-isearch "dired-aux" "\
-Search for a string through all marked files using Isearch.
-
-\(fn)" t nil)
-
-(autoload 'dired-do-isearch-regexp "dired-aux" "\
-Search for a regexp through all marked files using Isearch.
-
-\(fn)" t nil)
-
-(autoload 'dired-do-search "dired-aux" "\
-Search through all marked files for a match for REGEXP.
-Stops when a match is found.
-To continue searching for next match, use command \\[tags-loop-continue].
-
-\(fn REGEXP)" t nil)
-
-(autoload 'dired-do-query-replace-regexp "dired-aux" "\
-Do `query-replace-regexp' of FROM with TO, on all marked files.
-Third arg DELIMITED (prefix arg) means replace only word-delimited matches.
-If you exit (\\[keyboard-quit], RET or q), you can resume the query replace
-with the command \\[tags-loop-continue].
-
-\(fn FROM TO &optional DELIMITED)" t nil)
-
-(autoload 'dired-do-find-regexp "dired-aux" "\
-Find all matches for REGEXP in all marked files, recursively.
-
-\(fn REGEXP)" t nil)
-
-(autoload 'dired-do-find-regexp-and-replace "dired-aux" "\
-Replace matches of FROM with TO, in all marked files, recursively.
-
-\(fn FROM TO)" t nil)
-
-(autoload 'dired-show-file-type "dired-aux" "\
-Print the type of FILE, according to the `file' command.
-If you give a prefix to this command, and FILE is a symbolic
-link, then the type of the file linked to by FILE is printed
-instead.
-
-\(fn FILE &optional DEREF-SYMLINKS)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "dired-x" "dired-x.el" "8dae922d1549647835460b6cb70af4df")
-;;; Generated autoloads from dired-x.el
-
-(autoload 'dired-jump "dired-x" "\
-Jump to Dired buffer corresponding to current buffer.
-If in a file, Dired the current directory and move to file's line.
-If in Dired already, pop up a level and goto old directory's line.
-In case the proper Dired file line cannot be found, refresh the dired
-buffer and try again.
-When OTHER-WINDOW is non-nil, jump to Dired buffer in other window.
-Interactively with prefix argument, read FILE-NAME and
-move to its line in dired.
-
-\(fn &optional OTHER-WINDOW FILE-NAME)" t nil)
-
-(autoload 'dired-jump-other-window "dired-x" "\
-Like \\[dired-jump] (`dired-jump') but in other window.
-
-\(fn &optional FILE-NAME)" t nil)
-
-(autoload 'dired-do-relsymlink "dired-x" "\
-Relative symlink all marked (or next ARG) files into a directory.
-Otherwise make a relative symbolic link to the current file.
-This creates relative symbolic links like
-
- foo -> ../bar/foo
-
-not absolute ones like
-
- foo -> /ugly/file/name/that/may/change/any/day/bar/foo
-
-For absolute symlinks, use \\[dired-do-symlink].
-
-\(fn &optional ARG)" t nil)
-
-;;;***
-\f
-;;; End of automatically extracted autoloads.
-
(provide 'dired)
(run-hooks 'dired-load-hook) ; for your customizations
(defconst generate-autoload-section-continuation ";;;;;; "
"String to add on each continuation of the section header form.")
+(defvar autoload-timestamps t
+ "Non-nil means insert a timestamp for each input file into the output.
+We use these in incremental updates of the output file to decide
+if we need to rescan an input file. If you set this to nil,
+then we use the timestamp of the output file instead. As a result:
+ - for fixed inputs, the output will be the same every time
+ - incremental updates of the output file might not be correct if:
+ i) the timestamp of the output file cannot be trusted (at least
+ relative to that of the input files)
+ ii) any of the input files can be modified during the time it takes
+ to create the output
+ iii) only a subset of the input files are scanned
+ These issues are unlikely to happen in practice, and would arguably
+ represent bugs in the build system. Item iii) will happen if you
+ use a command like `update-file-autoloads', though, since it only
+ checks a single input file.")
+
(defvar autoload-modified-buffers) ;Dynamically scoped var.
(defun make-autoload (form file &optional expansion)
;; We'd really want to just use
;; `emacs-internal' instead.
nil nil 'emacs-mule-unix)
- (nth 5 (file-attributes relfile))))
+ (if autoload-timestamps
+ (nth 5 (file-attributes relfile))
+ t)))
(insert ";;; Generated autoloads from " relfile "\n")))
(insert generate-autoload-section-trailer))))
(or noninteractive
(catch 'up-to-date
(let* ((buf (current-buffer))
(existing-buffer (if buffer-file-name buf))
+ (output-file (autoload-generated-file))
+ (output-time (if (file-exists-p output-file)
+ (nth 5 (file-attributes output-file))))
(found nil))
(with-current-buffer (autoload-find-generated-file)
;; This is to make generated-autoload-file have Unix EOLs, so
(file-time (nth 5 (file-attributes file))))
(if (and (or (null existing-buffer)
(not (buffer-modified-p existing-buffer)))
- (or
+ (cond
;; last-time is the time-stamp (specifying
;; the last time we looked at the file) and
;; the file hasn't been changed since.
- (and (listp last-time)
- (not (time-less-p last-time file-time)))
+ ((listp last-time) (= (length last-time) 2)
+ (not (time-less-p last-time file-time)))
+ ;; FIXME? Arguably we should throw a
+ ;; user error, or some kind of warning,
+ ;; if we were called from update-file-autoloads,
+ ;; which can update only a single input file.
+ ;; It's not appropriate to use the output
+ ;; file modtime in such a case,
+ ;; if there are multiple input files
+ ;; contributing to the output.
+ ((and output-time (eq t last-time))
+ (not (time-less-p output-time file-time)))
;; last-time is an MD5 checksum instead.
- (and (stringp last-time)
- (equal last-time
- (md5 buf nil nil 'emacs-mule)))))
+ ((stringp last-time)
+ (equal last-time
+ (md5 buf nil nil 'emacs-mule)))))
(throw 'up-to-date nil)
(autoload-remove-section begin)
(setq found t))))
(generated-autoload-file
(if (called-interactively-p 'interactive)
(read-file-name "Write autoload definitions to file: ")
- generated-autoload-file)))
+ generated-autoload-file))
+ (output-time
+ (if (file-exists-p generated-autoload-file)
+ (nth 5 (file-attributes generated-autoload-file)))))
(with-current-buffer (autoload-find-generated-file)
(save-excursion
;; Remove the obsolete section.
(autoload-remove-section (match-beginning 0))
(setq last-time (nth 4 form))
+ (if (equal t last-time)
+ (setq last-time output-time))
(dolist (file file)
(let ((file-time (nth 5 (file-attributes file))))
(when (and file-time
(member (expand-file-name file) autoload-excludes))
;; Remove the obsolete section.
(autoload-remove-section (match-beginning 0)))
- ((not (time-less-p (nth 4 form)
+ ((not (time-less-p (let ((oldtime (nth 4 form)))
+ (if (equal t oldtime)
+ output-time
+ oldtime))
(nth 5 (file-attributes file))))
;; File hasn't changed.
nil)
(goto-char (point-max))
(search-backward "\f" nil t)
(autoload-insert-section-header
- (current-buffer) nil nil no-autoloads no-autoloads-time)
+ (current-buffer) nil nil no-autoloads (if autoload-timestamps
+ no-autoloads-time
+ t))
(insert generate-autoload-section-trailer)))
(let ((version-control 'never))
(dolist (elt '(format message error))
(put elt 'byte-compile-format-like t))
-;; Warn if a custom definition fails to specify :group.
+;; Warn if a custom definition fails to specify :group, or :type.
(defun byte-compile-nogroup-warn (form)
- (if (and (memq (car form) '(custom-declare-face custom-declare-variable))
- byte-compile-current-group)
- ;; The group will be provided implicitly.
- nil
- (let ((keyword-args (cdr (cdr (cdr (cdr form)))))
- (name (cadr form)))
- (or (not (eq (car-safe name) 'quote))
- (and (eq (car form) 'custom-declare-group)
- (equal name ''emacs))
- (plist-get keyword-args :group)
- (not (and (consp name) (eq (car name) 'quote)))
- (byte-compile-warn
- "%s for `%s' fails to specify containing group"
- (cdr (assq (car form)
- '((custom-declare-group . defgroup)
- (custom-declare-face . defface)
- (custom-declare-variable . defcustom))))
- (cadr name)))
- ;; Update the current group, if needed.
- (if (and byte-compile-current-file ;Only when compiling a whole file.
- (eq (car form) 'custom-declare-group)
- (eq (car-safe name) 'quote))
- (setq byte-compile-current-group (cadr name))))))
+ (let ((keyword-args (cdr (cdr (cdr (cdr form)))))
+ (name (cadr form)))
+ (when (eq (car-safe name) 'quote)
+ (or (not (eq (car form) 'custom-declare-variable))
+ (plist-get keyword-args :type)
+ (byte-compile-warn
+ "defcustom for `%s' fails to specify type" (cadr name)))
+ (if (and (memq (car form) '(custom-declare-face custom-declare-variable))
+ byte-compile-current-group)
+ ;; The group will be provided implicitly.
+ nil
+ (or (and (eq (car form) 'custom-declare-group)
+ (equal name ''emacs))
+ (plist-get keyword-args :group)
+ (byte-compile-warn
+ "%s for `%s' fails to specify containing group"
+ (cdr (assq (car form)
+ '((custom-declare-group . defgroup)
+ (custom-declare-face . defface)
+ (custom-declare-variable . defcustom))))
+ (cadr name)))
+ ;; Update the current group, if needed.
+ (if (and byte-compile-current-file ;Only when compiling a whole file.
+ (eq (car form) 'custom-declare-group))
+ (setq byte-compile-current-group (cadr name)))))))
;; Warn if the function or macro is being redefined with a different
;; number of arguments.
(if (and sym (boundp sym) (fboundp sym)
(save-excursion
(goto-char mb)
- (forward-word-strictly -1)
+ (forward-word -1)
(not (looking-at
"variable\\|option\\|function\\|command\\|symbol"))))
(if (checkdoc-autofix-ask-replace
nil t nil nil "variable")))
(goto-char (1- mb))
(insert disambiguate " ")
- (forward-word-strictly 1))
+ (forward-word 1))
(setq ret
(format "Disambiguate %s by preceding w/ \
function,command,variable,option or symbol." ms1))))))
;; Local Variables:
-;; generated-autoload-file: "eieio-core.el"
+;; generated-autoload-file: "eieio-loaddefs.el"
;; End:
(provide 'eieio-compat)
(require 'cl-lib)
(require 'pcase)
+(require 'eieio-loaddefs)
;;;
;; A few functions that are better in the official EIEIO src, but
;; The slot-missing method is a cool way of allowing an object author
;; to intercept missing slot definitions. Since it is also the LAST
;; thing called in this fn, its return value would be retrieved.
- (slot-missing obj slot 'oref)
- ;;(signal 'invalid-slot-name (list (eieio-object-name obj) slot))
- )
+ (slot-missing obj slot 'oref))
(cl-check-type obj eieio-object)
(eieio-barf-if-slot-unbound (aref obj c) obj slot 'oref))))
;; Oref that slot.
(aref (eieio--class-class-allocation-values cl)
c)
- (slot-missing obj slot 'oref-default)
- ;;(signal 'invalid-slot-name (list (class-name cl) slot))
- )
+ (slot-missing obj slot 'oref-default))
(eieio-barf-if-slot-unbound
(let ((val (cl--slot-descriptor-initform
(aref (eieio--class-slots cl)
(aset (eieio--class-class-allocation-values class)
c value))
;; See oref for comment on `slot-missing'
- (slot-missing obj slot 'oset value)
- ;;(signal 'invalid-slot-name (list (eieio-object-name obj) slot))
- )
+ (slot-missing obj slot 'oset value))
(eieio--validate-slot-value class c value slot)
(aset obj c value))))
(cl-defmethod cl-generic-generalizers ((_specializer (head subclass)))
(list eieio--generic-subclass-generalizer))
-\f
-;;;### (autoloads nil "eieio-compat" "eieio-compat.el" "6aca3c1b5f751a01331761da45fc4f5c")
-;;; Generated autoloads from eieio-compat.el
-
-(autoload 'eieio--defalias "eieio-compat" "\
-Like `defalias', but with less side-effects.
-More specifically, it has no side-effects at all when the new function
-definition is the same (`eq') as the old one.
-
-\(fn NAME BODY)" nil nil)
-
-(autoload 'defgeneric "eieio-compat" "\
-Create a generic function METHOD.
-DOC-STRING is the base documentation for this class. A generic
-function has no body, as its purpose is to decide which method body
-is appropriate to use. Uses `defmethod' to create methods, and calls
-`defgeneric' for you. With this implementation the ARGS are
-currently ignored. You can use `defgeneric' to apply specialized
-top level documentation to a method.
-
-\(fn METHOD ARGS &optional DOC-STRING)" nil t)
-
-(function-put 'defgeneric 'doc-string-elt '3)
-
-(make-obsolete 'defgeneric 'cl-defgeneric '"25.1")
-
-(autoload 'defmethod "eieio-compat" "\
-Create a new METHOD through `defgeneric' with ARGS.
-
-The optional second argument KEY is a specifier that
-modifies how the method is called, including:
- :before - Method will be called before the :primary
- :primary - The default if not specified
- :after - Method will be called after the :primary
- :static - First arg could be an object or class
-The next argument is the ARGLIST. The ARGLIST specifies the arguments
-to the method as with `defun'. The first argument can have a type
-specifier, such as:
- ((VARNAME CLASS) ARG2 ...)
-where VARNAME is the name of the local variable for the method being
-created. The CLASS is a class symbol for a class made with `defclass'.
-A DOCSTRING comes after the ARGLIST, and is optional.
-All the rest of the args are the BODY of the method. A method will
-return the value of the last form in the BODY.
-
-Summary:
-
- (defmethod mymethod [:before | :primary | :after | :static]
- ((typearg class-name) arg2 &optional opt &rest rest)
- \"doc-string\"
- body)
-
-\(fn METHOD &rest ARGS)" nil t)
-
-(function-put 'defmethod 'doc-string-elt '3)
-
-(make-obsolete 'defmethod 'cl-defmethod '"25.1")
-
-(autoload 'eieio--defgeneric-init-form "eieio-compat" "\
-
-
-\(fn METHOD DOC-STRING)" nil nil)
-
-(autoload 'eieio--defmethod "eieio-compat" "\
-
-
-\(fn METHOD KIND ARGCLASS CODE)" nil nil)
-
-(autoload 'eieio-defmethod "eieio-compat" "\
-Obsolete work part of an old version of the `defmethod' macro.
-
-\(fn METHOD ARGS)" nil nil)
-
-(make-obsolete 'eieio-defmethod 'cl-defmethod '"24.1")
-
-(autoload 'eieio-defgeneric "eieio-compat" "\
-Obsolete work part of an old version of the `defgeneric' macro.
-
-\(fn METHOD DOC-STRING)" nil nil)
-
-(make-obsolete 'eieio-defgeneric 'cl-defgeneric '"24.1")
-
-(autoload 'eieio-defclass "eieio-compat" "\
-
-
-\(fn CNAME SUPERCLASSES SLOTS OPTIONS)" nil nil)
-
-(make-obsolete 'eieio-defclass 'eieio-defclass-internal '"25.1")
-
-;;;***
-\f
-
(provide 'eieio-core)
;;; eieio-core.el ends here
(provide 'eieio-custom)
;; Local variables:
-;; generated-autoload-file: "eieio.el"
+;; generated-autoload-file: "eieio-loaddefs.el"
;; End:
;;; eieio-custom.el ends here
(provide 'eieio-opt)
;; Local variables:
-;; generated-autoload-file: "eieio.el"
+;; generated-autoload-file: "eieio-loaddefs.el"
;; End:
;;; eieio-opt.el ends here
(setq eieio-default-superclass (cl--find-class 'eieio-default-superclass))
-(defalias 'standard-class 'eieio-default-superclass)
+(define-obsolete-function-alias 'standard-class
+ 'eieio-default-superclass "25.2")
(cl-defgeneric make-instance (class &rest initargs)
"Make a new instance of CLASS based on INITARGS.
;; Shared initialize will parse our slots for us.
(shared-initialize this slots))
-(cl-defgeneric slot-missing (object slot-name operation &optional new-value)
- "Method invoked when an attempt to access a slot in OBJECT fails.")
-
-(cl-defmethod slot-missing ((object eieio-default-superclass) slot-name
- _operation &optional _new-value)
+(cl-defgeneric slot-missing (object slot-name _operation &optional _new-value)
"Method invoked when an attempt to access a slot in OBJECT fails.
SLOT-NAME is the name of the failed slot, OPERATION is the type of access
that was requested, and optional NEW-VALUE is the value that was desired
This method is called from `oref', `oset', and other functions which
directly reference slots in EIEIO objects."
- (signal 'invalid-slot-name (list (eieio-object-name object)
- slot-name)))
+ (signal 'invalid-slot-name
+ (list (if (eieio-object-p object) (eieio-object-name object) object)
+ slot-name)))
(cl-defgeneric slot-unbound (object class slot-name fn)
"Slot unbound is invoked during an attempt to reference an unbound slot.")
(if params (shared-initialize nobj params))
nobj))
-(cl-defgeneric destructor (this &rest params)
- "Destructor for cleaning up any dynamic links to our object.")
-
-(cl-defmethod destructor ((_this eieio-default-superclass) &rest _params)
- "Destructor for cleaning up any dynamic links to our object.
-Argument THIS is the object being destroyed. PARAMS are additional
-ignored parameters."
+(cl-defgeneric destructor (_this &rest _params)
+ "Destructor for cleaning up any dynamic links to our object."
+ (declare (obsolete nil "25.2"))
;; No cleanup... yet.
- )
+ nil)
-(cl-defgeneric object-print (this &rest strings)
- "Pretty printer for object THIS. Call function `object-name' with STRINGS.
+(cl-defgeneric object-print (this &rest _strings)
+ "Pretty printer for object THIS.
It is sometimes useful to put a summary of the object into the
default #<notation> string when using EIEIO browsing tools.
-Implement this method to customize the summary.")
+Implement this method to customize the summary."
+ (format "%S" this))
(cl-defmethod object-print ((this eieio-default-superclass) &rest strings)
"Pretty printer for object THIS. Call function `object-name' with STRINGS.
\f
;;; Unimplemented functions from CLOS
;;
-(defun change-class (_obj _class)
+(defun eieio-change-class (_obj _class)
"Change the class of OBJ to type CLASS.
This may create or delete slots, but does not affect the return value
of `eq'."
(error "EIEIO: `change-class' is unimplemented"))
+(define-obsolete-function-alias 'change-class 'eieio-change-class "25.2")
;; Hook ourselves into help system for describing classes and methods.
;; FIXME: This is not actually needed any more since we can click on the
(advice-add 'edebug-prin1-to-string
:around #'eieio-edebug-prin1-to-string)
-\f
-;;; Start of automatically extracted autoloads.
-\f
-;;;### (autoloads nil "eieio-custom" "eieio-custom.el" "e8d466f8eee341f3da967c2931b28043")
-;;; Generated autoloads from eieio-custom.el
-
-(autoload 'customize-object "eieio-custom" "\
-Customize OBJ in a custom buffer.
-Optional argument GROUP is the sub-group of slots to display.
-
-\(fn OBJ &optional GROUP)" nil nil)
-
-;;;***
-\f
-;;;### (autoloads nil "eieio-opt" "eieio-opt.el" "5bd32f1033d0e2eee7c32c0ad28330fc")
-;;; Generated autoloads from eieio-opt.el
-
-(autoload 'eieio-browse "eieio-opt" "\
-Create an object browser window to show all objects.
-If optional ROOT-CLASS, then start with that, otherwise start with
-variable `eieio-default-superclass'.
-
-\(fn &optional ROOT-CLASS)" t nil)
-
-(define-obsolete-function-alias 'eieio-help-class 'cl--describe-class "25.1")
-
-(autoload 'eieio-help-constructor "eieio-opt" "\
-Describe CTR if it is a class constructor.
-
-\(fn CTR)" nil nil)
-
-;;;***
-\f
-;;; End of automatically extracted autoloads.
-
(provide 'eieio)
;;; eieio ends here
;; Copyright (C) 2014-2016 Free Software Foundation, Inc.
-;; Author: Artur Malabarba <bruce.connor.am@gmail.com>
-;; Maintainer: Artur Malabarba <bruce.connor.am@gmail.com>
+;; Author: Artur Malabarba <emacs@endlessparentheses.com>
+;; Package-Requires: ((emacs "24.1"))
;; Version: 1.0.4
;; Keywords: extensions lisp
;; Prefix: let-alist
;; Separator: -
+;; This is an Elpa :core package. Don't use functionality that is not
+;; compatible with Emacs 24.1.
+
;; This file is part of GNU Emacs.
;; GNU Emacs is free software: you can redistribute it and/or modify
(let ((var (make-symbol "alist")))
`(let ((,var ,alist))
(let ,(mapcar (lambda (x) `(,(car x) ,(let-alist--access-sexp (car x) var)))
- (delete-dups (let-alist--deep-dot-search body)))
+ (delete-dups (let-alist--deep-dot-search body)))
,@body))))
(provide 'let-alist)
(require 'tabulated-list)
(require 'macroexp)
+(require 'url-handlers)
(defgroup package nil
"Manager for Emacs Lisp packages."
(error nil)))
syntax-ppss-stats))
+(defvar-local syntax-ppss-table nil
+ "Syntax-table to use during `syntax-ppss', if any.")
+
(defun syntax-ppss (&optional pos)
"Parse-Partial-Sexp State at POS, defaulting to point.
The returned value is the same as that of `parse-partial-sexp'
(unless pos (setq pos (point)))
(syntax-propertize pos)
;;
+ (with-syntax-table (or syntax-ppss-table (syntax-table))
(let ((old-ppss (cdr syntax-ppss-last))
(old-pos (car syntax-ppss-last))
(ppss nil)
;; we may end up calling parse-partial-sexp with a position before
;; point-min. In that case, just parse from point-min assuming
;; a nil state.
- (parse-partial-sexp (point-min) pos)))))
+ (parse-partial-sexp (point-min) pos))))))
;; Debugging functions
--- /dev/null
+;;; timer-list.el --- list active timers in a buffer
+
+;; Copyright (C) 2016 Free Software Foundation, Inc.
+
+;; Maintainer: emacs-devel@gnu.org
+;; Package: emacs
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;; Code:
+
+;;;###autoload
+(defun timer-list ()
+ "List all timers in a buffer."
+ (interactive)
+ (pop-to-buffer-same-window (get-buffer-create "*timer-list*"))
+ (let ((inhibit-read-only t))
+ (erase-buffer)
+ (timer-list-mode)
+ (dolist (timer (append timer-list timer-idle-list))
+ (insert (format "%4s %10s %8s %s"
+ ;; Idle.
+ (if (aref timer 7)
+ "*"
+ " ")
+ ;; Next time.
+ (let ((time (float-time (list (aref timer 1)
+ (aref timer 2)
+ (aref timer 3)))))
+ (format "%.2f"
+ (if (aref timer 7)
+ time
+ (- (float-time (list (aref timer 1)
+ (aref timer 2)
+ (aref timer 3)))
+ (float-time)))))
+ ;; Repeat.
+ (let ((repeat (aref timer 4)))
+ (cond
+ ((numberp repeat)
+ (format "%.2f" (/ repeat 60)))
+ ((null repeat)
+ "-")
+ (t
+ (format "%s" repeat))))
+ ;; Function.
+ (let ((function (aref timer 5)))
+ (replace-regexp-in-string
+ "\n" " "
+ (cond
+ ((byte-code-function-p function)
+ (replace-regexp-in-string
+ "[^-A-Za-z0-9 ]" ""
+ (format "%s" function)))
+ (t
+ (format "%s" function)))))))
+ (put-text-property (line-beginning-position)
+ (1+ (line-beginning-position))
+ 'timer timer)
+ (insert "\n")))
+ (goto-char (point-min)))
+;; This command can be destructive if they don't know what they are
+;; doing. Kids, don't try this at home!
+;;;###autoload (put 'timer-list 'disabled "Beware: manually canceling timers can ruin your Emacs session.")
+
+(defvar timer-list-mode-map
+ (let ((map (make-sparse-keymap)))
+ (define-key map "c" 'timer-list-cancel)
+ (easy-menu-define nil map ""
+ '("Timers"
+ ["Cancel" timer-list-cancel t]))
+ map))
+
+(define-derived-mode timer-list-mode special-mode "timer-list"
+ "Mode for listing and controlling timers."
+ (setq truncate-lines t)
+ (buffer-disable-undo)
+ (setq buffer-read-only t)
+ (setq header-line-format
+ (format "%4s %10s %8s %s"
+ "Idle" "Next" "Repeat" "Function")))
+
+(defun timer-list-cancel ()
+ "Cancel the timer on the line under point."
+ (interactive)
+ (let ((timer (get-text-property (line-beginning-position) 'timer))
+ (inhibit-read-only t))
+ (unless timer
+ (error "No timer on the current line"))
+ (cancel-timer timer)
+ (delete-region (line-beginning-position)
+ (line-beginning-position 2))))
+
+(provide 'timer-list)
+
+;;; timer-list.el ends here
:link '(custom-manual "(epa) Top")
:group 'epg)
+(defcustom epa-replace-original-text 'ask
+ "Whether the original text shall be replaced by the decrypted.
+
+If t, replace the original text without any confirmation.
+If nil, don't replace the original text and show the result in a new buffer.
+If neither t nor nil, ask user for confirmation."
+ :type '(choice (const :tag "Never" nil)
+ (const :tag "Ask the user" ask)
+ (const :tag "Always" t))
+ :group 'epa)
+
(defcustom epa-popup-info-window t
"If non-nil, display status information from epa commands in another window."
:type 'boolean
(with-current-buffer (funcall make-buffer-function)
(let ((inhibit-read-only t))
(insert plain)))
- (if (y-or-n-p "Replace the original text? ")
+ (if (or (eq epa-replace-original-text t)
+ (and epa-replace-original-text
+ (y-or-n-p "Replace the original text? ")))
(let ((inhibit-read-only t))
(delete-region start end)
(goto-char start)
(or coding-system-for-read
(get-text-property start 'epa-coding-system-used)
'undecided)))
- (if (y-or-n-p "Replace the original text? ")
+ (if (or (eq epa-replace-original-text t)
+ (and epa-replace-original-text
+ (y-or-n-p "Replace the original text? ")))
(let ((inhibit-read-only t)
buffer-read-only)
(delete-region start end)
(defun erc-server-connect (server port buffer)
"Perform the connection and login using the specified SERVER and PORT.
We will store server variables in the buffer given by BUFFER."
- (let ((msg (erc-format-message 'connect ?S server ?p port)))
+ (let ((msg (erc-format-message 'connect ?S server ?p port)) process)
(message "%s" msg)
- (let ((process (funcall erc-server-connect-function
- (format "erc-%s-%s" server port)
- nil server port)))
- (unless (processp process)
- (error "Connection attempt failed"))
+ (setq process (funcall erc-server-connect-function
+ (format "erc-%s-%s" server port) nil server port))
+ (unless (processp process)
+ (error "Connection attempt failed"))
+ ;; Misc server variables
+ (with-current-buffer buffer
+ (setq erc-server-process process)
+ (setq erc-server-quitting nil)
+ (setq erc-server-reconnecting nil)
+ (setq erc-server-timed-out nil)
+ (setq erc-server-banned nil)
+ (setq erc-server-error-occurred nil)
+ (let ((time (erc-current-time)))
+ (setq erc-server-last-sent-time time)
+ (setq erc-server-last-ping-time time)
+ (setq erc-server-last-received-time time))
+ (setq erc-server-lines-sent 0)
+ ;; last peers (sender and receiver)
+ (setq erc-server-last-peers '(nil . nil)))
+ ;; we do our own encoding and decoding
+ (when (fboundp 'set-process-coding-system)
+ (set-process-coding-system process 'raw-text))
+ ;; process handlers
+ (set-process-sentinel process 'erc-process-sentinel)
+ (set-process-filter process 'erc-server-filter-function)
+ (set-process-buffer process buffer)
+ (erc-log "\n\n\n********************************************\n")
+ (message "%s" (erc-format-message
+ 'login ?n
+ (with-current-buffer buffer (erc-current-nick))))
+ ;; wait with script loading until we receive a confirmation (first
+ ;; MOTD line)
+ (if (eq (process-status process) 'connect)
+ ;; waiting for a non-blocking connect - keep the user informed
+ (erc-display-message nil nil buffer "Opening connection..\n")
(message "%s...done" msg)
- ;; Misc server variables
- (with-current-buffer buffer
- (setq erc-server-process process)
- (setq erc-server-quitting nil)
- (setq erc-server-reconnecting nil)
- (setq erc-server-timed-out nil)
- (setq erc-server-banned nil)
- (setq erc-server-error-occurred nil)
- (let ((time (erc-current-time)))
- (setq erc-server-last-sent-time time)
- (setq erc-server-last-ping-time time)
- (setq erc-server-last-received-time time))
- (setq erc-server-lines-sent 0)
- ;; last peers (sender and receiver)
- (setq erc-server-last-peers '(nil . nil)))
- ;; we do our own encoding and decoding
- (when (fboundp 'set-process-coding-system)
- (set-process-coding-system process 'raw-text))
- ;; process handlers
- (set-process-sentinel process 'erc-process-sentinel)
- (set-process-filter process 'erc-server-filter-function)
- (set-process-buffer process buffer)))
- (erc-log "\n\n\n********************************************\n")
- (message "%s" (erc-format-message
- 'login ?n
- (with-current-buffer buffer (erc-current-nick))))
- ;; wait with script loading until we receive a confirmation (first
- ;; MOTD line)
- (if (eq erc-server-connect-function 'open-network-stream-nowait)
- ;; it's a bit unclear otherwise that it's attempting to establish a
- ;; connection
- (erc-display-message nil nil buffer "Opening connection..\n")
- (erc-login)))
+ (erc-login)) ))
(defun erc-server-reconnect ()
"Reestablish the current IRC connection.
(defconst erc-default-port 6667
"IRC port to use if it cannot be detected otherwise.")
+(defconst erc-default-port-tls 6697
+ "IRC port to use for encrypted connections if it cannot be
+ detected otherwise.")
+
(defcustom erc-join-buffer 'buffer
"Determines how to display a newly created IRC buffer.
(defun erc-tls (&rest r)
"Interactively select TLS connection parameters and run ERC.
Arguments are the same as for `erc'."
- (interactive (erc-select-read-args))
+ (interactive (let ((erc-default-port erc-default-port-tls))
+ (erc-select-read-args)))
(let ((erc-server-connect-function 'erc-open-tls-stream))
(apply #'erc r)))
:version "24.1"
:group 'basic-faces)
+(defface read-multiple-choice-face
+ '((t (:inherit underline
+ :weight bold)))
+ "Face for the symbol name in Apropos output."
+ :group 'basic-faces
+ :version "25.2")
+
;; Faces for TTY menus.
(defface tty-menu-enabled-face
'((t
(defvaralias 'ffap-newsgroup-heads 'thing-at-point-newsgroup-heads)
(defalias 'ffap-newsgroup-p 'thing-at-point-newsgroup-p)
-(defsubst ffap-url-p (string)
+(defun ffap-url-p (string)
"If STRING looks like an URL, return it (maybe improved), else nil."
(when (and (stringp string) ffap-url-regexp)
(let* ((case-fold-search t)
(catch 'exit
(unless enable-local-variables
(throw 'exit (message "Directory-local variables are disabled")))
- (let ((variables-file (or (and (buffer-file-name)
- (not (file-remote-p (buffer-file-name)))
- (dir-locals-find-file (buffer-file-name)))
- dir-locals-file))
- variables)
- (if (consp variables-file) ; result from cache
- ;; If cache element has an mtime, assume it came from a file.
- ;; Otherwise, assume it was set directly.
- (setq variables-file (if (nth 2 variables-file)
- (expand-file-name dir-locals-file
- (car variables-file))
- (cadr variables-file))))
+ (let* ((dir-or-cache (and (buffer-file-name)
+ (not (file-remote-p (buffer-file-name)))
+ (dir-locals-find-file (buffer-file-name))))
+ (variables-file
+ ;; If there are several .dir-locals, the user probably
+ ;; wants to edit the last one (the highest priority).
+ (cond ((stringp dir-or-cache)
+ (car (last (dir-locals--all-files dir-or-cache))))
+ ((consp dir-or-cache) ; result from cache
+ ;; If cache element has an mtime, assume it came
+ ;; from a file. Otherwise, assume it was set
+ ;; directly.
+ (if (nth 2 dir-or-cache)
+ (car (last (dir-locals--all-files (car dir-or-cache))))
+ (cadr dir-or-cache)))
+ ;; Try to make a proper file-name.
+ (t (expand-file-name dir-locals-file))))
+ variables)
;; I can't be bothered to handle this case right now.
;; Dir locals were set directly from a class. You need to
;; directly modify the class in dir-locals-class-alist.
(error
;; The file's content might be invalid (e.g. have a merge conflict), but
;; that shouldn't prevent the user from opening the file.
- (message ".dir-locals error: %s" (error-message-string err))
+ (message "%s error: %s" dir-locals-file (error-message-string err))
nil))))
(defun dir-locals-set-directory-class (directory class &optional mtime)
(defconst dir-locals-file ".dir-locals.el"
"File that contains directory-local variables.
-It has to be constant to enforce uniform values
-across different environments and users.")
+It has to be constant to enforce uniform values across different
+environments and users.
+See also `dir-locals-file-2', whose values override this one's.
+See Info node `(elisp)Directory Local Variables' for details.")
+
+(defconst dir-locals-file-2 ".dir-locals-2.el"
+ "File that contains directory-local variables.
+This essentially a second file that can be used like
+`dir-locals-file', so that users can have specify their personal
+dir-local variables even if the current directory already has a
+`dir-locals-file' that is shared with other users (such as in a
+git repository).
+See Info node `(elisp)Directory Local Variables' for details.")
+
+(defun dir-locals--all-files (directory)
+ "Return a list of all readable dir-locals files in DIRECTORY.
+The returned list is sorted by increasing priority. That is,
+values specified in the last file should take precedence over
+those in the first."
+ (when (file-readable-p directory)
+ (let* ((file-1 (expand-file-name (if (eq system-type 'ms-dos)
+ (dosified-file-name dir-locals-file)
+ dir-locals-file)
+ directory))
+ (file-2 (when (string-match "\\.el\\'" file-1)
+ (replace-match "-2.el" t nil file-1)))
+ (out nil))
+ ;; The order here is important.
+ (dolist (f (list file-2 file-1))
+ (when (and f
+ (file-readable-p f)
+ (file-regular-p f)
+ (not (file-directory-p f)))
+ (push f out)))
+ out)))
(defun dir-locals-find-file (file)
"Find the directory-local variables for FILE.
time stored in the cache matches the current file modification time.
If not, the cache entry is cleared so that the file will be re-read.
-This function returns either nil (no directory local variables found),
-or the matching entry from `dir-locals-directory-cache' (a list),
-or the full path to the `dir-locals-file' (a string) in the case
-of no valid cache entry."
+This function returns either:
+ - nil (no directory local variables found),
+ - the matching entry from `dir-locals-directory-cache' (a list),
+ - or the full path to the directory (a string) containing at
+ least one `dir-locals-file' in the case of no valid cache
+ entry."
(setq file (expand-file-name file))
- (let* ((dir-locals-file-name
- (if (eq system-type 'ms-dos)
- (dosified-file-name dir-locals-file)
- dir-locals-file))
- (locals-file (locate-dominating-file file dir-locals-file-name))
- (dir-elt nil))
+ (let* ((locals-dir (locate-dominating-file (file-name-directory file)
+ #'dir-locals--all-files))
+ dir-elt)
;; `locate-dominating-file' may have abbreviated the name.
- (and locals-file
- (setq locals-file (expand-file-name dir-locals-file-name locals-file)))
- ;; Let dir-locals-read-from-file inform us via demoted-errors
- ;; about unreadable files, etc.
- ;; Maybe we'd want to keep searching though - that is
- ;; a locate-dominating-file issue.
-;;; (or (not (file-readable-p locals-file))
-;;; (not (file-regular-p locals-file)))
-;;; (setq locals-file nil))
+ (when locals-dir
+ (setq locals-dir (expand-file-name locals-dir)))
;; Find the best cached value in `dir-locals-directory-cache'.
(dolist (elt dir-locals-directory-cache)
(when (and (string-prefix-p (car elt) file
- (memq system-type
- '(windows-nt cygwin ms-dos)))
- (> (length (car elt)) (length (car dir-elt))))
- (setq dir-elt elt)))
+ (memq system-type
+ '(windows-nt cygwin ms-dos)))
+ (> (length (car elt)) (length (car dir-elt))))
+ (setq dir-elt elt)))
(if (and dir-elt
- (or (null locals-file)
- (<= (length (file-name-directory locals-file))
- (length (car dir-elt)))))
- ;; Found a potential cache entry. Check validity.
- ;; A cache entry with no MTIME is assumed to always be valid
- ;; (ie, set directly, not from a dir-locals file).
- ;; Note, we don't bother to check that there is a matching class
- ;; element in dir-locals-class-alist, since that's done by
- ;; dir-locals-set-directory-class.
- (if (or (null (nth 2 dir-elt))
- (let ((cached-file (expand-file-name dir-locals-file-name
- (car dir-elt))))
- (and (file-readable-p cached-file)
- (equal (nth 2 dir-elt)
- (nth 5 (file-attributes cached-file))))))
- ;; This cache entry is OK.
- dir-elt
- ;; This cache entry is invalid; clear it.
- (setq dir-locals-directory-cache
- (delq dir-elt dir-locals-directory-cache))
- ;; Return the first existing dir-locals file. Might be the same
- ;; as dir-elt's, might not (eg latter might have been deleted).
- locals-file)
+ (or (null locals-dir)
+ (<= (length locals-dir)
+ (length (car dir-elt)))))
+ ;; Found a potential cache entry. Check validity.
+ ;; A cache entry with no MTIME is assumed to always be valid
+ ;; (ie, set directly, not from a dir-locals file).
+ ;; Note, we don't bother to check that there is a matching class
+ ;; element in dir-locals-class-alist, since that's done by
+ ;; dir-locals-set-directory-class.
+ (if (or (null (nth 2 dir-elt))
+ (let ((cached-files (dir-locals--all-files (car dir-elt))))
+ ;; The entry MTIME should match the most recent
+ ;; MTIME among matching files.
+ (and cached-files
+ (= (time-to-seconds (nth 2 dir-elt))
+ (apply #'max (mapcar (lambda (f) (time-to-seconds (nth 5 (file-attributes f))))
+ cached-files))))))
+ ;; This cache entry is OK.
+ dir-elt
+ ;; This cache entry is invalid; clear it.
+ (setq dir-locals-directory-cache
+ (delq dir-elt dir-locals-directory-cache))
+ ;; Return the first existing dir-locals file. Might be the same
+ ;; as dir-elt's, might not (eg latter might have been deleted).
+ locals-dir)
;; No cache entry.
- locals-file)))
-
-(defun dir-locals-read-from-file (file)
- "Load a variables FILE and register a new class and instance.
-FILE is the name of the file holding the variables to apply.
-The new class name is the same as the directory in which FILE
-is found. Returns the new class name."
- (with-temp-buffer
+ locals-dir)))
+
+(defun dir-locals-read-from-dir (dir)
+ "Load all variables files in DIR and register a new class and instance.
+DIR is the absolute name of a directory which must contain at
+least one dir-local file (which is a file holding variables to
+apply).
+Return the new class name, which is a symbol named DIR."
+ (require 'map)
+ (let* ((class-name (intern dir))
+ (files (dir-locals--all-files dir))
+ (read-circle nil)
+ (success nil)
+ (variables))
(with-demoted-errors "Error reading dir-locals: %S"
- (insert-file-contents file)
- (unless (zerop (buffer-size))
- (let* ((dir-name (file-name-directory file))
- (class-name (intern dir-name))
- (variables (let ((read-circle nil))
- (read (current-buffer)))))
- (dir-locals-set-class-variables class-name variables)
- (dir-locals-set-directory-class dir-name class-name
- (nth 5 (file-attributes file)))
- class-name)))))
+ (dolist (file files)
+ (with-temp-buffer
+ (insert-file-contents file)
+ (condition-case-unless-debug nil
+ (setq variables
+ (map-merge-with 'list (lambda (a b) (map-merge 'list a b))
+ variables
+ (read (current-buffer))))
+ (end-of-file nil))))
+ (setq success t))
+ (dir-locals-set-class-variables class-name variables)
+ (dir-locals-set-directory-class
+ dir class-name
+ (seconds-to-time
+ (if success
+ (apply #'max (mapcar (lambda (file)
+ (time-to-seconds (nth 5 (file-attributes file))))
+ files))
+ ;; If there was a problem, use the values we could get but
+ ;; don't let the cache prevent future reads.
+ 0)))
+ class-name))
+
+(define-obsolete-function-alias 'dir-locals-read-from-file
+ 'dir-locals-read-from-dir "25.1")
(defcustom enable-remote-dir-locals nil
"Non-nil means dir-local variables will be applied to remote files."
(not (file-remote-p (or (buffer-file-name)
default-directory)))))
;; Find the variables file.
- (let ((variables-file (dir-locals-find-file
- (or (buffer-file-name) default-directory)))
+ (let ((dir-or-cache (dir-locals-find-file
+ (or (buffer-file-name) default-directory)))
(class nil)
(dir-name nil))
(cond
- ((stringp variables-file)
- (setq dir-name (file-name-directory variables-file)
- class (dir-locals-read-from-file variables-file)))
- ((consp variables-file)
- (setq dir-name (nth 0 variables-file))
- (setq class (nth 1 variables-file))))
+ ((stringp dir-or-cache)
+ (setq dir-name dir-or-cache
+ class (dir-locals-read-from-dir dir-or-cache)))
+ ((consp dir-or-cache)
+ (setq dir-name (nth 0 dir-or-cache))
+ (setq class (nth 1 dir-or-cache))))
(when class
(let ((variables
(dir-locals-collect-variables
(setq error-lines (nreverse error-lines))
;; Now read the numeric positions of file names.
(goto-char linebeg)
- (forward-word-strictly 1)
+ (forward-word 1)
(forward-char 3)
(while (< (point) end)
(let ((start (insert-directory-adj-pos
;;
;; To turn Font Lock mode on automatically, add this to your init file:
;;
-;; (add-hook 'emacs-lisp-mode-hook 'turn-on-font-lock)
+;; (add-hook 'emacs-lisp-mode-hook #'turn-on-font-lock)
;;
;; Or if you want to turn Font Lock mode on in many modes:
;;
enclosing textual block and mark at the end.
This is normally set via `font-lock-defaults'.")
-(defvar font-lock-fontify-buffer-function 'font-lock-default-fontify-buffer
+(defvar font-lock-fontify-buffer-function #'font-lock-default-fontify-buffer
"Function to use for fontifying the buffer.
This is normally set via `font-lock-defaults'.")
-(defvar font-lock-unfontify-buffer-function 'font-lock-default-unfontify-buffer
+(defvar font-lock-unfontify-buffer-function #'font-lock-default-unfontify-buffer
"Function to use for unfontifying the buffer.
This is used when turning off Font Lock mode.
This is normally set via `font-lock-defaults'.")
\(jit-lock-bounds BEG . END) indicating the bounds of the region actually
fontified.")
-(defvar font-lock-unfontify-region-function 'font-lock-default-unfontify-region
+(defvar font-lock-unfontify-region-function #'font-lock-default-unfontify-region
"Function to use for unfontifying a region.
It should take two args, the beginning and end of the region.
This is normally set via `font-lock-defaults'.")
(defun font-lock-mode-internal (arg)
;; Turn on Font Lock mode.
(when arg
- (add-hook 'after-change-functions 'font-lock-after-change-function t t)
+ (add-hook 'after-change-functions #'font-lock-after-change-function t t)
(font-lock-set-defaults)
(font-lock-turn-on-thing-lock))
;; Turn off Font Lock mode.
(unless font-lock-mode
- (remove-hook 'after-change-functions 'font-lock-after-change-function t)
+ (remove-hook 'after-change-functions #'font-lock-after-change-function t)
(font-lock-unfontify-buffer)
(font-lock-turn-off-thing-lock)))
(`jit-lock-mode
;; Prepare for jit-lock
(remove-hook 'after-change-functions
- 'font-lock-after-change-function t)
+ #'font-lock-after-change-function t)
(set (make-local-variable 'font-lock-flush-function)
- 'jit-lock-refontify)
+ #'jit-lock-refontify)
(set (make-local-variable 'font-lock-ensure-function)
- 'jit-lock-fontify-now)
+ #'jit-lock-fontify-now)
;; Prevent font-lock-fontify-buffer from fontifying eagerly the whole
;; buffer. This is important for things like CWarn mode which
;; adds/removes a few keywords and does a refontify (which takes ages on
;; large files).
(set (make-local-variable 'font-lock-fontify-buffer-function)
- 'jit-lock-refontify)
+ #'jit-lock-refontify)
;; Don't fontify eagerly (and don't abort if the buffer is large).
(set (make-local-variable 'font-lock-fontified) t)
;; Use jit-lock.
(not font-lock-keywords-only))
;; Tell jit-lock how we extend the region to refontify.
(add-hook 'jit-lock-after-change-extend-region-functions
- 'font-lock-extend-jit-lock-region-after-change
+ #'font-lock-extend-jit-lock-region-after-change
nil t))))
(defun font-lock-turn-off-thing-lock ()
"Put proper face on each string and comment between START and END.
START should be at the beginning of a line."
(syntax-propertize end) ; Apply any needed syntax-table properties.
+ (with-syntax-table (or syntax-ppss-table (syntax-table))
(let ((comment-end-regexp
(or font-lock-comment-end-skip
(regexp-quote
font-lock-comment-delimiter-face))))
(< (point) end))
(setq state (parse-partial-sexp (point) end nil nil state
- 'syntax-table)))))
+ 'syntax-table))))))
;;; End of Syntactic fontification functions.
\f
(mapcar #'font-lock-compile-keyword keywords))))
(if (and (not syntactic-keywords)
(let ((beg-function syntax-begin-function))
- (or (eq beg-function 'beginning-of-defun)
+ (or (eq beg-function #'beginning-of-defun)
(if (symbolp beg-function)
(get beg-function 'font-lock-syntax-paren-check))))
(not beginning-of-defun-function))
(let ((syntax (cdr selem)))
(dolist (char (if (numberp (car selem))
(list (car selem))
- (mapcar 'identity (car selem))))
+ (mapcar #'identity (car selem))))
(modify-syntax-entry char syntax font-lock-syntax-table)))))
;; (nth 4 defaults) used to hold `font-lock-beginning-of-syntax-function',
;; but that was removed in 25.1, so if it's a cons cell, we assume that
;; ;; The default level is usually, but not necessarily, level 1.
;; (setq level (- (length keywords)
;; (length (member (eval (car keywords))
-;; (mapcar 'eval (cdr keywords))))))))
+;; (mapcar #'eval (cdr keywords))))))))
;; (setq font-lock-fontify-level (list level (> level 1)
;; (< level (1- (length keywords))))))))
;;
(let* ((coll (oref backend source))
(max (or max 5000)) ; sanity check: default to stop at 5K
- (ignored-keys '(:create :delete :max :backend :label))
+ ;; Filter out ignored keys from the spec
+ (ignored-keys '(:create :delete :max :backend :label :host :port))
+ ;; Build a search spec without the ignored keys
(search-keys (loop for i below (length spec) by 2
unless (memq (nth i spec) ignored-keys)
collect (nth i spec)))
- ;; build a search spec without the ignored keys
- ;; if a search key is nil or t (match anything), we skip it
+ ;; If a search key value is nil or t (match anything), we skip it
(search-spec (apply #'append (mapcar
(lambda (k)
(if (or (null (plist-get spec k))
(returned-keys (mm-delete-duplicates (append
'(:host :login :port :secret)
search-keys)))
- (items (apply #'auth-source-macos-keychain-search-items
- coll
- type
- max
- search-spec))
+ ;; Extract host and port from spec
+ (hosts (plist-get spec :host))
+ (hosts (if (and hosts (listp hosts)) hosts `(,hosts)))
+ (ports (plist-get spec :port))
+ (ports (if (and ports (listp ports)) ports `(,ports)))
+ ;; Loop through all combinations of host/port and pass each of these to
+ ;; auth-source-macos-keychain-search-items
+ (items (catch 'match
+ (dolist (host hosts)
+ (dolist (port ports)
+ (let* ((port (format "%S" port))
+ (items (apply #'auth-source-macos-keychain-search-items
+ coll
+ type
+ max
+ host port
+ search-spec)))
+ (when items
+ (throw 'match items)))))))
;; ensure each item has each key in `returned-keys'
(items (mapcar (lambda (plist)
items))
(defun* auth-source-macos-keychain-search-items (coll _type _max
+ host port
&key label type
- host user port
+ user
&allow-other-keys)
(let* ((keychain-generic (eq type 'macos-keychain-generic))
:group 'gnus-article-buttons
:type 'regexp)
-(defcustom gnus-button-valid-fqdn-regexp
- message-valid-fqdn-regexp
+(defcustom gnus-button-valid-fqdn-regexp "\\([-A-Za-z0-9]+\\.\\)+[A-Za-z]+"
"Regular expression that matches a valid FQDN."
- :version "22.1"
+ :version "25.2"
:group 'gnus-article-buttons
:type 'regexp)
These will be used to retrieve the RSVP information from ical events."
(apply #'append
- (mapcar (lambda (x) (if (listp x) x (list x)))
- (list user-full-name (regexp-quote user-mail-address)
- ; NOTE: these can be lists
- gnus-ignored-from-addresses ; already regexp-quoted
- message-alternative-emails ;
- (mapcar #'regexp-quote gnus-icalendar-additional-identities)))))
+ (mapcar
+ (lambda (x) (if (listp x) x (list x)))
+ (list user-full-name (regexp-quote user-mail-address)
+ ;; NOTE: these can be lists
+ gnus-ignored-from-addresses ; already regexp-quoted
+ (unless (functionp message-alternative-emails) ; String or function.
+ message-alternative-emails)
+ (mapcar #'regexp-quote gnus-icalendar-additional-identities)))))
;; TODO: make the template customizable
(defmethod gnus-icalendar-event->gnus-calendar ((event gnus-icalendar-event) &optional reply-status)
;; Ignore mails from ourselves
(unless (and gnus-ignored-from-addresses
address
- (gnus-string-match-p gnus-ignored-from-addresses
- address))
+ (cond ((functionp gnus-ignored-from-addresses)
+ (funcall gnus-ignored-from-addresses address))
+ (t (gnus-string-match-p (gnus-ignored-from-addresses)
+ address))))
(let* ((photo-file (gnus-notifications-get-photo-file address))
(notification-id (gnus-notifications-notify
(or (car address-components) address)
type-cache))
;; Only add groups that need updating.
(if (or (and foreign-level (null (numberp foreign-level)))
- (funcall (if one-level #'= #'<=) (gnus-info-level info)
- (if (eq (cadr method-group-list) 'foreign)
- foreign-level
- alevel)))
+ (funcall (if one-level #'= #'<=) (gnus-info-level info)
+ (if (eq (cadr method-group-list) 'foreign)
+ foreign-level
+ alevel)))
(setcar (nthcdr 2 method-group-list)
(cons info (nth 2 method-group-list)))
;; The group is inactive, so we nix out the number of unread articles.
(not (string= user-mail-address ""))
(regexp-quote user-mail-address))
"*From headers that may be suppressed in favor of To headers.
-This can be a regexp or a list of regexps."
+This can be a regexp, a list of regexps or a function.
+
+If a function, an email string is passed as the argument."
:version "21.1"
:group 'gnus-summary
:type '(choice regexp
- (repeat :tag "Regexp List" regexp)))
+ (repeat :tag "Regexp List" regexp)
+ function))
(defsubst gnus-ignored-from-addresses ()
- (gmm-regexp-concat gnus-ignored-from-addresses))
+ (cond ((functionp gnus-ignored-from-addresses)
+ gnus-ignored-from-addresses)
+ (t (gmm-regexp-concat gnus-ignored-from-addresses))))
(defcustom gnus-summary-to-prefix "-> "
"*String prefixed to the To field in the summary line when
(defun gnus-summary-from-or-to-or-newsgroups (header gnus-tmp-from)
(let ((mail-parse-charset gnus-newsgroup-charset)
- (ignored-from-addresses (gnus-ignored-from-addresses))
;; Is it really necessary to do this next part for each summary line?
;; Luckily, doesn't seem to slow things down much.
(mail-parse-ignored-charsets
(with-current-buffer gnus-summary-buffer
gnus-newsgroup-ignored-charsets)))
(or
- (and ignored-from-addresses
- (string-match ignored-from-addresses gnus-tmp-from)
+ (and gnus-ignored-from-addresses
+ (cond ((functionp gnus-ignored-from-addresses)
+ (funcall gnus-ignored-from-addresses
+ (mail-strip-quoted-names gnus-tmp-from)))
+ (t (string-match (gnus-ignored-from-addresses) gnus-tmp-from)))
(let ((extra-headers (mail-header-extra header))
to
newsgroups)
(setq arts (cdr arts)))
(setq list (cdr all)))))
- (when (eq (cdr type) 'seen)
- (setq list (gnus-range-add list gnus-newsgroup-unseen)))
-
(when (eq (gnus-article-mark-to-type (cdr type)) 'list)
(setq list (gnus-compress-sequence (set symbol (sort list '<)) t)))
;;; Code:
-(eval '(run-hooks 'gnus-load-hook))
+(run-hooks 'gnus-load-hook)
(eval-when-compile (require 'cl))
(require 'wid-edit)
regexp))
(defcustom message-subject-re-regexp
- "^[ \t]*\\([Rr][Ee]\\(\\[[0-9]*\\]\\)*:[ \t]*\\)*[ \t]*"
+ "^[ \t]*\\([Rr][Ee]\\(\\[[0-9]*\\]\\)* ?:[ \t]*\\)*[ \t]*"
"*Regexp matching \"Re: \" in the subject line."
:group 'message-various
:link '(custom-manual "(message)Message Headers")
(defcustom message-dont-reply-to-names
(and (boundp 'mail-dont-reply-to-names) mail-dont-reply-to-names)
"*Addresses to prune when doing wide replies.
-This can be a regexp or a list of regexps. Also, a value of nil means
-exclude your own user name only."
+This can be a regexp, a list of regexps or a predicate function.
+Also, a value of nil means exclude your own user name only.
+
+If a function email is passed as the argument."
:version "24.3"
:group 'message
:link '(custom-manual "(message)Wide Reply")
(repeat :tag "Regexp List" regexp)))
(defsubst message-dont-reply-to-names ()
- (gmm-regexp-concat message-dont-reply-to-names))
+ (cond ((functionp message-dont-reply-to-names)
+ message-dont-reply-to-names)
+ ((stringp message-dont-reply-to-names)
+ (gmm-regexp-concat message-dont-reply-to-names))))
(defvar message-shoot-gnksa-feet nil
"*A list of GNKSA feet you are allowed to shoot.
(integer 1000000)))
(defcustom message-alternative-emails nil
- "*Regexp matching alternative email addresses.
+ "*Regexp or predicate function matching alternative email addresses.
The first address in the To, Cc or From headers of the original
article matching this variable is used as the From field of
outgoing messages.
+If a function, an email string is passed as the argument.
+
This variable has precedence over posting styles and anything that runs
off `message-setup-hook'."
:group 'message-headers
:link '(custom-manual "(message)Message Headers")
:type '(choice (const :tag "Always use primary" nil)
- regexp))
+ regexp
+ function))
(defcustom message-hierarchical-addresses nil
"A list of hierarchical mail address definitions.
(defvar message-bogus-system-names "\\`localhost\\.\\|\\.local\\'"
"The regexp of bogus system names.")
-(defcustom message-valid-fqdn-regexp
- (concat "[a-z0-9][-.a-z0-9]+\\." ;; [hostname.subdomain.]domain.
- ;; valid TLDs:
- "\\([a-z][a-z]\\|" ;; two letter country TDLs
- "aero\\|arpa\\|asia\\|bitnet\\|biz\\|bofh\\|"
- "cat\\|com\\|coop\\|edu\\|gov\\|"
- "info\\|int\\|jobs\\|"
- "mil\\|mobi\\|museum\\|name\\|net\\|"
- "org\\|pro\\|tel\\|travel\\|uucp\\|"
- ;; ICANN-era generic top-level domains
- "academy\\|actor\\|agency\\|airforce\\|archi\\|associates\\|axa\\|"
- "bar\\|bargains\\|bayern\\|beer\\|berlin\\|best\\|bid\\|bike\\|"
- "biz\\|black\\|blackfriday\\|blue\\|boutique\\|build\\|builders\\|"
- "buzz\\|cab\\|camera\\|camp\\|capital\\|cards\\|care\\|career\\|"
- "careers\\|cash\\|catering\\|center\\|ceo\\|cheap\\|christmas\\|"
- "church\\|citic\\|cleaning\\|clinic\\|clothing\\|club\\|codes\\|"
- "coffee\\|college\\|cologne\\|com\\|community\\|company\\|computer\\|"
- "construction\\|contractors\\|cooking\\|cool\\|country\\|creditcard\\|"
- "cruises\\|dance\\|dating\\|democrat\\|dental\\|desi\\|design\\|"
- "diamonds\\|directory\\|discount\\|domains\\|education\\|email\\|"
- "engineering\\|enterprises\\|equipment\\|estate\\|eus\\|events\\|"
- "exchange\\|expert\\|exposed\\|fail\\|farm\\|feedback\\|finance\\|"
- "financial\\|fish\\|fishing\\|fitness\\|flights\\|florist\\|foo\\|"
- "foundation\\|frogans\\|fund\\|furniture\\|futbol\\|gal\\|"
- "gallery\\|gift\\|glass\\|globo\\|gmo\\|gop\\|graphics\\|gratis\\|"
- "gripe\\|guide\\|guitars\\|guru\\|hamburg\\|haus\\|hiphop\\|"
- "holdings\\|holiday\\|homes\\|horse\\|house\\|immobilien\\|"
- "industries\\|info\\|ink\\|institute\\|insure\\|international\\|"
- "investments\\|jetzt\\|juegos\\|kaufen\\|kim\\|kitchen\\|kiwi\\|"
- "koeln\\|kred\\|land\\|lat\\|latino\\|lease\\|life\\|lighting\\|"
- "limited\\|limo\\|link\\|loans\\|london\\|luxe\\|luxury\\|"
- "management\\|mango\\|marketing\\|media\\|meet\\|menu\\|miami\\|"
- "moda\\|moe\\|monash\\|moscow\\|motorcycles\\|nagoya\\|name\\|"
- "net\\|neustar\\|ninja\\|nyc\\|okinawa\\|onl\\|org\\|paris\\|"
- "partners\\|parts\\|photo\\|photography\\|photos\\|pics\\|"
- "pictures\\|pink\\|plumbing\\|pro\\|productions\\|properties\\|"
- "pub\\|qpon\\|quebec\\|recipes\\|red\\|reisen\\|ren\\|rentals\\|"
- "repair\\|report\\|rest\\|reviews\\|rich\\|rocks\\|rodeo\\|"
- "ruhr\\|ryukyu\\|saarland\\|schule\\|scot\\|services\\|sexy\\|"
- "shiksha\\|shoes\\|singles\\|social\\|sohu\\|solar\\|solutions\\|"
- "soy\\|supplies\\|supply\\|support\\|surgery\\|systems\\|tattoo\\|"
- "tax\\|technology\\|tienda\\|tips\\|today\\|tokyo\\|tools\\|"
- "town\\|toys\\|trade\\|training\\|university\\|uno\\|vacations\\|"
- "vegas\\|ventures\\|viajes\\|villas\\|vision\\|vodka\\|vote\\|"
- "voting\\|voto\\|voyage\\|wang\\|watch\\|webcam\\|wed\\|wien\\|"
- "wiki\\|works\\|wtc\\|wtf\\|xyz\\|yachts\\|yokohama\\|you\\|"
- "zone\\)")
- ;; http://en.wikipedia.org/wiki/List_of_Internet_top-level_domains
- ;; http://en.wikipedia.org/wiki/GTLD
- ;; `approved, but not yet in operation': .xxx
- ;; "dead" nato bitnet uucp
- "Regular expression that matches a valid FQDN."
- ;; see also: gnus-button-valid-fqdn-regexp
- :version "25.1"
- :group 'message-headers
- :type 'regexp)
-
(autoload 'gnus-alive-p "gnus-util")
(autoload 'gnus-delay-article "gnus-delay")
(autoload 'gnus-extract-address-components "gnus-util")
(defun message-point-in-header-p ()
"Return t if point is in the header."
(save-excursion
- (and
- (not
- (re-search-backward
- (concat "^" (regexp-quote mail-header-separator) "\n") nil t))
- (re-search-forward
- (concat "^" (regexp-quote mail-header-separator) "\n") nil t))))
+ (save-restriction
+ (widen)
+ (let ((bound (+ (point-at-eol) 1)) case-fold-search)
+ (goto-char (point-min))
+ (not (search-forward (concat "\n" mail-header-separator "\n")
+ bound t))))))
(defun message-do-auto-fill ()
"Like `do-auto-fill', but don't fill in message header."
(const "invalid")
(const :tag "duplicate @" "@@")
(const :tag "non-ascii local part" "[^[:ascii:]].*@")
- ;; Already caught by `message-valid-fqdn-regexp'
- ;; (const :tag "`_' in domain part" "@.*_")
+ (const :tag "`_' in domain part" "@.*_")
(const :tag "whitespace" "[ \t]"))
(repeat :inline t
:tag "Other"
RECIPIENTS is a mail header. Return a list of potentially bogus
addresses. If none is found, return nil.
-An address might be bogus if the domain part is not fully
-qualified, see `message-valid-fqdn-regexp', or if there's a
-matching entry in `message-bogus-addresses'."
+An address might be bogus if if there's a matching entry in
+`message-bogus-addresses'."
;; FIXME: How about "foo@subdomain", when the MTA adds ".domain.tld"?
(let (found)
(mapc (lambda (address)
(setq address (or (cadr address) ""))
- (when
- (or (string= "" address)
- (not
- (or
+ (when (or (string= "" address)
(not (string-match "@" address))
- (string-match
- (concat ".@.*\\("
- message-valid-fqdn-regexp "\\)\\'") address)))
- (and message-bogus-addresses
- (let ((re
- (if (listp message-bogus-addresses)
- (mapconcat 'identity
- message-bogus-addresses
- "\\|")
- message-bogus-addresses)))
- (string-match re address))))
+ (string-match "@.*@" address)
+ (and message-bogus-addresses
+ (let ((re
+ (if (listp message-bogus-addresses)
+ (mapconcat 'identity
+ message-bogus-addresses
+ "\\|")
+ message-bogus-addresses)))
+ (string-match re address))))
(push address found)))
- ;;
(mail-extract-address-components recipients t))
found))
(cond
((and message-user-fqdn
(stringp message-user-fqdn)
- (string-match message-valid-fqdn-regexp message-user-fqdn)
(not (string-match message-bogus-system-names message-user-fqdn)))
;; `message-user-fqdn' seems to be valid
message-user-fqdn)
- ((and (string-match message-valid-fqdn-regexp sysname)
- (not (string-match message-bogus-system-names sysname)))
+ ((and (string-match message-bogus-system-names sysname))
;; `system-name' returned the right result.
sysname)
;; Try `mail-host-address'.
((and (boundp 'mail-host-address)
(stringp mail-host-address)
- (string-match message-valid-fqdn-regexp mail-host-address)
(not (string-match message-bogus-system-names mail-host-address)))
mail-host-address)
;; We try `user-mail-address' as a backup.
((and user-domain
(stringp user-domain)
- (string-match message-valid-fqdn-regexp user-domain)
(not (string-match message-bogus-system-names user-domain)))
user-domain)
;; Default to this bogus thing.
(defvar visual-line-mode)
(declare-function beginning-of-visual-line "simple" (&optional n))
+(defun message-beginning-of-header (handle-folded)
+ "Move point to beginning of header’s value.
+
+When point is at the first header line, moves it after the colon
+and spaces separating header name and header value.
+
+When point is in a continuation line of a folded header (i.e. the
+line starts with a space), the behaviour depends on HANDLE-FOLDED
+argument. If it’s nil, function moves the point to the start of
+the header continuation; otherwise, function locates the
+beginning of the header and moves point past the colon as is the
+case of single-line headers.
+
+No check whether point is inside of a header or body of the
+message is performed.
+
+Returns point or nil if beginning of header’s value could not be
+found. In the latter case, the point is still moved to the
+beginning of line (possibly after attempting to move it to the
+beginning of a folded header)."
+ ;; https://www.rfc-editor.org/rfc/rfc2822.txt, section 2.2.3. says that when
+ ;; unfolding a single WSP should be consumed. WSP is defined as a space
+ ;; character or a horizontal tab.
+ (beginning-of-line)
+ (when handle-folded
+ (while (and (> (point) (point-min))
+ (or (eq (char-after) ?\s) (eq (char-after) ?\t)))
+ (beginning-of-line 0)))
+ (when (or (eq (char-after) ?\s) (eq (char-after) ?\t)
+ (search-forward ":" (point-at-eol) t))
+ ;; We are a bit more lacks than the RFC and allow any positive number of WSP
+ ;; characters.
+ (skip-chars-forward " \t" (point-at-eol))
+ (point)))
+
(defun message-beginning-of-line (&optional n)
"Move point to beginning of header value or to beginning of line.
The prefix argument N is passed directly to `beginning-of-line'.
This command is identical to `beginning-of-line' if point is
-outside the message header or if the option `message-beginning-of-line'
-is nil.
-
-If point is in the message header and on a (non-continued) header
-line, move point to the beginning of the header value or the beginning of line,
-whichever is closer. If point is already at beginning of line, move point to
-beginning of header value. Therefore, repeated calls will toggle point
-between beginning of field and beginning of line."
+outside the message header or if the option
+`message-beginning-of-line' is nil.
+
+If point is in the message header and on a header line, move
+point to the beginning of the header value or the beginning of
+line, whichever is closer. If point is already at beginning of
+line, move point to beginning of header value. Therefore,
+repeated calls will toggle point between beginning of field and
+beginning of line.
+
+When called without a prefix argument, header value spanning
+multiple lines is treated as a single line. Otherwise, even if
+N is 1, when point is on a continuation header line, it will be
+moved to the beginning "
(interactive "p")
(let ((zrs 'zmacs-region-stays))
(when (and (featurep 'xemacs) (interactive-p) (boundp zrs))
(set zrs t)))
- (if (and message-beginning-of-line
- (message-point-in-header-p))
- (let* ((here (point))
- (bol (progn (beginning-of-line n) (point)))
- (eol (point-at-eol))
- (eoh (re-search-forward ": *" eol t)))
- (goto-char
- (if (and eoh (or (< eoh here) (= bol here)))
- eoh bol)))
- (if (and (boundp 'visual-line-mode) visual-line-mode)
- (beginning-of-visual-line n)
- (beginning-of-line n))))
+ (cond
+ ;; Go to beginning of header or beginning of line.
+ ((and message-beginning-of-line (message-point-in-header-p))
+ (let* ((point (point))
+ (bol (progn (beginning-of-line n) (point)))
+ (boh (message-beginning-of-header (and (boundp 'visual-line-mode)
+ visual-line-mode))))
+ (goto-char (if (and boh (or (< boh point) (= bol point))) boh bol))))
+ ;; Go to beginning of visual line
+ ((and (boundp 'visual-line-mode) visual-line-mode)
+ (beginning-of-visual-line n))
+ ;; Go to beginning of line.
+ ((beginning-of-line n))))
(defun message-buffer-name (type &optional to group)
"Return a new (unique) buffer name based on TYPE and TO."
;; Squeeze whitespace.
(while (string-match "[ \t][ \t]+" recipients)
(setq recipients (replace-match " " t t recipients)))
- ;; Remove addresses that match `mail-dont-reply-to-names'.
- (let ((mail-dont-reply-to-names (message-dont-reply-to-names)))
- (setq recipients (mail-dont-reply-to recipients)))
+ ;; Remove addresses that match `message-dont-reply-to-names'.
+ (setq recipients
+ (cond ((functionp message-dont-reply-to-names)
+ (mapconcat
+ 'identity
+ (delq nil
+ (mapcar (lambda (mail)
+ (unless (funcall message-dont-reply-to-names
+ (mail-strip-quoted-names mail))
+ mail))
+ (message-tokenize-header recipients)))
+ ", "))
+ (t (let ((mail-dont-reply-to-names (message-dont-reply-to-names)))
+ (mail-dont-reply-to recipients)))))
;; Perhaps "Mail-Copies-To: never" removed the only address?
(if (string-equal recipients "")
(setq recipients author))
If you have added `cancel-messages' to `message-shoot-gnksa-feet', all articles
are yours except those that have Cancel-Lock header not belonging to you.
Instead of shooting GNKSA feet, you should modify `message-alternative-emails'
-regexp to match all of yours addresses."
+to match all of yours addresses."
;; Canlock-logic as suggested by Per Abrahamsen
;; <abraham@dina.kvl.dk>
;;
(downcase (car (mail-header-parse-address
(message-make-from))))))
;; Email address in From field matches
- ;; 'message-alternative-emails' regexp
+ ;; 'message-alternative-emails' regexp or function.
(and from
message-alternative-emails
- (string-match
- message-alternative-emails
- (car (mail-header-parse-address from))))))))))
+ (cond ((functionp message-alternative-emails)
+ (funcall message-alternative-emails
+ (mail-header-parse-address from)))
+ (t (string-match message-alternative-emails
+ (car (mail-header-parse-address from))))))))))))
;;;###autoload
(defun message-cancel-news (&optional arg)
(require 'mail-utils)
(let* ((fields '("To" "Cc" "From"))
(emails
- (split-string
+ (message-tokenize-header
(mail-strip-quoted-names
- (mapconcat 'message-fetch-reply-field fields ","))
- "[ \f\t\n\r\v,]+"))
- email)
- (while emails
- (if (string-match message-alternative-emails (car emails))
- (setq email (car emails)
- emails nil))
- (pop emails))
+ (mapconcat 'message-fetch-reply-field fields ","))))
+ (email (cond ((functionp message-alternative-emails)
+ (car (cl-remove-if-not message-alternative-emails emails)))
+ (t (loop for email in emails
+ if (string-match-p message-alternative-emails email)
+ return email)))))
(unless (or (not email) (equal email user-mail-address))
(message-remove-header "From")
(goto-char (point-max))
(require 'mm-url)
(require 'rfc2047)
(require 'mml)
-(eval-when-compile
- (ignore-errors
- (require 'xml)))
-(eval '(require 'xml))
+(require 'xml)
(nnoo-declare nnrss)
(nnoo-define-skeleton nnrss)
;;; Internal functions
-(eval-when-compile (defun xml-rpc-method-call (&rest args)))
-
(defun nnrss-get-encoding ()
"Return an encoding attribute specified in the current xml contents.
If `nnrss-compatible-encoding-alist' specifies the compatible encoding,
;; 4. check syndic8
(nnrss-find-rss-via-syndic8 url))))))))
+(declare-function xml-rpc-method-call "ext:xml-rpc"
+ (server-url method &rest params))
+
(defun nnrss-find-rss-via-syndic8 (url)
"Query syndic8 for the rss feeds it has for URL."
(if (not (locate-library "xml-rpc"))
(buffer-file-name buffer)))
(dir-locals-find-file
(buffer-file-name buffer))))
- (dir-file t))
+ (is-directory nil))
(princ (substitute-command-keys
" This variable's value is directory-local"))
- (if (null file)
- (princ ".\n")
- (princ ", set ")
- (if (consp file) ; result from cache
- ;; If the cache element has an mtime, we
- ;; assume it came from a file.
- (if (nth 2 file)
- (setq file (expand-file-name
- dir-locals-file (car file)))
- ;; Otherwise, assume it was set directly.
- (setq file (car file)
- dir-file nil)))
- (princ (substitute-command-keys
- (if dir-file
- "by the file\n `"
- "for the directory\n `")))
+ (when (consp file) ; result from cache
+ ;; If the cache element has an mtime, we
+ ;; assume it came from a file.
+ (if (nth 2 file)
+ ;; (car file) is a directory.
+ (setq file (dir-locals--all-files (car file)))
+ ;; Otherwise, assume it was set directly.
+ (setq file (car file)
+ is-directory t)))
+ (if (null file)
+ (princ ".\n")
+ (princ ", set ")
+ (princ (substitute-command-keys
+ (cond
+ (is-directory "for the directory\n `")
+ ;; Many files matched.
+ ((and (consp file) (cdr file))
+ (setq file (file-name-directory (car file)))
+ (format "by one of the\n %s files in the directory\n `"
+ dir-locals-file))
+ (t (setq file (car file))
+ "by the file\n `"))))
(with-current-buffer standard-output
(insert-text-button
file 'type 'help-dir-local-var-def
- 'help-args (list variable file)))
+ 'help-args (list variable file)))
(princ (substitute-command-keys "'.\n"))))
(princ (substitute-command-keys
" This variable's value is file-local.\n"))))
(provide 'hfy-cmap)
;; Local Variables:
-;; generated-autoload-file: "htmlfontify.el"
+;; generated-autoload-file: "htmlfontify-loaddefs.el"
;; End:
;;; hfy-cmap.el ends here
;; (`font-lock-fontify-region')
(require 'cus-edit)
+(require 'htmlfontify-loaddefs)
+
(defconst htmlfontify-version 0.21)
(defconst hfy-meta-tags
(let ((file (hfy-initfile)))
(load file 'NOERROR nil nil) ))
-\f
-;;;### (autoloads nil "hfy-cmap" "hfy-cmap.el" "e644ddae915ddb98c9b2f16ffa5a74b2")
-;;; Generated autoloads from hfy-cmap.el
-
-(autoload 'htmlfontify-load-rgb-file "hfy-cmap" "\
-Load an X11 style rgb.txt FILE.
-Search `hfy-rgb-load-path' if FILE is not specified.
-Loads the variable `hfy-rgb-txt-colour-map', which is used by
-`hfy-fallback-colour-values'.
-
-\(fn &optional FILE)" t nil)
-
-(autoload 'hfy-fallback-colour-values "hfy-cmap" "\
-Use a fallback method for obtaining the rgb values for a color.
-
-\(fn COLOUR-STRING)" nil nil)
-
-;;;***
-\f
-
(provide 'htmlfontify)
;;; htmlfontify.el ends here
(provide 'ibuf-ext)
;; Local Variables:
-;; generated-autoload-file: "ibuffer.el"
+;; generated-autoload-file: "ibuffer-loaddefs.el"
;; End:
;;; ibuf-ext.el ends here
(require 'font-core)
+(require 'ibuffer-loaddefs)
;; These come from ibuf-ext.el, which can not be require'd at compile time
;; because it has a recursive dependency on ibuffer.el
(defvar ibuffer-auto-mode)
(setq default-directory ibuffer-default-directory))
(add-hook 'change-major-mode-hook 'font-lock-defontify nil t))
-\f
-;;; Start of automatically extracted autoloads.
-\f
-;;;### (autoloads nil "ibuf-ext" "ibuf-ext.el" "9521139d5f2ba7c870e3101fd73bb3ce")
-;;; Generated autoloads from ibuf-ext.el
-
-(autoload 'ibuffer-auto-mode "ibuf-ext" "\
-Toggle use of Ibuffer's auto-update facility (Ibuffer Auto mode).
-With a prefix argument ARG, enable Ibuffer Auto mode if ARG is
-positive, and disable it otherwise. If called from Lisp, enable
-the mode if ARG is omitted or nil.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'ibuffer-mouse-filter-by-mode "ibuf-ext" "\
-Enable or disable filtering by the major mode chosen via mouse.
-
-\(fn EVENT)" t nil)
-
-(autoload 'ibuffer-interactive-filter-by-mode "ibuf-ext" "\
-Enable or disable filtering by the major mode at point.
-
-\(fn EVENT-OR-POINT)" t nil)
-
-(autoload 'ibuffer-mouse-toggle-filter-group "ibuf-ext" "\
-Toggle the display status of the filter group chosen with the mouse.
-
-\(fn EVENT)" t nil)
-
-(autoload 'ibuffer-toggle-filter-group "ibuf-ext" "\
-Toggle the display status of the filter group on this line.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-forward-filter-group "ibuf-ext" "\
-Move point forwards by COUNT filtering groups.
-
-\(fn &optional COUNT)" t nil)
-
-(autoload 'ibuffer-backward-filter-group "ibuf-ext" "\
-Move point backwards by COUNT filtering groups.
-
-\(fn &optional COUNT)" t nil)
- (autoload 'ibuffer-do-shell-command-pipe "ibuf-ext")
- (autoload 'ibuffer-do-shell-command-pipe-replace "ibuf-ext")
- (autoload 'ibuffer-do-shell-command-file "ibuf-ext")
- (autoload 'ibuffer-do-eval "ibuf-ext")
- (autoload 'ibuffer-do-view-and-eval "ibuf-ext")
- (autoload 'ibuffer-do-rename-uniquely "ibuf-ext")
- (autoload 'ibuffer-do-revert "ibuf-ext")
- (autoload 'ibuffer-do-isearch "ibuf-ext")
- (autoload 'ibuffer-do-isearch-regexp "ibuf-ext")
- (autoload 'ibuffer-do-replace-regexp "ibuf-ext")
- (autoload 'ibuffer-do-query-replace "ibuf-ext")
- (autoload 'ibuffer-do-query-replace-regexp "ibuf-ext")
- (autoload 'ibuffer-do-print "ibuf-ext")
-
-(autoload 'ibuffer-included-in-filters-p "ibuf-ext" "\
-
-
-\(fn BUF FILTERS)" nil nil)
-
-(autoload 'ibuffer-filters-to-filter-group "ibuf-ext" "\
-Make the current filters into a filtering group.
-
-\(fn NAME)" t nil)
-
-(autoload 'ibuffer-set-filter-groups-by-mode "ibuf-ext" "\
-Set the current filter groups to filter by mode.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-pop-filter-group "ibuf-ext" "\
-Remove the first filter group.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-decompose-filter-group "ibuf-ext" "\
-Decompose the filter group GROUP into active filters.
-
-\(fn GROUP)" t nil)
-
-(autoload 'ibuffer-clear-filter-groups "ibuf-ext" "\
-Remove all filter groups.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-jump-to-filter-group "ibuf-ext" "\
-Move point to the filter group whose name is NAME.
-
-\(fn NAME)" t nil)
-
-(autoload 'ibuffer-kill-filter-group "ibuf-ext" "\
-Kill the filter group named NAME.
-The group will be added to `ibuffer-filter-group-kill-ring'.
-
-\(fn NAME)" t nil)
-
-(autoload 'ibuffer-kill-line "ibuf-ext" "\
-Kill the filter group at point.
-See also `ibuffer-kill-filter-group'.
-
-\(fn &optional ARG INTERACTIVE-P)" t nil)
-
-(autoload 'ibuffer-yank "ibuf-ext" "\
-Yank the last killed filter group before group at point.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-yank-filter-group "ibuf-ext" "\
-Yank the last killed filter group before group named NAME.
-
-\(fn NAME)" t nil)
-
-(autoload 'ibuffer-save-filter-groups "ibuf-ext" "\
-Save all active filter groups GROUPS as NAME.
-They are added to `ibuffer-saved-filter-groups'. Interactively,
-prompt for NAME, and use the current filters.
-
-\(fn NAME GROUPS)" t nil)
-
-(autoload 'ibuffer-delete-saved-filter-groups "ibuf-ext" "\
-Delete saved filter groups with NAME.
-They are removed from `ibuffer-saved-filter-groups'.
-
-\(fn NAME)" t nil)
-
-(autoload 'ibuffer-switch-to-saved-filter-groups "ibuf-ext" "\
-Set this buffer's filter groups to saved version with NAME.
-The value from `ibuffer-saved-filter-groups' is used.
-
-\(fn NAME)" t nil)
-
-(autoload 'ibuffer-filter-disable "ibuf-ext" "\
-Disable all filters currently in effect in this buffer.
-With optional arg DELETE-FILTER-GROUPS non-nil, delete all filter
-group definitions by setting `ibuffer-filter-groups' to nil.
-
-\(fn &optional DELETE-FILTER-GROUPS)" t nil)
-
-(autoload 'ibuffer-pop-filter "ibuf-ext" "\
-Remove the top filter in this buffer.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-decompose-filter "ibuf-ext" "\
-Separate the top compound filter (OR, NOT, or SAVED) in this buffer.
-
-This means that the topmost filter on the filtering stack, which must
-be a complex filter like (OR [name: foo] [mode: bar-mode]), will be
-turned into two separate filters [name: foo] and [mode: bar-mode].
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-exchange-filters "ibuf-ext" "\
-Exchange the top two filters on the stack in this buffer.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-negate-filter "ibuf-ext" "\
-Negate the sense of the top filter in the current buffer.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-or-filter "ibuf-ext" "\
-Replace the top two filters in this buffer with their logical OR.
-If optional argument REVERSE is non-nil, instead break the top OR
-filter into parts.
-
-\(fn &optional REVERSE)" t nil)
-
-(autoload 'ibuffer-save-filters "ibuf-ext" "\
-Save FILTERS in this buffer with name NAME in `ibuffer-saved-filters'.
-Interactively, prompt for NAME, and use the current filters.
-
-\(fn NAME FILTERS)" t nil)
-
-(autoload 'ibuffer-delete-saved-filters "ibuf-ext" "\
-Delete saved filters with NAME from `ibuffer-saved-filters'.
-
-\(fn NAME)" t nil)
-
-(autoload 'ibuffer-add-saved-filters "ibuf-ext" "\
-Add saved filters from `ibuffer-saved-filters' to this buffer's filters.
-
-\(fn NAME)" t nil)
-
-(autoload 'ibuffer-switch-to-saved-filters "ibuf-ext" "\
-Set this buffer's filters to filters with NAME from `ibuffer-saved-filters'.
-
-\(fn NAME)" t nil)
- (autoload 'ibuffer-filter-by-mode "ibuf-ext")
- (autoload 'ibuffer-filter-by-used-mode "ibuf-ext")
- (autoload 'ibuffer-filter-by-derived-mode "ibuf-ext")
- (autoload 'ibuffer-filter-by-name "ibuf-ext")
- (autoload 'ibuffer-filter-by-filename "ibuf-ext")
- (autoload 'ibuffer-filter-by-size-gt "ibuf-ext")
- (autoload 'ibuffer-filter-by-size-lt "ibuf-ext")
- (autoload 'ibuffer-filter-by-content "ibuf-ext")
- (autoload 'ibuffer-filter-by-predicate "ibuf-ext")
-
-(autoload 'ibuffer-toggle-sorting-mode "ibuf-ext" "\
-Toggle the current sorting mode.
-Default sorting modes are:
- Recency - the last time the buffer was viewed
- Name - the name of the buffer
- Major Mode - the name of the major mode of the buffer
- Size - the size of the buffer
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-invert-sorting "ibuf-ext" "\
-Toggle whether or not sorting is in reverse order.
-
-\(fn)" t nil)
- (autoload 'ibuffer-do-sort-by-major-mode "ibuf-ext")
- (autoload 'ibuffer-do-sort-by-mode-name "ibuf-ext")
- (autoload 'ibuffer-do-sort-by-alphabetic "ibuf-ext")
- (autoload 'ibuffer-do-sort-by-size "ibuf-ext")
- (autoload 'ibuffer-do-sort-by-filename/process "ibuf-ext")
-
-(autoload 'ibuffer-bs-show "ibuf-ext" "\
-Emulate `bs-show' from the bs.el package.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-add-to-tmp-hide "ibuf-ext" "\
-Add REGEXP to `ibuffer-tmp-hide-regexps'.
-This means that buffers whose name matches REGEXP will not be shown
-for this Ibuffer session.
-
-\(fn REGEXP)" t nil)
-
-(autoload 'ibuffer-add-to-tmp-show "ibuf-ext" "\
-Add REGEXP to `ibuffer-tmp-show-regexps'.
-This means that buffers whose name matches REGEXP will always be shown
-for this Ibuffer session.
-
-\(fn REGEXP)" t nil)
-
-(autoload 'ibuffer-forward-next-marked "ibuf-ext" "\
-Move forward by COUNT marked buffers (default 1).
-
-If MARK is non-nil, it should be a character denoting the type of mark
-to move by. The default is `ibuffer-marked-char'.
-
-If DIRECTION is non-nil, it should be an integer; negative integers
-mean move backwards, non-negative integers mean move forwards.
-
-\(fn &optional COUNT MARK DIRECTION)" t nil)
-
-(autoload 'ibuffer-backwards-next-marked "ibuf-ext" "\
-Move backwards by COUNT marked buffers (default 1).
-
-If MARK is non-nil, it should be a character denoting the type of mark
-to move by. The default is `ibuffer-marked-char'.
-
-\(fn &optional COUNT MARK)" t nil)
-
-(autoload 'ibuffer-do-kill-lines "ibuf-ext" "\
-Hide all of the currently marked lines.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-jump-to-buffer "ibuf-ext" "\
-Move point to the buffer whose name is NAME.
-
-If called interactively, prompt for a buffer name and go to the
-corresponding line in the Ibuffer buffer. If said buffer is in a
-hidden group filter, open it.
-
-If `ibuffer-jump-offer-only-visible-buffers' is non-nil, only offer
-visible buffers in the completion list. Calling the command with
-a prefix argument reverses the meaning of that variable.
-
-\(fn NAME)" t nil)
-
-(autoload 'ibuffer-diff-with-file "ibuf-ext" "\
-View the differences between marked buffers and their associated files.
-If no buffers are marked, use buffer at point.
-This requires the external program \"diff\" to be in your `exec-path'.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-copy-filename-as-kill "ibuf-ext" "\
-Copy filenames of marked buffers into the kill ring.
-
-The names are separated by a space.
-If a buffer has no filename, it is ignored.
-
-With no prefix arg, use the filename sans its directory of each marked file.
-With a zero prefix arg, use the complete filename of each marked file.
-With \\[universal-argument], use the filename of each marked file relative
-to `ibuffer-default-directory' if non-nil, otherwise `default-directory'.
-
-You can then feed the file name(s) to other commands with \\[yank].
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'ibuffer-mark-by-name-regexp "ibuf-ext" "\
-Mark all buffers whose name matches REGEXP.
-
-\(fn REGEXP)" t nil)
-
-(autoload 'ibuffer-mark-by-mode-regexp "ibuf-ext" "\
-Mark all buffers whose major mode matches REGEXP.
-
-\(fn REGEXP)" t nil)
-
-(autoload 'ibuffer-mark-by-file-name-regexp "ibuf-ext" "\
-Mark all buffers whose file name matches REGEXP.
-
-\(fn REGEXP)" t nil)
-
-(autoload 'ibuffer-mark-by-mode "ibuf-ext" "\
-Mark all buffers whose major mode equals MODE.
-
-\(fn MODE)" t nil)
-
-(autoload 'ibuffer-mark-modified-buffers "ibuf-ext" "\
-Mark all modified buffers.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-mark-unsaved-buffers "ibuf-ext" "\
-Mark all modified buffers that have an associated file.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-mark-dissociated-buffers "ibuf-ext" "\
-Mark all buffers whose associated file does not exist.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-mark-help-buffers "ibuf-ext" "\
-Mark buffers whose major mode is in variable `ibuffer-help-buffer-modes'.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-mark-compressed-file-buffers "ibuf-ext" "\
-Mark buffers whose associated file is compressed.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-mark-old-buffers "ibuf-ext" "\
-Mark buffers which have not been viewed in `ibuffer-old-time' hours.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-mark-special-buffers "ibuf-ext" "\
-Mark all buffers whose name begins and ends with `*'.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-mark-read-only-buffers "ibuf-ext" "\
-Mark all read-only buffers.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-mark-dired-buffers "ibuf-ext" "\
-Mark all `dired' buffers.
-
-\(fn)" t nil)
-
-(autoload 'ibuffer-do-occur "ibuf-ext" "\
-View lines which match REGEXP in all marked buffers.
-Optional argument NLINES says how many lines of context to display: it
-defaults to one.
-
-\(fn REGEXP &optional NLINES)" t nil)
-
-;;;***
-\f
-;;; End of automatically extracted autoloads.
-
-
(provide 'ibuffer)
(run-hooks 'ibuffer-load-hook)
:type '(repeat (choice directory variable))
:initialize 'custom-initialize-delay)
+(defcustom image-scaling-factor 'auto
+ "When displaying images, apply this scaling factor before displaying.
+This is not supported for all image types, and is mostly useful
+when you have a high-resolution monitor.
+The value is either a floating point number (where numbers higher
+than 1 means to increase the size and lower means to shrink the
+size), or the symbol `auto', which will compute a scaling factor
+based on the font pixel size."
+ :type '(choice number
+ (const :tag "Automatically compute" auto))
+ :group 'image
+ :version "25.2")
(defun image-load-path-for-library (library image &optional path no-error)
"Return a suitable search path for images used by LIBRARY.
(setq type (image-type file-or-data type data-p))
(when (image-type-available-p type)
(append (list 'image :type type (if data-p :data :file) file-or-data)
+ (and (not (plist-get props :scale))
+ (list :scale
+ (image-compute-scaling-factor image-scaling-factor)))
props)))
+(defun image-compute-scaling-factor (scaling)
+ (cond
+ ((numberp image-scaling-factor)
+ image-scaling-factor)
+ ((eq image-scaling-factor 'auto)
+ (let ((width (/ (float (window-width nil t)) (window-width))))
+ ;; If we assume that a typical character is 10 pixels in width,
+ ;; then we should scale all images according to how wide they
+ ;; are. But don't scale images down.
+ (if (< width 10)
+ 1
+ (/ (float width) 10))))
+ (t
+ (error "Invalid scaling factor %s" image-scaling-factor))))
;;;###autoload
(defun put-image (image pos &optional string area)
(imagemagick-register-types)
+(defun image-increase-size (n)
+ "Increase the image size by a factor of N.
+If N is 3, then the image size will be increased by 30%. The
+default is 20%."
+ (interactive "P")
+ (image-change-size (if n
+ (1+ (/ n 10))
+ 1.2)))
+
+(defun image-decrease-size (n)
+ "Decrease the image size by a factor of N.
+If N is 3, then the image size will be decreased by 30%. The
+default is 20%."
+ (interactive "P")
+ (image-change-size (if n
+ (- 1 (/ n 10))
+ 0.8)))
+
+(defun image-change-size (factor)
+ (unless (fboundp 'imagemagick-types)
+ (error "Can't rescale images without ImageMagick support"))
+ (let ((image (get-text-property (point) 'display)))
+ (when (or (not (consp image))
+ (not (eq (car image) 'image)))
+ (error "No image under point"))
+ (plist-put (cdr image) :type 'imagemagick)
+ (plist-put (cdr image) :scale
+ (* (or (plist-get (cdr image) :scale) 1) factor))))
+
(provide 'image)
;;; image.el ends here
(unless (char-equal char (json-peek))
(signal 'json-unknown-keyword
(list (save-excursion
- (backward-word-strictly 1)
+ (backward-word 1)
(thing-at-point 'word)))))
(json-advance))
keyword)
(unless (looking-at "\\(\\s-\\|[],}]\\|$\\)")
(signal 'json-unknown-keyword
(list (save-excursion
- (backward-word-strictly 1)
+ (backward-word 1)
(thing-at-point 'word)))))
(cond ((string-equal keyword "true") t)
((string-equal keyword "false") json-false)
;;; Code:
\f
-;;;### (autoloads nil "5x5" "play/5x5.el" (22180 39318 464077 241000))
+;;;### (autoloads nil "5x5" "play/5x5.el" (22164 57535 263192 607000))
;;; Generated autoloads from play/5x5.el
(autoload '5x5 "5x5" "\
;;;***
\f
-;;;### (autoloads nil "ada-mode" "progmodes/ada-mode.el" (22180 39318
-;;;;;; 470077 213000))
+;;;### (autoloads nil "ada-mode" "progmodes/ada-mode.el" (22164 57535
+;;;;;; 323192 607000))
;;; Generated autoloads from progmodes/ada-mode.el
(autoload 'ada-add-extensions "ada-mode" "\
;;;***
\f
-;;;### (autoloads nil "ada-stmt" "progmodes/ada-stmt.el" (22180 39318
-;;;;;; 470077 213000))
+;;;### (autoloads nil "ada-stmt" "progmodes/ada-stmt.el" (22164 57535
+;;;;;; 327192 607000))
;;; Generated autoloads from progmodes/ada-stmt.el
(autoload 'ada-header "ada-stmt" "\
;;;***
\f
-;;;### (autoloads nil "ada-xref" "progmodes/ada-xref.el" (22180 39318
-;;;;;; 471077 209000))
+;;;### (autoloads nil "ada-xref" "progmodes/ada-xref.el" (22164 57535
+;;;;;; 327192 607000))
;;; Generated autoloads from progmodes/ada-xref.el
(autoload 'ada-find-file "ada-xref" "\
;;;***
\f
-;;;### (autoloads nil "add-log" "vc/add-log.el" (22180 39318 546076
-;;;;;; 864000))
+;;;### (autoloads nil "add-log" "vc/add-log.el" (22189 60739 305741
+;;;;;; 19000))
;;; Generated autoloads from vc/add-log.el
(put 'change-log-default-name 'safe-local-variable 'string-or-null-p)
;;;***
\f
-;;;### (autoloads nil "advice" "emacs-lisp/advice.el" (22180 39318
-;;;;;; 279078 92000))
+;;;### (autoloads nil "advice" "emacs-lisp/advice.el" (22164 57534
+;;;;;; 115192 607000))
;;; Generated autoloads from emacs-lisp/advice.el
(defvar ad-redefinition-action 'warn "\
;;;***
\f
-;;;### (autoloads nil "align" "align.el" (22180 39318 222078 354000))
+;;;### (autoloads nil "align" "align.el" (22164 57533 763192 607000))
;;; Generated autoloads from align.el
(autoload 'align "align" "\
;;;***
\f
-;;;### (autoloads nil "allout" "allout.el" (22180 39318 224078 344000))
+;;;### (autoloads nil "allout" "allout.el" (22164 57533 771192 607000))
;;; Generated autoloads from allout.el
(push (purecopy '(allout 2 3)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "allout-widgets" "allout-widgets.el" (22180
-;;;;;; 39318 222078 354000))
+;;;### (autoloads nil "allout-widgets" "allout-widgets.el" (22164
+;;;;;; 57533 763192 607000))
;;; Generated autoloads from allout-widgets.el
(push (purecopy '(allout-widgets 1 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "ange-ftp" "net/ange-ftp.el" (22180 39318 406077
-;;;;;; 507000))
+;;;### (autoloads nil "ange-ftp" "net/ange-ftp.el" (22164 57534 919192
+;;;;;; 607000))
;;; Generated autoloads from net/ange-ftp.el
(defalias 'ange-ftp-re-read-dir 'ange-ftp-reread-dir)
;;;***
\f
-;;;### (autoloads nil "animate" "play/animate.el" (22180 39318 464077
-;;;;;; 241000))
+;;;### (autoloads nil "animate" "play/animate.el" (22164 57535 263192
+;;;;;; 607000))
;;; Generated autoloads from play/animate.el
(autoload 'animate-string "animate" "\
;;;***
\f
-;;;### (autoloads nil "ansi-color" "ansi-color.el" (22180 39318 224078
-;;;;;; 344000))
+;;;### (autoloads nil "ansi-color" "ansi-color.el" (22164 57533 771192
+;;;;;; 607000))
;;; Generated autoloads from ansi-color.el
(push (purecopy '(ansi-color 3 4 2)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "antlr-mode" "progmodes/antlr-mode.el" (22183
-;;;;;; 58408 695001 816000))
+;;;### (autoloads nil "antlr-mode" "progmodes/antlr-mode.el" (22189
+;;;;;; 60739 45741 19000))
;;; Generated autoloads from progmodes/antlr-mode.el
(push (purecopy '(antlr-mode 2 2 3)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "appt" "calendar/appt.el" (22180 39318 240078
-;;;;;; 271000))
+;;;### (autoloads nil "appt" "calendar/appt.el" (22164 57533 835192
+;;;;;; 607000))
;;; Generated autoloads from calendar/appt.el
(autoload 'appt-add "appt" "\
;;;***
\f
-;;;### (autoloads nil "apropos" "apropos.el" (22180 39318 224078
-;;;;;; 344000))
+;;;### (autoloads nil "apropos" "apropos.el" (22164 57533 771192
+;;;;;; 607000))
;;; Generated autoloads from apropos.el
(autoload 'apropos-read-pattern "apropos" "\
;;;***
\f
-;;;### (autoloads nil "arc-mode" "arc-mode.el" (22180 39318 225078
-;;;;;; 340000))
+;;;### (autoloads nil "arc-mode" "arc-mode.el" (22164 57533 775192
+;;;;;; 607000))
;;; Generated autoloads from arc-mode.el
(autoload 'archive-mode "arc-mode" "\
;;;***
\f
-;;;### (autoloads nil "array" "array.el" (22180 39318 225078 340000))
+;;;### (autoloads nil "array" "array.el" (22164 57533 775192 607000))
;;; Generated autoloads from array.el
(autoload 'array-mode "array" "\
;;;***
\f
-;;;### (autoloads nil "artist" "textmodes/artist.el" (22180 39318
-;;;;;; 528076 946000))
+;;;### (autoloads nil "artist" "textmodes/artist.el" (22164 57535
+;;;;;; 795192 607000))
;;; Generated autoloads from textmodes/artist.el
(push (purecopy '(artist 1 2 6)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "asm-mode" "progmodes/asm-mode.el" (22180 39318
-;;;;;; 472077 204000))
+;;;### (autoloads nil "asm-mode" "progmodes/asm-mode.el" (22164 57535
+;;;;;; 331192 607000))
;;; Generated autoloads from progmodes/asm-mode.el
(autoload 'asm-mode "asm-mode" "\
;;;***
\f
-;;;### (autoloads nil "auth-source" "gnus/auth-source.el" (22180
-;;;;;; 39318 327077 871000))
+;;;### (autoloads nil "auth-source" "gnus/auth-source.el" (22164
+;;;;;; 57534 447192 607000))
;;; Generated autoloads from gnus/auth-source.el
(defvar auth-source-cache-expiry 7200 "\
;;;***
\f
-;;;### (autoloads nil "autoarg" "autoarg.el" (22180 39318 225078
-;;;;;; 340000))
+;;;### (autoloads nil "autoarg" "autoarg.el" (22164 57533 775192
+;;;;;; 607000))
;;; Generated autoloads from autoarg.el
(defvar autoarg-mode nil "\
;;;***
\f
-;;;### (autoloads nil "autoconf" "progmodes/autoconf.el" (22180 39318
-;;;;;; 472077 204000))
+;;;### (autoloads nil "autoconf" "progmodes/autoconf.el" (22164 57535
+;;;;;; 331192 607000))
;;; Generated autoloads from progmodes/autoconf.el
(autoload 'autoconf-mode "autoconf" "\
;;;***
\f
-;;;### (autoloads nil "autoinsert" "autoinsert.el" (22180 39318 225078
-;;;;;; 340000))
+;;;### (autoloads nil "autoinsert" "autoinsert.el" (22164 57533 775192
+;;;;;; 607000))
;;; Generated autoloads from autoinsert.el
(autoload 'auto-insert "autoinsert" "\
;;;***
\f
-;;;### (autoloads nil "autoload" "emacs-lisp/autoload.el" (22180
-;;;;;; 39318 279078 92000))
+;;;### (autoloads nil "autoload" "emacs-lisp/autoload.el" (22164
+;;;;;; 57534 115192 607000))
;;; Generated autoloads from emacs-lisp/autoload.el
(put 'generated-autoload-file 'safe-local-variable 'stringp)
;;;***
\f
-;;;### (autoloads nil "autorevert" "autorevert.el" (22183 58408 667002
-;;;;;; 38000))
+;;;### (autoloads nil "autorevert" "autorevert.el" (22189 60737 941741
+;;;;;; 19000))
;;; Generated autoloads from autorevert.el
(autoload 'auto-revert-mode "autorevert" "\
;;;***
\f
-;;;### (autoloads nil "avoid" "avoid.el" (22180 39318 225078 340000))
+;;;### (autoloads nil "avoid" "avoid.el" (22164 57533 775192 607000))
;;; Generated autoloads from avoid.el
(defvar mouse-avoidance-mode nil "\
;;;***
\f
-;;;### (autoloads nil "bat-mode" "progmodes/bat-mode.el" (22180 39318
-;;;;;; 472077 204000))
+;;;### (autoloads nil "bat-mode" "progmodes/bat-mode.el" (22164 57535
+;;;;;; 331192 607000))
;;; Generated autoloads from progmodes/bat-mode.el
(add-to-list 'auto-mode-alist '("\\.\\(bat\\|cmd\\)\\'" . bat-mode))
;;;***
\f
-;;;### (autoloads nil "battery" "battery.el" (22180 39318 226078
-;;;;;; 335000))
+;;;### (autoloads nil "battery" "battery.el" (22164 57533 779192
+;;;;;; 607000))
;;; Generated autoloads from battery.el
(put 'battery-mode-line-string 'risky-local-variable t)
;;;***
\f
-;;;### (autoloads nil "benchmark" "emacs-lisp/benchmark.el" (22180
-;;;;;; 39318 280078 87000))
+;;;### (autoloads nil "benchmark" "emacs-lisp/benchmark.el" (22164
+;;;;;; 57534 119192 607000))
;;; Generated autoloads from emacs-lisp/benchmark.el
(autoload 'benchmark-run "benchmark" "\
;;;***
\f
-;;;### (autoloads nil "bibtex" "textmodes/bibtex.el" (22180 39318
-;;;;;; 530076 937000))
+;;;### (autoloads nil "bibtex" "textmodes/bibtex.el" (22164 57535
+;;;;;; 799192 607000))
;;; Generated autoloads from textmodes/bibtex.el
(autoload 'bibtex-initialize "bibtex" "\
;;;***
\f
;;;### (autoloads nil "bibtex-style" "textmodes/bibtex-style.el"
-;;;;;; (22180 39318 529076 942000))
+;;;;;; (22164 57535 795192 607000))
;;; Generated autoloads from textmodes/bibtex-style.el
(autoload 'bibtex-style-mode "bibtex-style" "\
;;;***
\f
-;;;### (autoloads nil "binhex" "mail/binhex.el" (22180 39318 386077
-;;;;;; 599000))
+;;;### (autoloads nil "binhex" "mail/binhex.el" (22164 57534 803192
+;;;;;; 607000))
;;; Generated autoloads from mail/binhex.el
(defconst binhex-begin-line "^:...............................................................$" "\
;;;***
\f
-;;;### (autoloads nil "blackbox" "play/blackbox.el" (22180 39318
-;;;;;; 464077 241000))
+;;;### (autoloads nil "blackbox" "play/blackbox.el" (22164 57535
+;;;;;; 263192 607000))
;;; Generated autoloads from play/blackbox.el
(autoload 'blackbox "blackbox" "\
;;;***
\f
-;;;### (autoloads nil "bookmark" "bookmark.el" (22180 39318 227078
-;;;;;; 330000))
+;;;### (autoloads nil "bookmark" "bookmark.el" (22164 57533 779192
+;;;;;; 607000))
;;; Generated autoloads from bookmark.el
(define-key ctl-x-r-map "b" 'bookmark-jump)
(define-key ctl-x-r-map "m" 'bookmark-set)
;;;***
\f
-;;;### (autoloads nil "browse-url" "net/browse-url.el" (22183 58408
-;;;;;; 681001 927000))
+;;;### (autoloads nil "browse-url" "net/browse-url.el" (22189 60738
+;;;;;; 473741 19000))
;;; Generated autoloads from net/browse-url.el
(defvar browse-url-browser-function 'browse-url-default-browser "\
;;;***
\f
-;;;### (autoloads nil "bs" "bs.el" (22180 39318 227078 330000))
+;;;### (autoloads nil "bs" "bs.el" (22164 57533 783192 607000))
;;; Generated autoloads from bs.el
(push (purecopy '(bs 1 17)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "bubbles" "play/bubbles.el" (22180 39318 464077
-;;;;;; 241000))
+;;;### (autoloads nil "bubbles" "play/bubbles.el" (22164 57535 263192
+;;;;;; 607000))
;;; Generated autoloads from play/bubbles.el
(autoload 'bubbles "bubbles" "\
;;;***
\f
;;;### (autoloads nil "bug-reference" "progmodes/bug-reference.el"
-;;;;;; (22180 39318 472077 204000))
+;;;;;; (22164 57535 331192 607000))
;;; Generated autoloads from progmodes/bug-reference.el
(put 'bug-reference-url-format 'safe-local-variable (lambda (s) (or (stringp s) (and (symbolp s) (get s 'bug-reference-url-format)))))
;;;***
\f
-;;;### (autoloads nil "bytecomp" "emacs-lisp/bytecomp.el" (22180
-;;;;;; 39318 281078 82000))
+;;;### (autoloads nil "bytecomp" "emacs-lisp/bytecomp.el" (22186
+;;;;;; 37592 383696 775000))
;;; Generated autoloads from emacs-lisp/bytecomp.el
(put 'byte-compile-dynamic 'safe-local-variable 'booleanp)
(put 'byte-compile-disable-print-circle 'safe-local-variable 'booleanp)
;;;***
\f
-;;;### (autoloads nil "cal-china" "calendar/cal-china.el" (22180
-;;;;;; 39318 240078 271000))
+;;;### (autoloads nil "cal-china" "calendar/cal-china.el" (22164
+;;;;;; 57533 835192 607000))
;;; Generated autoloads from calendar/cal-china.el
(put 'calendar-chinese-time-zone 'risky-local-variable t)
;;;***
\f
-;;;### (autoloads nil "cal-dst" "calendar/cal-dst.el" (22180 39318
-;;;;;; 240078 271000))
+;;;### (autoloads nil "cal-dst" "calendar/cal-dst.el" (22164 57533
+;;;;;; 835192 607000))
;;; Generated autoloads from calendar/cal-dst.el
(put 'calendar-daylight-savings-starts 'risky-local-variable t)
;;;***
\f
-;;;### (autoloads nil "cal-hebrew" "calendar/cal-hebrew.el" (22180
-;;;;;; 39318 241078 266000))
+;;;### (autoloads nil "cal-hebrew" "calendar/cal-hebrew.el" (22164
+;;;;;; 57533 839192 607000))
;;; Generated autoloads from calendar/cal-hebrew.el
(autoload 'calendar-hebrew-list-yahrzeits "cal-hebrew" "\
;;;***
\f
-;;;### (autoloads nil "calc" "calc/calc.el" (22180 39318 237078 285000))
+;;;### (autoloads nil "calc" "calc/calc.el" (22164 57533 823192 607000))
;;; Generated autoloads from calc/calc.el
(define-key ctl-x-map "*" 'calc-dispatch)
;;;***
\f
-;;;### (autoloads nil "calc-undo" "calc/calc-undo.el" (22180 39318
-;;;;;; 235078 294000))
+;;;### (autoloads nil "calc-undo" "calc/calc-undo.el" (22164 57533
+;;;;;; 807192 607000))
;;; Generated autoloads from calc/calc-undo.el
(autoload 'calc-undo "calc-undo" "\
;;;***
\f
-;;;### (autoloads nil "calculator" "calculator.el" (22180 39318 239078
-;;;;;; 275000))
+;;;### (autoloads nil "calculator" "calculator.el" (22164 57533 831192
+;;;;;; 607000))
;;; Generated autoloads from calculator.el
(autoload 'calculator "calculator" "\
;;;***
\f
-;;;### (autoloads nil "calendar" "calendar/calendar.el" (22180 39318
-;;;;;; 243078 257000))
+;;;### (autoloads nil "calendar" "calendar/calendar.el" (22164 57533
+;;;;;; 843192 607000))
;;; Generated autoloads from calendar/calendar.el
(autoload 'calendar "calendar" "\
;;;***
\f
-;;;### (autoloads nil "canlock" "gnus/canlock.el" (22180 39318 327077
-;;;;;; 871000))
+;;;### (autoloads nil "canlock" "gnus/canlock.el" (22164 57534 447192
+;;;;;; 607000))
;;; Generated autoloads from gnus/canlock.el
(autoload 'canlock-insert-header "canlock" "\
;;;***
\f
-;;;### (autoloads nil "cc-engine" "progmodes/cc-engine.el" (22183
-;;;;;; 58408 697001 800000))
+;;;### (autoloads nil "cc-engine" "progmodes/cc-engine.el" (22189
+;;;;;; 60739 77741 19000))
;;; Generated autoloads from progmodes/cc-engine.el
(autoload 'c-guess-basic-syntax "cc-engine" "\
;;;***
\f
-;;;### (autoloads nil "cc-guess" "progmodes/cc-guess.el" (22180 39318
-;;;;;; 478077 176000))
+;;;### (autoloads nil "cc-guess" "progmodes/cc-guess.el" (22164 57535
+;;;;;; 387192 607000))
;;; Generated autoloads from progmodes/cc-guess.el
(defvar c-guess-guessed-offsets-alist nil "\
;;;***
\f
-;;;### (autoloads nil "cc-mode" "progmodes/cc-mode.el" (22180 39318
-;;;;;; 479077 172000))
+;;;### (autoloads nil "cc-mode" "progmodes/cc-mode.el" (22164 57535
+;;;;;; 395192 607000))
;;; Generated autoloads from progmodes/cc-mode.el
(autoload 'c-initialize-cc-mode "cc-mode" "\
;;;***
\f
-;;;### (autoloads nil "cc-styles" "progmodes/cc-styles.el" (22180
-;;;;;; 39318 479077 172000))
+;;;### (autoloads nil "cc-styles" "progmodes/cc-styles.el" (22164
+;;;;;; 57535 395192 607000))
;;; Generated autoloads from progmodes/cc-styles.el
(autoload 'c-set-style "cc-styles" "\
;;;***
\f
-;;;### (autoloads nil "cc-vars" "progmodes/cc-vars.el" (22180 39318
-;;;;;; 480077 167000))
+;;;### (autoloads nil "cc-vars" "progmodes/cc-vars.el" (22164 57535
+;;;;;; 399192 607000))
;;; Generated autoloads from progmodes/cc-vars.el
(put 'c-basic-offset 'safe-local-variable 'integerp)
(put 'c-backslash-column 'safe-local-variable 'integerp)
;;;***
\f
-;;;### (autoloads nil "ccl" "international/ccl.el" (22180 39318 364077
-;;;;;; 701000))
+;;;### (autoloads nil "ccl" "international/ccl.el" (22164 57534 739192
+;;;;;; 607000))
;;; Generated autoloads from international/ccl.el
(autoload 'ccl-compile "ccl" "\
;;;***
\f
-;;;### (autoloads nil "cconv" "emacs-lisp/cconv.el" (22180 39318
-;;;;;; 281078 82000))
+;;;### (autoloads nil "cconv" "emacs-lisp/cconv.el" (22164 57534
+;;;;;; 135192 607000))
;;; Generated autoloads from emacs-lisp/cconv.el
(autoload 'cconv-closure-convert "cconv" "\
;;;***
\f
-;;;### (autoloads nil "cedet" "cedet/cedet.el" (22180 39318 248078
-;;;;;; 234000))
+;;;### (autoloads nil "cedet" "cedet/cedet.el" (22164 57533 915192
+;;;;;; 607000))
;;; Generated autoloads from cedet/cedet.el
(push (purecopy '(cedet 2 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "cfengine" "progmodes/cfengine.el" (22180 39318
-;;;;;; 480077 167000))
+;;;### (autoloads nil "cfengine" "progmodes/cfengine.el" (22164 57535
+;;;;;; 399192 607000))
;;; Generated autoloads from progmodes/cfengine.el
(push (purecopy '(cfengine 1 4)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "character-fold" "character-fold.el" (22180
-;;;;;; 39318 270078 133000))
+;;;### (autoloads nil "character-fold" "character-fold.el" (22164
+;;;;;; 57534 19192 607000))
;;; Generated autoloads from character-fold.el
(autoload 'character-fold-to-regexp "character-fold" "\
;;;***
\f
-;;;### (autoloads nil "chart" "emacs-lisp/chart.el" (22180 39318
-;;;;;; 282078 78000))
+;;;### (autoloads nil "chart" "emacs-lisp/chart.el" (22164 57534
+;;;;;; 135192 607000))
;;; Generated autoloads from emacs-lisp/chart.el
(push (purecopy '(chart 0 2)) package--builtin-versions)
;;;***
\f
;;;### (autoloads nil "check-declare" "emacs-lisp/check-declare.el"
-;;;;;; (22180 39318 282078 78000))
+;;;;;; (22174 6972 464792 520000))
;;; Generated autoloads from emacs-lisp/check-declare.el
(autoload 'check-declare-file "check-declare" "\
;;;***
\f
-;;;### (autoloads nil "checkdoc" "emacs-lisp/checkdoc.el" (22180
-;;;;;; 39318 282078 78000))
+;;;### (autoloads nil "checkdoc" "emacs-lisp/checkdoc.el" (22164
+;;;;;; 57534 151192 607000))
;;; Generated autoloads from emacs-lisp/checkdoc.el
(push (purecopy '(checkdoc 0 6 2)) package--builtin-versions)
(put 'checkdoc-force-docstrings-flag 'safe-local-variable #'booleanp)
;;;***
\f
-;;;### (autoloads nil "china-util" "language/china-util.el" (22180
-;;;;;; 39318 371077 668000))
+;;;### (autoloads nil "china-util" "language/china-util.el" (22164
+;;;;;; 57534 767192 607000))
;;; Generated autoloads from language/china-util.el
(autoload 'decode-hz-region "china-util" "\
;;;***
\f
-;;;### (autoloads nil "chistory" "chistory.el" (22180 39318 270078
-;;;;;; 133000))
+;;;### (autoloads nil "chistory" "chistory.el" (22164 57534 23192
+;;;;;; 607000))
;;; Generated autoloads from chistory.el
(autoload 'repeat-matching-complex-command "chistory" "\
;;;***
\f
-;;;### (autoloads nil "cl-indent" "emacs-lisp/cl-indent.el" (22180
-;;;;;; 39318 283078 73000))
+;;;### (autoloads nil "cl-indent" "emacs-lisp/cl-indent.el" (22164
+;;;;;; 57534 155192 607000))
;;; Generated autoloads from emacs-lisp/cl-indent.el
(autoload 'common-lisp-indent-function "cl-indent" "\
;;;***
\f
-;;;### (autoloads nil "cl-lib" "emacs-lisp/cl-lib.el" (22180 39318
-;;;;;; 283078 73000))
+;;;### (autoloads nil "cl-lib" "emacs-lisp/cl-lib.el" (22164 57534
+;;;;;; 155192 607000))
;;; Generated autoloads from emacs-lisp/cl-lib.el
(push (purecopy '(cl-lib 1 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "cmacexp" "progmodes/cmacexp.el" (22180 39318
-;;;;;; 480077 167000))
+;;;### (autoloads nil "cmacexp" "progmodes/cmacexp.el" (22164 57535
+;;;;;; 399192 607000))
;;; Generated autoloads from progmodes/cmacexp.el
(autoload 'c-macro-expand "cmacexp" "\
;;;***
\f
-;;;### (autoloads nil "cmuscheme" "cmuscheme.el" (22180 39318 270078
-;;;;;; 133000))
+;;;### (autoloads nil "cmuscheme" "cmuscheme.el" (22164 57534 23192
+;;;;;; 607000))
;;; Generated autoloads from cmuscheme.el
(autoload 'run-scheme "cmuscheme" "\
;;;***
\f
-;;;### (autoloads nil "color" "color.el" (22180 39318 270078 133000))
+;;;### (autoloads nil "color" "color.el" (22164 57534 23192 607000))
;;; Generated autoloads from color.el
(autoload 'color-name-to-rgb "color" "\
;;;***
\f
-;;;### (autoloads nil "comint" "comint.el" (22180 39318 271078 128000))
+;;;### (autoloads nil "comint" "comint.el" (22164 57534 27192 607000))
;;; Generated autoloads from comint.el
(defvar comint-output-filter-functions '(ansi-color-process-output comint-postoutput-scroll-to-bottom comint-watch-for-password-prompt) "\
;;;***
\f
-;;;### (autoloads nil "compare-w" "vc/compare-w.el" (22180 39318
-;;;;;; 547076 859000))
+;;;### (autoloads nil "compare-w" "vc/compare-w.el" (22164 57535
+;;;;;; 851192 607000))
;;; Generated autoloads from vc/compare-w.el
(autoload 'compare-windows "compare-w" "\
;;;***
\f
-;;;### (autoloads nil "compile" "progmodes/compile.el" (22180 39318
-;;;;;; 481077 163000))
+;;;### (autoloads nil "compile" "progmodes/compile.el" (22164 57535
+;;;;;; 419192 607000))
;;; Generated autoloads from progmodes/compile.el
(defvar compilation-mode-hook nil "\
;;;***
\f
-;;;### (autoloads nil "completion" "completion.el" (22180 39318 272078
-;;;;;; 124000))
+;;;### (autoloads nil "completion" "completion.el" (22164 57534 47192
+;;;;;; 607000))
;;; Generated autoloads from completion.el
(defvar dynamic-completion-mode nil "\
;;;***
\f
-;;;### (autoloads nil "conf-mode" "textmodes/conf-mode.el" (22180
-;;;;;; 39318 530076 937000))
+;;;### (autoloads nil "conf-mode" "textmodes/conf-mode.el" (22164
+;;;;;; 57535 799192 607000))
;;; Generated autoloads from textmodes/conf-mode.el
(autoload 'conf-mode "conf-mode" "\
;;;***
\f
-;;;### (autoloads nil "cookie1" "play/cookie1.el" (22180 39318 464077
-;;;;;; 241000))
+;;;### (autoloads nil "cookie1" "play/cookie1.el" (22164 57535 263192
+;;;;;; 607000))
;;; Generated autoloads from play/cookie1.el
(autoload 'cookie "cookie1" "\
;;;***
\f
-;;;### (autoloads nil "copyright" "emacs-lisp/copyright.el" (22180
-;;;;;; 39318 284078 68000))
+;;;### (autoloads nil "copyright" "emacs-lisp/copyright.el" (22164
+;;;;;; 57534 163192 607000))
;;; Generated autoloads from emacs-lisp/copyright.el
(put 'copyright-at-end-flag 'safe-local-variable 'booleanp)
(put 'copyright-names-regexp 'safe-local-variable 'stringp)
;;;***
\f
-;;;### (autoloads nil "cperl-mode" "progmodes/cperl-mode.el" (22180
-;;;;;; 39318 482077 158000))
+;;;### (autoloads nil "cperl-mode" "progmodes/cperl-mode.el" (22164
+;;;;;; 57535 427192 607000))
;;; Generated autoloads from progmodes/cperl-mode.el
(put 'cperl-indent-level 'safe-local-variable 'integerp)
(put 'cperl-brace-offset 'safe-local-variable 'integerp)
;;;***
\f
-;;;### (autoloads nil "cpp" "progmodes/cpp.el" (22180 39318 482077
-;;;;;; 158000))
+;;;### (autoloads nil "cpp" "progmodes/cpp.el" (22164 57535 431192
+;;;;;; 607000))
;;; Generated autoloads from progmodes/cpp.el
(autoload 'cpp-highlight-buffer "cpp" "\
;;;***
\f
-;;;### (autoloads nil "crm" "emacs-lisp/crm.el" (22180 39318 285078
-;;;;;; 64000))
+;;;### (autoloads nil "crm" "emacs-lisp/crm.el" (22164 57534 163192
+;;;;;; 607000))
;;; Generated autoloads from emacs-lisp/crm.el
(autoload 'completing-read-multiple "crm" "\
;;;***
\f
-;;;### (autoloads nil "css-mode" "textmodes/css-mode.el" (22180 39318
-;;;;;; 530076 937000))
+;;;### (autoloads nil "css-mode" "textmodes/css-mode.el" (22174 6972
+;;;;;; 792792 520000))
;;; Generated autoloads from textmodes/css-mode.el
(autoload 'css-mode "css-mode" "\
;;;***
\f
-;;;### (autoloads nil "cua-base" "emulation/cua-base.el" (22180 39318
-;;;;;; 295078 18000))
+;;;### (autoloads nil "cua-base" "emulation/cua-base.el" (22164 57534
+;;;;;; 223192 607000))
;;; Generated autoloads from emulation/cua-base.el
(defvar cua-mode nil "\
;;;***
\f
-;;;### (autoloads nil "cua-rect" "emulation/cua-rect.el" (22180 39318
-;;;;;; 296078 13000))
+;;;### (autoloads nil "cua-rect" "emulation/cua-rect.el" (22164 57534
+;;;;;; 223192 607000))
;;; Generated autoloads from emulation/cua-rect.el
(autoload 'cua-rectangle-mark-mode "cua-rect" "\
;;;***
\f
;;;### (autoloads nil "cursor-sensor" "emacs-lisp/cursor-sensor.el"
-;;;;;; (22180 39318 285078 64000))
+;;;;;; (22174 6972 468792 520000))
;;; Generated autoloads from emacs-lisp/cursor-sensor.el
(autoload 'cursor-intangible-mode "cursor-sensor" "\
;;;***
\f
-;;;### (autoloads nil "cus-edit" "cus-edit.el" (22180 39318 273078
-;;;;;; 119000))
+;;;### (autoloads nil "cus-edit" "cus-edit.el" (22164 57534 63192
+;;;;;; 607000))
;;; Generated autoloads from cus-edit.el
(defvar custom-browse-sort-alphabetically nil "\
;;;***
\f
-;;;### (autoloads nil "cus-theme" "cus-theme.el" (22180 39318 273078
-;;;;;; 119000))
+;;;### (autoloads nil "cus-theme" "cus-theme.el" (22164 57534 67192
+;;;;;; 607000))
;;; Generated autoloads from cus-theme.el
(autoload 'customize-create-theme "cus-theme" "\
;;;***
\f
-;;;### (autoloads nil "cvs-status" "vc/cvs-status.el" (22180 39318
-;;;;;; 547076 859000))
+;;;### (autoloads nil "cvs-status" "vc/cvs-status.el" (22164 57535
+;;;;;; 851192 607000))
;;; Generated autoloads from vc/cvs-status.el
(autoload 'cvs-status-mode "cvs-status" "\
;;;***
\f
-;;;### (autoloads nil "cwarn" "progmodes/cwarn.el" (22180 39318 482077
-;;;;;; 158000))
+;;;### (autoloads nil "cwarn" "progmodes/cwarn.el" (22164 57535 431192
+;;;;;; 607000))
;;; Generated autoloads from progmodes/cwarn.el
(push (purecopy '(cwarn 1 3 1)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "cyril-util" "language/cyril-util.el" (22180
-;;;;;; 39318 371077 668000))
+;;;### (autoloads nil "cyril-util" "language/cyril-util.el" (22164
+;;;;;; 57534 767192 607000))
;;; Generated autoloads from language/cyril-util.el
(autoload 'cyrillic-encode-koi8-r-char "cyril-util" "\
;;;***
\f
-;;;### (autoloads nil "dabbrev" "dabbrev.el" (22180 39318 274078
-;;;;;; 114000))
+;;;### (autoloads nil "dabbrev" "dabbrev.el" (22164 57534 67192 607000))
;;; Generated autoloads from dabbrev.el
(put 'dabbrev-case-fold-search 'risky-local-variable t)
(put 'dabbrev-case-replace 'risky-local-variable t)
;;;***
\f
-;;;### (autoloads nil "data-debug" "cedet/data-debug.el" (22180 39318
-;;;;;; 248078 234000))
+;;;### (autoloads nil "data-debug" "cedet/data-debug.el" (22164 57533
+;;;;;; 927192 607000))
;;; Generated autoloads from cedet/data-debug.el
(autoload 'data-debug-new-buffer "data-debug" "\
;;;***
\f
-;;;### (autoloads nil "dbus" "net/dbus.el" (22180 39318 406077 507000))
+;;;### (autoloads nil "dbus" "net/dbus.el" (22164 57534 919192 607000))
;;; Generated autoloads from net/dbus.el
(autoload 'dbus-handle-event "dbus" "\
;;;***
\f
-;;;### (autoloads nil "dcl-mode" "progmodes/dcl-mode.el" (22180 39318
-;;;;;; 483077 153000))
+;;;### (autoloads nil "dcl-mode" "progmodes/dcl-mode.el" (22164 57535
+;;;;;; 431192 607000))
;;; Generated autoloads from progmodes/dcl-mode.el
(autoload 'dcl-mode "dcl-mode" "\
;;;***
\f
-;;;### (autoloads nil "debug" "emacs-lisp/debug.el" (22180 39318
-;;;;;; 285078 64000))
+;;;### (autoloads nil "debug" "emacs-lisp/debug.el" (22164 57534
+;;;;;; 167192 607000))
;;; Generated autoloads from emacs-lisp/debug.el
(setq debugger 'debug)
;;;***
\f
-;;;### (autoloads nil "decipher" "play/decipher.el" (22180 39318
-;;;;;; 464077 241000))
+;;;### (autoloads nil "decipher" "play/decipher.el" (22164 57535
+;;;;;; 267192 607000))
;;; Generated autoloads from play/decipher.el
(autoload 'decipher "decipher" "\
;;;***
\f
-;;;### (autoloads nil "delim-col" "delim-col.el" (22180 39318 274078
-;;;;;; 114000))
+;;;### (autoloads nil "delim-col" "delim-col.el" (22164 57534 71192
+;;;;;; 607000))
;;; Generated autoloads from delim-col.el
(push (purecopy '(delim-col 2 1)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "delsel" "delsel.el" (22180 39318 274078 114000))
+;;;### (autoloads nil "delsel" "delsel.el" (22164 57534 79192 607000))
;;; Generated autoloads from delsel.el
(defalias 'pending-delete-mode 'delete-selection-mode)
;;;***
\f
-;;;### (autoloads nil "derived" "emacs-lisp/derived.el" (22180 39318
-;;;;;; 285078 64000))
+;;;### (autoloads nil "derived" "emacs-lisp/derived.el" (22164 57534
+;;;;;; 167192 607000))
;;; Generated autoloads from emacs-lisp/derived.el
(autoload 'define-derived-mode "derived" "\
;;;***
\f
-;;;### (autoloads nil "descr-text" "descr-text.el" (22180 39318 274078
-;;;;;; 114000))
+;;;### (autoloads nil "descr-text" "descr-text.el" (22174 6972 424792
+;;;;;; 520000))
;;; Generated autoloads from descr-text.el
(autoload 'describe-text-properties "descr-text" "\
;;;***
\f
-;;;### (autoloads nil "desktop" "desktop.el" (22180 39318 274078
-;;;;;; 114000))
+;;;### (autoloads nil "desktop" "desktop.el" (22174 6972 428792 520000))
;;; Generated autoloads from desktop.el
(defvar desktop-save-mode nil "\
;;;***
\f
-;;;### (autoloads nil "deuglify" "gnus/deuglify.el" (22180 39318
-;;;;;; 327077 871000))
+;;;### (autoloads nil "deuglify" "gnus/deuglify.el" (22164 57534
+;;;;;; 447192 607000))
;;; Generated autoloads from gnus/deuglify.el
(autoload 'gnus-article-outlook-unwrap-lines "deuglify" "\
;;;***
\f
-;;;### (autoloads nil "diary-lib" "calendar/diary-lib.el" (22180
-;;;;;; 39318 244078 252000))
+;;;### (autoloads nil "diary-lib" "calendar/diary-lib.el" (22164
+;;;;;; 57533 855192 607000))
;;; Generated autoloads from calendar/diary-lib.el
(autoload 'diary "diary-lib" "\
;;;***
\f
-;;;### (autoloads nil "diff" "vc/diff.el" (22180 39318 548076 854000))
+;;;### (autoloads nil "diff" "vc/diff.el" (22164 57535 851192 607000))
;;; Generated autoloads from vc/diff.el
(defvar diff-switches (purecopy "-u") "\
;;;***
\f
-;;;### (autoloads nil "diff-mode" "vc/diff-mode.el" (22180 39318
-;;;;;; 548076 854000))
+;;;### (autoloads nil "diff-mode" "vc/diff-mode.el" (22164 57535
+;;;;;; 851192 607000))
;;; Generated autoloads from vc/diff-mode.el
(autoload 'diff-mode "diff-mode" "\
;;;***
\f
-;;;### (autoloads nil "dig" "net/dig.el" (22180 39318 406077 507000))
+;;;### (autoloads nil "dig" "net/dig.el" (22164 57534 919192 607000))
;;; Generated autoloads from net/dig.el
(autoload 'dig "dig" "\
;;;***
\f
-;;;### (autoloads nil "dired" "dired.el" (22180 50234 568884 829000))
+;;;### (autoloads nil "dired" "dired.el" (22174 6972 440792 520000))
;;; Generated autoloads from dired.el
(defvar dired-listing-switches (purecopy "-al") "\
;;;***
\f
-;;;### (autoloads nil "dirtrack" "dirtrack.el" (22180 39318 276078
-;;;;;; 105000))
+;;;### (autoloads nil "dirtrack" "dirtrack.el" (22164 57534 103192
+;;;;;; 607000))
;;; Generated autoloads from dirtrack.el
(autoload 'dirtrack-mode "dirtrack" "\
;;;***
\f
-;;;### (autoloads nil "disass" "emacs-lisp/disass.el" (22180 39318
-;;;;;; 285078 64000))
+;;;### (autoloads nil "disass" "emacs-lisp/disass.el" (22164 57534
+;;;;;; 167192 607000))
;;; Generated autoloads from emacs-lisp/disass.el
(autoload 'disassemble "disass" "\
;;;***
\f
-;;;### (autoloads nil "disp-table" "disp-table.el" (22180 39318 277078
-;;;;;; 101000))
+;;;### (autoloads nil "disp-table" "disp-table.el" (22164 57534 103192
+;;;;;; 607000))
;;; Generated autoloads from disp-table.el
(autoload 'make-display-table "disp-table" "\
;;;***
\f
-;;;### (autoloads nil "dissociate" "play/dissociate.el" (22180 39318
-;;;;;; 464077 241000))
+;;;### (autoloads nil "dissociate" "play/dissociate.el" (22164 57535
+;;;;;; 267192 607000))
;;; Generated autoloads from play/dissociate.el
(autoload 'dissociated-press "dissociate" "\
;;;***
\f
-;;;### (autoloads nil "dnd" "dnd.el" (22180 39318 277078 101000))
+;;;### (autoloads nil "dnd" "dnd.el" (22164 57534 103192 607000))
;;; Generated autoloads from dnd.el
(defvar dnd-protocol-alist `((,(purecopy "^file:///") . dnd-open-local-file) (,(purecopy "^file://") . dnd-open-file) (,(purecopy "^file:") . dnd-open-local-file) (,(purecopy "^\\(https?\\|ftp\\|file\\|nfs\\)://") . dnd-open-file)) "\
;;;***
\f
-;;;### (autoloads nil "dns-mode" "textmodes/dns-mode.el" (22180 39318
-;;;;;; 530076 937000))
+;;;### (autoloads nil "dns-mode" "textmodes/dns-mode.el" (22164 57535
+;;;;;; 799192 607000))
;;; Generated autoloads from textmodes/dns-mode.el
(autoload 'dns-mode "dns-mode" "\
;;;***
\f
-;;;### (autoloads nil "doc-view" "doc-view.el" (22180 39318 277078
-;;;;;; 101000))
+;;;### (autoloads nil "doc-view" "doc-view.el" (22189 60738 133741
+;;;;;; 19000))
;;; Generated autoloads from doc-view.el
(autoload 'doc-view-mode-p "doc-view" "\
;;;***
\f
-;;;### (autoloads nil "doctor" "play/doctor.el" (22180 39318 465077
-;;;;;; 236000))
+;;;### (autoloads nil "doctor" "play/doctor.el" (22164 57535 267192
+;;;;;; 607000))
;;; Generated autoloads from play/doctor.el
(autoload 'doctor "doctor" "\
;;;***
\f
-;;;### (autoloads nil "double" "double.el" (22180 39318 277078 101000))
+;;;### (autoloads nil "double" "double.el" (22164 57534 107192 607000))
;;; Generated autoloads from double.el
(autoload 'double-mode "double" "\
;;;***
\f
-;;;### (autoloads nil "dunnet" "play/dunnet.el" (22180 39318 465077
-;;;;;; 236000))
+;;;### (autoloads nil "dunnet" "play/dunnet.el" (22164 57535 295192
+;;;;;; 607000))
;;; Generated autoloads from play/dunnet.el
(push (purecopy '(dunnet 2 2)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "easy-mmode" "emacs-lisp/easy-mmode.el" (22180
-;;;;;; 39318 285078 64000))
+;;;### (autoloads nil "easy-mmode" "emacs-lisp/easy-mmode.el" (22164
+;;;;;; 57534 175192 607000))
;;; Generated autoloads from emacs-lisp/easy-mmode.el
(defalias 'easy-mmode-define-minor-mode 'define-minor-mode)
;;;***
\f
-;;;### (autoloads nil "easymenu" "emacs-lisp/easymenu.el" (22180
-;;;;;; 39318 285078 64000))
+;;;### (autoloads nil "easymenu" "emacs-lisp/easymenu.el" (22164
+;;;;;; 57534 175192 607000))
;;; Generated autoloads from emacs-lisp/easymenu.el
(autoload 'easy-menu-define "easymenu" "\
;;;***
\f
-;;;### (autoloads nil "ebnf2ps" "progmodes/ebnf2ps.el" (22180 39318
-;;;;;; 484077 149000))
+;;;### (autoloads nil "ebnf2ps" "progmodes/ebnf2ps.el" (22164 57535
+;;;;;; 443192 607000))
;;; Generated autoloads from progmodes/ebnf2ps.el
(push (purecopy '(ebnf2ps 4 4)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "ebrowse" "progmodes/ebrowse.el" (22180 39318
-;;;;;; 485077 144000))
+;;;### (autoloads nil "ebrowse" "progmodes/ebrowse.el" (22164 57535
+;;;;;; 443192 607000))
;;; Generated autoloads from progmodes/ebrowse.el
(autoload 'ebrowse-tree-mode "ebrowse" "\
;;;***
\f
-;;;### (autoloads nil "ebuff-menu" "ebuff-menu.el" (22180 39318 278078
-;;;;;; 96000))
+;;;### (autoloads nil "ebuff-menu" "ebuff-menu.el" (22164 57534 107192
+;;;;;; 607000))
;;; Generated autoloads from ebuff-menu.el
(autoload 'electric-buffer-list "ebuff-menu" "\
;;;***
\f
-;;;### (autoloads nil "echistory" "echistory.el" (22180 39318 278078
-;;;;;; 96000))
+;;;### (autoloads nil "echistory" "echistory.el" (22164 57534 107192
+;;;;;; 607000))
;;; Generated autoloads from echistory.el
(autoload 'Electric-command-history-redo-expression "echistory" "\
;;;***
\f
-;;;### (autoloads nil "ecomplete" "gnus/ecomplete.el" (22180 39318
-;;;;;; 327077 871000))
+;;;### (autoloads nil "ecomplete" "gnus/ecomplete.el" (22164 57534
+;;;;;; 447192 607000))
;;; Generated autoloads from gnus/ecomplete.el
(autoload 'ecomplete-setup "ecomplete" "\
;;;***
\f
-;;;### (autoloads nil "ede" "cedet/ede.el" (22180 39318 249078 229000))
+;;;### (autoloads nil "ede" "cedet/ede.el" (22164 57533 927192 607000))
;;; Generated autoloads from cedet/ede.el
(push (purecopy '(ede 1 2)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "edebug" "emacs-lisp/edebug.el" (22180 39318
-;;;;;; 286078 59000))
+;;;### (autoloads nil "edebug" "emacs-lisp/edebug.el" (22164 57534
+;;;;;; 179192 607000))
;;; Generated autoloads from emacs-lisp/edebug.el
(defvar edebug-all-defs nil "\
;;;***
\f
-;;;### (autoloads nil "ediff" "vc/ediff.el" (22180 39318 551076 840000))
+;;;### (autoloads nil "ediff" "vc/ediff.el" (22164 57535 859192 607000))
;;; Generated autoloads from vc/ediff.el
(push (purecopy '(ediff 2 81 4)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "ediff-help" "vc/ediff-help.el" (22180 39318
-;;;;;; 548076 854000))
+;;;### (autoloads nil "ediff-help" "vc/ediff-help.el" (22164 57535
+;;;;;; 851192 607000))
;;; Generated autoloads from vc/ediff-help.el
(autoload 'ediff-customize "ediff-help" "\
;;;***
\f
-;;;### (autoloads nil "ediff-mult" "vc/ediff-mult.el" (22180 39318
-;;;;;; 549076 850000))
+;;;### (autoloads nil "ediff-mult" "vc/ediff-mult.el" (22164 57535
+;;;;;; 855192 607000))
;;; Generated autoloads from vc/ediff-mult.el
(autoload 'ediff-show-registry "ediff-mult" "\
;;;***
\f
-;;;### (autoloads nil "ediff-util" "vc/ediff-util.el" (22180 39318
-;;;;;; 551076 840000))
+;;;### (autoloads nil "ediff-util" "vc/ediff-util.el" (22164 57535
+;;;;;; 859192 607000))
;;; Generated autoloads from vc/ediff-util.el
(autoload 'ediff-toggle-multiframe "ediff-util" "\
;;;***
\f
-;;;### (autoloads nil "edmacro" "edmacro.el" (22180 39318 278078
-;;;;;; 96000))
+;;;### (autoloads nil "edmacro" "edmacro.el" (22164 57534 107192
+;;;;;; 607000))
;;; Generated autoloads from edmacro.el
(push (purecopy '(edmacro 2 1)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "edt" "emulation/edt.el" (22180 39318 296078
-;;;;;; 13000))
+;;;### (autoloads nil "edt" "emulation/edt.el" (22164 57534 223192
+;;;;;; 607000))
;;; Generated autoloads from emulation/edt.el
(autoload 'edt-set-scroll-margins "edt" "\
;;;***
\f
-;;;### (autoloads nil "ehelp" "ehelp.el" (22180 39318 278078 96000))
+;;;### (autoloads nil "ehelp" "ehelp.el" (22164 57534 111192 607000))
;;; Generated autoloads from ehelp.el
(autoload 'with-electric-help "ehelp" "\
;;;***
\f
-;;;### (autoloads nil "eieio" "emacs-lisp/eieio.el" (22180 39318
-;;;;;; 287078 55000))
+;;;### (autoloads nil "eieio" "emacs-lisp/eieio.el" (22164 57534
+;;;;;; 179192 607000))
;;; Generated autoloads from emacs-lisp/eieio.el
(push (purecopy '(eieio 1 4)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "eieio-core" "emacs-lisp/eieio-core.el" (22180
-;;;;;; 39318 287078 55000))
+;;;### (autoloads nil "eieio-core" "emacs-lisp/eieio-core.el" (22164
+;;;;;; 57534 179192 607000))
;;; Generated autoloads from emacs-lisp/eieio-core.el
(push (purecopy '(eieio-core 1 4)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "elec-pair" "elec-pair.el" (22180 39318 278078
-;;;;;; 96000))
+;;;### (autoloads nil "elec-pair" "elec-pair.el" (22164 57534 111192
+;;;;;; 607000))
;;; Generated autoloads from elec-pair.el
(defvar electric-pair-text-pairs '((34 . 34)) "\
;;;***
\f
-;;;### (autoloads nil "elide-head" "elide-head.el" (22180 39318 278078
-;;;;;; 96000))
+;;;### (autoloads nil "elide-head" "elide-head.el" (22164 57534 111192
+;;;;;; 607000))
;;; Generated autoloads from elide-head.el
(autoload 'elide-head "elide-head" "\
;;;***
\f
-;;;### (autoloads nil "elint" "emacs-lisp/elint.el" (22180 39318
-;;;;;; 288078 50000))
+;;;### (autoloads nil "elint" "emacs-lisp/elint.el" (22164 57534
+;;;;;; 179192 607000))
;;; Generated autoloads from emacs-lisp/elint.el
(autoload 'elint-file "elint" "\
;;;***
\f
-;;;### (autoloads nil "elp" "emacs-lisp/elp.el" (22180 39318 288078
-;;;;;; 50000))
+;;;### (autoloads nil "elp" "emacs-lisp/elp.el" (22164 57534 183192
+;;;;;; 607000))
;;; Generated autoloads from emacs-lisp/elp.el
(autoload 'elp-instrument-function "elp" "\
;;;***
\f
-;;;### (autoloads nil "emacs-lock" "emacs-lock.el" (22180 39318 295078
-;;;;;; 18000))
+;;;### (autoloads nil "emacs-lock" "emacs-lock.el" (22164 57534 215192
+;;;;;; 607000))
;;; Generated autoloads from emacs-lock.el
(autoload 'emacs-lock-mode "emacs-lock" "\
;;;***
\f
-;;;### (autoloads nil "emacsbug" "mail/emacsbug.el" (22180 39318
-;;;;;; 386077 599000))
+;;;### (autoloads nil "emacsbug" "mail/emacsbug.el" (22164 57534
+;;;;;; 803192 607000))
;;; Generated autoloads from mail/emacsbug.el
(autoload 'report-emacs-bug "emacsbug" "\
;;;***
\f
-;;;### (autoloads nil "emerge" "vc/emerge.el" (22122 65326 207714
-;;;;;; 983000))
+;;;### (autoloads nil "emerge" "vc/emerge.el" (21953 58033 507058
+;;;;;; 929000))
;;; Generated autoloads from vc/emerge.el
(autoload 'emerge-files "emerge" "\
;;;***
\f
-;;;### (autoloads nil "enriched" "textmodes/enriched.el" (22180 39318
-;;;;;; 530076 937000))
+;;;### (autoloads nil "enriched" "textmodes/enriched.el" (22164 57535
+;;;;;; 799192 607000))
;;; Generated autoloads from textmodes/enriched.el
(autoload 'enriched-mode "enriched" "\
;;;***
\f
-;;;### (autoloads nil "epa" "epa.el" (22180 39318 299077 999000))
+;;;### (autoloads nil "epa" "epa.el" (22164 57534 243192 607000))
;;; Generated autoloads from epa.el
(autoload 'epa-list-keys "epa" "\
;;;***
\f
-;;;### (autoloads nil "epa-dired" "epa-dired.el" (22180 39318 299077
-;;;;;; 999000))
+;;;### (autoloads nil "epa-dired" "epa-dired.el" (22164 57534 239192
+;;;;;; 607000))
;;; Generated autoloads from epa-dired.el
(autoload 'epa-dired-do-decrypt "epa-dired" "\
;;;***
\f
-;;;### (autoloads nil "epa-file" "epa-file.el" (22180 39318 299077
-;;;;;; 999000))
+;;;### (autoloads nil "epa-file" "epa-file.el" (22164 57534 239192
+;;;;;; 607000))
;;; Generated autoloads from epa-file.el
(autoload 'epa-file-handler "epa-file" "\
;;;***
\f
-;;;### (autoloads nil "epa-mail" "epa-mail.el" (22180 39318 299077
-;;;;;; 999000))
+;;;### (autoloads nil "epa-mail" "epa-mail.el" (22164 57534 243192
+;;;;;; 607000))
;;; Generated autoloads from epa-mail.el
(autoload 'epa-mail-mode "epa-mail" "\
;;;***
\f
-;;;### (autoloads nil "epg" "epg.el" (22180 39318 300077 995000))
+;;;### (autoloads nil "epg" "epg.el" (22164 57534 247192 607000))
;;; Generated autoloads from epg.el
(push (purecopy '(epg 1 0 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "epg-config" "epg-config.el" (22180 39318 299077
-;;;;;; 999000))
+;;;### (autoloads nil "epg-config" "epg-config.el" (22174 6972 484792
+;;;;;; 520000))
;;; Generated autoloads from epg-config.el
(autoload 'epg-configuration "epg-config" "\
;;;***
\f
-;;;### (autoloads nil "erc" "erc/erc.el" (22180 39318 306077 967000))
+;;;### (autoloads nil "erc" "erc/erc.el" (22174 6972 500792 520000))
;;; Generated autoloads from erc/erc.el
(push (purecopy '(erc 5 3)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "erc-autoaway" "erc/erc-autoaway.el" (22180
-;;;;;; 39318 302077 986000))
+;;;### (autoloads nil "erc-autoaway" "erc/erc-autoaway.el" (22164
+;;;;;; 57534 255192 607000))
;;; Generated autoloads from erc/erc-autoaway.el
(autoload 'erc-autoaway-mode "erc-autoaway")
;;;***
\f
-;;;### (autoloads nil "erc-button" "erc/erc-button.el" (22180 39318
-;;;;;; 302077 986000))
+;;;### (autoloads nil "erc-button" "erc/erc-button.el" (22164 57534
+;;;;;; 255192 607000))
;;; Generated autoloads from erc/erc-button.el
(autoload 'erc-button-mode "erc-button" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-capab" "erc/erc-capab.el" (22180 39318
-;;;;;; 302077 986000))
+;;;### (autoloads nil "erc-capab" "erc/erc-capab.el" (22164 57534
+;;;;;; 255192 607000))
;;; Generated autoloads from erc/erc-capab.el
(autoload 'erc-capab-identify-mode "erc-capab" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-compat" "erc/erc-compat.el" (22180 39318
-;;;;;; 302077 986000))
+;;;### (autoloads nil "erc-compat" "erc/erc-compat.el" (22164 57534
+;;;;;; 255192 607000))
;;; Generated autoloads from erc/erc-compat.el
(autoload 'erc-define-minor-mode "erc-compat")
;;;***
\f
-;;;### (autoloads nil "erc-dcc" "erc/erc-dcc.el" (22180 39318 303077
-;;;;;; 981000))
+;;;### (autoloads nil "erc-dcc" "erc/erc-dcc.el" (22164 57534 255192
+;;;;;; 607000))
;;; Generated autoloads from erc/erc-dcc.el
(autoload 'erc-dcc-mode "erc-dcc")
;;;***
\f
;;;### (autoloads nil "erc-desktop-notifications" "erc/erc-desktop-notifications.el"
-;;;;;; (22180 39318 303077 981000))
+;;;;;; (22164 57534 255192 607000))
;;; Generated autoloads from erc/erc-desktop-notifications.el
(autoload 'erc-notifications-mode "erc-desktop-notifications" "" t)
;;;***
\f
-;;;### (autoloads nil "erc-ezbounce" "erc/erc-ezbounce.el" (22180
-;;;;;; 39318 303077 981000))
+;;;### (autoloads nil "erc-ezbounce" "erc/erc-ezbounce.el" (22164
+;;;;;; 57534 255192 607000))
;;; Generated autoloads from erc/erc-ezbounce.el
(autoload 'erc-cmd-ezb "erc-ezbounce" "\
;;;***
\f
-;;;### (autoloads nil "erc-fill" "erc/erc-fill.el" (22180 39318 303077
-;;;;;; 981000))
+;;;### (autoloads nil "erc-fill" "erc/erc-fill.el" (22164 57534 255192
+;;;;;; 607000))
;;; Generated autoloads from erc/erc-fill.el
(autoload 'erc-fill-mode "erc-fill" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-identd" "erc/erc-identd.el" (22180 39318
-;;;;;; 303077 981000))
+;;;### (autoloads nil "erc-identd" "erc/erc-identd.el" (22164 57534
+;;;;;; 255192 607000))
;;; Generated autoloads from erc/erc-identd.el
(autoload 'erc-identd-mode "erc-identd")
;;;***
\f
-;;;### (autoloads nil "erc-imenu" "erc/erc-imenu.el" (22180 39318
-;;;;;; 303077 981000))
+;;;### (autoloads nil "erc-imenu" "erc/erc-imenu.el" (22164 57534
+;;;;;; 259192 607000))
;;; Generated autoloads from erc/erc-imenu.el
(autoload 'erc-create-imenu-index "erc-imenu" "\
;;;***
\f
-;;;### (autoloads nil "erc-join" "erc/erc-join.el" (22180 39318 303077
-;;;;;; 981000))
+;;;### (autoloads nil "erc-join" "erc/erc-join.el" (22164 57534 259192
+;;;;;; 607000))
;;; Generated autoloads from erc/erc-join.el
(autoload 'erc-autojoin-mode "erc-join" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-list" "erc/erc-list.el" (22180 39318 303077
-;;;;;; 981000))
+;;;### (autoloads nil "erc-list" "erc/erc-list.el" (22164 57534 259192
+;;;;;; 607000))
;;; Generated autoloads from erc/erc-list.el
(autoload 'erc-list-mode "erc-list")
;;;***
\f
-;;;### (autoloads nil "erc-log" "erc/erc-log.el" (22180 39318 304077
-;;;;;; 977000))
+;;;### (autoloads nil "erc-log" "erc/erc-log.el" (22164 57534 259192
+;;;;;; 607000))
;;; Generated autoloads from erc/erc-log.el
(autoload 'erc-log-mode "erc-log" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-match" "erc/erc-match.el" (22180 39318
-;;;;;; 304077 977000))
+;;;### (autoloads nil "erc-match" "erc/erc-match.el" (22164 57534
+;;;;;; 259192 607000))
;;; Generated autoloads from erc/erc-match.el
(autoload 'erc-match-mode "erc-match")
;;;***
\f
-;;;### (autoloads nil "erc-menu" "erc/erc-menu.el" (22180 39318 304077
-;;;;;; 977000))
+;;;### (autoloads nil "erc-menu" "erc/erc-menu.el" (22164 57534 259192
+;;;;;; 607000))
;;; Generated autoloads from erc/erc-menu.el
(autoload 'erc-menu-mode "erc-menu" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-netsplit" "erc/erc-netsplit.el" (22180
-;;;;;; 39318 304077 977000))
+;;;### (autoloads nil "erc-netsplit" "erc/erc-netsplit.el" (22164
+;;;;;; 57534 259192 607000))
;;; Generated autoloads from erc/erc-netsplit.el
(autoload 'erc-netsplit-mode "erc-netsplit")
;;;***
\f
-;;;### (autoloads nil "erc-networks" "erc/erc-networks.el" (22180
-;;;;;; 39318 304077 977000))
+;;;### (autoloads nil "erc-networks" "erc/erc-networks.el" (22164
+;;;;;; 57534 263192 607000))
;;; Generated autoloads from erc/erc-networks.el
(autoload 'erc-determine-network "erc-networks" "\
;;;***
\f
-;;;### (autoloads nil "erc-notify" "erc/erc-notify.el" (22180 39318
-;;;;;; 304077 977000))
+;;;### (autoloads nil "erc-notify" "erc/erc-notify.el" (22164 57534
+;;;;;; 263192 607000))
;;; Generated autoloads from erc/erc-notify.el
(autoload 'erc-notify-mode "erc-notify" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-page" "erc/erc-page.el" (22180 39318 304077
-;;;;;; 977000))
+;;;### (autoloads nil "erc-page" "erc/erc-page.el" (22164 57534 263192
+;;;;;; 607000))
;;; Generated autoloads from erc/erc-page.el
(autoload 'erc-page-mode "erc-page")
;;;***
\f
-;;;### (autoloads nil "erc-pcomplete" "erc/erc-pcomplete.el" (22180
-;;;;;; 39318 304077 977000))
+;;;### (autoloads nil "erc-pcomplete" "erc/erc-pcomplete.el" (22164
+;;;;;; 57534 263192 607000))
;;; Generated autoloads from erc/erc-pcomplete.el
(autoload 'erc-completion-mode "erc-pcomplete" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-replace" "erc/erc-replace.el" (22180 39318
-;;;;;; 304077 977000))
+;;;### (autoloads nil "erc-replace" "erc/erc-replace.el" (22164 57534
+;;;;;; 263192 607000))
;;; Generated autoloads from erc/erc-replace.el
(autoload 'erc-replace-mode "erc-replace")
;;;***
\f
-;;;### (autoloads nil "erc-ring" "erc/erc-ring.el" (22180 39318 304077
-;;;;;; 977000))
+;;;### (autoloads nil "erc-ring" "erc/erc-ring.el" (22164 57534 263192
+;;;;;; 607000))
;;; Generated autoloads from erc/erc-ring.el
(autoload 'erc-ring-mode "erc-ring" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-services" "erc/erc-services.el" (22180
-;;;;;; 39318 305077 972000))
+;;;### (autoloads nil "erc-services" "erc/erc-services.el" (22164
+;;;;;; 57534 263192 607000))
;;; Generated autoloads from erc/erc-services.el
(autoload 'erc-services-mode "erc-services" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-sound" "erc/erc-sound.el" (22180 39318
-;;;;;; 305077 972000))
+;;;### (autoloads nil "erc-sound" "erc/erc-sound.el" (22164 57534
+;;;;;; 263192 607000))
;;; Generated autoloads from erc/erc-sound.el
(autoload 'erc-sound-mode "erc-sound")
;;;***
\f
-;;;### (autoloads nil "erc-speedbar" "erc/erc-speedbar.el" (22180
-;;;;;; 39318 305077 972000))
+;;;### (autoloads nil "erc-speedbar" "erc/erc-speedbar.el" (22164
+;;;;;; 57534 267192 607000))
;;; Generated autoloads from erc/erc-speedbar.el
(autoload 'erc-speedbar-browser "erc-speedbar" "\
;;;***
\f
-;;;### (autoloads nil "erc-spelling" "erc/erc-spelling.el" (22180
-;;;;;; 39318 305077 972000))
+;;;### (autoloads nil "erc-spelling" "erc/erc-spelling.el" (22164
+;;;;;; 57534 271192 607000))
;;; Generated autoloads from erc/erc-spelling.el
(autoload 'erc-spelling-mode "erc-spelling" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-stamp" "erc/erc-stamp.el" (22180 39318
-;;;;;; 305077 972000))
+;;;### (autoloads nil "erc-stamp" "erc/erc-stamp.el" (22164 57534
+;;;;;; 271192 607000))
;;; Generated autoloads from erc/erc-stamp.el
(autoload 'erc-timestamp-mode "erc-stamp" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-track" "erc/erc-track.el" (22180 39318
-;;;;;; 305077 972000))
+;;;### (autoloads nil "erc-track" "erc/erc-track.el" (22164 57534
+;;;;;; 275192 607000))
;;; Generated autoloads from erc/erc-track.el
(defvar erc-track-minor-mode nil "\
;;;***
\f
-;;;### (autoloads nil "erc-truncate" "erc/erc-truncate.el" (22180
-;;;;;; 39318 305077 972000))
+;;;### (autoloads nil "erc-truncate" "erc/erc-truncate.el" (22164
+;;;;;; 57534 275192 607000))
;;; Generated autoloads from erc/erc-truncate.el
(autoload 'erc-truncate-mode "erc-truncate" nil t)
;;;***
\f
-;;;### (autoloads nil "erc-xdcc" "erc/erc-xdcc.el" (22180 39318 305077
-;;;;;; 972000))
+;;;### (autoloads nil "erc-xdcc" "erc/erc-xdcc.el" (22164 57534 275192
+;;;;;; 607000))
;;; Generated autoloads from erc/erc-xdcc.el
(autoload 'erc-xdcc-mode "erc-xdcc")
;;;***
\f
-;;;### (autoloads nil "ert" "emacs-lisp/ert.el" (22183 58408 668002
-;;;;;; 30000))
+;;;### (autoloads nil "ert" "emacs-lisp/ert.el" (22189 60738 153741
+;;;;;; 19000))
;;; Generated autoloads from emacs-lisp/ert.el
(autoload 'ert-deftest "ert" "\
;;;***
\f
-;;;### (autoloads nil "ert-x" "emacs-lisp/ert-x.el" (22180 39318
-;;;;;; 288078 50000))
+;;;### (autoloads nil "ert-x" "emacs-lisp/ert-x.el" (22164 57534
+;;;;;; 183192 607000))
;;; Generated autoloads from emacs-lisp/ert-x.el
(put 'ert-with-test-buffer 'lisp-indent-function 1)
;;;***
\f
-;;;### (autoloads nil "esh-mode" "eshell/esh-mode.el" (22180 39318
-;;;;;; 309077 954000))
+;;;### (autoloads nil "esh-mode" "eshell/esh-mode.el" (22164 57534
+;;;;;; 299192 607000))
;;; Generated autoloads from eshell/esh-mode.el
(autoload 'eshell-mode "esh-mode" "\
;;;***
\f
-;;;### (autoloads nil "eshell" "eshell/eshell.el" (22180 39318 310077
-;;;;;; 949000))
+;;;### (autoloads nil "eshell" "eshell/eshell.el" (22164 57534 303192
+;;;;;; 607000))
;;; Generated autoloads from eshell/eshell.el
(push (purecopy '(eshell 2 4 2)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "etags" "progmodes/etags.el" (22183 58408 698001
-;;;;;; 792000))
+;;;### (autoloads nil "etags" "progmodes/etags.el" (22189 60739 125741
+;;;;;; 19000))
;;; Generated autoloads from progmodes/etags.el
(defvar tags-file-name nil "\
;;;***
\f
-;;;### (autoloads nil "ethio-util" "language/ethio-util.el" (22180
-;;;;;; 39318 371077 668000))
+;;;### (autoloads nil "ethio-util" "language/ethio-util.el" (22164
+;;;;;; 57534 767192 607000))
;;; Generated autoloads from language/ethio-util.el
(autoload 'setup-ethiopic-environment-internal "ethio-util" "\
;;;***
\f
-;;;### (autoloads nil "eudc" "net/eudc.el" (22180 39318 407077 503000))
+;;;### (autoloads nil "eudc" "net/eudc.el" (22164 57534 923192 607000))
;;; Generated autoloads from net/eudc.el
(autoload 'eudc-set-server "eudc" "\
;;;***
\f
-;;;### (autoloads nil "eudc-bob" "net/eudc-bob.el" (22180 39318 406077
-;;;;;; 507000))
+;;;### (autoloads nil "eudc-bob" "net/eudc-bob.el" (22164 57534 923192
+;;;;;; 607000))
;;; Generated autoloads from net/eudc-bob.el
(autoload 'eudc-display-generic-binary "eudc-bob" "\
;;;***
\f
-;;;### (autoloads nil "eudc-export" "net/eudc-export.el" (22180 39318
-;;;;;; 407077 503000))
+;;;### (autoloads nil "eudc-export" "net/eudc-export.el" (22164 57534
+;;;;;; 923192 607000))
;;; Generated autoloads from net/eudc-export.el
(autoload 'eudc-insert-record-at-point-into-bbdb "eudc-export" "\
;;;***
\f
-;;;### (autoloads nil "eudc-hotlist" "net/eudc-hotlist.el" (22180
-;;;;;; 39318 407077 503000))
+;;;### (autoloads nil "eudc-hotlist" "net/eudc-hotlist.el" (22164
+;;;;;; 57534 923192 607000))
;;; Generated autoloads from net/eudc-hotlist.el
(autoload 'eudc-edit-hotlist "eudc-hotlist" "\
;;;***
\f
-;;;### (autoloads nil "ewoc" "emacs-lisp/ewoc.el" (22180 39318 288078
-;;;;;; 50000))
+;;;### (autoloads nil "ewoc" "emacs-lisp/ewoc.el" (22164 57534 183192
+;;;;;; 607000))
;;; Generated autoloads from emacs-lisp/ewoc.el
(autoload 'ewoc-create "ewoc" "\
;;;***
\f
-;;;### (autoloads nil "eww" "net/eww.el" (22183 58408 681001 927000))
+;;;### (autoloads nil "eww" "net/eww.el" (22189 60738 473741 19000))
;;; Generated autoloads from net/eww.el
(defvar eww-suggest-uris '(eww-links-at-point url-get-url-at-point eww-current-url) "\
;;;***
\f
-;;;### (autoloads nil "executable" "progmodes/executable.el" (22180
-;;;;;; 39318 486077 140000))
+;;;### (autoloads nil "executable" "progmodes/executable.el" (22164
+;;;;;; 57535 451192 607000))
;;; Generated autoloads from progmodes/executable.el
(autoload 'executable-command-find-posix-p "executable" "\
;;;***
\f
-;;;### (autoloads nil "expand" "expand.el" (22180 39318 310077 949000))
+;;;### (autoloads nil "expand" "expand.el" (22164 57534 303192 607000))
;;; Generated autoloads from expand.el
(autoload 'expand-add-abbrevs "expand" "\
;;;***
\f
-;;;### (autoloads nil "f90" "progmodes/f90.el" (22180 39318 486077
-;;;;;; 140000))
+;;;### (autoloads nil "f90" "progmodes/f90.el" (22164 57535 451192
+;;;;;; 607000))
;;; Generated autoloads from progmodes/f90.el
(autoload 'f90-mode "f90" "\
;;;***
\f
-;;;### (autoloads nil "face-remap" "face-remap.el" (22180 39318 310077
-;;;;;; 949000))
+;;;### (autoloads nil "face-remap" "face-remap.el" (22164 57534 303192
+;;;;;; 607000))
;;; Generated autoloads from face-remap.el
(autoload 'face-remap-add-relative "face-remap" "\
;;;***
\f
-;;;### (autoloads nil "feedmail" "mail/feedmail.el" (22180 38481
-;;;;;; 458895 498000))
+;;;### (autoloads nil "feedmail" "mail/feedmail.el" (22153 828 674851
+;;;;;; 262000))
;;; Generated autoloads from mail/feedmail.el
(push (purecopy '(feedmail 11)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "ffap" "ffap.el" (22180 39318 311077 944000))
+;;;### (autoloads nil "ffap" "ffap.el" (22164 57534 311192 607000))
;;; Generated autoloads from ffap.el
(autoload 'ffap-next "ffap" "\
;;;***
\f
-;;;### (autoloads nil "filecache" "filecache.el" (22180 39318 311077
-;;;;;; 944000))
+;;;### (autoloads nil "filecache" "filecache.el" (22164 57534 311192
+;;;;;; 607000))
;;; Generated autoloads from filecache.el
(autoload 'file-cache-add-directory "filecache" "\
;;;***
\f
-;;;### (autoloads nil "filenotify" "filenotify.el" (22180 39318 311077
-;;;;;; 944000))
+;;;### (autoloads nil "filenotify" "filenotify.el" (22164 57534 311192
+;;;;;; 607000))
;;; Generated autoloads from filenotify.el
(autoload 'file-notify-handle-event "filenotify" "\
;;;***
\f
-;;;### (autoloads nil "files-x" "files-x.el" (22183 58408 668002
-;;;;;; 30000))
+;;;### (autoloads nil "files-x" "files-x.el" (22189 60738 197741
+;;;;;; 19000))
;;; Generated autoloads from files-x.el
(autoload 'add-file-local-variable "files-x" "\
;;;***
\f
-;;;### (autoloads nil "filesets" "filesets.el" (22180 39318 313077
-;;;;;; 935000))
+;;;### (autoloads nil "filesets" "filesets.el" (22164 57534 315192
+;;;;;; 607000))
;;; Generated autoloads from filesets.el
(autoload 'filesets-init "filesets" "\
;;;***
\f
-;;;### (autoloads nil "find-cmd" "find-cmd.el" (22180 39318 314077
-;;;;;; 930000))
+;;;### (autoloads nil "find-cmd" "find-cmd.el" (22164 57534 315192
+;;;;;; 607000))
;;; Generated autoloads from find-cmd.el
(push (purecopy '(find-cmd 0 6)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "find-dired" "find-dired.el" (22180 39318 314077
-;;;;;; 930000))
+;;;### (autoloads nil "find-dired" "find-dired.el" (22164 57534 315192
+;;;;;; 607000))
;;; Generated autoloads from find-dired.el
(autoload 'find-dired "find-dired" "\
;;;***
\f
-;;;### (autoloads nil "find-file" "find-file.el" (22180 39318 314077
-;;;;;; 930000))
+;;;### (autoloads nil "find-file" "find-file.el" (22164 57534 319192
+;;;;;; 607000))
;;; Generated autoloads from find-file.el
(defvar ff-special-constructs `((,(purecopy "^#\\s *\\(include\\|import\\)\\s +[<\"]\\(.*\\)[>\"]") lambda nil (buffer-substring (match-beginning 2) (match-end 2)))) "\
;;;***
\f
-;;;### (autoloads nil "find-func" "emacs-lisp/find-func.el" (22180
-;;;;;; 39318 289078 46000))
+;;;### (autoloads nil "find-func" "emacs-lisp/find-func.el" (22164
+;;;;;; 57534 183192 607000))
;;; Generated autoloads from emacs-lisp/find-func.el
(autoload 'find-library "find-func" "\
;;;***
\f
-;;;### (autoloads nil "find-lisp" "find-lisp.el" (22180 39318 314077
-;;;;;; 930000))
+;;;### (autoloads nil "find-lisp" "find-lisp.el" (22164 57534 319192
+;;;;;; 607000))
;;; Generated autoloads from find-lisp.el
(autoload 'find-lisp-find-dired "find-lisp" "\
;;;***
\f
-;;;### (autoloads nil "finder" "finder.el" (22180 39318 314077 930000))
+;;;### (autoloads nil "finder" "finder.el" (22164 57534 319192 607000))
;;; Generated autoloads from finder.el
(push (purecopy '(finder 1 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "flow-ctrl" "flow-ctrl.el" (22180 39318 314077
-;;;;;; 930000))
+;;;### (autoloads nil "flow-ctrl" "flow-ctrl.el" (22164 57534 319192
+;;;;;; 607000))
;;; Generated autoloads from flow-ctrl.el
(autoload 'enable-flow-control "flow-ctrl" "\
;;;***
\f
-;;;### (autoloads nil "flow-fill" "gnus/flow-fill.el" (22180 39318
-;;;;;; 327077 871000))
+;;;### (autoloads nil "flow-fill" "gnus/flow-fill.el" (22164 57534
+;;;;;; 447192 607000))
;;; Generated autoloads from gnus/flow-fill.el
(autoload 'fill-flowed-encode "flow-fill" "\
;;;***
\f
-;;;### (autoloads nil "flymake" "progmodes/flymake.el" (22180 39318
-;;;;;; 487077 135000))
+;;;### (autoloads nil "flymake" "progmodes/flymake.el" (22164 57535
+;;;;;; 451192 607000))
;;; Generated autoloads from progmodes/flymake.el
(push (purecopy '(flymake 0 3)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "flyspell" "textmodes/flyspell.el" (22183 58408
-;;;;;; 704001 744000))
+;;;### (autoloads nil "flyspell" "textmodes/flyspell.el" (22189 60739
+;;;;;; 269741 19000))
;;; Generated autoloads from textmodes/flyspell.el
(autoload 'flyspell-prog-mode "flyspell" "\
;;;***
\f
-;;;### (autoloads nil "foldout" "foldout.el" (22180 39318 314077
-;;;;;; 930000))
+;;;### (autoloads nil "foldout" "foldout.el" (22164 57534 319192
+;;;;;; 607000))
;;; Generated autoloads from foldout.el
(push (purecopy '(foldout 1 10)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "follow" "follow.el" (22180 39318 315077 926000))
+;;;### (autoloads nil "follow" "follow.el" (22164 57534 319192 607000))
;;; Generated autoloads from follow.el
(autoload 'turn-on-follow-mode "follow" "\
;;;***
\f
-;;;### (autoloads nil "footnote" "mail/footnote.el" (22180 39318
-;;;;;; 386077 599000))
+;;;### (autoloads nil "footnote" "mail/footnote.el" (22164 57534
+;;;;;; 803192 607000))
;;; Generated autoloads from mail/footnote.el
(push (purecopy '(footnote 0 19)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "forms" "forms.el" (22180 39318 316077 921000))
+;;;### (autoloads nil "forms" "forms.el" (22164 57534 359192 607000))
;;; Generated autoloads from forms.el
(autoload 'forms-mode "forms" "\
;;;***
\f
-;;;### (autoloads nil "fortran" "progmodes/fortran.el" (22180 39318
-;;;;;; 487077 135000))
+;;;### (autoloads nil "fortran" "progmodes/fortran.el" (22164 57535
+;;;;;; 455192 607000))
;;; Generated autoloads from progmodes/fortran.el
(autoload 'fortran-mode "fortran" "\
;;;***
\f
-;;;### (autoloads nil "fortune" "play/fortune.el" (22180 39318 465077
-;;;;;; 236000))
+;;;### (autoloads nil "fortune" "play/fortune.el" (22164 57535 299192
+;;;;;; 607000))
;;; Generated autoloads from play/fortune.el
(autoload 'fortune-add-fortune "fortune" "\
;;;***
\f
-;;;### (autoloads nil "frameset" "frameset.el" (22183 58408 671002
-;;;;;; 6000))
+;;;### (autoloads nil "frameset" "frameset.el" (22189 60738 245741
+;;;;;; 19000))
;;; Generated autoloads from frameset.el
(defvar frameset-session-filter-alist '((name . :never) (left . frameset-filter-iconified) (minibuffer . frameset-filter-minibuffer) (top . frameset-filter-iconified)) "\
;;;***
\f
-;;;### (autoloads nil "gamegrid" "play/gamegrid.el" (22183 58408
-;;;;;; 695001 816000))
+;;;### (autoloads nil "gamegrid" "play/gamegrid.el" (22189 60739
+;;;;;; 13741 19000))
;;; Generated autoloads from play/gamegrid.el
(push (purecopy '(gamegrid 1 2)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "gdb-mi" "progmodes/gdb-mi.el" (22180 39318
-;;;;;; 488077 130000))
+;;;### (autoloads nil "gdb-mi" "progmodes/gdb-mi.el" (22164 57535
+;;;;;; 455192 607000))
;;; Generated autoloads from progmodes/gdb-mi.el
(defvar gdb-enable-debug nil "\
;;;***
\f
-;;;### (autoloads nil "generic" "emacs-lisp/generic.el" (22180 39318
-;;;;;; 289078 46000))
+;;;### (autoloads nil "generic" "emacs-lisp/generic.el" (22164 57534
+;;;;;; 183192 607000))
;;; Generated autoloads from emacs-lisp/generic.el
(defvar generic-mode-list nil "\
;;;***
\f
-;;;### (autoloads nil "glasses" "progmodes/glasses.el" (22180 39318
-;;;;;; 489077 126000))
+;;;### (autoloads nil "glasses" "progmodes/glasses.el" (22164 57535
+;;;;;; 455192 607000))
;;; Generated autoloads from progmodes/glasses.el
(autoload 'glasses-mode "glasses" "\
;;;***
\f
-;;;### (autoloads nil "gmm-utils" "gnus/gmm-utils.el" (22180 39318
-;;;;;; 328077 866000))
+;;;### (autoloads nil "gmm-utils" "gnus/gmm-utils.el" (22164 57534
+;;;;;; 447192 607000))
;;; Generated autoloads from gnus/gmm-utils.el
(autoload 'gmm-regexp-concat "gmm-utils" "\
;;;***
\f
-;;;### (autoloads nil "gnus" "gnus/gnus.el" (22180 39318 344077 792000))
+;;;### (autoloads nil "gnus" "gnus/gnus.el" (22186 51932 74004 628000))
;;; Generated autoloads from gnus/gnus.el
(push (purecopy '(gnus 5 13)) package--builtin-versions)
(when (fboundp 'custom-autoload)
;;;***
\f
-;;;### (autoloads nil "gnus-agent" "gnus/gnus-agent.el" (22183 58408
-;;;;;; 672001 998000))
+;;;### (autoloads nil "gnus-agent" "gnus/gnus-agent.el" (22189 60738
+;;;;;; 253741 19000))
;;; Generated autoloads from gnus/gnus-agent.el
(autoload 'gnus-unplugged "gnus-agent" "\
;;;***
\f
-;;;### (autoloads nil "gnus-art" "gnus/gnus-art.el" (22183 58408
-;;;;;; 673001 990000))
+;;;### (autoloads nil "gnus-art" "gnus/gnus-art.el" (22189 60738
+;;;;;; 297741 19000))
;;; Generated autoloads from gnus/gnus-art.el
(autoload 'gnus-article-prepare-display "gnus-art" "\
;;;***
\f
-;;;### (autoloads nil "gnus-bookmark" "gnus/gnus-bookmark.el" (22180
-;;;;;; 39318 331077 852000))
+;;;### (autoloads nil "gnus-bookmark" "gnus/gnus-bookmark.el" (22164
+;;;;;; 57534 491192 607000))
;;; Generated autoloads from gnus/gnus-bookmark.el
(autoload 'gnus-bookmark-set "gnus-bookmark" "\
;;;***
\f
-;;;### (autoloads nil "gnus-cache" "gnus/gnus-cache.el" (22180 39318
-;;;;;; 331077 852000))
+;;;### (autoloads nil "gnus-cache" "gnus/gnus-cache.el" (22164 57534
+;;;;;; 491192 607000))
;;; Generated autoloads from gnus/gnus-cache.el
(autoload 'gnus-jog-cache "gnus-cache" "\
;;;***
\f
-;;;### (autoloads nil "gnus-delay" "gnus/gnus-delay.el" (22180 39318
-;;;;;; 332077 848000))
+;;;### (autoloads nil "gnus-delay" "gnus/gnus-delay.el" (22164 57534
+;;;;;; 507192 607000))
;;; Generated autoloads from gnus/gnus-delay.el
(autoload 'gnus-delay-article "gnus-delay" "\
;;;***
\f
-;;;### (autoloads nil "gnus-diary" "gnus/gnus-diary.el" (22180 39318
-;;;;;; 332077 848000))
+;;;### (autoloads nil "gnus-diary" "gnus/gnus-diary.el" (22164 57534
+;;;;;; 511192 607000))
;;; Generated autoloads from gnus/gnus-diary.el
(autoload 'gnus-user-format-function-d "gnus-diary" "\
;;;***
\f
-;;;### (autoloads nil "gnus-dired" "gnus/gnus-dired.el" (22180 39318
-;;;;;; 332077 848000))
+;;;### (autoloads nil "gnus-dired" "gnus/gnus-dired.el" (22164 57534
+;;;;;; 511192 607000))
;;; Generated autoloads from gnus/gnus-dired.el
(autoload 'turn-on-gnus-dired-mode "gnus-dired" "\
;;;***
\f
-;;;### (autoloads nil "gnus-draft" "gnus/gnus-draft.el" (22180 39318
-;;;;;; 332077 848000))
+;;;### (autoloads nil "gnus-draft" "gnus/gnus-draft.el" (22164 57534
+;;;;;; 511192 607000))
;;; Generated autoloads from gnus/gnus-draft.el
(autoload 'gnus-draft-reminder "gnus-draft" "\
;;;***
\f
-;;;### (autoloads nil "gnus-fun" "gnus/gnus-fun.el" (22180 39318
-;;;;;; 332077 848000))
+;;;### (autoloads nil "gnus-fun" "gnus/gnus-fun.el" (22174 6972 560792
+;;;;;; 520000))
;;; Generated autoloads from gnus/gnus-fun.el
(autoload 'gnus--random-face-with-type "gnus-fun" "\
;;;***
\f
-;;;### (autoloads nil "gnus-gravatar" "gnus/gnus-gravatar.el" (22180
-;;;;;; 39318 333077 843000))
+;;;### (autoloads nil "gnus-gravatar" "gnus/gnus-gravatar.el" (22164
+;;;;;; 57534 515192 607000))
;;; Generated autoloads from gnus/gnus-gravatar.el
(autoload 'gnus-treat-from-gravatar "gnus-gravatar" "\
;;;***
\f
-;;;### (autoloads nil "gnus-group" "gnus/gnus-group.el" (22180 39318
-;;;;;; 334077 839000))
+;;;### (autoloads nil "gnus-group" "gnus/gnus-group.el" (22164 57534
+;;;;;; 539192 607000))
;;; Generated autoloads from gnus/gnus-group.el
(autoload 'gnus-fetch-group "gnus-group" "\
;;;***
\f
-;;;### (autoloads nil "gnus-html" "gnus/gnus-html.el" (22180 39318
-;;;;;; 334077 839000))
+;;;### (autoloads nil "gnus-html" "gnus/gnus-html.el" (22164 57534
+;;;;;; 539192 607000))
;;; Generated autoloads from gnus/gnus-html.el
(autoload 'gnus-article-html "gnus-html" "\
;;;***
\f
-;;;### (autoloads nil "gnus-kill" "gnus/gnus-kill.el" (22180 39318
-;;;;;; 335077 834000))
+;;;### (autoloads nil "gnus-kill" "gnus/gnus-kill.el" (22164 57534
+;;;;;; 543192 607000))
;;; Generated autoloads from gnus/gnus-kill.el
(defalias 'gnus-batch-kill 'gnus-batch-score)
;;;***
\f
-;;;### (autoloads nil "gnus-ml" "gnus/gnus-ml.el" (22180 39318 335077
-;;;;;; 834000))
+;;;### (autoloads nil "gnus-ml" "gnus/gnus-ml.el" (22164 57534 547192
+;;;;;; 607000))
;;; Generated autoloads from gnus/gnus-ml.el
(autoload 'turn-on-gnus-mailing-list-mode "gnus-ml" "\
;;;***
\f
-;;;### (autoloads nil "gnus-mlspl" "gnus/gnus-mlspl.el" (22180 39318
-;;;;;; 335077 834000))
+;;;### (autoloads nil "gnus-mlspl" "gnus/gnus-mlspl.el" (22164 57534
+;;;;;; 547192 607000))
;;; Generated autoloads from gnus/gnus-mlspl.el
(autoload 'gnus-group-split-setup "gnus-mlspl" "\
;;;***
\f
-;;;### (autoloads nil "gnus-msg" "gnus/gnus-msg.el" (22180 39318
-;;;;;; 336077 829000))
+;;;### (autoloads nil "gnus-msg" "gnus/gnus-msg.el" (22164 57534
+;;;;;; 547192 607000))
;;; Generated autoloads from gnus/gnus-msg.el
(autoload 'gnus-msg-mail "gnus-msg" "\
;;;***
\f
;;;### (autoloads nil "gnus-notifications" "gnus/gnus-notifications.el"
-;;;;;; (22180 39318 336077 829000))
+;;;;;; (22164 57534 563192 607000))
;;; Generated autoloads from gnus/gnus-notifications.el
(autoload 'gnus-notifications "gnus-notifications" "\
;;;***
\f
-;;;### (autoloads nil "gnus-picon" "gnus/gnus-picon.el" (22180 39318
-;;;;;; 336077 829000))
+;;;### (autoloads nil "gnus-picon" "gnus/gnus-picon.el" (22164 57534
+;;;;;; 563192 607000))
;;; Generated autoloads from gnus/gnus-picon.el
(autoload 'gnus-treat-from-picon "gnus-picon" "\
;;;***
\f
-;;;### (autoloads nil "gnus-range" "gnus/gnus-range.el" (22180 39318
-;;;;;; 336077 829000))
+;;;### (autoloads nil "gnus-range" "gnus/gnus-range.el" (22164 57534
+;;;;;; 563192 607000))
;;; Generated autoloads from gnus/gnus-range.el
(autoload 'gnus-sorted-difference "gnus-range" "\
;;;***
\f
-;;;### (autoloads nil "gnus-registry" "gnus/gnus-registry.el" (22180
-;;;;;; 39318 337077 825000))
+;;;### (autoloads nil "gnus-registry" "gnus/gnus-registry.el" (22164
+;;;;;; 57534 563192 607000))
;;; Generated autoloads from gnus/gnus-registry.el
(autoload 'gnus-registry-initialize "gnus-registry" "\
;;;***
\f
-;;;### (autoloads nil "gnus-sieve" "gnus/gnus-sieve.el" (22180 39318
-;;;;;; 338077 820000))
+;;;### (autoloads nil "gnus-sieve" "gnus/gnus-sieve.el" (22164 57534
+;;;;;; 567192 607000))
;;; Generated autoloads from gnus/gnus-sieve.el
(autoload 'gnus-sieve-update "gnus-sieve" "\
;;;***
\f
-;;;### (autoloads nil "gnus-spec" "gnus/gnus-spec.el" (22180 39318
-;;;;;; 338077 820000))
+;;;### (autoloads nil "gnus-spec" "gnus/gnus-spec.el" (22164 57534
+;;;;;; 571192 607000))
;;; Generated autoloads from gnus/gnus-spec.el
(autoload 'gnus-update-format "gnus-spec" "\
;;;***
\f
-;;;### (autoloads nil "gnus-start" "gnus/gnus-start.el" (22180 39318
-;;;;;; 339077 816000))
+;;;### (autoloads nil "gnus-start" "gnus/gnus-start.el" (22164 57534
+;;;;;; 579192 607000))
;;; Generated autoloads from gnus/gnus-start.el
(autoload 'gnus-declare-backend "gnus-start" "\
;;;***
\f
-;;;### (autoloads nil "gnus-sum" "gnus/gnus-sum.el" (22180 39318
-;;;;;; 342077 802000))
+;;;### (autoloads nil "gnus-sum" "gnus/gnus-sum.el" (22164 57534
+;;;;;; 603192 607000))
;;; Generated autoloads from gnus/gnus-sum.el
(autoload 'gnus-summary-bookmark-jump "gnus-sum" "\
;;;***
\f
-;;;### (autoloads nil "gnus-sync" "gnus/gnus-sync.el" (22180 39318
-;;;;;; 342077 802000))
+;;;### (autoloads nil "gnus-sync" "gnus/gnus-sync.el" (22164 57534
+;;;;;; 607192 607000))
;;; Generated autoloads from gnus/gnus-sync.el
(autoload 'gnus-sync-initialize "gnus-sync" "\
;;;***
\f
-;;;### (autoloads nil "gnus-win" "gnus/gnus-win.el" (22180 39318
-;;;;;; 343077 797000))
+;;;### (autoloads nil "gnus-win" "gnus/gnus-win.el" (22164 57534
+;;;;;; 611192 607000))
;;; Generated autoloads from gnus/gnus-win.el
(autoload 'gnus-add-configuration "gnus-win" "\
;;;***
\f
-;;;### (autoloads nil "gnutls" "net/gnutls.el" (22180 39318 408077
-;;;;;; 498000))
+;;;### (autoloads nil "gnutls" "net/gnutls.el" (22164 57534 927192
+;;;;;; 607000))
;;; Generated autoloads from net/gnutls.el
(defvar gnutls-min-prime-bits 256 "\
;;;***
\f
-;;;### (autoloads nil "gomoku" "play/gomoku.el" (22183 58408 695001
-;;;;;; 816000))
+;;;### (autoloads nil "gomoku" "play/gomoku.el" (22189 60739 17741
+;;;;;; 19000))
;;; Generated autoloads from play/gomoku.el
(autoload 'gomoku "gomoku" "\
;;;***
\f
-;;;### (autoloads nil "goto-addr" "net/goto-addr.el" (22180 39318
-;;;;;; 408077 498000))
+;;;### (autoloads nil "goto-addr" "net/goto-addr.el" (22164 57534
+;;;;;; 927192 607000))
;;; Generated autoloads from net/goto-addr.el
(define-obsolete-function-alias 'goto-address-at-mouse 'goto-address-at-point "22.1")
;;;***
\f
-;;;### (autoloads nil "gravatar" "gnus/gravatar.el" (22180 39318
-;;;;;; 344077 792000))
+;;;### (autoloads nil "gravatar" "gnus/gravatar.el" (22164 57534
+;;;;;; 615192 607000))
;;; Generated autoloads from gnus/gravatar.el
(autoload 'gravatar-retrieve "gravatar" "\
;;;***
\f
-;;;### (autoloads nil "grep" "progmodes/grep.el" (22180 39318 489077
-;;;;;; 126000))
+;;;### (autoloads nil "grep" "progmodes/grep.el" (22164 57535 455192
+;;;;;; 607000))
;;; Generated autoloads from progmodes/grep.el
(defvar grep-window-height nil "\
;;;***
\f
-;;;### (autoloads nil "gs" "gs.el" (22180 39318 356077 737000))
+;;;### (autoloads nil "gs" "gs.el" (22164 57534 707192 607000))
;;; Generated autoloads from gs.el
(autoload 'gs-load-image "gs" "\
;;;***
\f
-;;;### (autoloads nil "gud" "progmodes/gud.el" (22180 39318 490077
-;;;;;; 121000))
+;;;### (autoloads nil "gud" "progmodes/gud.el" (22174 6972 708792
+;;;;;; 520000))
;;; Generated autoloads from progmodes/gud.el
(autoload 'gud-gdb "gud" "\
;;;***
\f
-;;;### (autoloads nil "gv" "emacs-lisp/gv.el" (22180 39318 289078
-;;;;;; 46000))
+;;;### (autoloads nil "gv" "emacs-lisp/gv.el" (22164 57534 183192
+;;;;;; 607000))
;;; Generated autoloads from emacs-lisp/gv.el
(autoload 'gv-get "gv" "\
;;;***
\f
-;;;### (autoloads nil "handwrite" "play/handwrite.el" (22180 39318
-;;;;;; 466077 231000))
+;;;### (autoloads nil "handwrite" "play/handwrite.el" (22164 57535
+;;;;;; 303192 607000))
;;; Generated autoloads from play/handwrite.el
(autoload 'handwrite "handwrite" "\
;;;***
\f
-;;;### (autoloads nil "hanoi" "play/hanoi.el" (22122 65326 129715
-;;;;;; 318000))
+;;;### (autoloads nil "hanoi" "play/hanoi.el" (21799 41767 31221
+;;;;;; 635000))
;;; Generated autoloads from play/hanoi.el
(autoload 'hanoi "hanoi" "\
;;;***
\f
-;;;### (autoloads nil "hashcash" "mail/hashcash.el" (22180 39318
-;;;;;; 386077 599000))
+;;;### (autoloads nil "hashcash" "mail/hashcash.el" (22164 57534
+;;;;;; 803192 607000))
;;; Generated autoloads from mail/hashcash.el
(autoload 'hashcash-insert-payment "hashcash" "\
;;;***
\f
-;;;### (autoloads nil "help-at-pt" "help-at-pt.el" (22180 39318 356077
-;;;;;; 737000))
+;;;### (autoloads nil "help-at-pt" "help-at-pt.el" (22164 57534 707192
+;;;;;; 607000))
;;; Generated autoloads from help-at-pt.el
(autoload 'help-at-pt-string "help-at-pt" "\
;;;***
\f
-;;;### (autoloads nil "help-fns" "help-fns.el" (22180 39318 357077
-;;;;;; 733000))
+;;;### (autoloads nil "help-fns" "help-fns.el" (22174 6972 616792
+;;;;;; 520000))
;;; Generated autoloads from help-fns.el
(autoload 'describe-function "help-fns" "\
;;;***
\f
-;;;### (autoloads nil "help-macro" "help-macro.el" (22180 39318 357077
-;;;;;; 733000))
+;;;### (autoloads nil "help-macro" "help-macro.el" (22164 57534 707192
+;;;;;; 607000))
;;; Generated autoloads from help-macro.el
(defvar three-step-help nil "\
;;;***
\f
-;;;### (autoloads nil "help-mode" "help-mode.el" (22180 39318 357077
-;;;;;; 733000))
+;;;### (autoloads nil "help-mode" "help-mode.el" (22164 57534 707192
+;;;;;; 607000))
;;; Generated autoloads from help-mode.el
(autoload 'help-mode "help-mode" "\
;;;***
\f
-;;;### (autoloads nil "helper" "emacs-lisp/helper.el" (22180 39318
-;;;;;; 289078 46000))
+;;;### (autoloads nil "helper" "emacs-lisp/helper.el" (22164 57534
+;;;;;; 183192 607000))
;;; Generated autoloads from emacs-lisp/helper.el
(autoload 'Helper-describe-bindings "helper" "\
;;;***
\f
-;;;### (autoloads nil "hexl" "hexl.el" (22180 39318 357077 733000))
+;;;### (autoloads nil "hexl" "hexl.el" (22164 57534 711192 607000))
;;; Generated autoloads from hexl.el
(autoload 'hexl-mode "hexl" "\
;;;***
\f
-;;;### (autoloads nil "hi-lock" "hi-lock.el" (22180 39318 358077
-;;;;;; 728000))
+;;;### (autoloads nil "hi-lock" "hi-lock.el" (22164 57534 711192
+;;;;;; 607000))
;;; Generated autoloads from hi-lock.el
(autoload 'hi-lock-mode "hi-lock" "\
;;;***
\f
-;;;### (autoloads nil "hideif" "progmodes/hideif.el" (22180 39318
-;;;;;; 490077 121000))
+;;;### (autoloads nil "hideif" "progmodes/hideif.el" (22174 6972
+;;;;;; 720792 520000))
;;; Generated autoloads from progmodes/hideif.el
(autoload 'hide-ifdef-mode "hideif" "\
;;;***
\f
-;;;### (autoloads nil "hideshow" "progmodes/hideshow.el" (22180 39318
-;;;;;; 491077 116000))
+;;;### (autoloads nil "hideshow" "progmodes/hideshow.el" (22164 57535
+;;;;;; 475192 607000))
;;; Generated autoloads from progmodes/hideshow.el
(defvar hs-special-modes-alist (mapcar 'purecopy '((c-mode "{" "}" "/[*/]" nil nil) (c++-mode "{" "}" "/[*/]" nil nil) (bibtex-mode ("@\\S(*\\(\\s(\\)" 1)) (java-mode "{" "}" "/[*/]" nil nil) (js-mode "{" "}" "/[*/]" nil))) "\
;;;***
\f
-;;;### (autoloads nil "hilit-chg" "hilit-chg.el" (22180 39318 358077
-;;;;;; 728000))
+;;;### (autoloads nil "hilit-chg" "hilit-chg.el" (22164 57534 715192
+;;;;;; 607000))
;;; Generated autoloads from hilit-chg.el
(autoload 'highlight-changes-mode "hilit-chg" "\
;;;***
\f
-;;;### (autoloads nil "hippie-exp" "hippie-exp.el" (22180 39318 358077
-;;;;;; 728000))
+;;;### (autoloads nil "hippie-exp" "hippie-exp.el" (22164 57534 715192
+;;;;;; 607000))
;;; Generated autoloads from hippie-exp.el
(push (purecopy '(hippie-exp 1 6)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "hl-line" "hl-line.el" (22180 39318 358077
-;;;;;; 728000))
+;;;### (autoloads nil "hl-line" "hl-line.el" (22164 57534 715192
+;;;;;; 607000))
;;; Generated autoloads from hl-line.el
(autoload 'hl-line-mode "hl-line" "\
;;;***
\f
-;;;### (autoloads nil "holidays" "calendar/holidays.el" (22180 39318
-;;;;;; 244078 252000))
+;;;### (autoloads nil "holidays" "calendar/holidays.el" (22164 57533
+;;;;;; 855192 607000))
;;; Generated autoloads from calendar/holidays.el
(defvar holiday-general-holidays (mapcar 'purecopy '((holiday-fixed 1 1 "New Year's Day") (holiday-float 1 1 3 "Martin Luther King Day") (holiday-fixed 2 2 "Groundhog Day") (holiday-fixed 2 14 "Valentine's Day") (holiday-float 2 1 3 "President's Day") (holiday-fixed 3 17 "St. Patrick's Day") (holiday-fixed 4 1 "April Fools' Day") (holiday-float 5 0 2 "Mother's Day") (holiday-float 5 1 -1 "Memorial Day") (holiday-fixed 6 14 "Flag Day") (holiday-float 6 0 3 "Father's Day") (holiday-fixed 7 4 "Independence Day") (holiday-float 9 1 1 "Labor Day") (holiday-float 10 1 2 "Columbus Day") (holiday-fixed 10 31 "Halloween") (holiday-fixed 11 11 "Veteran's Day") (holiday-float 11 4 4 "Thanksgiving"))) "\
;;;***
\f
-;;;### (autoloads nil "html2text" "gnus/html2text.el" (22180 39318
-;;;;;; 344077 792000))
+;;;### (autoloads nil "html2text" "gnus/html2text.el" (22164 57534
+;;;;;; 615192 607000))
;;; Generated autoloads from gnus/html2text.el
(autoload 'html2text "html2text" "\
;;;***
\f
-;;;### (autoloads nil "htmlfontify" "htmlfontify.el" (22180 39318
-;;;;;; 359077 724000))
+;;;### (autoloads nil "htmlfontify" "htmlfontify.el" (22189 60738
+;;;;;; 317741 19000))
;;; Generated autoloads from htmlfontify.el
(push (purecopy '(htmlfontify 0 21)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "ibuf-macs" "ibuf-macs.el" (22180 39318 359077
-;;;;;; 724000))
+;;;### (autoloads nil "ibuf-macs" "ibuf-macs.el" (22164 57534 715192
+;;;;;; 607000))
;;; Generated autoloads from ibuf-macs.el
(autoload 'define-ibuffer-column "ibuf-macs" "\
;;;***
\f
-;;;### (autoloads nil "ibuffer" "ibuffer.el" (22180 39318 360077
-;;;;;; 719000))
+;;;### (autoloads nil "ibuffer" "ibuffer.el" (22164 57534 719192
+;;;;;; 607000))
;;; Generated autoloads from ibuffer.el
(autoload 'ibuffer-list-buffers "ibuffer" "\
;;;***
\f
-;;;### (autoloads nil "icalendar" "calendar/icalendar.el" (22180
-;;;;;; 39318 244078 252000))
+;;;### (autoloads nil "icalendar" "calendar/icalendar.el" (22164
+;;;;;; 57533 859192 607000))
;;; Generated autoloads from calendar/icalendar.el
(push (purecopy '(icalendar 0 19)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "icomplete" "icomplete.el" (22180 39318 360077
-;;;;;; 719000))
+;;;### (autoloads nil "icomplete" "icomplete.el" (22164 57534 719192
+;;;;;; 607000))
;;; Generated autoloads from icomplete.el
(defvar icomplete-mode nil "\
;;;***
\f
-;;;### (autoloads nil "icon" "progmodes/icon.el" (22180 39318 491077
-;;;;;; 116000))
+;;;### (autoloads nil "icon" "progmodes/icon.el" (22164 57535 475192
+;;;;;; 607000))
;;; Generated autoloads from progmodes/icon.el
(autoload 'icon-mode "icon" "\
;;;***
\f
-;;;### (autoloads nil "idlw-shell" "progmodes/idlw-shell.el" (22180
-;;;;;; 39318 492077 112000))
+;;;### (autoloads nil "idlw-shell" "progmodes/idlw-shell.el" (22164
+;;;;;; 57535 483192 607000))
;;; Generated autoloads from progmodes/idlw-shell.el
(autoload 'idlwave-shell "idlw-shell" "\
;;;***
\f
-;;;### (autoloads nil "idlwave" "progmodes/idlwave.el" (22180 39318
-;;;;;; 495077 98000))
+;;;### (autoloads nil "idlwave" "progmodes/idlwave.el" (22164 57535
+;;;;;; 491192 607000))
;;; Generated autoloads from progmodes/idlwave.el
(push (purecopy '(idlwave 6 1 22)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "ido" "ido.el" (22180 39318 361077 714000))
+;;;### (autoloads nil "ido" "ido.el" (22164 57534 731192 607000))
;;; Generated autoloads from ido.el
(defvar ido-mode nil "\
;;;***
\f
-;;;### (autoloads nil "ielm" "ielm.el" (22180 39318 361077 714000))
+;;;### (autoloads nil "ielm" "ielm.el" (22164 57534 731192 607000))
;;; Generated autoloads from ielm.el
(autoload 'ielm "ielm" "\
;;;***
\f
-;;;### (autoloads nil "iimage" "iimage.el" (22180 39318 361077 714000))
+;;;### (autoloads nil "iimage" "iimage.el" (22164 57534 731192 607000))
;;; Generated autoloads from iimage.el
(define-obsolete-function-alias 'turn-on-iimage-mode 'iimage-mode "24.1")
;;;***
\f
-;;;### (autoloads nil "image" "image.el" (22180 39318 362077 710000))
+;;;### (autoloads nil "image" "image.el" (22164 57534 735192 607000))
;;; Generated autoloads from image.el
(autoload 'image-type-from-data "image" "\
;;;***
\f
-;;;### (autoloads nil "image-dired" "image-dired.el" (22180 39318
-;;;;;; 362077 710000))
+;;;### (autoloads nil "image-dired" "image-dired.el" (22164 57534
+;;;;;; 731192 607000))
;;; Generated autoloads from image-dired.el
(push (purecopy '(image-dired 0 4 11)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "image-file" "image-file.el" (22180 39318 362077
-;;;;;; 710000))
+;;;### (autoloads nil "image-file" "image-file.el" (22164 57534 731192
+;;;;;; 607000))
;;; Generated autoloads from image-file.el
(defvar image-file-name-extensions (purecopy '("png" "jpeg" "jpg" "gif" "tiff" "tif" "xbm" "xpm" "pbm" "pgm" "ppm" "pnm" "svg")) "\
;;;***
\f
-;;;### (autoloads nil "image-mode" "image-mode.el" (22180 39318 362077
-;;;;;; 710000))
+;;;### (autoloads nil "image-mode" "image-mode.el" (22189 60738 329741
+;;;;;; 19000))
;;; Generated autoloads from image-mode.el
(autoload 'image-mode "image-mode" "\
;;;***
\f
-;;;### (autoloads nil "imenu" "imenu.el" (22180 39318 362077 710000))
+;;;### (autoloads nil "imenu" "imenu.el" (22164 57534 735192 607000))
;;; Generated autoloads from imenu.el
(defvar imenu-sort-function nil "\
;;;***
\f
-;;;### (autoloads nil "ind-util" "language/ind-util.el" (22180 39318
-;;;;;; 374077 654000))
+;;;### (autoloads nil "ind-util" "language/ind-util.el" (22164 57534
+;;;;;; 783192 607000))
;;; Generated autoloads from language/ind-util.el
(autoload 'indian-compose-region "ind-util" "\
;;;***
\f
-;;;### (autoloads nil "inf-lisp" "progmodes/inf-lisp.el" (22180 39318
-;;;;;; 495077 98000))
+;;;### (autoloads nil "inf-lisp" "progmodes/inf-lisp.el" (22164 57535
+;;;;;; 491192 607000))
;;; Generated autoloads from progmodes/inf-lisp.el
(autoload 'inferior-lisp "inf-lisp" "\
;;;***
\f
-;;;### (autoloads nil "info" "info.el" (22180 39318 364077 701000))
+;;;### (autoloads nil "info" "info.el" (22164 57534 739192 607000))
;;; Generated autoloads from info.el
(defcustom Info-default-directory-list (let* ((config-dir (file-name-as-directory (or (and (featurep 'ns) (let ((dir (expand-file-name "../info" data-directory))) (if (file-directory-p dir) dir))) configure-info-directory))) (prefixes (prune-directory-list '("/usr/local/" "/usr/" "/opt/" "/"))) (suffixes '("share/" "" "gnu/" "gnu/lib/" "gnu/lib/emacs/" "emacs/" "lib/" "lib/emacs/")) (standard-info-dirs (apply #'nconc (mapcar (lambda (pfx) (let ((dirs (mapcar (lambda (sfx) (concat pfx sfx "info/")) suffixes))) (prune-directory-list dirs))) prefixes))) (dirs (if (member config-dir standard-info-dirs) (nconc standard-info-dirs (list config-dir)) (cons config-dir standard-info-dirs)))) (if (not (eq system-type 'windows-nt)) dirs (let* ((instdir (file-name-directory invocation-directory)) (dir1 (expand-file-name "../info/" instdir)) (dir2 (expand-file-name "../../../info/" instdir))) (cond ((file-exists-p dir1) (append dirs (list dir1))) ((file-exists-p dir2) (append dirs (list dir2))) (t dirs))))) "\
;;;***
\f
-;;;### (autoloads nil "info-look" "info-look.el" (22180 39318 363077
-;;;;;; 705000))
+;;;### (autoloads nil "info-look" "info-look.el" (22164 57534 735192
+;;;;;; 607000))
;;; Generated autoloads from info-look.el
(autoload 'info-lookup-reset "info-look" "\
;;;***
\f
-;;;### (autoloads nil "info-xref" "info-xref.el" (22180 39318 363077
-;;;;;; 705000))
+;;;### (autoloads nil "info-xref" "info-xref.el" (22164 57534 735192
+;;;;;; 607000))
;;; Generated autoloads from info-xref.el
(push (purecopy '(info-xref 3)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "informat" "informat.el" (22180 39318 364077
-;;;;;; 701000))
+;;;### (autoloads nil "informat" "informat.el" (22164 57534 739192
+;;;;;; 607000))
;;; Generated autoloads from informat.el
(autoload 'Info-tagify "informat" "\
;;;***
\f
-;;;### (autoloads nil "inline" "emacs-lisp/inline.el" (22180 39318
-;;;;;; 289078 46000))
+;;;### (autoloads nil "inline" "emacs-lisp/inline.el" (22174 6972
+;;;;;; 468792 520000))
;;; Generated autoloads from emacs-lisp/inline.el
(autoload 'define-inline "inline" "\
;;;***
\f
-;;;### (autoloads nil "inversion" "cedet/inversion.el" (22180 39318
-;;;;;; 252078 216000))
+;;;### (autoloads nil "inversion" "cedet/inversion.el" (22164 57533
+;;;;;; 935192 607000))
;;; Generated autoloads from cedet/inversion.el
(push (purecopy '(inversion 1 3)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "isearch-x" "international/isearch-x.el" (22180
-;;;;;; 39318 365077 696000))
+;;;### (autoloads nil "isearch-x" "international/isearch-x.el" (22164
+;;;;;; 57534 743192 607000))
;;; Generated autoloads from international/isearch-x.el
(autoload 'isearch-toggle-specified-input-method "isearch-x" "\
;;;***
\f
-;;;### (autoloads nil "isearchb" "isearchb.el" (22180 39318 370077
-;;;;;; 673000))
+;;;### (autoloads nil "isearchb" "isearchb.el" (22164 57534 763192
+;;;;;; 607000))
;;; Generated autoloads from isearchb.el
(push (purecopy '(isearchb 1 5)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "iso-cvt" "international/iso-cvt.el" (22180
-;;;;;; 39318 365077 696000))
+;;;### (autoloads nil "iso-cvt" "international/iso-cvt.el" (22164
+;;;;;; 57534 743192 607000))
;;; Generated autoloads from international/iso-cvt.el
(autoload 'iso-spanish "iso-cvt" "\
;;;***
\f
;;;### (autoloads nil "iso-transl" "international/iso-transl.el"
-;;;;;; (22180 39318 365077 696000))
+;;;;;; (22164 57534 743192 607000))
;;; Generated autoloads from international/iso-transl.el
(define-key key-translation-map "\C-x8" 'iso-transl-ctl-x-8-map)
(autoload 'iso-transl-ctl-x-8-map "iso-transl" "Keymap for C-x 8 prefix." t 'keymap)
;;;***
\f
-;;;### (autoloads nil "ispell" "textmodes/ispell.el" (22183 58408
-;;;;;; 705001 736000))
+;;;### (autoloads nil "ispell" "textmodes/ispell.el" (22189 60739
+;;;;;; 273741 19000))
;;; Generated autoloads from textmodes/ispell.el
(put 'ispell-check-comments 'safe-local-variable (lambda (a) (memq a '(nil t exclusive))))
;;;***
\f
-;;;### (autoloads nil "japan-util" "language/japan-util.el" (22180
-;;;;;; 39318 375077 650000))
+;;;### (autoloads nil "japan-util" "language/japan-util.el" (22164
+;;;;;; 57534 787192 607000))
;;; Generated autoloads from language/japan-util.el
(autoload 'setup-japanese-environment-internal "japan-util" "\
;;;***
\f
-;;;### (autoloads nil "jka-compr" "jka-compr.el" (22180 39318 370077
-;;;;;; 673000))
+;;;### (autoloads nil "jka-compr" "jka-compr.el" (22164 57534 763192
+;;;;;; 607000))
;;; Generated autoloads from jka-compr.el
(defvar jka-compr-inhibit nil "\
;;;***
\f
-;;;### (autoloads nil "js" "progmodes/js.el" (22180 39318 495077
-;;;;;; 98000))
+;;;### (autoloads nil "js" "progmodes/js.el" (22164 57535 507192
+;;;;;; 607000))
;;; Generated autoloads from progmodes/js.el
(push (purecopy '(js 9)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "json" "json.el" (22180 39318 370077 673000))
+;;;### (autoloads nil "json" "json.el" (22164 57534 763192 607000))
;;; Generated autoloads from json.el
(push (purecopy '(json 1 4)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "keypad" "emulation/keypad.el" (22180 39318
-;;;;;; 296078 13000))
+;;;### (autoloads nil "keypad" "emulation/keypad.el" (22164 57534
+;;;;;; 223192 607000))
;;; Generated autoloads from emulation/keypad.el
(defvar keypad-setup nil "\
;;;***
\f
-;;;### (autoloads nil "kinsoku" "international/kinsoku.el" (22180
-;;;;;; 39318 365077 696000))
+;;;### (autoloads nil "kinsoku" "international/kinsoku.el" (22164
+;;;;;; 57534 743192 607000))
;;; Generated autoloads from international/kinsoku.el
(autoload 'kinsoku "kinsoku" "\
;;;***
\f
-;;;### (autoloads nil "kkc" "international/kkc.el" (22180 39318 366077
-;;;;;; 691000))
+;;;### (autoloads nil "kkc" "international/kkc.el" (22164 57534 747192
+;;;;;; 607000))
;;; Generated autoloads from international/kkc.el
(defvar kkc-after-update-conversion-functions nil "\
;;;***
\f
-;;;### (autoloads nil "kmacro" "kmacro.el" (22180 39318 370077 673000))
+;;;### (autoloads nil "kmacro" "kmacro.el" (22164 57534 767192 607000))
;;; Generated autoloads from kmacro.el
(global-set-key "\C-x(" 'kmacro-start-macro)
(global-set-key "\C-x)" 'kmacro-end-macro)
;;;***
\f
-;;;### (autoloads nil "korea-util" "language/korea-util.el" (22180
-;;;;;; 39318 375077 650000))
+;;;### (autoloads nil "korea-util" "language/korea-util.el" (22164
+;;;;;; 57534 787192 607000))
;;; Generated autoloads from language/korea-util.el
(defvar default-korean-keyboard (purecopy (if (string-match "3" (or (getenv "HANGUL_KEYBOARD_TYPE") "")) "3" "")) "\
;;;***
\f
-;;;### (autoloads nil "lao-util" "language/lao-util.el" (22180 39318
-;;;;;; 375077 650000))
+;;;### (autoloads nil "lao-util" "language/lao-util.el" (22164 57534
+;;;;;; 787192 607000))
;;; Generated autoloads from language/lao-util.el
(autoload 'lao-compose-string "lao-util" "\
;;;***
\f
-;;;### (autoloads nil "latexenc" "international/latexenc.el" (22180
-;;;;;; 39318 366077 691000))
+;;;### (autoloads nil "latexenc" "international/latexenc.el" (22164
+;;;;;; 57534 747192 607000))
;;; Generated autoloads from international/latexenc.el
(defvar latex-inputenc-coding-alist (purecopy '(("ansinew" . windows-1252) ("applemac" . mac-roman) ("ascii" . us-ascii) ("cp1250" . windows-1250) ("cp1252" . windows-1252) ("cp1257" . cp1257) ("cp437de" . cp437) ("cp437" . cp437) ("cp850" . cp850) ("cp852" . cp852) ("cp858" . cp858) ("cp865" . cp865) ("latin1" . iso-8859-1) ("latin2" . iso-8859-2) ("latin3" . iso-8859-3) ("latin4" . iso-8859-4) ("latin5" . iso-8859-5) ("latin9" . iso-8859-15) ("next" . next) ("utf8" . utf-8) ("utf8x" . utf-8))) "\
;;;***
\f
;;;### (autoloads nil "latin1-disp" "international/latin1-disp.el"
-;;;;;; (22180 39318 366077 691000))
+;;;;;; (22164 57534 747192 607000))
;;; Generated autoloads from international/latin1-disp.el
(defvar latin1-display nil "\
;;;***
\f
-;;;### (autoloads nil "ld-script" "progmodes/ld-script.el" (22180
-;;;;;; 39318 495077 98000))
+;;;### (autoloads nil "ld-script" "progmodes/ld-script.el" (22164
+;;;;;; 57535 507192 607000))
;;; Generated autoloads from progmodes/ld-script.el
(autoload 'ld-script-mode "ld-script" "\
;;;***
\f
-;;;### (autoloads nil "let-alist" "emacs-lisp/let-alist.el" (22180
-;;;;;; 39318 289078 46000))
+;;;### (autoloads nil "let-alist" "emacs-lisp/let-alist.el" (22164
+;;;;;; 57534 183192 607000))
;;; Generated autoloads from emacs-lisp/let-alist.el
(push (purecopy '(let-alist 1 0 4)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "life" "play/life.el" (22180 39318 466077 231000))
+;;;### (autoloads nil "life" "play/life.el" (22164 57535 303192 607000))
;;; Generated autoloads from play/life.el
(autoload 'life "life" "\
;;;***
\f
-;;;### (autoloads nil "linum" "linum.el" (22180 39318 385077 604000))
+;;;### (autoloads nil "linum" "linum.el" (22164 57534 799192 607000))
;;; Generated autoloads from linum.el
(push (purecopy '(linum 0 9 24)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "loadhist" "loadhist.el" (22180 39318 385077
-;;;;;; 604000))
+;;;### (autoloads nil "loadhist" "loadhist.el" (22164 57534 799192
+;;;;;; 607000))
;;; Generated autoloads from loadhist.el
(autoload 'unload-feature "loadhist" "\
;;;***
\f
-;;;### (autoloads nil "locate" "locate.el" (22180 39318 386077 599000))
+;;;### (autoloads nil "locate" "locate.el" (22164 57534 803192 607000))
;;; Generated autoloads from locate.el
(defvar locate-ls-subdir-switches (purecopy "-al") "\
;;;***
\f
-;;;### (autoloads nil "log-edit" "vc/log-edit.el" (22180 39318 552076
-;;;;;; 836000))
+;;;### (autoloads nil "log-edit" "vc/log-edit.el" (22164 57535 859192
+;;;;;; 607000))
;;; Generated autoloads from vc/log-edit.el
(autoload 'log-edit "log-edit" "\
;;;***
\f
-;;;### (autoloads nil "log-view" "vc/log-view.el" (22180 39318 552076
-;;;;;; 836000))
+;;;### (autoloads nil "log-view" "vc/log-view.el" (22164 57535 859192
+;;;;;; 607000))
;;; Generated autoloads from vc/log-view.el
(autoload 'log-view-mode "log-view" "\
;;;***
\f
-;;;### (autoloads nil "lpr" "lpr.el" (22180 39318 386077 599000))
+;;;### (autoloads nil "lpr" "lpr.el" (22164 57534 803192 607000))
;;; Generated autoloads from lpr.el
(defvar lpr-windows-system (memq system-type '(ms-dos windows-nt)) "\
;;;***
\f
-;;;### (autoloads nil "ls-lisp" "ls-lisp.el" (22180 39318 386077
-;;;;;; 599000))
+;;;### (autoloads nil "ls-lisp" "ls-lisp.el" (22164 57534 803192
+;;;;;; 607000))
;;; Generated autoloads from ls-lisp.el
(defvar ls-lisp-support-shell-wildcards t "\
;;;***
\f
-;;;### (autoloads nil "lunar" "calendar/lunar.el" (22180 39318 245078
-;;;;;; 248000))
+;;;### (autoloads nil "lunar" "calendar/lunar.el" (22164 57533 859192
+;;;;;; 607000))
;;; Generated autoloads from calendar/lunar.el
(autoload 'lunar-phases "lunar" "\
;;;***
\f
-;;;### (autoloads nil "m4-mode" "progmodes/m4-mode.el" (22180 39318
-;;;;;; 496077 94000))
+;;;### (autoloads nil "m4-mode" "progmodes/m4-mode.el" (22164 57535
+;;;;;; 507192 607000))
;;; Generated autoloads from progmodes/m4-mode.el
(autoload 'm4-mode "m4-mode" "\
;;;***
\f
-;;;### (autoloads nil "macros" "macros.el" (22180 39318 386077 599000))
+;;;### (autoloads nil "macros" "macros.el" (22164 57534 803192 607000))
;;; Generated autoloads from macros.el
(autoload 'name-last-kbd-macro "macros" "\
;;;***
\f
-;;;### (autoloads nil "mail-extr" "mail/mail-extr.el" (22180 39318
-;;;;;; 387077 595000))
+;;;### (autoloads nil "mail-extr" "mail/mail-extr.el" (22164 57534
+;;;;;; 807192 607000))
;;; Generated autoloads from mail/mail-extr.el
(autoload 'mail-extract-address-components "mail-extr" "\
;;;***
\f
-;;;### (autoloads nil "mail-hist" "mail/mail-hist.el" (22180 39318
-;;;;;; 387077 595000))
+;;;### (autoloads nil "mail-hist" "mail/mail-hist.el" (22164 57534
+;;;;;; 807192 607000))
;;; Generated autoloads from mail/mail-hist.el
(autoload 'mail-hist-define-keys "mail-hist" "\
;;;***
\f
-;;;### (autoloads nil "mail-utils" "mail/mail-utils.el" (22180 39318
-;;;;;; 387077 595000))
+;;;### (autoloads nil "mail-utils" "mail/mail-utils.el" (22164 57534
+;;;;;; 807192 607000))
;;; Generated autoloads from mail/mail-utils.el
(defvar mail-use-rfc822 nil "\
;;;***
\f
-;;;### (autoloads nil "mailabbrev" "mail/mailabbrev.el" (22180 39318
-;;;;;; 387077 595000))
+;;;### (autoloads nil "mailabbrev" "mail/mailabbrev.el" (22164 57534
+;;;;;; 807192 607000))
;;; Generated autoloads from mail/mailabbrev.el
(defvar mail-abbrevs-mode nil "\
;;;***
\f
-;;;### (autoloads nil "mailalias" "mail/mailalias.el" (22180 39318
-;;;;;; 387077 595000))
+;;;### (autoloads nil "mailalias" "mail/mailalias.el" (22164 57534
+;;;;;; 807192 607000))
;;; Generated autoloads from mail/mailalias.el
(defvar mail-complete-style 'angles "\
;;;***
\f
-;;;### (autoloads nil "mailclient" "mail/mailclient.el" (22183 58408
-;;;;;; 680001 935000))
+;;;### (autoloads nil "mailclient" "mail/mailclient.el" (22189 60738
+;;;;;; 465741 19000))
;;; Generated autoloads from mail/mailclient.el
(autoload 'mailclient-send-it "mailclient" "\
;;;***
\f
-;;;### (autoloads nil "make-mode" "progmodes/make-mode.el" (22180
-;;;;;; 39318 496077 94000))
+;;;### (autoloads nil "make-mode" "progmodes/make-mode.el" (22164
+;;;;;; 57535 511192 607000))
;;; Generated autoloads from progmodes/make-mode.el
(autoload 'makefile-mode "make-mode" "\
;;;***
\f
-;;;### (autoloads nil "makesum" "makesum.el" (22180 39318 392077
-;;;;;; 572000))
+;;;### (autoloads nil "makesum" "makesum.el" (22164 57534 843192
+;;;;;; 607000))
;;; Generated autoloads from makesum.el
(autoload 'make-command-summary "makesum" "\
;;;***
\f
-;;;### (autoloads nil "man" "man.el" (22183 58408 680001 935000))
+;;;### (autoloads nil "man" "man.el" (22189 60738 469741 19000))
;;; Generated autoloads from man.el
(defalias 'manual-entry 'man)
;;;***
\f
-;;;### (autoloads nil "map" "emacs-lisp/map.el" (22183 58377 523249
-;;;;;; 394000))
+;;;### (autoloads nil "map" "emacs-lisp/map.el" (22164 57534 199192
+;;;;;; 607000))
;;; Generated autoloads from emacs-lisp/map.el
(push (purecopy '(map 1 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "master" "master.el" (22180 39318 392077 572000))
+;;;### (autoloads nil "master" "master.el" (22164 57534 847192 607000))
;;; Generated autoloads from master.el
(push (purecopy '(master 1 0 2)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "mb-depth" "mb-depth.el" (22180 39318 392077
-;;;;;; 572000))
+;;;### (autoloads nil "mb-depth" "mb-depth.el" (22164 57534 847192
+;;;;;; 607000))
;;; Generated autoloads from mb-depth.el
(defvar minibuffer-depth-indicate-mode nil "\
;;;***
\f
-;;;### (autoloads nil "md4" "md4.el" (22180 39318 392077 572000))
+;;;### (autoloads nil "md4" "md4.el" (22164 57534 847192 607000))
;;; Generated autoloads from md4.el
(push (purecopy '(md4 1 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "message" "gnus/message.el" (22180 39318 346077
-;;;;;; 783000))
+;;;### (autoloads nil "message" "gnus/message.el" (22164 57534 631192
+;;;;;; 607000))
;;; Generated autoloads from gnus/message.el
(define-mail-user-agent 'message-user-agent 'message-mail 'message-send-and-exit 'message-kill-buffer 'message-send-hook)
;;;***
\f
-;;;### (autoloads nil "meta-mode" "progmodes/meta-mode.el" (22180
-;;;;;; 39318 496077 94000))
+;;;### (autoloads nil "meta-mode" "progmodes/meta-mode.el" (22164
+;;;;;; 57535 511192 607000))
;;; Generated autoloads from progmodes/meta-mode.el
(push (purecopy '(meta-mode 1 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "metamail" "mail/metamail.el" (22180 39318
-;;;;;; 388077 590000))
+;;;### (autoloads nil "metamail" "mail/metamail.el" (22164 57534
+;;;;;; 807192 607000))
;;; Generated autoloads from mail/metamail.el
(autoload 'metamail-interpret-header "metamail" "\
;;;***
\f
-;;;### (autoloads nil "mh-comp" "mh-e/mh-comp.el" (22180 39318 397077
-;;;;;; 549000))
+;;;### (autoloads nil "mh-comp" "mh-e/mh-comp.el" (22164 57534 871192
+;;;;;; 607000))
;;; Generated autoloads from mh-e/mh-comp.el
(autoload 'mh-smail "mh-comp" "\
;;;***
\f
-;;;### (autoloads nil "mh-e" "mh-e/mh-e.el" (22180 39318 398077 544000))
+;;;### (autoloads nil "mh-e" "mh-e/mh-e.el" (22172 51646 865679 83000))
;;; Generated autoloads from mh-e/mh-e.el
-(push (purecopy '(mh-e 8 6)) package--builtin-versions)
+(push (purecopy '(mh-e 8 6 -4)) package--builtin-versions)
(put 'mh-progs 'risky-local-variable t)
;;;***
\f
-;;;### (autoloads nil "mh-folder" "mh-e/mh-folder.el" (22180 39318
-;;;;;; 398077 544000))
+;;;### (autoloads nil "mh-folder" "mh-e/mh-folder.el" (22164 57534
+;;;;;; 875192 607000))
;;; Generated autoloads from mh-e/mh-folder.el
(autoload 'mh-rmail "mh-folder" "\
;;;***
\f
-;;;### (autoloads nil "midnight" "midnight.el" (22180 39318 402077
-;;;;;; 526000))
+;;;### (autoloads nil "midnight" "midnight.el" (22164 57534 883192
+;;;;;; 607000))
;;; Generated autoloads from midnight.el
(defvar midnight-mode nil "\
;;;***
\f
-;;;### (autoloads nil "minibuf-eldef" "minibuf-eldef.el" (22180 39318
-;;;;;; 402077 526000))
+;;;### (autoloads nil "minibuf-eldef" "minibuf-eldef.el" (22164 57534
+;;;;;; 883192 607000))
;;; Generated autoloads from minibuf-eldef.el
(defvar minibuffer-electric-default-mode nil "\
;;;***
\f
-;;;### (autoloads nil "misc" "misc.el" (22180 39318 403077 521000))
+;;;### (autoloads nil "misc" "misc.el" (22164 57534 895192 607000))
;;; Generated autoloads from misc.el
(autoload 'butterfly "misc" "\
;;;***
\f
-;;;### (autoloads nil "misearch" "misearch.el" (22180 39318 403077
-;;;;;; 521000))
+;;;### (autoloads nil "misearch" "misearch.el" (22164 57534 895192
+;;;;;; 607000))
;;; Generated autoloads from misearch.el
(add-hook 'isearch-mode-hook 'multi-isearch-setup)
;;;***
\f
-;;;### (autoloads nil "mixal-mode" "progmodes/mixal-mode.el" (22180
-;;;;;; 39318 496077 94000))
+;;;### (autoloads nil "mixal-mode" "progmodes/mixal-mode.el" (22164
+;;;;;; 57535 511192 607000))
;;; Generated autoloads from progmodes/mixal-mode.el
(push (purecopy '(mixal-mode 0 1)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "mm-encode" "gnus/mm-encode.el" (22180 39318
-;;;;;; 347077 779000))
+;;;### (autoloads nil "mm-encode" "gnus/mm-encode.el" (22164 57534
+;;;;;; 635192 607000))
;;; Generated autoloads from gnus/mm-encode.el
(autoload 'mm-default-file-encoding "mm-encode" "\
;;;***
\f
-;;;### (autoloads nil "mm-extern" "gnus/mm-extern.el" (22180 39318
-;;;;;; 347077 779000))
+;;;### (autoloads nil "mm-extern" "gnus/mm-extern.el" (22164 57534
+;;;;;; 635192 607000))
;;; Generated autoloads from gnus/mm-extern.el
(autoload 'mm-extern-cache-contents "mm-extern" "\
;;;***
\f
-;;;### (autoloads nil "mm-partial" "gnus/mm-partial.el" (22180 39318
-;;;;;; 347077 779000))
+;;;### (autoloads nil "mm-partial" "gnus/mm-partial.el" (22164 57534
+;;;;;; 635192 607000))
;;; Generated autoloads from gnus/mm-partial.el
(autoload 'mm-inline-partial "mm-partial" "\
;;;***
\f
-;;;### (autoloads nil "mm-url" "gnus/mm-url.el" (22180 39318 347077
-;;;;;; 779000))
+;;;### (autoloads nil "mm-url" "gnus/mm-url.el" (22164 57534 635192
+;;;;;; 607000))
;;; Generated autoloads from gnus/mm-url.el
(autoload 'mm-url-insert-file-contents "mm-url" "\
;;;***
\f
-;;;### (autoloads nil "mm-uu" "gnus/mm-uu.el" (22180 39318 348077
-;;;;;; 774000))
+;;;### (autoloads nil "mm-uu" "gnus/mm-uu.el" (22164 57534 639192
+;;;;;; 607000))
;;; Generated autoloads from gnus/mm-uu.el
(autoload 'mm-uu-dissect "mm-uu" "\
;;;***
\f
-;;;### (autoloads nil "mml" "gnus/mml.el" (22180 39318 348077 774000))
+;;;### (autoloads nil "mml" "gnus/mml.el" (22164 57534 643192 607000))
;;; Generated autoloads from gnus/mml.el
(autoload 'mml-to-mime "mml" "\
;;;***
\f
-;;;### (autoloads nil "mml1991" "gnus/mml1991.el" (22180 39318 349077
-;;;;;; 770000))
+;;;### (autoloads nil "mml1991" "gnus/mml1991.el" (22174 6972 604792
+;;;;;; 520000))
;;; Generated autoloads from gnus/mml1991.el
(autoload 'mml1991-encrypt "mml1991" "\
;;;***
\f
-;;;### (autoloads nil "mml2015" "gnus/mml2015.el" (22180 39318 349077
-;;;;;; 770000))
+;;;### (autoloads nil "mml2015" "gnus/mml2015.el" (22174 6972 604792
+;;;;;; 520000))
;;; Generated autoloads from gnus/mml2015.el
(autoload 'mml2015-decrypt "mml2015" "\
;;;***
\f
-;;;### (autoloads nil "mode-local" "cedet/mode-local.el" (22183 58408
-;;;;;; 667002 38000))
+;;;### (autoloads nil "mode-local" "cedet/mode-local.el" (22189 60738
+;;;;;; 45741 19000))
;;; Generated autoloads from cedet/mode-local.el
(put 'define-overloadable-function 'doc-string-elt 3)
;;;***
\f
-;;;### (autoloads nil "modula2" "progmodes/modula2.el" (21887 52709
-;;;;;; 955061 134000))
+;;;### (autoloads nil "modula2" "progmodes/modula2.el" (21607 54478
+;;;;;; 800121 42000))
;;; Generated autoloads from progmodes/modula2.el
(defalias 'modula-2-mode 'm2-mode)
;;;***
\f
-;;;### (autoloads nil "morse" "play/morse.el" (22180 39318 466077
-;;;;;; 231000))
+;;;### (autoloads nil "morse" "play/morse.el" (22164 57535 303192
+;;;;;; 607000))
;;; Generated autoloads from play/morse.el
(autoload 'morse-region "morse" "\
;;;***
\f
-;;;### (autoloads nil "mouse-drag" "mouse-drag.el" (22180 39318 403077
-;;;;;; 521000))
+;;;### (autoloads nil "mouse-drag" "mouse-drag.el" (22164 57534 895192
+;;;;;; 607000))
;;; Generated autoloads from mouse-drag.el
(autoload 'mouse-drag-throw "mouse-drag" "\
;;;***
\f
-;;;### (autoloads nil "mpc" "mpc.el" (22180 39318 404077 516000))
+;;;### (autoloads nil "mpc" "mpc.el" (22164 57534 911192 607000))
;;; Generated autoloads from mpc.el
(autoload 'mpc "mpc" "\
;;;***
\f
-;;;### (autoloads nil "mpuz" "play/mpuz.el" (22180 39318 467077 227000))
+;;;### (autoloads nil "mpuz" "play/mpuz.el" (22164 57535 303192 607000))
;;; Generated autoloads from play/mpuz.el
(autoload 'mpuz "mpuz" "\
;;;***
\f
-;;;### (autoloads nil "msb" "msb.el" (22180 39318 404077 516000))
+;;;### (autoloads nil "msb" "msb.el" (22164 57534 911192 607000))
;;; Generated autoloads from msb.el
(defvar msb-mode nil "\
;;;***
\f
-;;;### (autoloads nil "mule-diag" "international/mule-diag.el" (22180
-;;;;;; 39318 367077 687000))
+;;;### (autoloads nil "mule-diag" "international/mule-diag.el" (22164
+;;;;;; 57534 751192 607000))
;;; Generated autoloads from international/mule-diag.el
(autoload 'list-character-sets "mule-diag" "\
;;;***
\f
-;;;### (autoloads nil "mule-util" "international/mule-util.el" (22180
-;;;;;; 39318 367077 687000))
+;;;### (autoloads nil "mule-util" "international/mule-util.el" (22174
+;;;;;; 6972 628792 520000))
;;; Generated autoloads from international/mule-util.el
(defsubst string-to-list (string) "\
;;;***
\f
-;;;### (autoloads nil "net-utils" "net/net-utils.el" (22180 39318
-;;;;;; 409077 494000))
+;;;### (autoloads nil "net-utils" "net/net-utils.el" (22164 57534
+;;;;;; 931192 607000))
;;; Generated autoloads from net/net-utils.el
(autoload 'ifconfig "net-utils" "\
;;;***
\f
-;;;### (autoloads nil "netrc" "net/netrc.el" (22180 39318 409077
-;;;;;; 494000))
+;;;### (autoloads nil "netrc" "net/netrc.el" (22164 57534 931192
+;;;;;; 607000))
;;; Generated autoloads from net/netrc.el
(autoload 'netrc-credentials "netrc" "\
;;;***
\f
-;;;### (autoloads nil "network-stream" "net/network-stream.el" (22180
-;;;;;; 39318 409077 494000))
+;;;### (autoloads nil "network-stream" "net/network-stream.el" (22164
+;;;;;; 57534 935192 607000))
;;; Generated autoloads from net/network-stream.el
(autoload 'open-network-stream "network-stream" "\
;;;***
\f
-;;;### (autoloads nil "newst-backend" "net/newst-backend.el" (22180
-;;;;;; 39318 410077 489000))
+;;;### (autoloads nil "newst-backend" "net/newst-backend.el" (22164
+;;;;;; 57534 939192 607000))
;;; Generated autoloads from net/newst-backend.el
(autoload 'newsticker-running-p "newst-backend" "\
;;;***
\f
;;;### (autoloads nil "newst-plainview" "net/newst-plainview.el"
-;;;;;; (22180 39318 410077 489000))
+;;;;;; (22164 57534 939192 607000))
;;; Generated autoloads from net/newst-plainview.el
(autoload 'newsticker-plainview "newst-plainview" "\
;;;***
\f
-;;;### (autoloads nil "newst-reader" "net/newst-reader.el" (22180
-;;;;;; 39318 410077 489000))
+;;;### (autoloads nil "newst-reader" "net/newst-reader.el" (22174
+;;;;;; 6972 660792 520000))
;;; Generated autoloads from net/newst-reader.el
(autoload 'newsticker-show-news "newst-reader" "\
;;;***
\f
-;;;### (autoloads nil "newst-ticker" "net/newst-ticker.el" (22180
-;;;;;; 39318 410077 489000))
+;;;### (autoloads nil "newst-ticker" "net/newst-ticker.el" (22164
+;;;;;; 57534 939192 607000))
;;; Generated autoloads from net/newst-ticker.el
(autoload 'newsticker-ticker-running-p "newst-ticker" "\
;;;***
\f
-;;;### (autoloads nil "newst-treeview" "net/newst-treeview.el" (22180
-;;;;;; 39318 411077 484000))
+;;;### (autoloads nil "newst-treeview" "net/newst-treeview.el" (22174
+;;;;;; 6972 680792 520000))
;;; Generated autoloads from net/newst-treeview.el
(autoload 'newsticker-treeview "newst-treeview" "\
;;;***
\f
-;;;### (autoloads nil "nndiary" "gnus/nndiary.el" (22180 39318 349077
-;;;;;; 770000))
+;;;### (autoloads nil "nndiary" "gnus/nndiary.el" (22164 57534 647192
+;;;;;; 607000))
;;; Generated autoloads from gnus/nndiary.el
(autoload 'nndiary-generate-nov-databases "nndiary" "\
;;;***
\f
-;;;### (autoloads nil "nndoc" "gnus/nndoc.el" (22180 39318 350077
-;;;;;; 765000))
+;;;### (autoloads nil "nndoc" "gnus/nndoc.el" (22164 57534 659192
+;;;;;; 607000))
;;; Generated autoloads from gnus/nndoc.el
(autoload 'nndoc-add-type "nndoc" "\
;;;***
\f
-;;;### (autoloads nil "nnfolder" "gnus/nnfolder.el" (22180 39318
-;;;;;; 350077 765000))
+;;;### (autoloads nil "nnfolder" "gnus/nnfolder.el" (22164 57534
+;;;;;; 659192 607000))
;;; Generated autoloads from gnus/nnfolder.el
(autoload 'nnfolder-generate-active-file "nnfolder" "\
;;;***
\f
-;;;### (autoloads nil "nnml" "gnus/nnml.el" (22180 39318 352077 756000))
+;;;### (autoloads nil "nnml" "gnus/nnml.el" (22164 57534 683192 607000))
;;; Generated autoloads from gnus/nnml.el
(autoload 'nnml-generate-nov-databases "nnml" "\
;;;***
\f
-;;;### (autoloads nil "novice" "novice.el" (22180 39318 422077 434000))
+;;;### (autoloads nil "novice" "novice.el" (22164 57535 35192 607000))
;;; Generated autoloads from novice.el
(define-obsolete-variable-alias 'disabled-command-hook 'disabled-command-function "22.1")
;;;***
\f
-;;;### (autoloads nil "nroff-mode" "textmodes/nroff-mode.el" (22180
-;;;;;; 39318 532076 928000))
+;;;### (autoloads nil "nroff-mode" "textmodes/nroff-mode.el" (22164
+;;;;;; 57535 807192 607000))
;;; Generated autoloads from textmodes/nroff-mode.el
(autoload 'nroff-mode "nroff-mode" "\
;;;***
\f
-;;;### (autoloads nil "ntlm" "net/ntlm.el" (22180 39318 411077 484000))
+;;;### (autoloads nil "ntlm" "net/ntlm.el" (22164 57534 955192 607000))
;;; Generated autoloads from net/ntlm.el
(push (purecopy '(ntlm 2 0 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "nxml-glyph" "nxml/nxml-glyph.el" (22180 39318
-;;;;;; 422077 434000))
-;;; Generated autoloads from nxml/nxml-glyph.el
-
-(autoload 'nxml-glyph-display-string "nxml-glyph" "\
-Return a string that can display a glyph for Unicode code-point N.
-FACE gives the face that will be used for displaying the string.
-Return nil if the face cannot display a glyph for N.
-
-\(fn N FACE)" nil nil)
-
-;;;***
-\f
-;;;### (autoloads nil "nxml-mode" "nxml/nxml-mode.el" (22180 39318
-;;;;;; 422077 434000))
+;;;### (autoloads nil "nxml-mode" "nxml/nxml-mode.el" (22171 30780
+;;;;;; 156984 795000))
;;; Generated autoloads from nxml/nxml-mode.el
(autoload 'nxml-mode "nxml-mode" "\
;;;***
\f
-;;;### (autoloads nil "nxml-uchnm" "nxml/nxml-uchnm.el" (22180 39318
-;;;;;; 423077 429000))
-;;; Generated autoloads from nxml/nxml-uchnm.el
-
-(autoload 'nxml-enable-unicode-char-name-sets "nxml-uchnm" "\
-Enable the use of Unicode standard names for characters.
-The Unicode blocks for which names are enabled is controlled by
-the variable `nxml-enabled-unicode-blocks'.
-
-\(fn)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "octave" "progmodes/octave.el" (22180 39318
-;;;;;; 497077 89000))
+;;;### (autoloads nil "octave" "progmodes/octave.el" (22164 57535
+;;;;;; 515192 607000))
;;; Generated autoloads from progmodes/octave.el
(autoload 'octave-mode "octave" "\
;;;***
\f
-;;;### (autoloads nil "opascal" "progmodes/opascal.el" (22180 39318
-;;;;;; 497077 89000))
+;;;### (autoloads nil "opascal" "progmodes/opascal.el" (22164 57535
+;;;;;; 527192 607000))
;;; Generated autoloads from progmodes/opascal.el
(define-obsolete-function-alias 'delphi-mode 'opascal-mode "24.4")
;;;***
\f
-;;;### (autoloads nil "org" "org/org.el" (22183 58408 693001 832000))
+;;;### (autoloads nil "org" "org/org.el" (22189 60738 961741 19000))
;;; Generated autoloads from org/org.el
(autoload 'org-babel-do-load-languages "org" "\
;;;***
\f
-;;;### (autoloads nil "org-agenda" "org/org-agenda.el" (22180 39318
-;;;;;; 445077 328000))
+;;;### (autoloads nil "org-agenda" "org/org-agenda.el" (22164 57535
+;;;;;; 151192 607000))
;;; Generated autoloads from org/org-agenda.el
(autoload 'org-toggle-sticky-agenda "org-agenda" "\
;;;***
\f
-;;;### (autoloads nil "org-capture" "org/org-capture.el" (22180 39318
-;;;;;; 447077 319000))
+;;;### (autoloads nil "org-capture" "org/org-capture.el" (22164 57535
+;;;;;; 151192 607000))
;;; Generated autoloads from org/org-capture.el
(autoload 'org-capture-string "org-capture" "\
;;;***
\f
-;;;### (autoloads nil "org-colview" "org/org-colview.el" (22180 39318
-;;;;;; 447077 319000))
+;;;### (autoloads nil "org-colview" "org/org-colview.el" (22164 57535
+;;;;;; 155192 607000))
;;; Generated autoloads from org/org-colview.el
(autoload 'org-columns-remove-overlays "org-colview" "\
;;;***
\f
-;;;### (autoloads nil "org-compat" "org/org-compat.el" (22180 39318
-;;;;;; 448077 314000))
+;;;### (autoloads nil "org-compat" "org/org-compat.el" (22164 57535
+;;;;;; 155192 607000))
;;; Generated autoloads from org/org-compat.el
(autoload 'org-check-version "org-compat" "\
;;;***
\f
-;;;### (autoloads nil "org-macs" "org/org-macs.el" (22180 39318 451077
-;;;;;; 300000))
+;;;### (autoloads nil "org-macs" "org/org-macs.el" (22164 57535 163192
+;;;;;; 607000))
;;; Generated autoloads from org/org-macs.el
(autoload 'org-load-noerror-mustsuffix "org-macs" "\
;;;***
\f
-;;;### (autoloads nil "org-version" "org/org-version.el" (21887 52709
-;;;;;; 904061 417000))
+;;;### (autoloads nil "org-version" "org/org-version.el" (21607 54478
+;;;;;; 800121 42000))
;;; Generated autoloads from org/org-version.el
(autoload 'org-release "org-version" "\
;;;***
\f
-;;;### (autoloads nil "outline" "outline.el" (22180 39318 462077
-;;;;;; 250000))
+;;;### (autoloads nil "outline" "outline.el" (22164 57535 255192
+;;;;;; 607000))
;;; Generated autoloads from outline.el
(put 'outline-regexp 'safe-local-variable 'stringp)
(put 'outline-heading-end-regexp 'safe-local-variable 'stringp)
;;;***
\f
-;;;### (autoloads nil "package" "emacs-lisp/package.el" (22188 33909
-;;;;;; 808230 168000))
+;;;### (autoloads nil "package" "emacs-lisp/package.el" (22189 60738
+;;;;;; 165741 19000))
;;; Generated autoloads from emacs-lisp/package.el
(push (purecopy '(package 1 1 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "paren" "paren.el" (22180 39318 463077 245000))
+;;;### (autoloads nil "paren" "paren.el" (22164 57535 255192 607000))
;;; Generated autoloads from paren.el
(defvar show-paren-mode nil "\
;;;***
\f
-;;;### (autoloads nil "parse-time" "calendar/parse-time.el" (22180
-;;;;;; 39318 245078 248000))
+;;;### (autoloads nil "parse-time" "calendar/parse-time.el" (22164
+;;;;;; 57533 859192 607000))
;;; Generated autoloads from calendar/parse-time.el
(put 'parse-time-rules 'risky-local-variable t)
;;;***
\f
-;;;### (autoloads nil "pascal" "progmodes/pascal.el" (22180 39318
-;;;;;; 498077 84000))
+;;;### (autoloads nil "pascal" "progmodes/pascal.el" (22164 57535
+;;;;;; 535192 607000))
;;; Generated autoloads from progmodes/pascal.el
(autoload 'pascal-mode "pascal" "\
;;;***
\f
-;;;### (autoloads nil "password-cache" "password-cache.el" (22180
-;;;;;; 39318 463077 245000))
+;;;### (autoloads nil "password-cache" "password-cache.el" (22164
+;;;;;; 57535 255192 607000))
;;; Generated autoloads from password-cache.el
(defvar password-cache t "\
;;;***
\f
-;;;### (autoloads nil "pcase" "emacs-lisp/pcase.el" (22183 58408
-;;;;;; 668002 30000))
+;;;### (autoloads nil "pcase" "emacs-lisp/pcase.el" (22189 60738
+;;;;;; 177741 19000))
;;; Generated autoloads from emacs-lisp/pcase.el
(autoload 'pcase "pcase" "\
;;;***
\f
-;;;### (autoloads nil "pcmpl-cvs" "pcmpl-cvs.el" (22180 39318 463077
-;;;;;; 245000))
+;;;### (autoloads nil "pcmpl-cvs" "pcmpl-cvs.el" (22164 57535 255192
+;;;;;; 607000))
;;; Generated autoloads from pcmpl-cvs.el
(autoload 'pcomplete/cvs "pcmpl-cvs" "\
;;;***
\f
-;;;### (autoloads nil "pcmpl-gnu" "pcmpl-gnu.el" (22180 39318 463077
-;;;;;; 245000))
+;;;### (autoloads nil "pcmpl-gnu" "pcmpl-gnu.el" (22164 57535 255192
+;;;;;; 607000))
;;; Generated autoloads from pcmpl-gnu.el
(autoload 'pcomplete/gzip "pcmpl-gnu" "\
;;;***
\f
-;;;### (autoloads nil "pcmpl-linux" "pcmpl-linux.el" (22180 39318
-;;;;;; 463077 245000))
+;;;### (autoloads nil "pcmpl-linux" "pcmpl-linux.el" (22164 57535
+;;;;;; 255192 607000))
;;; Generated autoloads from pcmpl-linux.el
(autoload 'pcomplete/kill "pcmpl-linux" "\
;;;***
\f
-;;;### (autoloads nil "pcmpl-rpm" "pcmpl-rpm.el" (22180 39318 463077
-;;;;;; 245000))
+;;;### (autoloads nil "pcmpl-rpm" "pcmpl-rpm.el" (22164 57535 259192
+;;;;;; 607000))
;;; Generated autoloads from pcmpl-rpm.el
(autoload 'pcomplete/rpm "pcmpl-rpm" "\
;;;***
\f
-;;;### (autoloads nil "pcmpl-unix" "pcmpl-unix.el" (22180 39318 463077
-;;;;;; 245000))
+;;;### (autoloads nil "pcmpl-unix" "pcmpl-unix.el" (22164 57535 259192
+;;;;;; 607000))
;;; Generated autoloads from pcmpl-unix.el
(autoload 'pcomplete/cd "pcmpl-unix" "\
;;;***
\f
-;;;### (autoloads nil "pcmpl-x" "pcmpl-x.el" (22180 39318 463077
-;;;;;; 245000))
+;;;### (autoloads nil "pcmpl-x" "pcmpl-x.el" (22164 57535 259192
+;;;;;; 607000))
;;; Generated autoloads from pcmpl-x.el
(autoload 'pcomplete/tlmgr "pcmpl-x" "\
;;;***
\f
-;;;### (autoloads nil "pcomplete" "pcomplete.el" (22180 39318 463077
-;;;;;; 245000))
+;;;### (autoloads nil "pcomplete" "pcomplete.el" (22164 57535 259192
+;;;;;; 607000))
;;; Generated autoloads from pcomplete.el
(autoload 'pcomplete "pcomplete" "\
;;;***
\f
-;;;### (autoloads nil "pcvs" "vc/pcvs.el" (22183 58408 707001 720000))
+;;;### (autoloads nil "pcvs" "vc/pcvs.el" (22189 60739 309741 19000))
;;; Generated autoloads from vc/pcvs.el
(autoload 'cvs-checkout "pcvs" "\
;;;***
\f
-;;;### (autoloads nil "pcvs-defs" "vc/pcvs-defs.el" (22180 39318
-;;;;;; 552076 836000))
+;;;### (autoloads nil "pcvs-defs" "vc/pcvs-defs.el" (22164 57535
+;;;;;; 859192 607000))
;;; Generated autoloads from vc/pcvs-defs.el
(defvar cvs-global-menu (let ((m (make-sparse-keymap "PCL-CVS"))) (define-key m [status] `(menu-item ,(purecopy "Directory Status") cvs-status :help ,(purecopy "A more verbose status of a workarea"))) (define-key m [checkout] `(menu-item ,(purecopy "Checkout Module") cvs-checkout :help ,(purecopy "Check out a module from the repository"))) (define-key m [update] `(menu-item ,(purecopy "Update Directory") cvs-update :help ,(purecopy "Fetch updates from the repository"))) (define-key m [examine] `(menu-item ,(purecopy "Examine Directory") cvs-examine :help ,(purecopy "Examine the current state of a workarea"))) (fset 'cvs-global-menu m)) "\
;;;***
\f
-;;;### (autoloads nil "perl-mode" "progmodes/perl-mode.el" (22180
-;;;;;; 39318 498077 84000))
+;;;### (autoloads nil "perl-mode" "progmodes/perl-mode.el" (22164
+;;;;;; 57535 539192 607000))
;;; Generated autoloads from progmodes/perl-mode.el
(put 'perl-indent-level 'safe-local-variable 'integerp)
(put 'perl-continued-statement-offset 'safe-local-variable 'integerp)
;;;***
\f
-;;;### (autoloads nil "picture" "textmodes/picture.el" (22180 39318
-;;;;;; 532076 928000))
+;;;### (autoloads nil "picture" "textmodes/picture.el" (22164 57535
+;;;;;; 807192 607000))
;;; Generated autoloads from textmodes/picture.el
(autoload 'picture-mode "picture" "\
;;;***
\f
-;;;### (autoloads nil "pinentry" "net/pinentry.el" (22180 39318 411077
-;;;;;; 484000))
+;;;### (autoloads nil "pinentry" "net/pinentry.el" (22164 57534 955192
+;;;;;; 607000))
;;; Generated autoloads from net/pinentry.el
(push (purecopy '(pinentry 0 1)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "plstore" "gnus/plstore.el" (22180 39318 353077
-;;;;;; 751000))
+;;;### (autoloads nil "plstore" "gnus/plstore.el" (22164 57534 691192
+;;;;;; 607000))
;;; Generated autoloads from gnus/plstore.el
(autoload 'plstore-open "plstore" "\
;;;***
\f
-;;;### (autoloads nil "po" "textmodes/po.el" (22180 39318 533076
-;;;;;; 923000))
+;;;### (autoloads nil "po" "textmodes/po.el" (22164 57535 807192
+;;;;;; 607000))
;;; Generated autoloads from textmodes/po.el
(autoload 'po-find-file-coding-system "po" "\
;;;***
\f
-;;;### (autoloads nil "pong" "play/pong.el" (22180 39318 467077 227000))
+;;;### (autoloads nil "pong" "play/pong.el" (22164 57535 303192 607000))
;;; Generated autoloads from play/pong.el
(autoload 'pong "pong" "\
;;;***
\f
-;;;### (autoloads nil "pop3" "gnus/pop3.el" (22180 39318 354077 747000))
+;;;### (autoloads nil "pop3" "gnus/pop3.el" (22164 57534 691192 607000))
;;; Generated autoloads from gnus/pop3.el
(autoload 'pop3-movemail "pop3" "\
;;;***
\f
-;;;### (autoloads nil "pp" "emacs-lisp/pp.el" (22180 39318 292078
-;;;;;; 32000))
+;;;### (autoloads nil "pp" "emacs-lisp/pp.el" (22164 57534 207192
+;;;;;; 607000))
;;; Generated autoloads from emacs-lisp/pp.el
(autoload 'pp-to-string "pp" "\
;;;***
\f
-;;;### (autoloads nil "printing" "printing.el" (22180 39318 468077
-;;;;;; 222000))
+;;;### (autoloads nil "printing" "printing.el" (22164 57535 315192
+;;;;;; 607000))
;;; Generated autoloads from printing.el
(push (purecopy '(printing 6 9 3)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "proced" "proced.el" (22180 39318 469077 218000))
+;;;### (autoloads nil "proced" "proced.el" (22164 57535 315192 607000))
;;; Generated autoloads from proced.el
(autoload 'proced "proced" "\
;;;***
\f
-;;;### (autoloads nil "profiler" "profiler.el" (22180 39318 469077
-;;;;;; 218000))
+;;;### (autoloads nil "profiler" "profiler.el" (22164 57535 319192
+;;;;;; 607000))
;;; Generated autoloads from profiler.el
(autoload 'profiler-start "profiler" "\
;;;***
\f
-;;;### (autoloads nil "project" "progmodes/project.el" (22188 33909
-;;;;;; 812230 144000))
+;;;### (autoloads nil "project" "progmodes/project.el" (22189 60739
+;;;;;; 129741 19000))
;;; Generated autoloads from progmodes/project.el
(autoload 'project-current "project" "\
;;;***
\f
-;;;### (autoloads nil "prolog" "progmodes/prolog.el" (22188 33909
-;;;;;; 813230 138000))
+;;;### (autoloads nil "prolog" "progmodes/prolog.el" (22189 60739
+;;;;;; 133741 19000))
;;; Generated autoloads from progmodes/prolog.el
(autoload 'prolog-mode "prolog" "\
;;;***
\f
-;;;### (autoloads nil "ps-bdf" "ps-bdf.el" (22180 39318 513077 15000))
+;;;### (autoloads nil "ps-bdf" "ps-bdf.el" (22164 57535 651192 607000))
;;; Generated autoloads from ps-bdf.el
(defvar bdf-directory-list (if (memq system-type '(ms-dos windows-nt)) (list (expand-file-name "fonts/bdf" installation-directory)) '("/usr/local/share/emacs/fonts/bdf")) "\
;;;***
\f
-;;;### (autoloads nil "ps-mode" "progmodes/ps-mode.el" (22180 39318
-;;;;;; 500077 75000))
+;;;### (autoloads nil "ps-mode" "progmodes/ps-mode.el" (22164 57535
+;;;;;; 543192 607000))
;;; Generated autoloads from progmodes/ps-mode.el
(push (purecopy '(ps-mode 1 1 9)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "ps-print" "ps-print.el" (22180 39318 514077
-;;;;;; 11000))
+;;;### (autoloads nil "ps-print" "ps-print.el" (22164 57535 659192
+;;;;;; 607000))
;;; Generated autoloads from ps-print.el
(push (purecopy '(ps-print 7 3 5)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "pulse" "cedet/pulse.el" (22180 39318 252078
-;;;;;; 216000))
+;;;### (autoloads nil "pulse" "cedet/pulse.el" (22164 57533 943192
+;;;;;; 607000))
;;; Generated autoloads from cedet/pulse.el
(push (purecopy '(pulse 1 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "python" "progmodes/python.el" (22183 58408
-;;;;;; 699001 784000))
+;;;### (autoloads nil "python" "progmodes/python.el" (22189 60739
+;;;;;; 137741 19000))
;;; Generated autoloads from progmodes/python.el
(push (purecopy '(python 0 25 1)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "qp" "gnus/qp.el" (22180 39318 354077 747000))
+;;;### (autoloads nil "qp" "gnus/qp.el" (22164 57534 691192 607000))
;;; Generated autoloads from gnus/qp.el
(autoload 'quoted-printable-decode-region "qp" "\
;;;***
\f
-;;;### (autoloads nil "quail" "international/quail.el" (22180 39318
-;;;;;; 368077 682000))
+;;;### (autoloads nil "quail" "international/quail.el" (22189 60738
+;;;;;; 377741 19000))
;;; Generated autoloads from international/quail.el
(autoload 'quail-title "quail" "\
;;;***
\f
-;;;### (autoloads nil "quail/hangul" "leim/quail/hangul.el" (22180
-;;;;;; 39318 382077 618000))
+;;;### (autoloads nil "quail/hangul" "leim/quail/hangul.el" (22164
+;;;;;; 57534 791192 607000))
;;; Generated autoloads from leim/quail/hangul.el
(autoload 'hangul-input-method-activate "quail/hangul" "\
;;;***
\f
;;;### (autoloads nil "quail/uni-input" "leim/quail/uni-input.el"
-;;;;;; (22180 39318 385077 604000))
+;;;;;; (22164 57534 799192 607000))
;;; Generated autoloads from leim/quail/uni-input.el
(autoload 'ucs-input-activate "quail/uni-input" "\
;;;***
\f
-;;;### (autoloads nil "quickurl" "net/quickurl.el" (22180 39318 412077
-;;;;;; 480000))
+;;;### (autoloads nil "quickurl" "net/quickurl.el" (22164 57534 955192
+;;;;;; 607000))
;;; Generated autoloads from net/quickurl.el
(defconst quickurl-reread-hook-postfix "\n;; Local Variables:\n;; eval: (progn (require 'quickurl) (add-hook 'local-write-file-hooks (lambda () (quickurl-read) nil)))\n;; End:\n" "\
;;;***
\f
-;;;### (autoloads nil "rcirc" "net/rcirc.el" (22180 39318 413077
-;;;;;; 475000))
+;;;### (autoloads nil "rcirc" "net/rcirc.el" (22191 16060 565822
+;;;;;; 179000))
;;; Generated autoloads from net/rcirc.el
(autoload 'rcirc "rcirc" "\
(autoload 'rcirc-connect "rcirc" "\
-\(fn SERVER &optional PORT NICK USER-NAME FULL-NAME STARTUP-CHANNELS PASSWORD ENCRYPTION)" nil nil)
+\(fn SERVER &optional PORT NICK USER-NAME FULL-NAME STARTUP-CHANNELS PASSWORD ENCRYPTION SERVER-ALIAS)" nil nil)
(defvar rcirc-track-minor-mode nil "\
Non-nil if Rcirc-Track minor mode is enabled.
;;;***
\f
-;;;### (autoloads nil "re-builder" "emacs-lisp/re-builder.el" (22180
-;;;;;; 39318 292078 32000))
+;;;### (autoloads nil "re-builder" "emacs-lisp/re-builder.el" (22164
+;;;;;; 57534 211192 607000))
;;; Generated autoloads from emacs-lisp/re-builder.el
(defalias 'regexp-builder 're-builder)
;;;***
\f
-;;;### (autoloads nil "recentf" "recentf.el" (22180 39318 515077
-;;;;;; 6000))
+;;;### (autoloads nil "recentf" "recentf.el" (22164 57535 675192
+;;;;;; 607000))
;;; Generated autoloads from recentf.el
(defvar recentf-mode nil "\
;;;***
\f
-;;;### (autoloads nil "rect" "rect.el" (22180 39318 515077 6000))
+;;;### (autoloads nil "rect" "rect.el" (22174 6972 772792 520000))
;;; Generated autoloads from rect.el
(autoload 'delete-rectangle "rect" "\
;;;***
\f
-;;;### (autoloads nil "refill" "textmodes/refill.el" (22180 39318
-;;;;;; 533076 923000))
+;;;### (autoloads nil "refill" "textmodes/refill.el" (22164 57535
+;;;;;; 811192 607000))
;;; Generated autoloads from textmodes/refill.el
(autoload 'refill-mode "refill" "\
;;;***
\f
-;;;### (autoloads nil "reftex" "textmodes/reftex.el" (22180 39318
-;;;;;; 536076 909000))
+;;;### (autoloads nil "reftex" "textmodes/reftex.el" (22164 57535
+;;;;;; 815192 607000))
;;; Generated autoloads from textmodes/reftex.el
(autoload 'reftex-citation "reftex-cite" nil t)
(autoload 'reftex-all-document-files "reftex-parse")
;;;***
\f
-;;;### (autoloads nil "reftex-vars" "textmodes/reftex-vars.el" (22183
-;;;;;; 58408 706001 728000))
+;;;### (autoloads nil "reftex-vars" "textmodes/reftex-vars.el" (22189
+;;;;;; 60739 285741 19000))
;;; Generated autoloads from textmodes/reftex-vars.el
(put 'reftex-vref-is-default 'safe-local-variable (lambda (x) (or (stringp x) (symbolp x))))
(put 'reftex-fref-is-default 'safe-local-variable (lambda (x) (or (stringp x) (symbolp x))))
;;;***
\f
-;;;### (autoloads nil "regexp-opt" "emacs-lisp/regexp-opt.el" (22180
-;;;;;; 39318 292078 32000))
+;;;### (autoloads nil "regexp-opt" "emacs-lisp/regexp-opt.el" (22164
+;;;;;; 57534 211192 607000))
;;; Generated autoloads from emacs-lisp/regexp-opt.el
(autoload 'regexp-opt "regexp-opt" "\
;;;***
\f
-;;;### (autoloads nil "regi" "emacs-lisp/regi.el" (22180 39318 292078
-;;;;;; 32000))
+;;;### (autoloads nil "regi" "emacs-lisp/regi.el" (22164 57534 211192
+;;;;;; 607000))
;;; Generated autoloads from emacs-lisp/regi.el
(push (purecopy '(regi 1 8)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "remember" "textmodes/remember.el" (22180 39318
-;;;;;; 536076 909000))
+;;;### (autoloads nil "remember" "textmodes/remember.el" (22164 57535
+;;;;;; 815192 607000))
;;; Generated autoloads from textmodes/remember.el
(push (purecopy '(remember 2 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "repeat" "repeat.el" (22180 39318 515077 6000))
+;;;### (autoloads nil "repeat" "repeat.el" (22164 57535 675192 607000))
;;; Generated autoloads from repeat.el
(push (purecopy '(repeat 0 51)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "reporter" "mail/reporter.el" (22180 39318
-;;;;;; 388077 590000))
+;;;### (autoloads nil "reporter" "mail/reporter.el" (22164 57534
+;;;;;; 811192 607000))
;;; Generated autoloads from mail/reporter.el
(autoload 'reporter-submit-bug-report "reporter" "\
;;;***
\f
-;;;### (autoloads nil "reposition" "reposition.el" (22180 39318 516077
-;;;;;; 2000))
+;;;### (autoloads nil "reposition" "reposition.el" (22164 57535 679192
+;;;;;; 607000))
;;; Generated autoloads from reposition.el
(autoload 'reposition-window "reposition" "\
;;;***
\f
-;;;### (autoloads nil "reveal" "reveal.el" (22180 39318 516077 2000))
+;;;### (autoloads nil "reveal" "reveal.el" (22164 57535 679192 607000))
;;; Generated autoloads from reveal.el
(autoload 'reveal-mode "reveal" "\
;;;***
\f
-;;;### (autoloads nil "ring" "emacs-lisp/ring.el" (22180 39318 292078
-;;;;;; 32000))
+;;;### (autoloads nil "ring" "emacs-lisp/ring.el" (22164 57534 211192
+;;;;;; 607000))
;;; Generated autoloads from emacs-lisp/ring.el
(autoload 'ring-p "ring" "\
;;;***
\f
-;;;### (autoloads nil "rlogin" "net/rlogin.el" (22180 39318 413077
-;;;;;; 475000))
+;;;### (autoloads nil "rlogin" "net/rlogin.el" (22164 57534 959192
+;;;;;; 607000))
;;; Generated autoloads from net/rlogin.el
(autoload 'rlogin "rlogin" "\
;;;***
\f
-;;;### (autoloads nil "rmail" "mail/rmail.el" (22180 39318 389077
-;;;;;; 585000))
+;;;### (autoloads nil "rmail" "mail/rmail.el" (22174 6972 640792
+;;;;;; 520000))
;;; Generated autoloads from mail/rmail.el
(defvar rmail-file-name (purecopy "~/RMAIL") "\
;;;***
\f
-;;;### (autoloads nil "rmailout" "mail/rmailout.el" (22180 39318
-;;;;;; 390077 581000))
+;;;### (autoloads nil "rmailout" "mail/rmailout.el" (22164 57534
+;;;;;; 831192 607000))
;;; Generated autoloads from mail/rmailout.el
(put 'rmail-output-file-alist 'risky-local-variable t)
;;;***
\f
-;;;### (autoloads nil "rng-cmpct" "nxml/rng-cmpct.el" (22180 39318
-;;;;;; 423077 429000))
+;;;### (autoloads nil "rng-cmpct" "nxml/rng-cmpct.el" (22183 21960
+;;;;;; 606603 947000))
;;; Generated autoloads from nxml/rng-cmpct.el
(autoload 'rng-c-load-schema "rng-cmpct" "\
;;;***
\f
-;;;### (autoloads nil "rng-nxml" "nxml/rng-nxml.el" (22180 39318
-;;;;;; 424077 425000))
+;;;### (autoloads nil "rng-nxml" "nxml/rng-nxml.el" (22171 30780
+;;;;;; 160984 795000))
;;; Generated autoloads from nxml/rng-nxml.el
(autoload 'rng-nxml-mode-init "rng-nxml" "\
;;;***
\f
-;;;### (autoloads nil "rng-valid" "nxml/rng-valid.el" (22180 39318
-;;;;;; 425077 420000))
+;;;### (autoloads nil "rng-valid" "nxml/rng-valid.el" (22171 30780
+;;;;;; 172984 795000))
;;; Generated autoloads from nxml/rng-valid.el
(autoload 'rng-validate-mode "rng-valid" "\
;;;***
\f
-;;;### (autoloads nil "rng-xsd" "nxml/rng-xsd.el" (22180 39318 426077
-;;;;;; 415000))
+;;;### (autoloads nil "rng-xsd" "nxml/rng-xsd.el" (22170 9914 185954
+;;;;;; 164000))
;;; Generated autoloads from nxml/rng-xsd.el
-(put 'http://www\.w3\.org/2001/XMLSchema-datatypes 'rng-dt-compile 'rng-xsd-compile)
+(put 'http://www\.w3\.org/2001/XMLSchema-datatypes 'rng-dt-compile #'rng-xsd-compile)
(autoload 'rng-xsd-compile "rng-xsd" "\
Provides W3C XML Schema as a RELAX NG datatypes library.
NAME is a symbol giving the local name of the datatype. PARAMS is a
list of pairs (PARAM-NAME . PARAM-VALUE) where PARAM-NAME is a symbol
giving the name of the parameter and PARAM-VALUE is a string giving
-its value. If NAME or PARAMS are invalid, it calls rng-dt-error
+its value. If NAME or PARAMS are invalid, it calls `rng-dt-error'
passing it arguments in the same style as format; the value from
-rng-dt-error will be returned. Otherwise, it returns a list. The
+`rng-dt-error' will be returned. Otherwise, it returns a list. The
first member of the list is t if any string is a legal value for the
datatype and nil otherwise. The second argument is a symbol; this
symbol will be called as a function passing it a string followed by
;;;***
\f
-;;;### (autoloads nil "robin" "international/robin.el" (22122 65326
-;;;;;; 50715 656000))
+;;;### (autoloads nil "robin" "international/robin.el" (21953 58033
+;;;;;; 303058 929000))
;;; Generated autoloads from international/robin.el
(autoload 'robin-define-package "robin" "\
;;;***
\f
-;;;### (autoloads nil "rot13" "rot13.el" (22180 39318 516077 2000))
+;;;### (autoloads nil "rot13" "rot13.el" (22164 57535 679192 607000))
;;; Generated autoloads from rot13.el
(autoload 'rot13 "rot13" "\
;;;***
\f
-;;;### (autoloads nil "rst" "textmodes/rst.el" (22180 39318 537076
-;;;;;; 905000))
+;;;### (autoloads nil "rst" "textmodes/rst.el" (22164 57535 819192
+;;;;;; 607000))
;;; Generated autoloads from textmodes/rst.el
(add-to-list 'auto-mode-alist (purecopy '("\\.re?st\\'" . rst-mode)))
;;;***
\f
-;;;### (autoloads nil "ruby-mode" "progmodes/ruby-mode.el" (22180
-;;;;;; 39318 502077 66000))
+;;;### (autoloads nil "ruby-mode" "progmodes/ruby-mode.el" (22189
+;;;;;; 60739 145741 19000))
;;; Generated autoloads from progmodes/ruby-mode.el
(push (purecopy '(ruby-mode 1 2)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "ruler-mode" "ruler-mode.el" (22180 39318 517076
-;;;;;; 997000))
+;;;### (autoloads nil "ruler-mode" "ruler-mode.el" (22164 57535 683192
+;;;;;; 607000))
;;; Generated autoloads from ruler-mode.el
(push (purecopy '(ruler-mode 1 6)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "rx" "emacs-lisp/rx.el" (22180 39318 292078
-;;;;;; 32000))
+;;;### (autoloads nil "rx" "emacs-lisp/rx.el" (22164 57534 211192
+;;;;;; 607000))
;;; Generated autoloads from emacs-lisp/rx.el
(autoload 'rx-to-string "rx" "\
;;;***
\f
-;;;### (autoloads nil "sasl-ntlm" "net/sasl-ntlm.el" (22180 39318
-;;;;;; 413077 475000))
+;;;### (autoloads nil "sasl-ntlm" "net/sasl-ntlm.el" (22164 57534
+;;;;;; 963192 607000))
;;; Generated autoloads from net/sasl-ntlm.el
(push (purecopy '(sasl 1 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "savehist" "savehist.el" (22180 39318 517076
-;;;;;; 997000))
+;;;### (autoloads nil "savehist" "savehist.el" (22164 57535 683192
+;;;;;; 607000))
;;; Generated autoloads from savehist.el
(push (purecopy '(savehist 24)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "saveplace" "saveplace.el" (22180 39318 517076
-;;;;;; 997000))
+;;;### (autoloads nil "saveplace" "saveplace.el" (22164 57535 683192
+;;;;;; 607000))
;;; Generated autoloads from saveplace.el
(defvar save-place-mode nil "\
;;;***
\f
-;;;### (autoloads nil "scheme" "progmodes/scheme.el" (22180 39318
-;;;;;; 502077 66000))
+;;;### (autoloads nil "scheme" "progmodes/scheme.el" (22164 57535
+;;;;;; 551192 607000))
;;; Generated autoloads from progmodes/scheme.el
(autoload 'scheme-mode "scheme" "\
;;;***
\f
-;;;### (autoloads nil "score-mode" "gnus/score-mode.el" (22180 39318
-;;;;;; 354077 747000))
+;;;### (autoloads nil "score-mode" "gnus/score-mode.el" (22164 57534
+;;;;;; 695192 607000))
;;; Generated autoloads from gnus/score-mode.el
(autoload 'gnus-score-mode "score-mode" "\
;;;***
\f
-;;;### (autoloads nil "scroll-all" "scroll-all.el" (22180 39318 517076
-;;;;;; 997000))
+;;;### (autoloads nil "scroll-all" "scroll-all.el" (22164 57535 683192
+;;;;;; 607000))
;;; Generated autoloads from scroll-all.el
(defvar scroll-all-mode nil "\
;;;***
\f
-;;;### (autoloads nil "scroll-lock" "scroll-lock.el" (22180 39318
-;;;;;; 517076 997000))
+;;;### (autoloads nil "scroll-lock" "scroll-lock.el" (22164 57535
+;;;;;; 683192 607000))
;;; Generated autoloads from scroll-lock.el
(autoload 'scroll-lock-mode "scroll-lock" "\
;;;***
\f
-;;;### (autoloads nil "secrets" "net/secrets.el" (22180 39318 413077
-;;;;;; 475000))
+;;;### (autoloads nil "secrets" "net/secrets.el" (22164 57534 963192
+;;;;;; 607000))
;;; Generated autoloads from net/secrets.el
(when (featurep 'dbusbind)
(autoload 'secrets-show-secrets "secrets" nil t))
;;;***
\f
-;;;### (autoloads nil "semantic" "cedet/semantic.el" (22180 39318
-;;;;;; 253078 211000))
+;;;### (autoloads nil "semantic" "cedet/semantic.el" (22164 57533
+;;;;;; 947192 607000))
;;; Generated autoloads from cedet/semantic.el
(push (purecopy '(semantic 2 2)) package--builtin-versions)
;;;***
\f
;;;### (autoloads nil "semantic/bovine/grammar" "cedet/semantic/bovine/grammar.el"
-;;;;;; (22180 39318 254078 206000))
+;;;;;; (22164 57533 951192 607000))
;;; Generated autoloads from cedet/semantic/bovine/grammar.el
(autoload 'bovine-grammar-mode "semantic/bovine/grammar" "\
;;;***
\f
;;;### (autoloads nil "semantic/wisent/grammar" "cedet/semantic/wisent/grammar.el"
-;;;;;; (22180 39318 267078 147000))
+;;;;;; (22164 57534 7192 607000))
;;; Generated autoloads from cedet/semantic/wisent/grammar.el
(autoload 'wisent-grammar-mode "semantic/wisent/grammar" "\
;;;***
\f
-;;;### (autoloads nil "sendmail" "mail/sendmail.el" (22180 39318
-;;;;;; 391077 576000))
+;;;### (autoloads nil "sendmail" "mail/sendmail.el" (22164 57534
+;;;;;; 839192 607000))
;;; Generated autoloads from mail/sendmail.el
(defvar mail-from-style 'default "\
;;;***
\f
-;;;### (autoloads nil "seq" "emacs-lisp/seq.el" (22180 39318 293078
-;;;;;; 27000))
+;;;### (autoloads nil "seq" "emacs-lisp/seq.el" (22164 57534 211192
+;;;;;; 607000))
;;; Generated autoloads from emacs-lisp/seq.el
(push (purecopy '(seq 2 3)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "server" "server.el" (22180 39318 518076 992000))
+;;;### (autoloads nil "server" "server.el" (22164 57535 687192 607000))
;;; Generated autoloads from server.el
(put 'server-host 'risky-local-variable t)
;;;***
\f
-;;;### (autoloads nil "ses" "ses.el" (22188 33909 814230 133000))
+;;;### (autoloads nil "ses" "ses.el" (22175 27834 469911 436000))
;;; Generated autoloads from ses.el
(autoload 'ses-mode "ses" "\
;;;***
\f
-;;;### (autoloads nil "sgml-mode" "textmodes/sgml-mode.el" (22180
-;;;;;; 39318 537076 905000))
+;;;### (autoloads nil "sgml-mode" "textmodes/sgml-mode.el" (22183
+;;;;;; 21960 642603 947000))
;;; Generated autoloads from textmodes/sgml-mode.el
(autoload 'sgml-mode "sgml-mode" "\
;;;***
\f
-;;;### (autoloads nil "sh-script" "progmodes/sh-script.el" (22180
-;;;;;; 39318 503077 61000))
+;;;### (autoloads nil "sh-script" "progmodes/sh-script.el" (22164
+;;;;;; 57535 559192 607000))
;;; Generated autoloads from progmodes/sh-script.el
(push (purecopy '(sh-script 2 0 6)) package--builtin-versions)
(put 'sh-shell 'safe-local-variable 'symbolp)
;;;***
\f
-;;;### (autoloads nil "shadow" "emacs-lisp/shadow.el" (22180 39318
-;;;;;; 293078 27000))
+;;;### (autoloads nil "shadow" "emacs-lisp/shadow.el" (22164 57534
+;;;;;; 211192 607000))
;;; Generated autoloads from emacs-lisp/shadow.el
(autoload 'list-load-path-shadows "shadow" "\
;;;***
\f
-;;;### (autoloads nil "shadowfile" "shadowfile.el" (22180 39318 519076
-;;;;;; 988000))
+;;;### (autoloads nil "shadowfile" "shadowfile.el" (22164 57535 703192
+;;;;;; 607000))
;;; Generated autoloads from shadowfile.el
(autoload 'shadow-define-cluster "shadowfile" "\
;;;***
\f
-;;;### (autoloads nil "shell" "shell.el" (22180 39318 519076 988000))
+;;;### (autoloads nil "shell" "shell.el" (22164 57535 703192 607000))
;;; Generated autoloads from shell.el
(defvar shell-dumb-shell-regexp (purecopy "cmd\\(proxy\\)?\\.exe") "\
;;;***
\f
-;;;### (autoloads nil "shr" "net/shr.el" (22188 33909 809230 162000))
+;;;### (autoloads nil "shr" "net/shr.el" (22189 60738 497741 19000))
;;; Generated autoloads from net/shr.el
(autoload 'shr-render-region "shr" "\
;;;***
\f
-;;;### (autoloads nil "sieve" "gnus/sieve.el" (22180 39318 355077
-;;;;;; 742000))
+;;;### (autoloads nil "sieve" "gnus/sieve.el" (22164 57534 699192
+;;;;;; 607000))
;;; Generated autoloads from gnus/sieve.el
(autoload 'sieve-manage "sieve" "\
;;;***
\f
-;;;### (autoloads nil "sieve-mode" "gnus/sieve-mode.el" (22180 39318
-;;;;;; 355077 742000))
+;;;### (autoloads nil "sieve-mode" "gnus/sieve-mode.el" (22164 57534
+;;;;;; 695192 607000))
;;; Generated autoloads from gnus/sieve-mode.el
(autoload 'sieve-mode "sieve-mode" "\
;;;***
\f
-;;;### (autoloads nil "simula" "progmodes/simula.el" (22180 39318
-;;;;;; 503077 61000))
+;;;### (autoloads nil "simula" "progmodes/simula.el" (22164 57535
+;;;;;; 559192 607000))
;;; Generated autoloads from progmodes/simula.el
(autoload 'simula-mode "simula" "\
;;;***
\f
-;;;### (autoloads nil "skeleton" "skeleton.el" (22180 39318 521076
-;;;;;; 978000))
+;;;### (autoloads nil "skeleton" "skeleton.el" (22164 57535 731192
+;;;;;; 607000))
;;; Generated autoloads from skeleton.el
(defvar skeleton-filter-function 'identity "\
;;;***
\f
-;;;### (autoloads nil "smerge-mode" "vc/smerge-mode.el" (22180 39318
-;;;;;; 554076 827000))
+;;;### (autoloads nil "smerge-mode" "vc/smerge-mode.el" (22189 60739
+;;;;;; 309741 19000))
;;; Generated autoloads from vc/smerge-mode.el
(autoload 'smerge-ediff "smerge-mode" "\
Invoke ediff to resolve the conflicts.
-NAME-MINE, NAME-OTHER, and NAME-BASE, if non-nil, are used for the
+NAME-UPPER, NAME-LOWER, and NAME-BASE, if non-nil, are used for the
buffer names.
-\(fn &optional NAME-MINE NAME-OTHER NAME-BASE)" t nil)
+\(fn &optional NAME-UPPER NAME-LOWER NAME-BASE)" t nil)
(autoload 'smerge-mode "smerge-mode" "\
Minor mode to simplify editing output from the diff3 program.
;;;***
\f
-;;;### (autoloads nil "smiley" "gnus/smiley.el" (22180 39318 355077
-;;;;;; 742000))
+;;;### (autoloads nil "smiley" "gnus/smiley.el" (22164 57534 699192
+;;;;;; 607000))
;;; Generated autoloads from gnus/smiley.el
(autoload 'smiley-region "smiley" "\
;;;***
\f
-;;;### (autoloads nil "smtpmail" "mail/smtpmail.el" (22180 39318
-;;;;;; 391077 576000))
+;;;### (autoloads nil "smtpmail" "mail/smtpmail.el" (22164 57534
+;;;;;; 839192 607000))
;;; Generated autoloads from mail/smtpmail.el
(autoload 'smtpmail-send-it "smtpmail" "\
;;;***
\f
-;;;### (autoloads nil "snake" "play/snake.el" (22180 39318 467077
-;;;;;; 227000))
+;;;### (autoloads nil "snake" "play/snake.el" (22164 57535 307192
+;;;;;; 607000))
;;; Generated autoloads from play/snake.el
(autoload 'snake "snake" "\
;;;***
\f
-;;;### (autoloads nil "snmp-mode" "net/snmp-mode.el" (22180 39318
-;;;;;; 414077 471000))
+;;;### (autoloads nil "snmp-mode" "net/snmp-mode.el" (22164 57534
+;;;;;; 967192 607000))
;;; Generated autoloads from net/snmp-mode.el
(autoload 'snmp-mode "snmp-mode" "\
;;;***
\f
-;;;### (autoloads nil "soap-client" "net/soap-client.el" (22180 39318
-;;;;;; 415077 466000))
+;;;### (autoloads nil "soap-client" "net/soap-client.el" (22164 57534
+;;;;;; 987192 607000))
;;; Generated autoloads from net/soap-client.el
(push (purecopy '(soap-client 3 0 2)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "solar" "calendar/solar.el" (22180 39318 245078
-;;;;;; 248000))
+;;;### (autoloads nil "solar" "calendar/solar.el" (22164 57533 859192
+;;;;;; 607000))
;;; Generated autoloads from calendar/solar.el
(autoload 'sunrise-sunset "solar" "\
;;;***
\f
-;;;### (autoloads nil "solitaire" "play/solitaire.el" (22180 39318
-;;;;;; 467077 227000))
+;;;### (autoloads nil "solitaire" "play/solitaire.el" (22164 57535
+;;;;;; 307192 607000))
;;; Generated autoloads from play/solitaire.el
(autoload 'solitaire "solitaire" "\
;;;***
\f
-;;;### (autoloads nil "sort" "sort.el" (22180 39318 521076 978000))
+;;;### (autoloads nil "sort" "sort.el" (22164 57535 731192 607000))
;;; Generated autoloads from sort.el
(put 'sort-fold-case 'safe-local-variable 'booleanp)
;;;***
\f
-;;;### (autoloads nil "spam" "gnus/spam.el" (22180 39318 356077 737000))
+;;;### (autoloads nil "spam" "gnus/spam.el" (22164 57534 703192 607000))
;;; Generated autoloads from gnus/spam.el
(autoload 'spam-initialize "spam" "\
;;;***
\f
-;;;### (autoloads nil "spam-report" "gnus/spam-report.el" (22180
-;;;;;; 39318 355077 742000))
+;;;### (autoloads nil "spam-report" "gnus/spam-report.el" (22164
+;;;;;; 57534 699192 607000))
;;; Generated autoloads from gnus/spam-report.el
(autoload 'spam-report-process-queue "spam-report" "\
;;;***
\f
-;;;### (autoloads nil "speedbar" "speedbar.el" (22180 39318 522076
-;;;;;; 974000))
+;;;### (autoloads nil "speedbar" "speedbar.el" (22164 57535 751192
+;;;;;; 607000))
;;; Generated autoloads from speedbar.el
(defalias 'speedbar 'speedbar-frame-mode)
;;;***
\f
-;;;### (autoloads nil "spook" "play/spook.el" (22180 39318 467077
-;;;;;; 227000))
+;;;### (autoloads nil "spook" "play/spook.el" (22164 57535 307192
+;;;;;; 607000))
;;; Generated autoloads from play/spook.el
(autoload 'spook "spook" "\
;;;***
\f
-;;;### (autoloads nil "sql" "progmodes/sql.el" (22180 39318 505077
-;;;;;; 52000))
+;;;### (autoloads nil "sql" "progmodes/sql.el" (22189 60739 161741
+;;;;;; 19000))
;;; Generated autoloads from progmodes/sql.el
(push (purecopy '(sql 3 5)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "srecode" "cedet/srecode.el" (22180 39318 268078
-;;;;;; 142000))
+;;;### (autoloads nil "srecode" "cedet/srecode.el" (22164 57534 7192
+;;;;;; 607000))
;;; Generated autoloads from cedet/srecode.el
(push (purecopy '(srecode 1 2)) package--builtin-versions)
;;;***
\f
;;;### (autoloads nil "srecode/srt-mode" "cedet/srecode/srt-mode.el"
-;;;;;; (22180 39318 270078 133000))
+;;;;;; (22164 57534 19192 607000))
;;; Generated autoloads from cedet/srecode/srt-mode.el
(autoload 'srecode-template-mode "srecode/srt-mode" "\
;;;***
\f
-;;;### (autoloads nil "starttls" "gnus/starttls.el" (22180 39318
-;;;;;; 356077 737000))
+;;;### (autoloads nil "starttls" "gnus/starttls.el" (22164 57534
+;;;;;; 703192 607000))
;;; Generated autoloads from gnus/starttls.el
(autoload 'starttls-open-stream "starttls" "\
;;;***
\f
-;;;### (autoloads nil "strokes" "strokes.el" (22183 58408 704001
-;;;;;; 744000))
+;;;### (autoloads nil "strokes" "strokes.el" (22189 60739 257741
+;;;;;; 19000))
;;; Generated autoloads from strokes.el
(autoload 'strokes-global-set-stroke "strokes" "\
;;;***
\f
-;;;### (autoloads nil "studly" "play/studly.el" (21887 52709 923061
-;;;;;; 312000))
+;;;### (autoloads nil "studly" "play/studly.el" (21607 54478 800121
+;;;;;; 42000))
;;; Generated autoloads from play/studly.el
(autoload 'studlify-region "studly" "\
;;;***
\f
-;;;### (autoloads nil "subword" "progmodes/subword.el" (22180 39318
-;;;;;; 505077 52000))
+;;;### (autoloads nil "subword" "progmodes/subword.el" (22164 57535
+;;;;;; 575192 607000))
;;; Generated autoloads from progmodes/subword.el
(define-obsolete-function-alias 'capitalized-words-mode 'subword-mode "25.1")
;;;***
\f
-;;;### (autoloads nil "supercite" "mail/supercite.el" (22180 39318
-;;;;;; 391077 576000))
+;;;### (autoloads nil "supercite" "mail/supercite.el" (22164 57534
+;;;;;; 843192 607000))
;;; Generated autoloads from mail/supercite.el
(autoload 'sc-cite-original "supercite" "\
;;;***
\f
-;;;### (autoloads nil "t-mouse" "t-mouse.el" (22180 39318 524076
-;;;;;; 965000))
+;;;### (autoloads nil "t-mouse" "t-mouse.el" (22164 57535 763192
+;;;;;; 607000))
;;; Generated autoloads from t-mouse.el
(define-obsolete-function-alias 't-mouse-mode 'gpm-mouse-mode "23.1")
;;;***
\f
-;;;### (autoloads nil "tabify" "tabify.el" (22180 39318 524076 965000))
+;;;### (autoloads nil "tabify" "tabify.el" (22164 57535 763192 607000))
;;; Generated autoloads from tabify.el
(autoload 'untabify "tabify" "\
;;;***
\f
-;;;### (autoloads nil "table" "textmodes/table.el" (22188 33909 815230
-;;;;;; 127000))
+;;;### (autoloads nil "table" "textmodes/table.el" (22189 60739 301741
+;;;;;; 19000))
;;; Generated autoloads from textmodes/table.el
(autoload 'table-insert "table" "\
;;;***
\f
-;;;### (autoloads nil "talk" "talk.el" (22180 39318 524076 965000))
+;;;### (autoloads nil "talk" "talk.el" (22164 57535 763192 607000))
;;; Generated autoloads from talk.el
(autoload 'talk-connect "talk" "\
;;;***
\f
-;;;### (autoloads nil "tar-mode" "tar-mode.el" (22180 39318 524076
-;;;;;; 965000))
+;;;### (autoloads nil "tar-mode" "tar-mode.el" (22164 57535 775192
+;;;;;; 607000))
;;; Generated autoloads from tar-mode.el
(autoload 'tar-mode "tar-mode" "\
;;;***
\f
-;;;### (autoloads nil "tcl" "progmodes/tcl.el" (22180 39318 505077
-;;;;;; 52000))
+;;;### (autoloads nil "tcl" "progmodes/tcl.el" (22164 57535 575192
+;;;;;; 607000))
;;; Generated autoloads from progmodes/tcl.el
(autoload 'tcl-mode "tcl" "\
;;;***
\f
-;;;### (autoloads nil "telnet" "net/telnet.el" (22180 39318 415077
-;;;;;; 466000))
+;;;### (autoloads nil "telnet" "net/telnet.el" (22164 57534 987192
+;;;;;; 607000))
;;; Generated autoloads from net/telnet.el
(autoload 'telnet "telnet" "\
;;;***
\f
-;;;### (autoloads nil "term" "term.el" (22180 39318 525076 960000))
+;;;### (autoloads nil "term" "term.el" (22164 57535 787192 607000))
;;; Generated autoloads from term.el
(autoload 'make-term "term" "\
;;;***
\f
-;;;### (autoloads nil "testcover" "emacs-lisp/testcover.el" (22180
-;;;;;; 39318 294078 23000))
+;;;### (autoloads nil "testcover" "emacs-lisp/testcover.el" (22164
+;;;;;; 57534 215192 607000))
;;; Generated autoloads from emacs-lisp/testcover.el
(autoload 'testcover-this-defun "testcover" "\
;;;***
\f
-;;;### (autoloads nil "tetris" "play/tetris.el" (22180 39318 467077
-;;;;;; 227000))
+;;;### (autoloads nil "tetris" "play/tetris.el" (22164 57535 307192
+;;;;;; 607000))
;;; Generated autoloads from play/tetris.el
(push (purecopy '(tetris 2 1)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "tex-mode" "textmodes/tex-mode.el" (22180 39318
-;;;;;; 539076 896000))
+;;;### (autoloads nil "tex-mode" "textmodes/tex-mode.el" (22164 57535
+;;;;;; 823192 607000))
;;; Generated autoloads from textmodes/tex-mode.el
(defvar tex-shell-file-name nil "\
;;;***
\f
-;;;### (autoloads nil "texinfmt" "textmodes/texinfmt.el" (22180 39318
-;;;;;; 540076 891000))
+;;;### (autoloads nil "texinfmt" "textmodes/texinfmt.el" (22164 57535
+;;;;;; 827192 607000))
;;; Generated autoloads from textmodes/texinfmt.el
(autoload 'texinfo-format-buffer "texinfmt" "\
;;;***
\f
-;;;### (autoloads nil "texinfo" "textmodes/texinfo.el" (22180 39318
-;;;;;; 540076 891000))
+;;;### (autoloads nil "texinfo" "textmodes/texinfo.el" (22164 57535
+;;;;;; 827192 607000))
;;; Generated autoloads from textmodes/texinfo.el
(defvar texinfo-open-quote (purecopy "``") "\
;;;***
\f
-;;;### (autoloads nil "thai-util" "language/thai-util.el" (22180
-;;;;;; 39318 375077 650000))
+;;;### (autoloads nil "thai-util" "language/thai-util.el" (22164
+;;;;;; 57534 787192 607000))
;;; Generated autoloads from language/thai-util.el
(autoload 'thai-compose-region "thai-util" "\
;;;***
\f
-;;;### (autoloads nil "thingatpt" "thingatpt.el" (22180 39318 541076
-;;;;;; 887000))
+;;;### (autoloads nil "thingatpt" "thingatpt.el" (22174 6972 812792
+;;;;;; 520000))
;;; Generated autoloads from thingatpt.el
(autoload 'forward-thing "thingatpt" "\
;;;***
\f
-;;;### (autoloads nil "thumbs" "thumbs.el" (22180 39318 541076 887000))
+;;;### (autoloads nil "thumbs" "thumbs.el" (22164 57535 827192 607000))
;;; Generated autoloads from thumbs.el
(autoload 'thumbs-find-thumb "thumbs" "\
;;;***
\f
-;;;### (autoloads nil "thunk" "emacs-lisp/thunk.el" (22180 39318
-;;;;;; 294078 23000))
+;;;### (autoloads nil "thunk" "emacs-lisp/thunk.el" (22164 57534
+;;;;;; 215192 607000))
;;; Generated autoloads from emacs-lisp/thunk.el
(push (purecopy '(thunk 1 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "tibet-util" "language/tibet-util.el" (22180
-;;;;;; 39318 375077 650000))
+;;;### (autoloads nil "tibet-util" "language/tibet-util.el" (22164
+;;;;;; 57534 787192 607000))
;;; Generated autoloads from language/tibet-util.el
(autoload 'tibetan-char-p "tibet-util" "\
;;;***
\f
-;;;### (autoloads nil "tildify" "textmodes/tildify.el" (22180 39318
-;;;;;; 540076 891000))
+;;;### (autoloads nil "tildify" "textmodes/tildify.el" (22174 6972
+;;;;;; 804792 520000))
;;; Generated autoloads from textmodes/tildify.el
(push (purecopy '(tildify 4 6 1)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "time" "time.el" (22180 39318 541076 887000))
+;;;### (autoloads nil "time" "time.el" (22164 57535 831192 607000))
;;; Generated autoloads from time.el
(defvar display-time-day-and-date nil "\
;;;***
\f
-;;;### (autoloads nil "time-date" "calendar/time-date.el" (22180
-;;;;;; 39318 245078 248000))
+;;;### (autoloads nil "time-date" "calendar/time-date.el" (22164
+;;;;;; 57533 859192 607000))
;;; Generated autoloads from calendar/time-date.el
(autoload 'date-to-time "time-date" "\
;;;***
\f
-;;;### (autoloads nil "time-stamp" "time-stamp.el" (22180 39318 541076
-;;;;;; 887000))
+;;;### (autoloads nil "time-stamp" "time-stamp.el" (22176 12043 559798
+;;;;;; 495000))
;;; Generated autoloads from time-stamp.el
(put 'time-stamp-format 'safe-local-variable 'stringp)
(put 'time-stamp-time-zone 'safe-local-variable 'string-or-null-p)
;;;***
\f
-;;;### (autoloads nil "timeclock" "calendar/timeclock.el" (22180
-;;;;;; 39318 245078 248000))
+;;;### (autoloads nil "timeclock" "calendar/timeclock.el" (22164
+;;;;;; 57533 883192 607000))
;;; Generated autoloads from calendar/timeclock.el
(push (purecopy '(timeclock 2 6 1)) package--builtin-versions)
;;;***
\f
;;;### (autoloads nil "titdic-cnv" "international/titdic-cnv.el"
-;;;;;; (22180 39318 369077 678000))
+;;;;;; (22164 57534 755192 607000))
;;; Generated autoloads from international/titdic-cnv.el
(autoload 'titdic-convert "titdic-cnv" "\
;;;***
\f
-;;;### (autoloads nil "tmm" "tmm.el" (22180 39318 542076 882000))
+;;;### (autoloads nil "tmm" "tmm.el" (22164 57535 831192 607000))
;;; Generated autoloads from tmm.el
(define-key global-map "\M-`" 'tmm-menubar)
(define-key global-map [menu-bar mouse-1] 'tmm-menubar-mouse)
;;;***
\f
-;;;### (autoloads nil "todo-mode" "calendar/todo-mode.el" (22180
-;;;;;; 39318 247078 239000))
+;;;### (autoloads nil "todo-mode" "calendar/todo-mode.el" (22189
+;;;;;; 60738 5741 19000))
;;; Generated autoloads from calendar/todo-mode.el
(autoload 'todo-show "todo-mode" "\
;;;***
\f
-;;;### (autoloads nil "tool-bar" "tool-bar.el" (22180 39318 542076
-;;;;;; 882000))
+;;;### (autoloads nil "tool-bar" "tool-bar.el" (22164 57535 831192
+;;;;;; 607000))
;;; Generated autoloads from tool-bar.el
(autoload 'toggle-tool-bar-mode-from-frame "tool-bar" "\
;;;***
\f
-;;;### (autoloads nil "tq" "emacs-lisp/tq.el" (22180 39318 295078
-;;;;;; 18000))
+;;;### (autoloads nil "tq" "emacs-lisp/tq.el" (22164 57534 215192
+;;;;;; 607000))
;;; Generated autoloads from emacs-lisp/tq.el
(autoload 'tq-create "tq" "\
;;;***
\f
-;;;### (autoloads nil "trace" "emacs-lisp/trace.el" (22180 39318
-;;;;;; 295078 18000))
+;;;### (autoloads nil "trace" "emacs-lisp/trace.el" (22164 57534
+;;;;;; 215192 607000))
;;; Generated autoloads from emacs-lisp/trace.el
(defvar trace-buffer "*trace-output*" "\
;;;***
\f
-;;;### (autoloads nil "tramp" "net/tramp.el" (22188 33909 812230
-;;;;;; 144000))
+;;;### (autoloads nil "tramp" "net/tramp.el" (22191 16060 585822
+;;;;;; 179000))
;;; Generated autoloads from net/tramp.el
(defvar tramp-mode t "\
(custom-autoload 'tramp-mode "tramp" t)
-(defvar tramp-syntax (if (featurep 'xemacs) 'sep 'ftp) "\
+(defvar tramp-syntax 'ftp "\
Tramp filename syntax to be used.
It can have the following values:
- `ftp' -- Ange-FTP respective EFS like syntax (GNU Emacs default)
- `sep' -- Syntax as defined for XEmacs.")
+ `ftp' -- Ange-FTP like syntax
+ `sep' -- Syntax as defined for XEmacs originally.")
(custom-autoload 'tramp-syntax "tramp" t)
(defconst tramp-file-name-regexp-unified (if (memq system-type '(cygwin windows-nt)) "\\`/\\(\\[.*\\]\\|[^/|:]\\{2,\\}[^/|]*\\):" "\\`/[^/|:][^/|]*:") "\
Value for `tramp-file-name-regexp' for unified remoting.
-Emacs (not XEmacs) uses a unified filename syntax for Ange-FTP and
-Tramp. See `tramp-file-name-structure' for more explanations.
+See `tramp-file-name-structure' for more explanations.
On W32 systems, the volume letter must be ignored.")
(defconst tramp-file-name-regexp-separate "\\`/\\[.*\\]" "\
Value for `tramp-file-name-regexp' for separate remoting.
-XEmacs uses a separate filename syntax for Tramp and EFS.
See `tramp-file-name-structure' for more explanations.")
(defconst tramp-file-name-regexp (cond ((equal tramp-syntax 'ftp) tramp-file-name-regexp-unified) ((equal tramp-syntax 'sep) tramp-file-name-regexp-separate) (t (error "Wrong `tramp-syntax' defined"))) "\
(defconst tramp-completion-file-name-regexp-unified (if (memq system-type '(cygwin windows-nt)) "\\`/[^/]\\{2,\\}\\'" "\\`/[^/]*\\'") "\
Value for `tramp-completion-file-name-regexp' for unified remoting.
-GNU Emacs uses a unified filename syntax for Tramp and Ange-FTP.
See `tramp-file-name-structure' for more explanations.
On W32 systems, the volume letter must be ignored.")
(defconst tramp-completion-file-name-regexp-separate "\\`/\\([[][^]]*\\)?\\'" "\
Value for `tramp-completion-file-name-regexp' for separate remoting.
-XEmacs uses a separate filename syntax for Tramp and EFS.
See `tramp-file-name-structure' for more explanations.")
(defconst tramp-completion-file-name-regexp (cond ((equal tramp-syntax 'ftp) tramp-completion-file-name-regexp-unified) ((equal tramp-syntax 'sep) tramp-completion-file-name-regexp-separate) (t (error "Wrong `tramp-syntax' defined"))) "\
(defun tramp-completion-file-name-handler (operation &rest args) "\
Invoke Tramp file name completion handler.
-Falls back to normal file name handler if no Tramp file name handler exists." (let ((directory-sep-char 47) (fn (assoc operation tramp-completion-file-name-handler-alist))) (if (and fn tramp-mode (or (eq tramp-syntax (quote sep)) (featurep (quote tramp)) (and (boundp (quote partial-completion-mode)) (symbol-value (quote partial-completion-mode))) (featurep (quote ido)) (featurep (quote icicles)))) (save-match-data (apply (cdr fn) args)) (tramp-completion-run-real-handler operation args))))
+Falls back to normal file name handler if no Tramp file name handler exists." (let ((fn (assoc operation tramp-completion-file-name-handler-alist))) (if (and fn tramp-mode (or (eq tramp-syntax (quote sep)) (featurep (quote tramp)) (and (boundp (quote partial-completion-mode)) (symbol-value (quote partial-completion-mode))) (featurep (quote ido)) (featurep (quote icicles)))) (save-match-data (apply (cdr fn) args)) (tramp-completion-run-real-handler operation args))))
(defun tramp-autoload-file-name-handler (operation &rest args) "\
-Load Tramp file name handler, and perform OPERATION." (let ((default-directory "/")) (load "tramp" nil t)) (apply operation args))
+Load Tramp file name handler, and perform OPERATION." (let ((default-directory temporary-file-directory)) (load "tramp" nil t)) (apply operation args))
(defun tramp-register-autoload-file-name-handlers nil "\
Add Tramp file name handlers to `file-name-handler-alist' during autoload." (add-to-list (quote file-name-handler-alist) (cons tramp-file-name-regexp (quote tramp-autoload-file-name-handler))) (put (quote tramp-autoload-file-name-handler) (quote safe-magic) t) (add-to-list (quote file-name-handler-alist) (cons tramp-completion-file-name-regexp (quote tramp-completion-file-name-handler))) (put (quote tramp-completion-file-name-handler) (quote safe-magic) t))
;;;***
\f
-;;;### (autoloads nil "tramp-ftp" "net/tramp-ftp.el" (22180 39318
-;;;;;; 417077 457000))
+;;;### (autoloads nil "tramp-ftp" "net/tramp-ftp.el" (22168 54586
+;;;;;; 890696 972000))
;;; Generated autoloads from net/tramp-ftp.el
(autoload 'tramp-ftp-enable-ange-ftp "tramp-ftp" "\
;;;***
\f
-;;;### (autoloads nil "trampver" "net/trampver.el" (22180 39318 420077
-;;;;;; 443000))
+;;;### (autoloads nil "trampver" "net/trampver.el" (22168 54586 978696
+;;;;;; 972000))
;;; Generated autoloads from net/trampver.el
-(push (purecopy '(tramp 2 2 13 25 1)) package--builtin-versions)
+(push (purecopy '(tramp 2 3 0 -1)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "tutorial" "tutorial.el" (22180 39318 542076
-;;;;;; 882000))
+;;;### (autoloads nil "tutorial" "tutorial.el" (22164 57535 831192
+;;;;;; 607000))
;;; Generated autoloads from tutorial.el
(autoload 'help-with-tutorial "tutorial" "\
;;;***
\f
-;;;### (autoloads nil "tv-util" "language/tv-util.el" (22122 65326
-;;;;;; 55715 635000))
+;;;### (autoloads nil "tv-util" "language/tv-util.el" (21855 577
+;;;;;; 57945 485000))
;;; Generated autoloads from language/tv-util.el
(autoload 'tai-viet-composition-function "tv-util" "\
;;;***
\f
-;;;### (autoloads nil "two-column" "textmodes/two-column.el" (22180
-;;;;;; 39318 541076 887000))
+;;;### (autoloads nil "two-column" "textmodes/two-column.el" (22164
+;;;;;; 57535 827192 607000))
;;; Generated autoloads from textmodes/two-column.el
(autoload '2C-command "two-column" () t 'keymap)
(global-set-key "\C-x6" '2C-command)
;;;***
\f
-;;;### (autoloads nil "type-break" "type-break.el" (22180 39318 543076
-;;;;;; 877000))
+;;;### (autoloads nil "type-break" "type-break.el" (22164 57535 831192
+;;;;;; 607000))
;;; Generated autoloads from type-break.el
(defvar type-break-mode nil "\
;;;***
\f
-;;;### (autoloads nil "uce" "mail/uce.el" (22180 39318 391077 576000))
+;;;### (autoloads nil "uce" "mail/uce.el" (22164 57534 843192 607000))
;;; Generated autoloads from mail/uce.el
(autoload 'uce-reply-to-uce "uce" "\
;;;***
\f
;;;### (autoloads nil "ucs-normalize" "international/ucs-normalize.el"
-;;;;;; (22180 39318 369077 678000))
+;;;;;; (22164 57534 755192 607000))
;;; Generated autoloads from international/ucs-normalize.el
(autoload 'ucs-normalize-NFD-region "ucs-normalize" "\
;;;***
\f
-;;;### (autoloads nil "underline" "textmodes/underline.el" (22180
-;;;;;; 39318 541076 887000))
+;;;### (autoloads nil "underline" "textmodes/underline.el" (22164
+;;;;;; 57535 827192 607000))
;;; Generated autoloads from textmodes/underline.el
(autoload 'underline-region "underline" "\
;;;***
\f
-;;;### (autoloads nil "unrmail" "mail/unrmail.el" (22180 39318 391077
-;;;;;; 576000))
+;;;### (autoloads nil "unrmail" "mail/unrmail.el" (22164 57534 843192
+;;;;;; 607000))
;;; Generated autoloads from mail/unrmail.el
(autoload 'batch-unrmail "unrmail" "\
;;;***
\f
-;;;### (autoloads nil "unsafep" "emacs-lisp/unsafep.el" (22180 39318
-;;;;;; 295078 18000))
+;;;### (autoloads nil "unsafep" "emacs-lisp/unsafep.el" (22164 57534
+;;;;;; 215192 607000))
;;; Generated autoloads from emacs-lisp/unsafep.el
(autoload 'unsafep "unsafep" "\
;;;***
\f
-;;;### (autoloads nil "url" "url/url.el" (22180 39318 546076 864000))
+;;;### (autoloads nil "url" "url/url.el" (22164 57535 839192 607000))
;;; Generated autoloads from url/url.el
(autoload 'url-retrieve "url" "\
;;;***
\f
-;;;### (autoloads nil "url-auth" "url/url-auth.el" (22180 39318 543076
-;;;;;; 877000))
+;;;### (autoloads nil "url-auth" "url/url-auth.el" (22164 57535 835192
+;;;;;; 607000))
;;; Generated autoloads from url/url-auth.el
(autoload 'url-get-authentication "url-auth" "\
;;;***
\f
-;;;### (autoloads nil "url-cache" "url/url-cache.el" (22180 39318
-;;;;;; 543076 877000))
+;;;### (autoloads nil "url-cache" "url/url-cache.el" (22164 57535
+;;;;;; 835192 607000))
;;; Generated autoloads from url/url-cache.el
(autoload 'url-store-in-cache "url-cache" "\
;;;***
\f
-;;;### (autoloads nil "url-cid" "url/url-cid.el" (22180 39318 543076
-;;;;;; 877000))
+;;;### (autoloads nil "url-cid" "url/url-cid.el" (22164 57535 835192
+;;;;;; 607000))
;;; Generated autoloads from url/url-cid.el
(autoload 'url-cid "url-cid" "\
;;;***
\f
-;;;### (autoloads nil "url-dav" "url/url-dav.el" (22180 39318 544076
-;;;;;; 873000))
+;;;### (autoloads nil "url-dav" "url/url-dav.el" (22164 57535 835192
+;;;;;; 607000))
;;; Generated autoloads from url/url-dav.el
(autoload 'url-dav-supported-p "url-dav" "\
;;;***
\f
-;;;### (autoloads nil "url-file" "url/url-file.el" (22180 39318 544076
-;;;;;; 873000))
+;;;### (autoloads nil "url-file" "url/url-file.el" (22164 57535 835192
+;;;;;; 607000))
;;; Generated autoloads from url/url-file.el
(autoload 'url-file "url-file" "\
;;;***
\f
-;;;### (autoloads nil "url-gw" "url/url-gw.el" (22180 39318 544076
-;;;;;; 873000))
+;;;### (autoloads nil "url-gw" "url/url-gw.el" (22164 57535 835192
+;;;;;; 607000))
;;; Generated autoloads from url/url-gw.el
(autoload 'url-gateway-nslookup-host "url-gw" "\
;;;***
\f
-;;;### (autoloads nil "url-handlers" "url/url-handlers.el" (22180
-;;;;;; 39318 544076 873000))
+;;;### (autoloads nil "url-handlers" "url/url-handlers.el" (22164
+;;;;;; 57535 835192 607000))
;;; Generated autoloads from url/url-handlers.el
(defvar url-handler-mode nil "\
;;;***
\f
-;;;### (autoloads nil "url-http" "url/url-http.el" (22180 39318 545076
-;;;;;; 868000))
+;;;### (autoloads nil "url-http" "url/url-http.el" (22164 57535 839192
+;;;;;; 607000))
;;; Generated autoloads from url/url-http.el
(autoload 'url-default-expander "url-expand")
;;;***
\f
-;;;### (autoloads nil "url-irc" "url/url-irc.el" (22180 39318 545076
-;;;;;; 868000))
+;;;### (autoloads nil "url-irc" "url/url-irc.el" (22164 57535 839192
+;;;;;; 607000))
;;; Generated autoloads from url/url-irc.el
(autoload 'url-irc "url-irc" "\
;;;***
\f
-;;;### (autoloads nil "url-ldap" "url/url-ldap.el" (22180 39318 545076
-;;;;;; 868000))
+;;;### (autoloads nil "url-ldap" "url/url-ldap.el" (22164 57535 839192
+;;;;;; 607000))
;;; Generated autoloads from url/url-ldap.el
(autoload 'url-ldap "url-ldap" "\
;;;***
\f
-;;;### (autoloads nil "url-mailto" "url/url-mailto.el" (22180 39318
-;;;;;; 545076 868000))
+;;;### (autoloads nil "url-mailto" "url/url-mailto.el" (22164 57535
+;;;;;; 839192 607000))
;;; Generated autoloads from url/url-mailto.el
(autoload 'url-mail "url-mailto" "\
;;;***
\f
-;;;### (autoloads nil "url-misc" "url/url-misc.el" (22180 39318 545076
-;;;;;; 868000))
+;;;### (autoloads nil "url-misc" "url/url-misc.el" (22164 57535 839192
+;;;;;; 607000))
;;; Generated autoloads from url/url-misc.el
(autoload 'url-man "url-misc" "\
;;;***
\f
-;;;### (autoloads nil "url-news" "url/url-news.el" (22180 39318 545076
-;;;;;; 868000))
+;;;### (autoloads nil "url-news" "url/url-news.el" (22164 57535 839192
+;;;;;; 607000))
;;; Generated autoloads from url/url-news.el
(autoload 'url-news "url-news" "\
;;;***
\f
-;;;### (autoloads nil "url-ns" "url/url-ns.el" (22180 39318 545076
-;;;;;; 868000))
+;;;### (autoloads nil "url-ns" "url/url-ns.el" (22164 57535 839192
+;;;;;; 607000))
;;; Generated autoloads from url/url-ns.el
(autoload 'isPlainHostName "url-ns" "\
;;;***
\f
-;;;### (autoloads nil "url-parse" "url/url-parse.el" (22180 39318
-;;;;;; 545076 868000))
+;;;### (autoloads nil "url-parse" "url/url-parse.el" (22164 57535
+;;;;;; 839192 607000))
;;; Generated autoloads from url/url-parse.el
(autoload 'url-recreate-url "url-parse" "\
;;;***
\f
-;;;### (autoloads nil "url-privacy" "url/url-privacy.el" (22180 39318
-;;;;;; 545076 868000))
+;;;### (autoloads nil "url-privacy" "url/url-privacy.el" (22164 57535
+;;;;;; 839192 607000))
;;; Generated autoloads from url/url-privacy.el
(autoload 'url-setup-privacy-info "url-privacy" "\
;;;***
\f
-;;;### (autoloads nil "url-queue" "url/url-queue.el" (22180 39318
-;;;;;; 546076 864000))
+;;;### (autoloads nil "url-queue" "url/url-queue.el" (22164 57535
+;;;;;; 839192 607000))
;;; Generated autoloads from url/url-queue.el
(autoload 'url-queue-retrieve "url-queue" "\
;;;***
\f
-;;;### (autoloads nil "url-tramp" "url/url-tramp.el" (22180 39318
-;;;;;; 546076 864000))
+;;;### (autoloads nil "url-tramp" "url/url-tramp.el" (22174 6972
+;;;;;; 820792 520000))
;;; Generated autoloads from url/url-tramp.el
(defvar url-tramp-protocols '("ftp" "ssh" "scp" "rsync" "telnet") "\
;;;***
\f
-;;;### (autoloads nil "url-util" "url/url-util.el" (22180 39318 546076
-;;;;;; 864000))
+;;;### (autoloads nil "url-util" "url/url-util.el" (22164 57535 839192
+;;;;;; 607000))
;;; Generated autoloads from url/url-util.el
(defvar url-debug nil "\
;;;***
\f
-;;;### (autoloads nil "userlock" "userlock.el" (22180 39318 546076
-;;;;;; 864000))
+;;;### (autoloads nil "userlock" "userlock.el" (22164 57535 839192
+;;;;;; 607000))
;;; Generated autoloads from userlock.el
(autoload 'ask-user-about-lock "userlock" "\
;;;***
\f
-;;;### (autoloads nil "utf-7" "international/utf-7.el" (22180 39318
-;;;;;; 369077 678000))
+;;;### (autoloads nil "utf-7" "international/utf-7.el" (22164 57534
+;;;;;; 755192 607000))
;;; Generated autoloads from international/utf-7.el
(autoload 'utf-7-post-read-conversion "utf-7" "\
;;;***
\f
-;;;### (autoloads nil "utf7" "gnus/utf7.el" (22180 39318 356077 737000))
+;;;### (autoloads nil "utf7" "gnus/utf7.el" (22164 57534 703192 607000))
;;; Generated autoloads from gnus/utf7.el
(autoload 'utf7-encode "utf7" "\
;;;***
\f
-;;;### (autoloads nil "uudecode" "mail/uudecode.el" (22180 39318
-;;;;;; 391077 576000))
+;;;### (autoloads nil "uudecode" "mail/uudecode.el" (22164 57534
+;;;;;; 843192 607000))
;;; Generated autoloads from mail/uudecode.el
(autoload 'uudecode-decode-region-external "uudecode" "\
;;;***
\f
-;;;### (autoloads nil "vc" "vc/vc.el" (22180 39318 558076 808000))
+;;;### (autoloads nil "vc" "vc/vc.el" (22164 57535 887192 607000))
;;; Generated autoloads from vc/vc.el
(defvar vc-checkout-hook nil "\
;;;***
\f
-;;;### (autoloads nil "vc-annotate" "vc/vc-annotate.el" (22180 39318
-;;;;;; 554076 827000))
+;;;### (autoloads nil "vc-annotate" "vc/vc-annotate.el" (22164 57535
+;;;;;; 863192 607000))
;;; Generated autoloads from vc/vc-annotate.el
(autoload 'vc-annotate "vc-annotate" "\
;;;***
\f
-;;;### (autoloads nil "vc-bzr" "vc/vc-bzr.el" (22180 39318 554076
-;;;;;; 827000))
+;;;### (autoloads nil "vc-bzr" "vc/vc-bzr.el" (22164 57535 863192
+;;;;;; 607000))
;;; Generated autoloads from vc/vc-bzr.el
(defconst vc-bzr-admin-dirname ".bzr" "\
;;;***
\f
-;;;### (autoloads nil "vc-cvs" "vc/vc-cvs.el" (22180 39318 554076
-;;;;;; 827000))
+;;;### (autoloads nil "vc-cvs" "vc/vc-cvs.el" (22164 57535 863192
+;;;;;; 607000))
;;; Generated autoloads from vc/vc-cvs.el
(defun vc-cvs-registered (f)
"Return non-nil if file F is registered with CVS."
;;;***
\f
-;;;### (autoloads nil "vc-dir" "vc/vc-dir.el" (22180 39318 555076
-;;;;;; 822000))
+;;;### (autoloads nil "vc-dir" "vc/vc-dir.el" (22164 57535 867192
+;;;;;; 607000))
;;; Generated autoloads from vc/vc-dir.el
(autoload 'vc-dir "vc-dir" "\
;;;***
\f
-;;;### (autoloads nil "vc-dispatcher" "vc/vc-dispatcher.el" (22180
-;;;;;; 39318 555076 822000))
+;;;### (autoloads nil "vc-dispatcher" "vc/vc-dispatcher.el" (22164
+;;;;;; 57535 867192 607000))
;;; Generated autoloads from vc/vc-dispatcher.el
(autoload 'vc-do-command "vc-dispatcher" "\
;;;***
\f
-;;;### (autoloads nil "vc-git" "vc/vc-git.el" (22188 33909 816230
-;;;;;; 121000))
+;;;### (autoloads nil "vc-git" "vc/vc-git.el" (22189 60739 313741
+;;;;;; 19000))
;;; Generated autoloads from vc/vc-git.el
(defun vc-git-registered (file)
"Return non-nil if FILE is registered with git."
;;;***
\f
-;;;### (autoloads nil "vc-hg" "vc/vc-hg.el" (22188 33909 816230 121000))
+;;;### (autoloads nil "vc-hg" "vc/vc-hg.el" (22189 60739 313741 19000))
;;; Generated autoloads from vc/vc-hg.el
(defun vc-hg-registered (file)
"Return non-nil if FILE is registered with hg."
;;;***
\f
-;;;### (autoloads nil "vc-mtn" "vc/vc-mtn.el" (22188 33909 816230
-;;;;;; 121000))
+;;;### (autoloads nil "vc-mtn" "vc/vc-mtn.el" (22189 60739 313741
+;;;;;; 19000))
;;; Generated autoloads from vc/vc-mtn.el
(defconst vc-mtn-admin-dir "_MTN" "\
;;;***
\f
-;;;### (autoloads nil "vc-rcs" "vc/vc-rcs.el" (22180 39318 556076
-;;;;;; 818000))
+;;;### (autoloads nil "vc-rcs" "vc/vc-rcs.el" (22164 57535 883192
+;;;;;; 607000))
;;; Generated autoloads from vc/vc-rcs.el
(defvar vc-rcs-master-templates (purecopy '("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")) "\
;;;***
\f
-;;;### (autoloads nil "vc-sccs" "vc/vc-sccs.el" (22180 39318 557076
-;;;;;; 813000))
+;;;### (autoloads nil "vc-sccs" "vc/vc-sccs.el" (22164 57535 883192
+;;;;;; 607000))
;;; Generated autoloads from vc/vc-sccs.el
(defvar vc-sccs-master-templates (purecopy '("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)) "\
;;;***
\f
-;;;### (autoloads nil "vc-src" "vc/vc-src.el" (22180 39318 557076
-;;;;;; 813000))
+;;;### (autoloads nil "vc-src" "vc/vc-src.el" (22164 57535 883192
+;;;;;; 607000))
;;; Generated autoloads from vc/vc-src.el
(defvar vc-src-master-templates (purecopy '("%s.src/%s,v")) "\
;;;***
\f
-;;;### (autoloads nil "vc-svn" "vc/vc-svn.el" (22180 39318 557076
-;;;;;; 813000))
+;;;### (autoloads nil "vc-svn" "vc/vc-svn.el" (22164 57535 887192
+;;;;;; 607000))
;;; Generated autoloads from vc/vc-svn.el
(defun vc-svn-registered (f)
(let ((admin-dir (cond ((and (eq system-type 'windows-nt)
;;;***
\f
-;;;### (autoloads nil "vera-mode" "progmodes/vera-mode.el" (22180
-;;;;;; 39318 505077 52000))
+;;;### (autoloads nil "vera-mode" "progmodes/vera-mode.el" (22164
+;;;;;; 57535 579192 607000))
;;; Generated autoloads from progmodes/vera-mode.el
(push (purecopy '(vera-mode 2 28)) package--builtin-versions)
(add-to-list 'auto-mode-alist (cons (purecopy "\\.vr[hi]?\\'") 'vera-mode))
;;;***
\f
;;;### (autoloads nil "verilog-mode" "progmodes/verilog-mode.el"
-;;;;;; (22180 39318 508077 38000))
+;;;;;; (22164 57535 607192 607000))
;;; Generated autoloads from progmodes/verilog-mode.el
(autoload 'verilog-mode "verilog-mode" "\
;;;***
\f
-;;;### (autoloads nil "vhdl-mode" "progmodes/vhdl-mode.el" (22183
-;;;;;; 58408 702001 760000))
+;;;### (autoloads nil "vhdl-mode" "progmodes/vhdl-mode.el" (22189
+;;;;;; 60739 197741 19000))
;;; Generated autoloads from progmodes/vhdl-mode.el
(autoload 'vhdl-mode "vhdl-mode" "\
;;;***
\f
-;;;### (autoloads nil "viet-util" "language/viet-util.el" (22180
-;;;;;; 39318 376077 645000))
+;;;### (autoloads nil "viet-util" "language/viet-util.el" (22164
+;;;;;; 57534 787192 607000))
;;; Generated autoloads from language/viet-util.el
(autoload 'viet-encode-viscii-char "viet-util" "\
;;;***
\f
-;;;### (autoloads nil "view" "view.el" (22180 39318 558076 808000))
+;;;### (autoloads nil "view" "view.el" (22164 57535 891192 607000))
;;; Generated autoloads from view.el
(defvar view-remove-frame-by-deleting t "\
;;;***
\f
-;;;### (autoloads nil "viper" "emulation/viper.el" (22180 39318 299077
-;;;;;; 999000))
+;;;### (autoloads nil "viper" "emulation/viper.el" (22164 57534 239192
+;;;;;; 607000))
;;; Generated autoloads from emulation/viper.el
(push (purecopy '(viper 3 14 1)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "warnings" "emacs-lisp/warnings.el" (22180
-;;;;;; 39318 295078 18000))
+;;;### (autoloads nil "warnings" "emacs-lisp/warnings.el" (22164
+;;;;;; 57534 215192 607000))
;;; Generated autoloads from emacs-lisp/warnings.el
(defvar warning-prefix-function nil "\
;;;***
\f
-;;;### (autoloads nil "wdired" "wdired.el" (22180 39318 559076 804000))
+;;;### (autoloads nil "wdired" "wdired.el" (22164 57535 895192 607000))
;;; Generated autoloads from wdired.el
(push (purecopy '(wdired 2 0)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "webjump" "net/webjump.el" (22180 39318 421077
-;;;;;; 438000))
+;;;### (autoloads nil "webjump" "net/webjump.el" (22164 57535 31192
+;;;;;; 607000))
;;; Generated autoloads from net/webjump.el
(autoload 'webjump "webjump" "\
;;;***
\f
-;;;### (autoloads nil "which-func" "progmodes/which-func.el" (22180
-;;;;;; 39318 512077 20000))
+;;;### (autoloads nil "which-func" "progmodes/which-func.el" (22164
+;;;;;; 57535 635192 607000))
;;; Generated autoloads from progmodes/which-func.el
(put 'which-func-format 'risky-local-variable t)
(put 'which-func-current 'risky-local-variable t)
;;;***
\f
-;;;### (autoloads nil "whitespace" "whitespace.el" (22180 39318 559076
-;;;;;; 804000))
+;;;### (autoloads nil "whitespace" "whitespace.el" (22164 57535 899192
+;;;;;; 607000))
;;; Generated autoloads from whitespace.el
(push (purecopy '(whitespace 13 2 2)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "wid-browse" "wid-browse.el" (22180 39318 559076
-;;;;;; 804000))
+;;;### (autoloads nil "wid-browse" "wid-browse.el" (22164 57535 899192
+;;;;;; 607000))
;;; Generated autoloads from wid-browse.el
(autoload 'widget-browse-at "wid-browse" "\
;;;***
\f
-;;;### (autoloads nil "wid-edit" "wid-edit.el" (22180 39318 560076
-;;;;;; 799000))
+;;;### (autoloads nil "wid-edit" "wid-edit.el" (22164 57535 915192
+;;;;;; 607000))
;;; Generated autoloads from wid-edit.el
(autoload 'widgetp "wid-edit" "\
;;;***
\f
-;;;### (autoloads nil "windmove" "windmove.el" (22180 39318 560076
-;;;;;; 799000))
+;;;### (autoloads nil "windmove" "windmove.el" (22164 57535 919192
+;;;;;; 607000))
;;; Generated autoloads from windmove.el
(autoload 'windmove-left "windmove" "\
;;;***
\f
-;;;### (autoloads nil "winner" "winner.el" (22180 39318 561076 795000))
+;;;### (autoloads nil "winner" "winner.el" (22164 57535 935192 607000))
;;; Generated autoloads from winner.el
(defvar winner-mode nil "\
;;;***
\f
-;;;### (autoloads nil "woman" "woman.el" (22180 39318 562076 790000))
+;;;### (autoloads nil "woman" "woman.el" (22164 57535 943192 607000))
;;; Generated autoloads from woman.el
(push (purecopy '(woman 0 551)) package--builtin-versions)
;;;***
\f
-;;;### (autoloads nil "xml" "xml.el" (22180 39318 563076 785000))
+;;;### (autoloads nil "xml" "xml.el" (22164 57535 943192 607000))
;;; Generated autoloads from xml.el
(autoload 'xml-parse-file "xml" "\
;;;***
\f
-;;;### (autoloads nil "xmltok" "nxml/xmltok.el" (22180 39318 426077
-;;;;;; 415000))
+;;;### (autoloads nil "xmltok" "nxml/xmltok.el" (22171 30780 172984
+;;;;;; 795000))
;;; Generated autoloads from nxml/xmltok.el
(autoload 'xmltok-get-declared-encoding-position "xmltok" "\
;;;***
\f
-;;;### (autoloads nil "xref" "progmodes/xref.el" (22188 33909 813230
-;;;;;; 138000))
+;;;### (autoloads nil "xref" "progmodes/xref.el" (22189 60739 217741
+;;;;;; 19000))
;;; Generated autoloads from progmodes/xref.el
(autoload 'xref-find-backend "xref" "\
;;;***
\f
-;;;### (autoloads nil "xt-mouse" "xt-mouse.el" (22180 39318 563076
-;;;;;; 785000))
+;;;### (autoloads nil "xt-mouse" "xt-mouse.el" (22164 57535 947192
+;;;;;; 607000))
;;; Generated autoloads from xt-mouse.el
(defvar xterm-mouse-mode nil "\
;;;***
\f
-;;;### (autoloads nil "xwidget" "xwidget.el" (22188 33909 818230
-;;;;;; 109000))
+;;;### (autoloads nil "xwidget" "xwidget.el" (22189 60739 365741
+;;;;;; 19000))
;;; Generated autoloads from xwidget.el
(autoload 'xwidget-webkit-browse-url "xwidget" "\
;;;***
\f
-;;;### (autoloads nil "yenc" "gnus/yenc.el" (22180 39318 356077 737000))
+;;;### (autoloads nil "yenc" "gnus/yenc.el" (22164 57534 703192 607000))
;;; Generated autoloads from gnus/yenc.el
(autoload 'yenc-decode-region "yenc" "\
;;;***
\f
-;;;### (autoloads nil "zone" "play/zone.el" (22180 39318 467077 227000))
+;;;### (autoloads nil "zone" "play/zone.el" (22164 57535 307192 607000))
;;; Generated autoloads from play/zone.el
(autoload 'zone "zone" "\
;;;;;; "calc/calc-fin.el" "calc/calc-forms.el" "calc/calc-frac.el"
;;;;;; "calc/calc-funcs.el" "calc/calc-graph.el" "calc/calc-help.el"
;;;;;; "calc/calc-incom.el" "calc/calc-keypd.el" "calc/calc-lang.el"
-;;;;;; "calc/calc-macs.el" "calc/calc-map.el" "calc/calc-math.el"
-;;;;;; "calc/calc-menu.el" "calc/calc-misc.el" "calc/calc-mode.el"
-;;;;;; "calc/calc-mtx.el" "calc/calc-nlfit.el" "calc/calc-poly.el"
-;;;;;; "calc/calc-prog.el" "calc/calc-rewr.el" "calc/calc-rules.el"
-;;;;;; "calc/calc-sel.el" "calc/calc-stat.el" "calc/calc-store.el"
-;;;;;; "calc/calc-stuff.el" "calc/calc-trail.el" "calc/calc-units.el"
-;;;;;; "calc/calc-vec.el" "calc/calc-yank.el" "calc/calcalg2.el"
-;;;;;; "calc/calcalg3.el" "calc/calccomp.el" "calc/calcsel2.el"
-;;;;;; "calendar/cal-bahai.el" "calendar/cal-coptic.el" "calendar/cal-french.el"
-;;;;;; "calendar/cal-html.el" "calendar/cal-islam.el" "calendar/cal-iso.el"
-;;;;;; "calendar/cal-julian.el" "calendar/cal-loaddefs.el" "calendar/cal-mayan.el"
-;;;;;; "calendar/cal-menu.el" "calendar/cal-move.el" "calendar/cal-persia.el"
-;;;;;; "calendar/cal-tex.el" "calendar/cal-x.el" "calendar/diary-loaddefs.el"
-;;;;;; "calendar/hol-loaddefs.el" "cdl.el" "cedet/cedet-cscope.el"
-;;;;;; "cedet/cedet-files.el" "cedet/cedet-global.el" "cedet/cedet-idutils.el"
-;;;;;; "cedet/ede/auto.el" "cedet/ede/autoconf-edit.el" "cedet/ede/base.el"
-;;;;;; "cedet/ede/config.el" "cedet/ede/cpp-root.el" "cedet/ede/custom.el"
-;;;;;; "cedet/ede/detect.el" "cedet/ede/dired.el" "cedet/ede/emacs.el"
-;;;;;; "cedet/ede/files.el" "cedet/ede/generic.el" "cedet/ede/linux.el"
-;;;;;; "cedet/ede/locate.el" "cedet/ede/make.el" "cedet/ede/makefile-edit.el"
-;;;;;; "cedet/ede/pconf.el" "cedet/ede/pmake.el" "cedet/ede/proj-archive.el"
-;;;;;; "cedet/ede/proj-aux.el" "cedet/ede/proj-comp.el" "cedet/ede/proj-elisp.el"
-;;;;;; "cedet/ede/proj-info.el" "cedet/ede/proj-misc.el" "cedet/ede/proj-obj.el"
-;;;;;; "cedet/ede/proj-prog.el" "cedet/ede/proj-scheme.el" "cedet/ede/proj-shared.el"
-;;;;;; "cedet/ede/proj.el" "cedet/ede/project-am.el" "cedet/ede/shell.el"
-;;;;;; "cedet/ede/simple.el" "cedet/ede/source.el" "cedet/ede/speedbar.el"
-;;;;;; "cedet/ede/srecode.el" "cedet/ede/system.el" "cedet/ede/util.el"
-;;;;;; "cedet/semantic/analyze.el" "cedet/semantic/analyze/complete.el"
-;;;;;; "cedet/semantic/analyze/debug.el" "cedet/semantic/analyze/fcn.el"
-;;;;;; "cedet/semantic/analyze/refs.el" "cedet/semantic/bovine.el"
-;;;;;; "cedet/semantic/bovine/c-by.el" "cedet/semantic/bovine/c.el"
-;;;;;; "cedet/semantic/bovine/debug.el" "cedet/semantic/bovine/el.el"
-;;;;;; "cedet/semantic/bovine/gcc.el" "cedet/semantic/bovine/make-by.el"
-;;;;;; "cedet/semantic/bovine/make.el" "cedet/semantic/bovine/scm-by.el"
-;;;;;; "cedet/semantic/bovine/scm.el" "cedet/semantic/chart.el"
-;;;;;; "cedet/semantic/complete.el" "cedet/semantic/ctxt.el" "cedet/semantic/db-debug.el"
-;;;;;; "cedet/semantic/db-ebrowse.el" "cedet/semantic/db-el.el"
-;;;;;; "cedet/semantic/db-file.el" "cedet/semantic/db-find.el" "cedet/semantic/db-global.el"
-;;;;;; "cedet/semantic/db-javascript.el" "cedet/semantic/db-mode.el"
-;;;;;; "cedet/semantic/db-ref.el" "cedet/semantic/db-typecache.el"
+;;;;;; "calc/calc-loaddefs.el" "calc/calc-macs.el" "calc/calc-map.el"
+;;;;;; "calc/calc-math.el" "calc/calc-menu.el" "calc/calc-misc.el"
+;;;;;; "calc/calc-mode.el" "calc/calc-mtx.el" "calc/calc-nlfit.el"
+;;;;;; "calc/calc-poly.el" "calc/calc-prog.el" "calc/calc-rewr.el"
+;;;;;; "calc/calc-rules.el" "calc/calc-sel.el" "calc/calc-stat.el"
+;;;;;; "calc/calc-store.el" "calc/calc-stuff.el" "calc/calc-trail.el"
+;;;;;; "calc/calc-units.el" "calc/calc-vec.el" "calc/calc-yank.el"
+;;;;;; "calc/calcalg2.el" "calc/calcalg3.el" "calc/calccomp.el"
+;;;;;; "calc/calcsel2.el" "calendar/cal-bahai.el" "calendar/cal-coptic.el"
+;;;;;; "calendar/cal-french.el" "calendar/cal-html.el" "calendar/cal-islam.el"
+;;;;;; "calendar/cal-iso.el" "calendar/cal-julian.el" "calendar/cal-loaddefs.el"
+;;;;;; "calendar/cal-mayan.el" "calendar/cal-menu.el" "calendar/cal-move.el"
+;;;;;; "calendar/cal-persia.el" "calendar/cal-tex.el" "calendar/cal-x.el"
+;;;;;; "calendar/diary-loaddefs.el" "calendar/hol-loaddefs.el" "cdl.el"
+;;;;;; "cedet/cedet-cscope.el" "cedet/cedet-files.el" "cedet/cedet-global.el"
+;;;;;; "cedet/cedet-idutils.el" "cedet/ede/auto.el" "cedet/ede/autoconf-edit.el"
+;;;;;; "cedet/ede/base.el" "cedet/ede/config.el" "cedet/ede/cpp-root.el"
+;;;;;; "cedet/ede/custom.el" "cedet/ede/detect.el" "cedet/ede/dired.el"
+;;;;;; "cedet/ede/emacs.el" "cedet/ede/files.el" "cedet/ede/generic.el"
+;;;;;; "cedet/ede/linux.el" "cedet/ede/loaddefs.el" "cedet/ede/locate.el"
+;;;;;; "cedet/ede/make.el" "cedet/ede/makefile-edit.el" "cedet/ede/pconf.el"
+;;;;;; "cedet/ede/pmake.el" "cedet/ede/proj-archive.el" "cedet/ede/proj-aux.el"
+;;;;;; "cedet/ede/proj-comp.el" "cedet/ede/proj-elisp.el" "cedet/ede/proj-info.el"
+;;;;;; "cedet/ede/proj-misc.el" "cedet/ede/proj-obj.el" "cedet/ede/proj-prog.el"
+;;;;;; "cedet/ede/proj-scheme.el" "cedet/ede/proj-shared.el" "cedet/ede/proj.el"
+;;;;;; "cedet/ede/project-am.el" "cedet/ede/shell.el" "cedet/ede/simple.el"
+;;;;;; "cedet/ede/source.el" "cedet/ede/speedbar.el" "cedet/ede/srecode.el"
+;;;;;; "cedet/ede/system.el" "cedet/ede/util.el" "cedet/semantic/analyze.el"
+;;;;;; "cedet/semantic/analyze/complete.el" "cedet/semantic/analyze/debug.el"
+;;;;;; "cedet/semantic/analyze/fcn.el" "cedet/semantic/analyze/refs.el"
+;;;;;; "cedet/semantic/bovine.el" "cedet/semantic/bovine/c.el" "cedet/semantic/bovine/debug.el"
+;;;;;; "cedet/semantic/bovine/el.el" "cedet/semantic/bovine/gcc.el"
+;;;;;; "cedet/semantic/bovine/make.el" "cedet/semantic/bovine/scm.el"
+;;;;;; "cedet/semantic/chart.el" "cedet/semantic/complete.el" "cedet/semantic/ctxt.el"
+;;;;;; "cedet/semantic/db-debug.el" "cedet/semantic/db-ebrowse.el"
+;;;;;; "cedet/semantic/db-el.el" "cedet/semantic/db-file.el" "cedet/semantic/db-find.el"
+;;;;;; "cedet/semantic/db-global.el" "cedet/semantic/db-javascript.el"
+;;;;;; "cedet/semantic/db-mode.el" "cedet/semantic/db-ref.el" "cedet/semantic/db-typecache.el"
;;;;;; "cedet/semantic/db.el" "cedet/semantic/debug.el" "cedet/semantic/decorate.el"
;;;;;; "cedet/semantic/decorate/include.el" "cedet/semantic/decorate/mode.el"
;;;;;; "cedet/semantic/dep.el" "cedet/semantic/doc.el" "cedet/semantic/ede-grammar.el"
;;;;;; "cedet/semantic/fw.el" "cedet/semantic/grammar-wy.el" "cedet/semantic/grammar.el"
;;;;;; "cedet/semantic/html.el" "cedet/semantic/ia-sb.el" "cedet/semantic/ia.el"
;;;;;; "cedet/semantic/idle.el" "cedet/semantic/imenu.el" "cedet/semantic/java.el"
-;;;;;; "cedet/semantic/lex-spp.el" "cedet/semantic/lex.el" "cedet/semantic/mru-bookmark.el"
-;;;;;; "cedet/semantic/sb.el" "cedet/semantic/scope.el" "cedet/semantic/senator.el"
-;;;;;; "cedet/semantic/sort.el" "cedet/semantic/symref.el" "cedet/semantic/symref/cscope.el"
-;;;;;; "cedet/semantic/symref/filter.el" "cedet/semantic/symref/global.el"
-;;;;;; "cedet/semantic/symref/grep.el" "cedet/semantic/symref/idutils.el"
-;;;;;; "cedet/semantic/symref/list.el" "cedet/semantic/tag-file.el"
-;;;;;; "cedet/semantic/tag-ls.el" "cedet/semantic/tag-write.el"
+;;;;;; "cedet/semantic/lex-spp.el" "cedet/semantic/lex.el" "cedet/semantic/loaddefs.el"
+;;;;;; "cedet/semantic/mru-bookmark.el" "cedet/semantic/sb.el" "cedet/semantic/scope.el"
+;;;;;; "cedet/semantic/senator.el" "cedet/semantic/sort.el" "cedet/semantic/symref.el"
+;;;;;; "cedet/semantic/symref/cscope.el" "cedet/semantic/symref/filter.el"
+;;;;;; "cedet/semantic/symref/global.el" "cedet/semantic/symref/grep.el"
+;;;;;; "cedet/semantic/symref/idutils.el" "cedet/semantic/symref/list.el"
+;;;;;; "cedet/semantic/tag-file.el" "cedet/semantic/tag-ls.el" "cedet/semantic/tag-write.el"
;;;;;; "cedet/semantic/tag.el" "cedet/semantic/texi.el" "cedet/semantic/util-modes.el"
;;;;;; "cedet/semantic/util.el" "cedet/semantic/wisent.el" "cedet/semantic/wisent/comp.el"
;;;;;; "cedet/semantic/wisent/java-tags.el" "cedet/semantic/wisent/javascript.el"
-;;;;;; "cedet/semantic/wisent/javat-wy.el" "cedet/semantic/wisent/js-wy.el"
-;;;;;; "cedet/semantic/wisent/python-wy.el" "cedet/semantic/wisent/python.el"
-;;;;;; "cedet/semantic/wisent/wisent.el" "cedet/srecode/args.el"
-;;;;;; "cedet/srecode/compile.el" "cedet/srecode/cpp.el" "cedet/srecode/ctxt.el"
-;;;;;; "cedet/srecode/dictionary.el" "cedet/srecode/document.el"
+;;;;;; "cedet/semantic/wisent/python.el" "cedet/semantic/wisent/wisent.el"
+;;;;;; "cedet/srecode/args.el" "cedet/srecode/compile.el" "cedet/srecode/cpp.el"
+;;;;;; "cedet/srecode/ctxt.el" "cedet/srecode/dictionary.el" "cedet/srecode/document.el"
;;;;;; "cedet/srecode/el.el" "cedet/srecode/expandproto.el" "cedet/srecode/extract.el"
;;;;;; "cedet/srecode/fields.el" "cedet/srecode/filters.el" "cedet/srecode/find.el"
;;;;;; "cedet/srecode/getset.el" "cedet/srecode/insert.el" "cedet/srecode/java.el"
-;;;;;; "cedet/srecode/map.el" "cedet/srecode/mode.el" "cedet/srecode/semantic.el"
-;;;;;; "cedet/srecode/srt-wy.el" "cedet/srecode/srt.el" "cedet/srecode/table.el"
+;;;;;; "cedet/srecode/loaddefs.el" "cedet/srecode/map.el" "cedet/srecode/mode.el"
+;;;;;; "cedet/srecode/semantic.el" "cedet/srecode/srt.el" "cedet/srecode/table.el"
;;;;;; "cedet/srecode/template.el" "cedet/srecode/texi.el" "cus-dep.el"
-;;;;;; "dframe.el" "dired-aux.el" "dired-x.el" "dom.el" "dos-fns.el"
-;;;;;; "dos-vars.el" "dos-w32.el" "dynamic-setting.el" "emacs-lisp/avl-tree.el"
-;;;;;; "emacs-lisp/bindat.el" "emacs-lisp/byte-opt.el" "emacs-lisp/cl-extra.el"
-;;;;;; "emacs-lisp/cl-macs.el" "emacs-lisp/cl-seq.el" "emacs-lisp/cl.el"
-;;;;;; "emacs-lisp/eieio-base.el" "emacs-lisp/eieio-compat.el" "emacs-lisp/eieio-custom.el"
-;;;;;; "emacs-lisp/eieio-datadebug.el" "emacs-lisp/eieio-opt.el"
-;;;;;; "emacs-lisp/eieio-speedbar.el" "emacs-lisp/generator.el"
-;;;;;; "emacs-lisp/lisp-mnt.el" "emacs-lisp/package-x.el" "emacs-lisp/smie.el"
-;;;;;; "emacs-lisp/subr-x.el" "emacs-lisp/tcover-ses.el" "emacs-lisp/tcover-unsafep.el"
-;;;;;; "emulation/cua-gmrk.el" "emulation/edt-lk201.el" "emulation/edt-mapper.el"
-;;;;;; "emulation/edt-pc.el" "emulation/edt-vt100.el" "emulation/viper-cmd.el"
-;;;;;; "emulation/viper-ex.el" "emulation/viper-init.el" "emulation/viper-keym.el"
-;;;;;; "emulation/viper-macs.el" "emulation/viper-mous.el" "emulation/viper-util.el"
-;;;;;; "erc/erc-backend.el" "erc/erc-goodies.el" "erc/erc-ibuffer.el"
-;;;;;; "erc/erc-lang.el" "eshell/em-alias.el" "eshell/em-banner.el"
-;;;;;; "eshell/em-basic.el" "eshell/em-cmpl.el" "eshell/em-dirs.el"
-;;;;;; "eshell/em-glob.el" "eshell/em-hist.el" "eshell/em-ls.el"
-;;;;;; "eshell/em-pred.el" "eshell/em-prompt.el" "eshell/em-rebind.el"
-;;;;;; "eshell/em-script.el" "eshell/em-smart.el" "eshell/em-term.el"
-;;;;;; "eshell/em-tramp.el" "eshell/em-unix.el" "eshell/em-xtra.el"
-;;;;;; "eshell/esh-arg.el" "eshell/esh-cmd.el" "eshell/esh-ext.el"
-;;;;;; "eshell/esh-io.el" "eshell/esh-module.el" "eshell/esh-opt.el"
-;;;;;; "eshell/esh-proc.el" "eshell/esh-util.el" "eshell/esh-var.el"
-;;;;;; "ezimage.el" "format-spec.el" "fringe.el" "generic-x.el"
-;;;;;; "gnus/compface.el" "gnus/gnus-async.el" "gnus/gnus-bcklg.el"
-;;;;;; "gnus/gnus-cite.el" "gnus/gnus-cloud.el" "gnus/gnus-cus.el"
-;;;;;; "gnus/gnus-demon.el" "gnus/gnus-dup.el" "gnus/gnus-eform.el"
-;;;;;; "gnus/gnus-ems.el" "gnus/gnus-icalendar.el" "gnus/gnus-int.el"
-;;;;;; "gnus/gnus-logic.el" "gnus/gnus-mh.el" "gnus/gnus-salt.el"
-;;;;;; "gnus/gnus-score.el" "gnus/gnus-srvr.el" "gnus/gnus-topic.el"
-;;;;;; "gnus/gnus-undo.el" "gnus/gnus-util.el" "gnus/gnus-uu.el"
-;;;;;; "gnus/gnus-vm.el" "gnus/gssapi.el" "gnus/ietf-drums.el" "gnus/legacy-gnus-agent.el"
-;;;;;; "gnus/mail-parse.el" "gnus/mail-prsvr.el" "gnus/mail-source.el"
-;;;;;; "gnus/mailcap.el" "gnus/messcompat.el" "gnus/mm-archive.el"
-;;;;;; "gnus/mm-bodies.el" "gnus/mm-decode.el" "gnus/mm-util.el"
-;;;;;; "gnus/mm-view.el" "gnus/mml-sec.el" "gnus/mml-smime.el" "gnus/nnagent.el"
-;;;;;; "gnus/nnbabyl.el" "gnus/nndir.el" "gnus/nndraft.el" "gnus/nneething.el"
-;;;;;; "gnus/nngateway.el" "gnus/nnheader.el" "gnus/nnimap.el" "gnus/nnir.el"
-;;;;;; "gnus/nnmail.el" "gnus/nnmaildir.el" "gnus/nnmairix.el" "gnus/nnmbox.el"
-;;;;;; "gnus/nnmh.el" "gnus/nnnil.el" "gnus/nnoo.el" "gnus/nnregistry.el"
-;;;;;; "gnus/nnrss.el" "gnus/nnspool.el" "gnus/nntp.el" "gnus/nnvirtual.el"
-;;;;;; "gnus/nnweb.el" "gnus/registry.el" "gnus/rfc1843.el" "gnus/rfc2045.el"
-;;;;;; "gnus/rfc2047.el" "gnus/rfc2231.el" "gnus/rtree.el" "gnus/sieve-manage.el"
-;;;;;; "gnus/smime.el" "gnus/spam-stat.el" "gnus/spam-wash.el" "hex-util.el"
-;;;;;; "hfy-cmap.el" "ibuf-ext.el" "international/charscript.el"
+;;;;;; "dframe.el" "dired-aux.el" "dired-loaddefs.el" "dired-x.el"
+;;;;;; "dom.el" "dos-fns.el" "dos-vars.el" "dos-w32.el" "dynamic-setting.el"
+;;;;;; "emacs-lisp/avl-tree.el" "emacs-lisp/bindat.el" "emacs-lisp/byte-opt.el"
+;;;;;; "emacs-lisp/cl-extra.el" "emacs-lisp/cl-loaddefs.el" "emacs-lisp/cl-macs.el"
+;;;;;; "emacs-lisp/cl-seq.el" "emacs-lisp/cl.el" "emacs-lisp/eieio-base.el"
+;;;;;; "emacs-lisp/eieio-compat.el" "emacs-lisp/eieio-custom.el"
+;;;;;; "emacs-lisp/eieio-datadebug.el" "emacs-lisp/eieio-loaddefs.el"
+;;;;;; "emacs-lisp/eieio-opt.el" "emacs-lisp/eieio-speedbar.el"
+;;;;;; "emacs-lisp/generator.el" "emacs-lisp/lisp-mnt.el" "emacs-lisp/package-x.el"
+;;;;;; "emacs-lisp/smie.el" "emacs-lisp/subr-x.el" "emacs-lisp/tcover-ses.el"
+;;;;;; "emacs-lisp/tcover-unsafep.el" "emulation/cua-gmrk.el" "emulation/edt-lk201.el"
+;;;;;; "emulation/edt-mapper.el" "emulation/edt-pc.el" "emulation/edt-vt100.el"
+;;;;;; "emulation/viper-cmd.el" "emulation/viper-ex.el" "emulation/viper-init.el"
+;;;;;; "emulation/viper-keym.el" "emulation/viper-macs.el" "emulation/viper-mous.el"
+;;;;;; "emulation/viper-util.el" "erc/erc-backend.el" "erc/erc-goodies.el"
+;;;;;; "erc/erc-ibuffer.el" "erc/erc-lang.el" "eshell/em-alias.el"
+;;;;;; "eshell/em-banner.el" "eshell/em-basic.el" "eshell/em-cmpl.el"
+;;;;;; "eshell/em-dirs.el" "eshell/em-glob.el" "eshell/em-hist.el"
+;;;;;; "eshell/em-ls.el" "eshell/em-pred.el" "eshell/em-prompt.el"
+;;;;;; "eshell/em-rebind.el" "eshell/em-script.el" "eshell/em-smart.el"
+;;;;;; "eshell/em-term.el" "eshell/em-tramp.el" "eshell/em-unix.el"
+;;;;;; "eshell/em-xtra.el" "eshell/esh-arg.el" "eshell/esh-cmd.el"
+;;;;;; "eshell/esh-ext.el" "eshell/esh-groups.el" "eshell/esh-io.el"
+;;;;;; "eshell/esh-module.el" "eshell/esh-opt.el" "eshell/esh-proc.el"
+;;;;;; "eshell/esh-util.el" "eshell/esh-var.el" "ezimage.el" "format-spec.el"
+;;;;;; "fringe.el" "generic-x.el" "gnus/compface.el" "gnus/gnus-async.el"
+;;;;;; "gnus/gnus-bcklg.el" "gnus/gnus-cite.el" "gnus/gnus-cloud.el"
+;;;;;; "gnus/gnus-cus.el" "gnus/gnus-demon.el" "gnus/gnus-dup.el"
+;;;;;; "gnus/gnus-eform.el" "gnus/gnus-ems.el" "gnus/gnus-icalendar.el"
+;;;;;; "gnus/gnus-int.el" "gnus/gnus-logic.el" "gnus/gnus-mh.el"
+;;;;;; "gnus/gnus-salt.el" "gnus/gnus-score.el" "gnus/gnus-srvr.el"
+;;;;;; "gnus/gnus-topic.el" "gnus/gnus-undo.el" "gnus/gnus-util.el"
+;;;;;; "gnus/gnus-uu.el" "gnus/gnus-vm.el" "gnus/gssapi.el" "gnus/ietf-drums.el"
+;;;;;; "gnus/legacy-gnus-agent.el" "gnus/mail-parse.el" "gnus/mail-prsvr.el"
+;;;;;; "gnus/mail-source.el" "gnus/mailcap.el" "gnus/messcompat.el"
+;;;;;; "gnus/mm-archive.el" "gnus/mm-bodies.el" "gnus/mm-decode.el"
+;;;;;; "gnus/mm-util.el" "gnus/mm-view.el" "gnus/mml-sec.el" "gnus/mml-smime.el"
+;;;;;; "gnus/nnagent.el" "gnus/nnbabyl.el" "gnus/nndir.el" "gnus/nndraft.el"
+;;;;;; "gnus/nneething.el" "gnus/nngateway.el" "gnus/nnheader.el"
+;;;;;; "gnus/nnimap.el" "gnus/nnir.el" "gnus/nnmail.el" "gnus/nnmaildir.el"
+;;;;;; "gnus/nnmairix.el" "gnus/nnmbox.el" "gnus/nnmh.el" "gnus/nnnil.el"
+;;;;;; "gnus/nnoo.el" "gnus/nnregistry.el" "gnus/nnrss.el" "gnus/nnspool.el"
+;;;;;; "gnus/nntp.el" "gnus/nnvirtual.el" "gnus/nnweb.el" "gnus/registry.el"
+;;;;;; "gnus/rfc1843.el" "gnus/rfc2045.el" "gnus/rfc2047.el" "gnus/rfc2231.el"
+;;;;;; "gnus/rtree.el" "gnus/sieve-manage.el" "gnus/smime.el" "gnus/spam-stat.el"
+;;;;;; "gnus/spam-wash.el" "hex-util.el" "hfy-cmap.el" "htmlfontify-loaddefs.el"
+;;;;;; "ibuf-ext.el" "ibuffer-loaddefs.el" "international/charscript.el"
;;;;;; "international/fontset.el" "international/iso-ascii.el" "international/ja-dic-cnv.el"
;;;;;; "international/ja-dic-utl.el" "international/ogonek.el" "international/uni-bidi.el"
;;;;;; "international/uni-brackets.el" "international/uni-category.el"
;;;;;; "international/uni-numeric.el" "international/uni-old-name.el"
;;;;;; "international/uni-titlecase.el" "international/uni-uppercase.el"
;;;;;; "kermit.el" "language/hanja-util.el" "language/thai-word.el"
-;;;;;; "ldefs-boot.el" "leim/ja-dic/ja-dic.el" "leim/quail/arabic.el"
-;;;;;; "leim/quail/croatian.el" "leim/quail/cyril-jis.el" "leim/quail/cyrillic.el"
-;;;;;; "leim/quail/czech.el" "leim/quail/ethiopic.el" "leim/quail/georgian.el"
-;;;;;; "leim/quail/greek.el" "leim/quail/hanja-jis.el" "leim/quail/hanja.el"
-;;;;;; "leim/quail/hanja3.el" "leim/quail/hebrew.el" "leim/quail/indian.el"
-;;;;;; "leim/quail/ipa-praat.el" "leim/quail/ipa.el" "leim/quail/japanese.el"
-;;;;;; "leim/quail/lao.el" "leim/quail/latin-alt.el" "leim/quail/latin-ltx.el"
-;;;;;; "leim/quail/latin-post.el" "leim/quail/latin-pre.el" "leim/quail/lrt.el"
-;;;;;; "leim/quail/persian.el" "leim/quail/programmer-dvorak.el"
-;;;;;; "leim/quail/py-punct.el" "leim/quail/pypunct-b5.el" "leim/quail/rfc1345.el"
-;;;;;; "leim/quail/sgml-input.el" "leim/quail/sisheng.el" "leim/quail/slovak.el"
-;;;;;; "leim/quail/symbol-ksc.el" "leim/quail/tamil-dvorak.el" "leim/quail/thai.el"
-;;;;;; "leim/quail/tibetan.el" "leim/quail/viqr.el" "leim/quail/vntelex.el"
-;;;;;; "leim/quail/vnvni.el" "leim/quail/welsh.el" "loadup.el" "mail/blessmail.el"
-;;;;;; "mail/mailheader.el" "mail/mspools.el" "mail/rfc2368.el"
-;;;;;; "mail/rfc822.el" "mail/rmail-spam-filter.el" "mail/rmailedit.el"
-;;;;;; "mail/rmailkwd.el" "mail/rmailmm.el" "mail/rmailmsc.el" "mail/rmailsort.el"
+;;;;;; "ldefs-boot.el" "leim/quail/arabic.el" "leim/quail/croatian.el"
+;;;;;; "leim/quail/cyril-jis.el" "leim/quail/cyrillic.el" "leim/quail/czech.el"
+;;;;;; "leim/quail/ethiopic.el" "leim/quail/georgian.el" "leim/quail/greek.el"
+;;;;;; "leim/quail/hanja-jis.el" "leim/quail/hanja.el" "leim/quail/hanja3.el"
+;;;;;; "leim/quail/hebrew.el" "leim/quail/indian.el" "leim/quail/ipa-praat.el"
+;;;;;; "leim/quail/ipa.el" "leim/quail/japanese.el" "leim/quail/lao.el"
+;;;;;; "leim/quail/latin-alt.el" "leim/quail/latin-ltx.el" "leim/quail/latin-post.el"
+;;;;;; "leim/quail/latin-pre.el" "leim/quail/lrt.el" "leim/quail/persian.el"
+;;;;;; "leim/quail/programmer-dvorak.el" "leim/quail/py-punct.el"
+;;;;;; "leim/quail/pypunct-b5.el" "leim/quail/rfc1345.el" "leim/quail/sgml-input.el"
+;;;;;; "leim/quail/sisheng.el" "leim/quail/slovak.el" "leim/quail/symbol-ksc.el"
+;;;;;; "leim/quail/tamil-dvorak.el" "leim/quail/thai.el" "leim/quail/tibetan.el"
+;;;;;; "leim/quail/viqr.el" "leim/quail/vntelex.el" "leim/quail/vnvni.el"
+;;;;;; "leim/quail/welsh.el" "loadup.el" "mail/blessmail.el" "mail/mailheader.el"
+;;;;;; "mail/mspools.el" "mail/rfc2368.el" "mail/rfc822.el" "mail/rmail-loaddefs.el"
+;;;;;; "mail/rmail-spam-filter.el" "mail/rmailedit.el" "mail/rmailkwd.el"
+;;;;;; "mail/rmailmm.el" "mail/rmailmsc.el" "mail/rmailsort.el"
;;;;;; "mail/rmailsum.el" "mail/undigest.el" "mh-e/mh-acros.el"
;;;;;; "mh-e/mh-alias.el" "mh-e/mh-buffers.el" "mh-e/mh-compat.el"
;;;;;; "mh-e/mh-funcs.el" "mh-e/mh-gnus.el" "mh-e/mh-identity.el"
;;;;;; "net/dns.el" "net/eudc-vars.el" "net/eudcb-bbdb.el" "net/eudcb-ldap.el"
;;;;;; "net/eudcb-mab.el" "net/hmac-def.el" "net/hmac-md5.el" "net/imap.el"
;;;;;; "net/ldap.el" "net/mairix.el" "net/newsticker.el" "net/nsm.el"
-;;;;;; "net/rfc2104.el" "net/sasl-cram.el" "net/sasl-digest.el"
+;;;;;; "net/puny.el" "net/rfc2104.el" "net/sasl-cram.el" "net/sasl-digest.el"
;;;;;; "net/sasl-scram-rfc.el" "net/sasl.el" "net/shr-color.el"
;;;;;; "net/soap-inspect.el" "net/socks.el" "net/tls.el" "net/tramp-adb.el"
;;;;;; "net/tramp-cache.el" "net/tramp-cmds.el" "net/tramp-compat.el"
;;;;;; "nxml/nxml-rap.el" "nxml/nxml-util.el" "nxml/rng-dt.el" "nxml/rng-loc.el"
;;;;;; "nxml/rng-maint.el" "nxml/rng-match.el" "nxml/rng-parse.el"
;;;;;; "nxml/rng-pttrn.el" "nxml/rng-uri.el" "nxml/rng-util.el"
-;;;;;; "nxml/xsd-regexp.el" "obarray.el" "org/ob-C.el" "org/ob-R.el"
-;;;;;; "org/ob-asymptote.el" "org/ob-awk.el" "org/ob-calc.el" "org/ob-clojure.el"
-;;;;;; "org/ob-comint.el" "org/ob-core.el" "org/ob-css.el" "org/ob-ditaa.el"
-;;;;;; "org/ob-dot.el" "org/ob-emacs-lisp.el" "org/ob-eval.el" "org/ob-exp.el"
-;;;;;; "org/ob-fortran.el" "org/ob-gnuplot.el" "org/ob-haskell.el"
-;;;;;; "org/ob-io.el" "org/ob-java.el" "org/ob-js.el" "org/ob-keys.el"
-;;;;;; "org/ob-latex.el" "org/ob-ledger.el" "org/ob-lilypond.el"
-;;;;;; "org/ob-lisp.el" "org/ob-lob.el" "org/ob-makefile.el" "org/ob-matlab.el"
-;;;;;; "org/ob-maxima.el" "org/ob-mscgen.el" "org/ob-ocaml.el" "org/ob-octave.el"
-;;;;;; "org/ob-org.el" "org/ob-perl.el" "org/ob-picolisp.el" "org/ob-plantuml.el"
-;;;;;; "org/ob-python.el" "org/ob-ref.el" "org/ob-ruby.el" "org/ob-sass.el"
-;;;;;; "org/ob-scala.el" "org/ob-scheme.el" "org/ob-screen.el" "org/ob-sh.el"
-;;;;;; "org/ob-shen.el" "org/ob-sql.el" "org/ob-sqlite.el" "org/ob-table.el"
-;;;;;; "org/ob-tangle.el" "org/ob.el" "org/org-archive.el" "org/org-attach.el"
-;;;;;; "org/org-bbdb.el" "org/org-bibtex.el" "org/org-clock.el"
-;;;;;; "org/org-crypt.el" "org/org-ctags.el" "org/org-datetree.el"
-;;;;;; "org/org-docview.el" "org/org-element.el" "org/org-entities.el"
-;;;;;; "org/org-eshell.el" "org/org-faces.el" "org/org-feed.el"
-;;;;;; "org/org-footnote.el" "org/org-gnus.el" "org/org-habit.el"
-;;;;;; "org/org-id.el" "org/org-indent.el" "org/org-info.el" "org/org-inlinetask.el"
-;;;;;; "org/org-install.el" "org/org-irc.el" "org/org-list.el" "org/org-macro.el"
-;;;;;; "org/org-mhe.el" "org/org-mobile.el" "org/org-mouse.el" "org/org-pcomplete.el"
-;;;;;; "org/org-plot.el" "org/org-protocol.el" "org/org-rmail.el"
-;;;;;; "org/org-src.el" "org/org-table.el" "org/org-timer.el" "org/org-w3m.el"
-;;;;;; "org/ox-ascii.el" "org/ox-beamer.el" "org/ox-html.el" "org/ox-icalendar.el"
-;;;;;; "org/ox-latex.el" "org/ox-man.el" "org/ox-md.el" "org/ox-odt.el"
-;;;;;; "org/ox-org.el" "org/ox-publish.el" "org/ox-texinfo.el" "org/ox.el"
-;;;;;; "play/gametree.el" "progmodes/ada-prj.el" "progmodes/cc-align.el"
+;;;;;; "nxml/xsd-regexp.el" "org/ob-C.el" "org/ob-R.el" "org/ob-asymptote.el"
+;;;;;; "org/ob-awk.el" "org/ob-calc.el" "org/ob-clojure.el" "org/ob-comint.el"
+;;;;;; "org/ob-core.el" "org/ob-css.el" "org/ob-ditaa.el" "org/ob-dot.el"
+;;;;;; "org/ob-emacs-lisp.el" "org/ob-eval.el" "org/ob-exp.el" "org/ob-fortran.el"
+;;;;;; "org/ob-gnuplot.el" "org/ob-haskell.el" "org/ob-io.el" "org/ob-java.el"
+;;;;;; "org/ob-js.el" "org/ob-keys.el" "org/ob-latex.el" "org/ob-ledger.el"
+;;;;;; "org/ob-lilypond.el" "org/ob-lisp.el" "org/ob-lob.el" "org/ob-makefile.el"
+;;;;;; "org/ob-matlab.el" "org/ob-maxima.el" "org/ob-mscgen.el"
+;;;;;; "org/ob-ocaml.el" "org/ob-octave.el" "org/ob-org.el" "org/ob-perl.el"
+;;;;;; "org/ob-picolisp.el" "org/ob-plantuml.el" "org/ob-python.el"
+;;;;;; "org/ob-ref.el" "org/ob-ruby.el" "org/ob-sass.el" "org/ob-scala.el"
+;;;;;; "org/ob-scheme.el" "org/ob-screen.el" "org/ob-sh.el" "org/ob-shen.el"
+;;;;;; "org/ob-sql.el" "org/ob-sqlite.el" "org/ob-table.el" "org/ob-tangle.el"
+;;;;;; "org/ob.el" "org/org-archive.el" "org/org-attach.el" "org/org-bbdb.el"
+;;;;;; "org/org-bibtex.el" "org/org-clock.el" "org/org-crypt.el"
+;;;;;; "org/org-ctags.el" "org/org-datetree.el" "org/org-docview.el"
+;;;;;; "org/org-element.el" "org/org-entities.el" "org/org-eshell.el"
+;;;;;; "org/org-faces.el" "org/org-feed.el" "org/org-footnote.el"
+;;;;;; "org/org-gnus.el" "org/org-habit.el" "org/org-id.el" "org/org-indent.el"
+;;;;;; "org/org-info.el" "org/org-inlinetask.el" "org/org-install.el"
+;;;;;; "org/org-irc.el" "org/org-list.el" "org/org-loaddefs.el"
+;;;;;; "org/org-macro.el" "org/org-mhe.el" "org/org-mobile.el" "org/org-mouse.el"
+;;;;;; "org/org-pcomplete.el" "org/org-plot.el" "org/org-protocol.el"
+;;;;;; "org/org-rmail.el" "org/org-src.el" "org/org-table.el" "org/org-timer.el"
+;;;;;; "org/org-w3m.el" "org/ox-ascii.el" "org/ox-beamer.el" "org/ox-html.el"
+;;;;;; "org/ox-icalendar.el" "org/ox-latex.el" "org/ox-man.el" "org/ox-md.el"
+;;;;;; "org/ox-odt.el" "org/ox-org.el" "org/ox-publish.el" "org/ox-texinfo.el"
+;;;;;; "org/ox.el" "play/gametree.el" "progmodes/ada-prj.el" "progmodes/cc-align.el"
;;;;;; "progmodes/cc-awk.el" "progmodes/cc-bytecomp.el" "progmodes/cc-cmds.el"
;;;;;; "progmodes/cc-defs.el" "progmodes/cc-fonts.el" "progmodes/cc-langs.el"
;;;;;; "progmodes/cc-menus.el" "progmodes/ebnf-abn.el" "progmodes/ebnf-bnf.el"
;;;;;; "progmodes/ebnf-dtd.el" "progmodes/ebnf-ebx.el" "progmodes/ebnf-iso.el"
;;;;;; "progmodes/ebnf-otz.el" "progmodes/ebnf-yac.el" "progmodes/idlw-complete-structtag.el"
;;;;;; "progmodes/idlw-help.el" "progmodes/idlw-toolbar.el" "progmodes/mantemp.el"
-;;;;;; "progmodes/xscheme.el" "ps-def.el" "ps-mule.el" "ps-samp.el"
-;;;;;; "sb-image.el" "scroll-bar.el" "soundex.el" "subdirs.el" "tempo.el"
-;;;;;; "textmodes/bib-mode.el" "textmodes/makeinfo.el" "textmodes/page-ext.el"
-;;;;;; "textmodes/refbib.el" "textmodes/refer.el" "textmodes/reftex-auc.el"
-;;;;;; "textmodes/reftex-cite.el" "textmodes/reftex-dcr.el" "textmodes/reftex-global.el"
-;;;;;; "textmodes/reftex-index.el" "textmodes/reftex-parse.el" "textmodes/reftex-ref.el"
-;;;;;; "textmodes/reftex-sel.el" "textmodes/reftex-toc.el" "textmodes/texnfo-upd.el"
-;;;;;; "timezone.el" "tooltip.el" "tree-widget.el" "url/url-about.el"
-;;;;;; "url/url-cookie.el" "url/url-dired.el" "url/url-domsuf.el"
-;;;;;; "url/url-expand.el" "url/url-ftp.el" "url/url-future.el"
-;;;;;; "url/url-history.el" "url/url-imap.el" "url/url-methods.el"
-;;;;;; "url/url-nfs.el" "url/url-proxy.el" "url/url-vars.el" "vc/ediff-diff.el"
-;;;;;; "vc/ediff-init.el" "vc/ediff-merg.el" "vc/ediff-ptch.el"
-;;;;;; "vc/ediff-vers.el" "vc/ediff-wind.el" "vc/pcvs-info.el" "vc/pcvs-parse.el"
-;;;;;; "vc/pcvs-util.el" "vc/vc-dav.el" "vc/vc-filewise.el" "vcursor.el"
-;;;;;; "vt-control.el" "vt100-led.el" "w32-fns.el" "w32-vars.el"
-;;;;;; "x-dnd.el") (22188 49115 186777 865000))
+;;;;;; "progmodes/xscheme.el" "ps-def.el" "ps-mule.el" "ps-print-loaddefs.el"
+;;;;;; "ps-samp.el" "sb-image.el" "scroll-bar.el" "soundex.el" "subdirs.el"
+;;;;;; "tempo.el" "textmodes/bib-mode.el" "textmodes/makeinfo.el"
+;;;;;; "textmodes/page-ext.el" "textmodes/refbib.el" "textmodes/refer.el"
+;;;;;; "textmodes/reftex-auc.el" "textmodes/reftex-cite.el" "textmodes/reftex-dcr.el"
+;;;;;; "textmodes/reftex-global.el" "textmodes/reftex-index.el"
+;;;;;; "textmodes/reftex-loaddefs.el" "textmodes/reftex-parse.el"
+;;;;;; "textmodes/reftex-ref.el" "textmodes/reftex-sel.el" "textmodes/reftex-toc.el"
+;;;;;; "textmodes/texnfo-upd.el" "timezone.el" "tooltip.el" "tree-widget.el"
+;;;;;; "url/url-about.el" "url/url-cookie.el" "url/url-dired.el"
+;;;;;; "url/url-domsuf.el" "url/url-expand.el" "url/url-ftp.el"
+;;;;;; "url/url-future.el" "url/url-history.el" "url/url-imap.el"
+;;;;;; "url/url-methods.el" "url/url-nfs.el" "url/url-proxy.el"
+;;;;;; "url/url-vars.el" "vc/ediff-diff.el" "vc/ediff-init.el" "vc/ediff-merg.el"
+;;;;;; "vc/ediff-ptch.el" "vc/ediff-vers.el" "vc/ediff-wind.el"
+;;;;;; "vc/pcvs-info.el" "vc/pcvs-parse.el" "vc/pcvs-util.el" "vc/vc-dav.el"
+;;;;;; "vc/vc-filewise.el" "vcursor.el" "vt-control.el" "vt100-led.el"
+;;;;;; "w32-fns.el" "w32-vars.el" "x-dnd.el") (22191 16358 345822
+;;;;;; 179000))
;;;***
\f
(mapc #'delete-overlay linum-overlays)
(setq linum-overlays nil)
(dolist (w (get-buffer-window-list (current-buffer) nil t))
- (set-window-margins w 0 (cdr (window-margins w)))))
+ ;; restore margins if needed FIXME: This still fails if the
+ ;; "other" mode has incidentally set margins to exactly what linum
+ ;; had: see bug#20674 for a similar workaround in nlinum.el
+ (let ((set-margins (window-parameter w 'linum--set-margins))
+ (current-margins (window-margins w)))
+ (when (and set-margins
+ (equal set-margins current-margins))
+ (set-window-margins w 0 (cdr current-margins))
+ (set-window-parameter w 'linum--set-margins nil)))))
(defun linum-update-current ()
"Update line numbers for the current buffer."
(defun linum--face-width (face)
(let ((info (font-info (face-font face)))
- width)
+ width)
(setq width (aref info 11))
(if (<= width 0)
- (setq width (aref info 10)))
+ (setq width (aref info 10)))
width))
(defun linum-update-window (win)
(visited (catch 'visited
(dolist (o (overlays-in (point) (point)))
(when (equal-including-properties
- (overlay-get o 'linum-str) str)
+ (overlay-get o 'linum-str) str)
(unless (memq o linum-overlays)
(push o linum-overlays))
(setq linum-available (delq o linum-available))
(setq width (ceiling
(/ (* width 1.0 (linum--face-width 'linum))
(frame-char-width)))))
- (set-window-margins win width (cdr (window-margins win)))))
+ ;; open up space in the left margin, if needed, and record that
+ ;; fact as the window-parameter `linum--set-margins'
+ (let ((existing-margins (window-margins win)))
+ (when (> width (or (car existing-margins) 0))
+ (set-window-margins win width (cdr existing-margins))
+ (set-window-parameter win 'linum--set-margins (window-margins win))))))
(defun linum-after-change (beg end _len)
;; update overlays on deletions, and after newlines are inserted
(let ((dir (car load-path)))
;; We'll probably overflow the pure space.
(setq purify-flag nil)
+ ;; Value of max-lisp-eval-depth when compiling initially.
+ ;; During bootstrapping the byte-compiler is run interpreted when
+ ;; compiling itself, which uses a lot more stack than usual.
+ (setq max-lisp-eval-depth 2200)
(setq load-path (list (expand-file-name "." dir)
(expand-file-name "emacs-lisp" dir)
(expand-file-name "language" dir)
(load "emacs-lisp/nadvice")
(load "emacs-lisp/cl-preloaded")
(load "minibuffer") ;After loaddefs, for define-minor-mode.
+(load "obarray") ;abbrev.el is implemented in terms of obarrays.
(load "abbrev") ;lisp-mode.el and simple.el use define-abbrev-table.
(load "simple")
(and (not (eobp))
(eq ?w (char-syntax (char-after)))
(progn
- (forward-word-strictly 1)
+ (forward-word 1)
(and (not (eobp))
(> (char-after) ?\177)
(not (eq (char-after) ? )))))))))
)
(t
(setq atom-beg (point))
- (forward-word-strictly 1)
+ (forward-word 1)
(setq atom-end (point))
(goto-char atom-beg)
(save-restriction
(insert (upcase mi) ". ")))
;; Nuke name if it is the same as mailbox name.
- (let ((buffer-length (- (point-max) (point-min)))
- (i 0)
- (names-match-flag t))
- (when (and (> buffer-length 0)
- (eq buffer-length (- mbox-end mbox-beg)))
- (goto-char (point-max))
- (insert-buffer-substring canonicalization-buffer
- mbox-beg mbox-end)
- (while (and names-match-flag
- (< i buffer-length))
- (or (eq (downcase (char-after (+ i (point-min))))
- (downcase
- (char-after (+ i buffer-length (point-min)))))
- (setq names-match-flag nil))
- (setq i (1+ i)))
- (delete-region (+ (point-min) buffer-length) (point-max))
- (and names-match-flag
- mail-extr-ignore-realname-equals-mailbox-name
- (narrow-to-region (point) (point)))))
+ (when mail-extr-ignore-single-names
+ (let ((buffer-length (- (point-max) (point-min)))
+ (i 0)
+ (names-match-flag t))
+ (when (and (> buffer-length 0)
+ (eq buffer-length (- mbox-end mbox-beg)))
+ (goto-char (point-max))
+ (insert-buffer-substring canonicalization-buffer
+ mbox-beg mbox-end)
+ (while (and names-match-flag
+ (< i buffer-length))
+ (or (eq (downcase (char-after (+ i (point-min))))
+ (downcase
+ (char-after (+ i buffer-length (point-min)))))
+ (setq names-match-flag nil))
+ (setq i (1+ i)))
+ (delete-region (+ (point-min) buffer-length) (point-max))
+ (and names-match-flag
+ mail-extr-ignore-realname-equals-mailbox-name
+ (narrow-to-region (point) (point))))))
;; Nuke name if it's just one word.
(goto-char (point-min))
(let ((end (point))
(beg (with-syntax-table mail-abbrev-syntax-table
(save-excursion
- (backward-word-strictly 1)
+ (backward-word 1)
(point)))))
(completion-in-region beg end mail-abbrevs)))
(require 'mail-utils)
(require 'rfc2047)
+(require 'rmail-loaddefs)
+
(declare-function compilation--message->loc "compile" (cl-x) t)
(declare-function epa--find-coding-system-for-mime-charset "epa" (mime-charset))
(set-syntax-table mail-abbrev-syntax-table)
(goto-char before)
(while (and (< (point) end)
- (progn (forward-word-strictly 1)
+ (progn (forward-word 1)
(<= (point) end)))
(expand-abbrev))
(set-syntax-table old-syntax-table))
(setq buffer-file-coding-system rmail-message-encoding))))
(add-hook 'after-save-hook 'rmail-after-save-hook)
-\f
-;;; Start of automatically extracted autoloads.
-\f
-;;;### (autoloads nil "rmailedit" "rmailedit.el" "03eb8c36b3c57d58eecedb9eeffa623e")
-;;; Generated autoloads from rmailedit.el
-
-(autoload 'rmail-edit-current-message "rmailedit" "\
-Edit the contents of this message.
-
-\(fn)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "rmailkwd" "rmailkwd.el" "4e1b251929961e2b9d3b126301d697d0")
-;;; Generated autoloads from rmailkwd.el
-
-(autoload 'rmail-add-label "rmailkwd" "\
-Add LABEL to labels associated with current RMAIL message.
-Completes (see `rmail-read-label') over known labels when reading.
-LABEL may be a symbol or string. Only one label is allowed.
-
-\(fn LABEL)" t nil)
-
-(autoload 'rmail-kill-label "rmailkwd" "\
-Remove LABEL from labels associated with current RMAIL message.
-Completes (see `rmail-read-label') over known labels when reading.
-LABEL may be a symbol or string. Only one label is allowed.
-
-\(fn LABEL)" t nil)
-
-(autoload 'rmail-read-label "rmailkwd" "\
-Read a label with completion, prompting with PROMPT.
-Completions are chosen from `rmail-label-obarray'. The default
-is `rmail-last-label', if that is non-nil. Updates `rmail-last-label'
-according to the choice made, and returns a symbol.
-
-\(fn PROMPT)" nil nil)
-
-(autoload 'rmail-previous-labeled-message "rmailkwd" "\
-Show previous message with one of the labels LABELS.
-LABELS should be a comma-separated list of label names.
-If LABELS is empty, the last set of labels specified is used.
-With prefix argument N moves backward N messages with these labels.
-
-\(fn N LABELS)" t nil)
-
-(autoload 'rmail-next-labeled-message "rmailkwd" "\
-Show next message with one of the labels LABELS.
-LABELS should be a comma-separated list of label names.
-If LABELS is empty, the last set of labels specified is used.
-With prefix argument N moves forward N messages with these labels.
-
-\(fn N LABELS)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "rmailmm" "rmailmm.el" "7ab6ab96dfdeeec6bc8f4620295b7119")
-;;; Generated autoloads from rmailmm.el
-
-(autoload 'rmail-mime "rmailmm" "\
-Toggle the display of a MIME message.
-
-The actual behavior depends on the value of `rmail-enable-mime'.
-
-If `rmail-enable-mime' is non-nil (the default), this command toggles
-the display of a MIME message between decoded presentation form and
-raw data. With optional prefix argument ARG, it toggles the display only
-of the MIME entity at point, if there is one. The optional argument
-STATE forces a particular display state, rather than toggling.
-`raw' forces raw mode, any other non-nil value forces decoded mode.
-
-If `rmail-enable-mime' is nil, this creates a temporary \"*RMAIL*\"
-buffer holding a decoded copy of the message. Inline content-types are
-handled according to `rmail-mime-media-type-handlers-alist'.
-By default, this displays text and multipart messages, and offers to
-download attachments as specified by `rmail-mime-attachment-dirs-alist'.
-The arguments ARG and STATE have no effect in this case.
-
-\(fn &optional ARG STATE)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "rmailmsc" "rmailmsc.el" "471c370ff9f183806c8d749961ec9d79")
-;;; Generated autoloads from rmailmsc.el
-
-(autoload 'set-rmail-inbox-list "rmailmsc" "\
-Set the inbox list of the current RMAIL file to FILE-NAME.
-You can specify one file name, or several names separated by commas.
-If FILE-NAME is empty, remove any existing inbox list.
-
-This applies only to the current session.
-
-\(fn FILE-NAME)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "rmailsort" "rmailsort.el" "2c8e39f7bae6fcc465a83ebccd46c8a4")
-;;; Generated autoloads from rmailsort.el
-
-(autoload 'rmail-sort-by-date "rmailsort" "\
-Sort messages of current Rmail buffer by \"Date\" header.
-If prefix argument REVERSE is non-nil, sorts in reverse order.
-
-\(fn REVERSE)" t nil)
-
-(autoload 'rmail-sort-by-subject "rmailsort" "\
-Sort messages of current Rmail buffer by \"Subject\" header.
-Ignores any \"Re: \" prefix. If prefix argument REVERSE is
-non-nil, sorts in reverse order.
-
-\(fn REVERSE)" t nil)
-
-(autoload 'rmail-sort-by-author "rmailsort" "\
-Sort messages of current Rmail buffer by author.
-This uses either the \"From\" or \"Sender\" header, downcased.
-If prefix argument REVERSE is non-nil, sorts in reverse order.
-
-\(fn REVERSE)" t nil)
-
-(autoload 'rmail-sort-by-recipient "rmailsort" "\
-Sort messages of current Rmail buffer by recipient.
-This uses either the \"To\" or \"Apparently-To\" header, downcased.
-If prefix argument REVERSE is non-nil, sorts in reverse order.
-
-\(fn REVERSE)" t nil)
-
-(autoload 'rmail-sort-by-correspondent "rmailsort" "\
-Sort messages of current Rmail buffer by other correspondent.
-This uses either the \"From\", \"Sender\", \"To\", or
-\"Apparently-To\" header, downcased. Uses the first header not
-excluded by `mail-dont-reply-to-names'. If prefix argument
-REVERSE is non-nil, sorts in reverse order.
-
-\(fn REVERSE)" t nil)
-
-(autoload 'rmail-sort-by-lines "rmailsort" "\
-Sort messages of current Rmail buffer by the number of lines.
-If prefix argument REVERSE is non-nil, sorts in reverse order.
-
-\(fn REVERSE)" t nil)
-
-(autoload 'rmail-sort-by-labels "rmailsort" "\
-Sort messages of current Rmail buffer by labels.
-LABELS is a comma-separated list of labels. The order of these
-labels specifies the order of messages: messages with the first
-label come first, messages with the second label come second, and
-so on. Messages that have none of these labels come last.
-If prefix argument REVERSE is non-nil, sorts in reverse order.
-
-\(fn REVERSE LABELS)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "rmailsum" "rmailsum.el" "8205e67c8188aa5c01715e79e10667c1")
-;;; Generated autoloads from rmailsum.el
-
-(autoload 'rmail-summary "rmailsum" "\
-Display a summary of all messages, one line per message.
-
-\(fn)" t nil)
-
-(autoload 'rmail-summary-by-labels "rmailsum" "\
-Display a summary of all messages with one or more LABELS.
-LABELS should be a string containing the desired labels, separated by commas.
-
-\(fn LABELS)" t nil)
-
-(autoload 'rmail-summary-by-recipients "rmailsum" "\
-Display a summary of all messages with the given RECIPIENTS.
-Normally checks the To, From and Cc fields of headers;
-but if PRIMARY-ONLY is non-nil (prefix arg given),
- only look in the To and From fields.
-RECIPIENTS is a regular expression.
-
-\(fn RECIPIENTS &optional PRIMARY-ONLY)" t nil)
-
-(autoload 'rmail-summary-by-regexp "rmailsum" "\
-Display a summary of all messages according to regexp REGEXP.
-If the regular expression is found in the header of the message
-\(including in the date and other lines, as well as the subject line),
-Emacs will list the message in the summary.
-
-\(fn REGEXP)" t nil)
-
-(autoload 'rmail-summary-by-topic "rmailsum" "\
-Display a summary of all messages with the given SUBJECT.
-Normally checks just the Subject field of headers; but with prefix
-argument WHOLE-MESSAGE is non-nil, looks in the whole message.
-SUBJECT is a regular expression.
-
-\(fn SUBJECT &optional WHOLE-MESSAGE)" t nil)
-
-(autoload 'rmail-summary-by-senders "rmailsum" "\
-Display a summary of all messages whose \"From\" field matches SENDERS.
-SENDERS is a regular expression.
-
-\(fn SENDERS)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "undigest" "undigest.el" "20561f083496eb113fa9e501902bfcc3")
-;;; Generated autoloads from undigest.el
-
-(autoload 'undigestify-rmail-message "undigest" "\
-Break up a digest message into its constituent messages.
-Leaves original message, deleted, before the undigestified messages.
-
-\(fn)" t nil)
-
-(autoload 'unforward-rmail-message "undigest" "\
-Extract a forwarded message from the containing message.
-This puts the forwarded message into a separate rmail message following
-the containing message. This command is only useful when messages are
-forwarded with `rmail-enable-mime-composing' set to nil.
-
-\(fn)" t nil)
-
-;;;***
-\f
-;;; End of automatically extracted autoloads.
-
(provide 'rmail)
(provide 'rmailedit)
;; Local Variables:
-;; generated-autoload-file: "rmail.el"
+;; generated-autoload-file: "rmail-loaddefs.el"
;; End:
;;; rmailedit.el ends here
(provide 'rmailkwd)
;; Local Variables:
-;; generated-autoload-file: "rmail.el"
+;; generated-autoload-file: "rmail-loaddefs.el"
;; End:
;;; rmailkwd.el ends here
(provide 'rmailmm)
;; Local Variables:
-;; generated-autoload-file: "rmail.el"
+;; generated-autoload-file: "rmail-loaddefs.el"
;; End:
;;; rmailmm.el ends here
(rmail-show-message-1 rmail-current-message))
;; Local Variables:
-;; generated-autoload-file: "rmail.el"
+;; generated-autoload-file: "rmail-loaddefs.el"
;; End:
;;; rmailmsc.el ends here
(provide 'rmailsort)
;; Local Variables:
-;; generated-autoload-file: "rmail.el"
+;; generated-autoload-file: "rmail-loaddefs.el"
;; End:
;;; rmailsort.el ends here
(provide 'rmailsum)
;; Local Variables:
-;; generated-autoload-file: "rmail.el"
+;; generated-autoload-file: "rmail-loaddefs.el"
;; End:
;;; rmailsum.el ends here
(insert "\nFrom " (user-login-name) " " (current-time-string time) "\n")
;; Insert the time zone before the year.
(forward-char -1)
- (forward-word-strictly -1)
+ (forward-word -1)
(require 'mail-utils)
(insert (mail-rfc822-time-zone time) " ")
(goto-char (point-max))
(provide 'undigest)
;; Local Variables:
-;; generated-autoload-file: "rmail.el"
+;; generated-autoload-file: "rmail-loaddefs.el"
;; End:
;;; undigest.el ends here
(defun clipboard-yank ()
"Insert the clipboard contents, or the last stretch of killed text."
(interactive "*")
- (let ((gui-select-enable-clipboard t))
+ (let ((gui-select-enable-clipboard t)
+ (interprogram-paste-function (or interprogram-paste-function
+ #'gui-selection-value)))
(yank)))
(defun clipboard-kill-ring-save (beg end &optional region)
"Copy region to kill ring, and save in the GUI's clipboard."
(interactive "r\np")
- (let ((gui-select-enable-clipboard t))
+ (let ((gui-select-enable-clipboard t)
+ (interprogram-cut-function (or interprogram-cut-function
+ #'gui-select-text)))
(kill-ring-save beg end region)))
(defun clipboard-kill-region (beg end &optional region)
"Kill the region, and save it in the GUI's clipboard."
(interactive "r\np")
- (let ((gui-select-enable-clipboard t))
+ (let ((gui-select-enable-clipboard t)
+ (interprogram-cut-function (or interprogram-cut-function
+ #'gui-select-text)))
(kill-region beg end region)))
(defun menu-bar-enable-clipboard ()
;; Author: Bill Wohler <wohler@newt.com>
;; Maintainer: Bill Wohler <wohler@newt.com>
-;; Version: 8.6
+;; Version: 8.6+git
;; Keywords: mail
;; This file is part of GNU Emacs.
;; Try to keep variables local to a single file. Provide accessors if
;; variables are shared. Use this section as a last resort.
-(defconst mh-version "8.6" "Version number of MH-E.")
+(defconst mh-version "8.6+git" "Version number of MH-E.")
;; Variants
(require 'url-queue)
(require 'url-util) ; for url-get-url-at-point
(require 'mm-url)
+(require 'puny)
(eval-when-compile (require 'subr-x)) ;; for string-trim
(defgroup eww nil
(current-buffer)
(get-buffer-create "*eww*")))
(eww-setup-buffer)
+ ;; Check whether the domain only uses "Highly Restricted" Unicode
+ ;; IDNA characters. If not, transform to punycode to indicate that
+ ;; there may be funny business going on.
+ (let ((parsed (url-generic-parse-url url)))
+ (unless (puny-highly-restrictive-domain-p (url-host parsed))
+ (setf (url-host parsed) (puny-encode-domain (url-host parsed)))
+ (setq url (url-recreate-url parsed))))
(plist-put eww-data :url url)
(plist-put eww-data :title "")
(eww-update-header-line-format)
(shr-target-id (url-target (url-generic-parse-url url)))
(shr-external-rendering-functions
(append
+ shr-external-rendering-functions
'((title . eww-tag-title)
(form . eww-tag-form)
(input . eww-tag-input)
+ (button . eww-form-submit)
(textarea . eww-tag-textarea)
(select . eww-tag-select)
(link . eww-tag-link)
(condition-case nil
(decode-coding-region (point-min) (point-max) 'utf-8)
(coding-system-error nil))
- (libxml-parse-html-region (point-min) (point-max)))))
+ (libxml-parse-html-region (point-min) (point-max))))
+ (base (plist-get eww-data :url)))
(eww-score-readability dom)
(eww-save-history)
(eww-display-html nil nil
- (eww-highest-readability dom)
+ (list 'base (list (cons 'href base))
+ (eww-highest-readability dom))
nil (current-buffer))
(dolist (elem '(:source :url :title :next :previous :up))
(plist-put eww-data elem (plist-get old-data elem)))
(define-key map "R" 'eww-readable)
(define-key map "H" 'eww-list-histories)
(define-key map "E" 'eww-set-character-encoding)
+ (define-key map "s" 'eww-switch-to-buffer)
(define-key map "S" 'eww-list-buffers)
(define-key map "F" 'eww-toggle-fonts)
+ (define-key map [(meta C)] 'eww-toggle-colors)
(define-key map "b" 'eww-add-bookmark)
(define-key map "B" 'eww-list-bookmarks)
["View page source" eww-view-source]
["Copy page URL" eww-copy-page-url t]
["List histories" eww-list-histories t]
+ ["Switch to buffer" eww-switch-to-buffer t]
["List buffers" eww-list-buffers t]
["Add bookmark" eww-add-bookmark t]
["List bookmarks" eww-list-bookmarks t]
["List cookies" url-cookie-list t]
+ ["Toggle fonts" eww-toggle-fonts t]
+ ["Toggle colors" eww-toggle-colors t]
["Character Encoding" eww-set-character-encoding]))
map))
(eww-reload nil 'utf-8)
(eww-reload nil charset)))
+(defun eww-switch-to-buffer ()
+ "Prompt for an EWW buffer to display in the selected window."
+ (interactive)
+ (let ((completion-extra-properties
+ '(:annotation-function (lambda (buf)
+ (with-current-buffer buf
+ (format " %s" (eww-current-url)))))))
+ (pop-to-buffer-same-window
+ (read-buffer "Switch to EWW buffer: "
+ (cl-loop for buf in (nreverse (buffer-list))
+ if (with-current-buffer buf (derived-mode-p 'eww-mode))
+ return buf)
+ t
+ (lambda (bufn)
+ (with-current-buffer
+ (if (consp bufn) (cdr bufn) (get-buffer bufn))
+ (derived-mode-p 'eww-mode)))))))
+
(defun eww-toggle-fonts ()
"Toggle whether to use monospaced or font-enabled layouts."
(interactive)
"off"))
(eww-reload))
+(defun eww-toggle-colors ()
+ "Toggle whether to use HTML-specified colors or not."
+ (interactive)
+ (message "Colors are now %s"
+ (if (setq shr-use-colors (not shr-use-colors))
+ "on"
+ "off"))
+ (eww-reload))
+
;;; Bookmarks code
(defvar eww-bookmarks nil)
(require 'starttls)
(require 'auth-source)
(require 'nsm)
+(require 'puny)
(autoload 'gnutls-negotiate "gnutls")
(autoload 'open-gnutls-stream "gnutls")
(plist-get parameters :capability-command))))))
;; The simplest case: wrapper around `make-network-process'.
(make-network-process :name name :buffer buffer
- :host host :service service
+ :host (puny-encode-domain host) :service service
:nowait (plist-get parameters :nowait))
(let ((work-buffer (or buffer
(generate-new-buffer " *stream buffer*")))
(defun network-stream-open-plain (name buffer host service parameters)
(let ((start (with-current-buffer buffer (point)))
(stream (make-network-process :name name :buffer buffer
- :host host :service service
+ :host (puny-encode-domain host)
+ :service service
:nowait (plist-get parameters :nowait))))
(when (plist-get parameters :warn-unless-encrypted)
(setq stream (nsm-verify-connection stream host service nil t)))
eoc))
;; Return (STREAM GREETING CAPABILITIES RESULTING-TYPE)
(stream (make-network-process :name name :buffer buffer
- :host host :service service))
+ :host (puny-encode-domain host)
+ :service service))
(greeting (and (not (plist-get parameters :nogreeting))
(network-stream-get-response stream start eoc)))
(capabilities (network-stream-command stream capability-command
(unless require-tls
(setq stream
(make-network-process :name name :buffer buffer
- :host host :service service))
+ :host (puny-encode-domain host)
+ :service service))
(network-stream-get-response stream start eoc)))
;; Re-get the capabilities, which may have now changed.
(setq capabilities
nil
(let ((response
(condition-case nil
- (nsm-query-user message args (nsm-format-certificate status))
+ (intern
+ (car (split-string
+ (nsm-query-user message args
+ (nsm-format-certificate status))))
+ obarray)
;; Make sure we manage to close the process if the user hits
;; `C-g'.
(quit 'no)
(error 'no))))
(if (eq response 'no)
- nil
+ (progn
+ (message "Aborting connection to %s:%s" host port)
+ nil)
+ (message (if (eq response 'session)
+ "Accepting certificate for %s:%s this session only"
+ "Permanently accepting certificate for %s:%s")
+ host port)
(nsm-save-host host port status what response)
t))))
(defun nsm-query-user (message args cert)
(let ((buffer (get-buffer-create "*Network Security Manager*")))
(save-window-excursion
+ ;; First format the certificate and warnings.
(with-help-window buffer
(with-current-buffer buffer
(erase-buffer)
;; Fill the first line of the message, which usually
;; contains lots of explanatory text.
(fill-region (point) (line-end-position)))))
- (let ((responses '((?n . no)
- (?s . session)
- (?a . always)))
- (prefix "")
- (cursor-in-echo-area t)
- response)
- (while (not response)
- (setq response
- (cdr
- (assq (downcase
- (read-char
- (concat prefix
- "Continue connecting? (No, Session only, Always) ")))
- responses)))
- (unless response
- (ding)
- (setq prefix "Invalid choice. ")))
- (kill-buffer buffer)
- ;; If called from a callback, `read-char' will insert things
- ;; into the pending input. Clear that.
- (clear-this-command-keys)
- response))))
+ ;; Then ask the user what to do about it.
+ (unwind-protect
+ (cadr
+ (read-multiple-choice
+ "Continue connecting?"
+ '((?a "always" "Accept this certificate this session and for all future sessions.")
+ (?s "session only" "Accept this certificate this session only.")
+ (?n "no" "Refuse to use this certificate, and close the connection."))))
+ (kill-buffer buffer)))))
(defun nsm-save-host (host port status what permanency)
(let* ((id (nsm-id host port))
--- /dev/null
+;;; puny.el --- translate non-ASCII domain names to ASCII
+
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc.
+
+;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
+;; Keywords: mail, net
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Written by looking at
+;; http://stackoverflow.com/questions/183485/can-anyone-recommend-a-good-free-javascript-for-punycode-to-unicode-conversion
+
+;;; Code:
+
+(require 'seq)
+
+(defun puny-encode-domain (domain)
+ "Encode DOMAIN according to the IDNA/punycode algorithm.
+For instance, \"fśf.org\" => \"xn--ff-2sa.org\"."
+ ;; The vast majority of domain names are not IDNA domain names, so
+ ;; add a check first to avoid doing unnecessary work.
+ (if (string-match "\\'[[:ascii:]]+\\'" domain)
+ domain
+ (mapconcat 'puny-encode-string (split-string domain "[.]") ".")))
+
+(defun puny-encode-string (string)
+ "Encode STRING according to the IDNA/punycode algorithm.
+This is used to encode non-ASCII domain names.
+For instance, \"bücher\" => \"xn--bcher-kva\"."
+ (let ((ascii (seq-filter (lambda (char)
+ (< char 128))
+ string)))
+ (if (= (length ascii) (length string))
+ string
+ (concat "xn--"
+ (if (null ascii)
+ ""
+ (concat ascii "-"))
+ (puny-encode-complex (length ascii) string)))))
+
+(defun puny-decode-domain (domain)
+ "Decode DOMAIN according to the IDNA/punycode algorithm.
+For instance, \"xn--ff-2sa.org\" => \"fśf.org\"."
+ (mapconcat 'puny-decode-string (split-string domain "[.]") "."))
+
+(defun puny-decode-string (string)
+ "Decode an IDNA/punycode-encoded string.
+For instance \"xn--bcher-kva\" => \"bücher\"."
+ (if (string-match "\\`xn--" string)
+ (puny-decode-string-internal (substring string 4))
+ string))
+
+(defconst puny-initial-n 128)
+(defconst puny-initial-bias 72)
+(defconst puny-base 36)
+(defconst puny-damp 700)
+(defconst puny-tmin 1)
+(defconst puny-tmax 26)
+(defconst puny-skew 28)
+
+;; 0-25 a-z
+;; 26-36 0-9
+(defun puny-encode-digit (d)
+ (if (< d 26)
+ (+ ?a d)
+ (+ ?0 (- d 26))))
+
+(defun puny-adapt (delta num-points first-time)
+ (let ((delta (if first-time
+ (/ delta puny-damp)
+ (/ delta 2)))
+ (k 0))
+ (setq delta (+ delta (/ delta num-points)))
+ (while (> delta (/ (* (- puny-base puny-tmin)
+ puny-tmax)
+ 2))
+ (setq delta (/ delta (- puny-base puny-tmin))
+ k (+ k puny-base)))
+ (+ k (/ (* (1+ (- puny-base puny-tmin)) delta)
+ (+ delta puny-skew)))))
+
+(defun puny-encode-complex (insertion-points string)
+ (let ((n puny-initial-n)
+ (delta 0)
+ (bias puny-initial-bias)
+ (h insertion-points)
+ result m ijv q)
+ (while (< h (length string))
+ (setq ijv (cl-loop for char across string
+ when (>= char n)
+ minimize char))
+ (setq m ijv)
+ (setq delta (+ delta (* (- m n) (+ h 1)))
+ n m)
+ (cl-loop for char across string
+ when (< char n)
+ do (cl-incf delta)
+ when (= char ijv)
+ do (progn
+ (setq q delta)
+ (cl-loop with k = puny-base
+ for t1 = (cond
+ ((<= k bias)
+ puny-tmin)
+ ((>= k (+ bias puny-tmax))
+ puny-tmax)
+ (t
+ (- k bias)))
+ while (>= q t1)
+ do (push (puny-encode-digit
+ (+ t1 (mod (- q t1)
+ (- puny-base t1))))
+ result)
+ do (setq q (/ (- q t1) (- puny-base t1))
+ k (+ k puny-base)))
+ (push (puny-encode-digit q) result)
+ (setq bias (puny-adapt delta (+ h 1) (= h insertion-points))
+ delta 0
+ h (1+ h))))
+ (cl-incf delta)
+ (cl-incf n))
+ (nreverse result)))
+
+(defun puny-decode-digit (cp)
+ (cond
+ ((<= cp ?9)
+ (+ (- cp ?0) 26))
+ ((<= cp ?Z)
+ (- cp ?A))
+ ((<= cp ?z)
+ (- cp ?a))
+ (t
+ puny-base)))
+
+(defun puny-decode-string-internal (string)
+ (with-temp-buffer
+ (insert string)
+ (goto-char (point-max))
+ (search-backward "-" nil (point-min))
+ ;; The encoded chars are after the final dash.
+ (let ((encoded (buffer-substring (1+ (point)) (point-max)))
+ (ic 0)
+ (i 0)
+ (bias puny-initial-bias)
+ (n puny-initial-n)
+ out)
+ (delete-region (point) (point-max))
+ (while (< ic (length encoded))
+ (let ((old-i i)
+ (w 1)
+ (k puny-base)
+ digit t1)
+ (cl-loop do (progn
+ (setq digit (puny-decode-digit (aref encoded ic)))
+ (cl-incf ic)
+ (cl-incf i (* digit w))
+ (setq t1 (cond
+ ((<= k bias)
+ puny-tmin)
+ ((>= k (+ bias puny-tmax))
+ puny-tmax)
+ (t
+ (- k bias)))))
+ while (>= digit t1)
+ do (setq w (* w (- puny-base t1))
+ k (+ k puny-base)))
+ (setq out (1+ (buffer-size)))
+ (setq bias (puny-adapt (- i old-i) out (= old-i 0))))
+
+ (setq n (+ n (/ i out))
+ i (mod i out))
+ (goto-char (point-min))
+ (forward-char i)
+ (insert (format "%c" n))
+ (cl-incf i)))
+ (buffer-string)))
+
+;; http://www.unicode.org/reports/tr39/#Restriction_Level_Detection
+;; http://www.unicode.org/reports/tr31/#Table_Candidate_Characters_for_Inclusion_in_Identifiers
+
+(defun puny-highly-restrictive-string-p (string)
+ "Say whether STRING is \"highly restrictive\" in the Unicode IDNA sense.
+See http://www.unicode.org/reports/tr39/#Restriction_Level_Detection
+for details. The main idea is that if you're mixing
+scripts (like latin and cyrillic), you may confuse the user by
+using homographs."
+ (let ((scripts
+ (delq
+ t
+ (seq-uniq
+ (seq-map (lambda (char)
+ (if (memq char
+ ;; These characters are always allowed
+ ;; in any string.
+ '(#x0027 ; APOSTROPHE
+ #x002D ; HYPHEN-MINUS
+ #x002E ; FULL STOP
+ #x003A ; COLON
+ #x00B7 ; MIDDLE DOT
+ #x058A ; ARMENIAN HYPHEN
+ #x05F3 ; HEBREW PUNCTUATION GERESH
+ #x05F4 ; HEBREW PUNCTUATION GERSHAYIM
+ #x0F0B ; TIBETAN MARK INTERSYLLABIC TSHEG
+ #x200C ; ZERO WIDTH NON-JOINER*
+ #x200D ; ZERO WIDTH JOINER*
+ #x2010 ; HYPHEN
+ #x2019 ; RIGHT SINGLE QUOTATION MARK
+ #x2027 ; HYPHENATION POINT
+ #x30A0 ; KATAKANA-HIRAGANA DOUBLE HYPHEN
+ #x30FB)) ; KATAKANA MIDDLE DOT
+ t
+ (aref char-script-table char)))
+ string)))))
+ (or
+ ;; Every character uses the same script.
+ (= (length scripts) 1)
+ (seq-some 'identity
+ (mapcar (lambda (list)
+ (seq-every-p (lambda (script)
+ (memq script list))
+ scripts))
+ '((latin han hiragana kana)
+ (latin han bopomofo)
+ (latin han hangul)))))))
+
+(defun puny-highly-restrictive-domain-p (domain)
+ "Say whether DOMAIN is \"highly restrictive\" in the Unicode IDNA sense.
+See `puny-highly-restrictive-string-p' for further details."
+ (seq-every-p 'puny-highly-restrictive-string-p (split-string domain "[.]")))
+
+(provide 'puny)
+
+;;; puny.el ends here
;; need to do a little more work to get to where we want to be.
(when (thing-at-point-looking-at thing-at-point-markedup-url-regexp)
(search-backward "<URL:"))
- (backward-word-strictly 1)
+ (backward-word 1)
(let ((word (funcall quickurl-grab-lookup-function)))
(when word
(quickurl-make-url
`:encryption'
VALUE must be `plain' (the default) for unencrypted connections, or `tls'
-for connections using SSL/TLS."
+for connections using SSL/TLS.
+
+`:server-alias'
+
+VALUE must be a string that will be used instead of the server name for
+display purposes. If absent, the real server name will be displayed instead."
:type '(alist :key-type string
:value-type (plist :options
((:nick string)
(:full-name string)
(:channels (repeat string))
(:encryption (choice (const tls)
- (const plain))))))
+ (const plain)))
+ (:server-alias string))))
:group 'rcirc)
(defcustom rcirc-default-port 6667
(channels (plist-get (cdr c) :channels))
(password (plist-get (cdr c) :password))
(encryption (plist-get (cdr c) :encryption))
+ (server-alias (plist-get (cdr c) :server-alias))
contact)
(when server
(let (connected)
(dolist (p (rcirc-process-list))
- (when (string= server (process-name p))
+ (when (string= (or server-alias server) (process-name p))
(setq connected p)))
(if (not connected)
(condition-case nil
(rcirc-connect server port nick user-name
- full-name channels password encryption)
- (quit (message "Quit connecting to %s" server)))
+ full-name channels password encryption
+ server-alias)
+ (quit (message "Quit connecting to %s"
+ (or server-alias server))))
(with-current-buffer (process-buffer connected)
(setq contact (process-contact
- (get-buffer-process (current-buffer)) :host))
+ (get-buffer-process (current-buffer)) :name))
(setq connected-servers
- (cons (if (stringp contact) contact server)
+ (cons (if (stringp contact)
+ contact (or server-alias server))
connected-servers))))))))
(when connected-servers
(message "Already connected to %s"
;;;###autoload
(defun rcirc-connect (server &optional port nick user-name
- full-name startup-channels password encryption)
+ full-name startup-channels password encryption
+ server-alias)
(save-excursion
- (message "Connecting to %s..." server)
+ (message "Connecting to %s..." (or server-alias server))
(let* ((inhibit-eol-conversion)
(port-number (if port
(if (stringp port)
(full-name (or full-name rcirc-default-full-name))
(startup-channels startup-channels)
(process (open-network-stream
- server nil server port-number
+ (or server-alias server) nil server port-number
:type (or encryption 'plain))))
;; set up process
(set-process-coding-system process 'raw-text 'raw-text)
password encryption))
(setq-local rcirc-process process)
(setq-local rcirc-server server)
- (setq-local rcirc-server-name server) ; Update when we get 001 response.
+ (setq-local rcirc-server-name
+ (or server-alias server)) ; Update when we get 001 response.
(setq-local rcirc-buffer-alist nil)
(setq-local rcirc-nick-table (make-hash-table :test 'equal))
(setq-local rcirc-nick nick)
(setq rcirc-keepalive-timer
(run-at-time 0 (/ rcirc-timeout-seconds 2) 'rcirc-keepalive)))
- (message "Connecting to %s...done" server)
+ (message "Connecting to %s...done" (or server-alias server))
;; return process object
process)))
:group 'shr
:type 'boolean)
+(defcustom shr-use-colors t
+ "If non-nil, respect color specifications in the HTML."
+ :version "25.2"
+ :group 'shr
+ :type 'boolean)
+
(defcustom shr-table-horizontal-line nil
"Character used to draw horizontal table lines.
If nil, don't draw horizontal table lines."
(defvar shr-inhibit-images nil
"If non-nil, inhibit loading images.")
+(defvar shr-external-rendering-functions nil
+ "Alist of tag/function pairs used to alter how shr renders certain tags.
+For instance, eww uses this to alter rendering of title, forms
+and other things:
+((title . eww-tag-title)
+ (form . eww-tag-form)
+ ...)")
+
;;; Internal variables.
(defvar shr-folding-mode nil)
(defvar shr-depth 0)
(defvar shr-warning nil)
(defvar shr-ignore-cache nil)
-(defvar shr-external-rendering-functions nil)
(defvar shr-target-id nil)
(defvar shr-table-separator-length 1)
(defvar shr-table-separator-pixel-width 0)
(defun shr-descend (dom)
(let ((function
- (or
- ;; Allow other packages to override (or provide) rendering
- ;; of elements.
- (cdr (assq (dom-tag dom) shr-external-rendering-functions))
- (intern (concat "shr-tag-" (symbol-name (dom-tag dom))) obarray)))
+ (intern (concat "shr-tag-" (symbol-name (dom-tag dom))) obarray))
+ ;; Allow other packages to override (or provide) rendering
+ ;; of elements.
+ (external (cdr (assq (dom-tag dom) shr-external-rendering-functions)))
(style (dom-attr dom 'style))
(shr-stylesheet shr-stylesheet)
(shr-depth (1+ shr-depth))
(setq style nil)))
;; If we have a display:none, then just ignore this part of the DOM.
(unless (equal (cdr (assq 'display shr-stylesheet)) "none")
- (if (fboundp function)
- (funcall function dom)
- (shr-generic dom))
+ (cond (external
+ (funcall external dom))
+ ((fboundp function)
+ (funcall function dom))
+ (t
+ (shr-generic dom)))
(when (and shr-target-id
(equal (dom-attr dom 'id) shr-target-id))
;; If the element was empty, we don't have anything to put the
(shr-color-visible bg fg)))))))
(defun shr-colorize-region (start end fg &optional bg)
- (when (and (or fg bg) (>= (display-color-cells) 88))
+ (when (and shr-use-colors
+ (or fg bg)
+ (>= (display-color-cells) 88))
(let ((new-colors (shr-color-check fg bg)))
(when new-colors
(when fg
(defun shr-tag-s (dom)
(shr-fontize-dom dom 'shr-strike-through))
-(defun shr-tag-del (dom)
- (shr-fontize-dom dom 'shr-strike-through))
-
(defun shr-tag-b (dom)
(shr-fontize-dom dom 'bold))
(let ((shr-current-font 'default))
(shr-generic dom)))
+(defun shr-tag-ins (cont)
+ (let* ((start (point))
+ (color "green")
+ (shr-stylesheet (nconc (list (cons 'color color))
+ shr-stylesheet)))
+ (shr-generic cont)
+ (shr-colorize-region start (point) color
+ (cdr (assq 'background-color shr-stylesheet)))))
+
+(defun shr-tag-del (cont)
+ (let* ((start (point))
+ (color "red")
+ (shr-stylesheet (nconc (list (cons 'color color))
+ shr-stylesheet)))
+ (shr-fontize-dom cont 'shr-strike-through)
+ (shr-colorize-region start (point) color
+ (cdr (assq 'background-color shr-stylesheet)))))
+
(defun shr-parse-style (style)
(when style
(save-match-data
(require 'tramp)
-;; Pacify byte-compiler.
-(defvar directory-listing-before-filename-regexp)
-(defvar directory-sep-char)
-
;;;###tramp-autoload
(defcustom tramp-adb-program "adb"
"Name of the Android Debug Bridge program."
(directory-files . tramp-handle-directory-files)
(directory-files-and-attributes
. tramp-adb-handle-directory-files-and-attributes)
- (dired-call-process . ignore)
(dired-compress-file . ignore)
(dired-uncache . tramp-handle-dired-uncache)
(expand-file-name . tramp-adb-handle-expand-file-name)
(shell-command . tramp-adb-handle-shell-command)
(start-file-process . tramp-adb-handle-start-file-process)
(substitute-in-file-name . tramp-handle-substitute-in-file-name)
- (unhandled-file-name-directory . tramp-handle-unhandled-file-name-directory)
+ (unhandled-file-name-directory . ignore)
(vc-registered . ignore)
(verify-visited-file-modtime . tramp-handle-verify-visited-file-modtime)
(write-region . tramp-adb-handle-write-region))
tramp-current-host nil nil))
result)
(tramp-message v 6 "%s" (mapconcat 'identity (process-command p) " "))
- (tramp-compat-set-process-query-on-exit-flag p nil)
+ (set-process-query-on-exit-flag p nil)
(while (eq 'run (process-status p))
(accept-process-output p 0.1))
(accept-process-output p 0.1)
(lambda (elt)
(setcar
(cdr elt)
- (tramp-compat-replace-regexp-in-string
+ (replace-regexp-in-string
":" tramp-prefix-port-format (car (cdr elt)))))
result)
result))))
(unless (tramp-run-real-handler 'file-name-absolute-p (list localname))
(setq localname (concat "/" localname)))
;; Do normal `expand-file-name' (this does "/./" and "/../").
- ;; We bind `directory-sep-char' here for XEmacs on Windows,
- ;; which would otherwise use backslash. `default-directory' is
- ;; bound, because on Windows there would be problems with UNC
- ;; shares or Cygwin mounts.
- (let ((directory-sep-char ?/)
- (default-directory (tramp-compat-temporary-file-directory)))
+ ;; `default-directory' is bound, because on Windows there would
+ ;; be problems with UNC shares or Cygwin mounts.
+ (let ((default-directory (tramp-compat-temporary-file-directory)))
(tramp-make-tramp-file-name
method user host
(tramp-drop-volume-letter
(with-tramp-file-property v localname "file-truename"
(let ((result nil)) ; result steps in reverse order
(tramp-message v 4 "Finding true name for `%s'" filename)
- (let* ((directory-sep-char ?/)
- (steps (tramp-compat-split-string localname "/"))
+ (let* ((steps (split-string localname "/" 'omit))
(localnamedir (tramp-run-real-handler
'file-name-as-directory (list localname)))
(is-dir (string= localname localnamedir))
"Symlink target `%s' on wrong host" symlink-target))
(setq symlink-target localname))
(setq steps
- (append (tramp-compat-split-string
- symlink-target "/")
+ (append (split-string symlink-target "/" 'omit)
steps)))
(t
;; It's a file.
(split-string
(apply 'concat
(mapcar (lambda (s)
- (tramp-compat-replace-regexp-in-string
- "\\(.\\)" " -\\1"
- (tramp-compat-replace-regexp-in-string "^-" "" s)))
+ (replace-regexp-in-string
+ "\\(.\\)" " -\\1" (replace-regexp-in-string "^-" "" s)))
;; FIXME: Warning about removed switches (long and non-dash).
(delq nil
(mapcar
v 'file-error "Cannot make local copy of file `%s'" filename))
(set-file-modes
tmpfile
- (logior (or (file-modes filename) 0)
- (tramp-compat-octal-to-decimal "0400"))))
+ (logior (or (file-modes filename) 0) (string-to-number "0400" 8))))
tmpfile)))
(defun tramp-adb-handle-file-writable-p (filename)
(copy-file filename tmpfile 'ok)
(set-file-modes
tmpfile
- (logior (or (file-modes tmpfile) 0)
- (tramp-compat-octal-to-decimal "0600"))))
+ (logior (or (file-modes tmpfile) 0) (string-to-number "0600" 8))))
(tramp-run-real-handler
'write-region
(list start end tmpfile append 'no-message lockname confirm))
(with-parsed-tramp-file-name filename nil
(tramp-flush-file-property v (file-name-directory localname))
(tramp-flush-file-property v localname)
- (tramp-adb-send-command-and-check
- v (format "chmod %s %s" (tramp-compat-decimal-to-octal mode) localname))))
+ (tramp-adb-send-command-and-check v (format "chmod %o %s" mode localname))))
(defun tramp-adb-handle-set-file-times (filename &optional time)
"Like `set-file-times' for Tramp files."
(if (and t1 t2
(tramp-equal-remote filename newname)
(not (file-directory-p filename)))
- (let ((l1 (tramp-file-name-handler
- 'file-remote-p filename 'localname))
- (l2 (tramp-file-name-handler
- 'file-remote-p newname 'localname)))
+ (let ((l1 (file-remote-p filename 'localname))
+ (l2 (file-remote-p newname 'localname)))
(when (and (not ok-if-already-exists)
(file-exists-p newname))
(tramp-error v 'file-already-exists newname))
"Error renaming %s to %s" filename newname))
;; Rename by copy.
- (copy-file filename newname ok-if-already-exists t t)
+ (copy-file
+ filename newname ok-if-already-exists 'keep-time 'preserve-uid-gid)
(delete-file filename))))))
(defun tramp-adb-handle-process-file
;; because the remote process could have changed them.
(when tmpinput (delete-file tmpinput))
- ;; `process-file-side-effects' has been introduced with GNU
- ;; Emacs 23.2. If set to nil, no remote file will be changed
- ;; by `program'. If it doesn't exist, we assume its default
- ;; value t.
- (unless (and (boundp 'process-file-side-effects)
- (not (symbol-value 'process-file-side-effects)))
+ (unless process-file-side-effects
(tramp-flush-directory-property v ""))
;; Return exit status.
(current-buffer))))
;; There's some output, display it.
(when (with-current-buffer output-buffer (> (point-max) (point-min)))
- (if (functionp 'display-message-or-buffer)
- (tramp-compat-funcall 'display-message-or-buffer output-buffer)
- (pop-to-buffer output-buffer))))))))
+ (display-message-or-buffer output-buffer)))))))
;; We use BUFFER also as connection buffer during setup. Because of
;; this, its original contents must be saved, and restored once
;; process. We ignore errors, because the process
;; could have finished already.
(ignore-errors
- (tramp-compat-set-process-query-on-exit-flag p t)
+ (set-process-query-on-exit-flag p t)
(set-marker (process-mark p) (point)))
;; Return process.
p))))
(host (tramp-file-name-host vec))
(port (tramp-file-name-port vec))
(devices (mapcar 'cadr (tramp-adb-parse-device-names nil))))
- (tramp-compat-replace-regexp-in-string
+ (replace-regexp-in-string
tramp-prefix-port-format ":"
(cond ((member host devices) host)
;; This is the case when the host is connected to the default port.
(not (zerop (length host)))
(not (tramp-adb-execute-adb-command
vec "connect"
- (tramp-compat-replace-regexp-in-string
+ (replace-regexp-in-string
tramp-prefix-port-format ":" host))))
;; When new device connected, running other adb command (e.g.
;; adb shell) immediately will fail. To get around this
(unless (eq 'run (process-status p))
(tramp-error vec 'file-error "Terminated!"))
(tramp-set-connection-property p "vector" vec)
- (tramp-compat-set-process-query-on-exit-flag p nil)
+ (set-process-query-on-exit-flag p nil)
;; Check whether the properties have been changed. If
;; yes, this is a strong indication that we must expire all
;; Read the expression.
(goto-char (point-min))
(read (current-buffer)))
- ":" 'omit-nulls))
+ ":" 'omit))
;; Mark it as connected.
(tramp-set-connection-property p "connected" t)))))))
(choice :tag " Value" sexp))))
(defcustom tramp-persistency-file-name
- (cond
- ;; GNU Emacs.
- ((and (fboundp 'locate-user-emacs-file))
- (expand-file-name (tramp-compat-funcall 'locate-user-emacs-file "tramp")))
- ((and (boundp 'user-emacs-directory)
- (stringp (symbol-value 'user-emacs-directory))
- (file-directory-p (symbol-value 'user-emacs-directory)))
- (expand-file-name "tramp" (symbol-value 'user-emacs-directory)))
- ((and (not (featurep 'xemacs)) (file-directory-p "~/.emacs.d/"))
- "~/.emacs.d/tramp")
- ;; XEmacs.
- ((and (boundp 'user-init-directory)
- (stringp (symbol-value 'user-init-directory))
- (file-directory-p (symbol-value 'user-init-directory)))
- (expand-file-name "tramp" (symbol-value 'user-init-directory)))
- ((and (featurep 'xemacs) (file-directory-p "~/.xemacs/"))
- "~/.xemacs/tramp")
- ;; For users without `~/.emacs.d/' or `~/.xemacs/'.
- (t "~/.tramp"))
+ (expand-file-name (locate-user-emacs-file "tramp"))
"File which keeps connection history for Tramp connections."
:group 'tramp
:type 'file)
(maphash
(lambda (key value)
;; Remove text properties from KEY and VALUE.
- ;; `substring-no-properties' does not exist in XEmacs.
- (when (functionp 'substring-no-properties)
- (when (vectorp key)
- (dotimes (i (length key))
- (when (stringp (aref key i))
- (aset key i
- (tramp-compat-funcall
- 'substring-no-properties (aref key i))))))
- (when (stringp key)
- (setq key (tramp-compat-funcall 'substring-no-properties key)))
- (when (stringp value)
- (setq value
- (tramp-compat-funcall 'substring-no-properties value))))
+ (when (vectorp key)
+ (dotimes (i (length key))
+ (when (stringp (aref key i))
+ (aset key i (substring-no-properties (aref key i))))))
+ (when (stringp key)
+ (setq key (substring-no-properties key)))
+ (when (stringp value)
+ (setq value (substring-no-properties value)))
;; Dump.
(let ((tmp (format
"(%s %s)"
;; When "emacs -Q" has been called, both variables are nil.
;; We do not load the persistency file then, in order to
;; have a clean test environment.
- (or (and (boundp 'init-file-user) (symbol-value 'init-file-user))
- (and (boundp 'site-run-file) (symbol-value 'site-run-file))))
+ (or init-file-user
+ site-run-file))
(condition-case err
(with-temp-buffer
(insert-file-contents tramp-persistency-file-name)
(require 'tramp)
;; Pacify byte-compiler.
+(declare-function mml-mode "mml")
+(declare-function mml-insert-empty-tag "mml")
+(declare-function reporter-dump-variable "reporter")
(defvar reporter-eval-buffer)
(defvar reporter-prompt-for-summary-p)
(setq tramp-locked nil)
;; Flush password cache.
- (tramp-compat-funcall 'password-reset)
+ (password-reset)
;; Flush file and connection cache.
(clrhash tramp-cache-data)
"Kill all remote buffers."
(interactive)
- ;; Remove all Tramp related buffers.
+ ;; Remove all Tramp related connections.
(tramp-cleanup-all-connections)
;; Remove all buffers with a remote default-directory.
(defun tramp-bug ()
"Submit a bug report to the Tramp developers."
(interactive)
- (require 'reporter)
(catch 'dont-send
(let ((reporter-prompt-for-summary-p t))
(reporter-submit-bug-report
backup-by-copying-when-mismatch
backup-by-copying-when-privileged-mismatch
backup-directory-alist
- bkup-backup-directory-info
password-cache
password-cache-expiry
remote-file-name-inhibit-cache
'tramp-load-report-modules ; pre-hook
'tramp-append-tramp-buffers ; post-hook
- (tramp-compat-funcall
- (if (functionp 'propertize) 'propertize 'progn)
+ (propertize
"\n" 'display "\
Enter your bug report in this message, including as much detail
as you possibly can about the problem, what you did to cause it
(base64-encode-string (encode-coding-string val 'raw-text)))))))
;; Dump variable.
- (tramp-compat-funcall 'reporter-dump-variable varsym mailbuf)
+ (reporter-dump-variable varsym mailbuf)
(unless (hash-table-p val)
;; Remove string quotation.
(defun tramp-load-report-modules ()
"Load needed modules for reporting."
- ;; We load message.el and mml.el from Gnus.
- (if (featurep 'xemacs)
- (progn
- (load "message" 'noerror)
- (load "mml" 'noerror))
- (require 'message nil 'noerror)
- (require 'mml nil 'noerror))
- (tramp-compat-funcall 'message-mode)
- (tramp-compat-funcall 'mml-mode t))
+ (message-mode)
+ (mml-mode t))
(defun tramp-append-tramp-buffers ()
"Append Tramp buffers and buffer local variables into the bug report."
;; Non-tramp variables of interest.
'(default-directory))
'string<))
- (tramp-compat-funcall 'reporter-dump-variable varsym elbuf))
+ (reporter-dump-variable varsym elbuf))
(lisp-indent-line)
(insert ")\n"))
(insert-buffer-substring elbuf)))
(ignore-errors
(mapc
(lambda (x) (when (string-match "tramp" x) (insert x "\n")))
- (split-string (tramp-compat-funcall 'list-load-path-shadows t) "\n")))
+ (split-string (list-load-path-shadows t) "\n")))
;; Append buffers only when we are in message mode.
(when (and
(symbol-value 'mml-mode))
(let ((tramp-buf-regexp "\\*\\(debug \\)?tramp/")
- (buffer-list (tramp-compat-funcall 'tramp-list-tramp-buffers))
+ (buffer-list (tramp-list-tramp-buffers))
(curbuf (current-buffer)))
;; There is at least one Tramp buffer.
(kill-buffer nil)
(switch-to-buffer curbuf)
(goto-char (point-max))
- (insert (tramp-compat-funcall 'propertize "\n" 'display "\n\
+ (insert (propertize "\n" 'display "\n\
This is a special notion of the `gnus/message' package. If you
use another mail agent (by copying the contents of this buffer)
please ensure that the buffers are attached to your email.\n\n"))
(dolist (buffer buffer-list)
- (tramp-compat-funcall
- 'mml-insert-empty-tag 'part 'type "text/plain"
+ (mml-insert-empty-tag
+ 'part 'type "text/plain"
'encoding "base64" 'disposition "attachment" 'buffer buffer
'description buffer))
(set-buffer-modified-p nil))
;;; Commentary:
-;; Tramp's main Emacs version for development is Emacs 24. This
-;; package provides compatibility functions for Emacs 22, Emacs 23,
-;; XEmacs 21.4+ and SXEmacs 22.
+;; Tramp's main Emacs version for development is Emacs 25. This
+;; package provides compatibility functions for Emacs 23 and Emacs 24.
;;; Code:
(eval-when-compile
(require 'cl))
-(eval-and-compile
-
- ;; GNU Emacs 22.
- (unless (fboundp 'ignore-errors)
- (load "cl" 'noerror)
- (load "cl-macs" 'noerror))
-
- ;; Some packages must be required for XEmacs, because we compile
- ;; with -no-autoloads.
- (when (featurep 'xemacs)
- (require 'cus-edit)
- (require 'env)
- (require 'executable)
- (require 'outline)
- (require 'passwd)
- (require 'pp)
- (require 'regexp-opt)
- (require 'time-date))
-
- (require 'advice)
- (require 'custom)
- (require 'format-spec)
- (require 'shell)
- ;; Introduced in Emacs 23.2.
- (require 'ucs-normalize nil 'noerror)
-
- (require 'trampver)
- (require 'tramp-loaddefs)
-
- ;; As long as password.el is not part of (X)Emacs, it shouldn't be
- ;; mandatory.
- (if (featurep 'xemacs)
- (load "password" 'noerror)
- (or (require 'password-cache nil 'noerror)
- (require 'password nil 'noerror))) ; Part of contrib.
-
- ;; auth-source is relatively new.
- (if (featurep 'xemacs)
- (load "auth-source" 'noerror)
- (require 'auth-source nil 'noerror))
-
- ;; Load the appropriate timer package.
- (if (featurep 'xemacs)
- (require 'timer-funcs)
- (require 'timer))
-
- ;; Avoid byte-compiler warnings if the byte-compiler supports this.
- ;; Currently, XEmacs supports this.
- (when (featurep 'xemacs)
- (unless (boundp 'byte-compile-default-warnings)
- (defvar byte-compile-default-warnings nil))
- (delq 'unused-vars byte-compile-default-warnings))
-
- ;; `last-coding-system-used' is unknown in XEmacs.
- (unless (boundp 'last-coding-system-used)
- (defvar last-coding-system-used nil))
-
- ;; `directory-sep-char' is an obsolete variable in Emacs. But it is
- ;; used in XEmacs, so we set it here and there. The following is
- ;; needed to pacify Emacs byte-compiler.
- ;; Note that it was removed altogether in Emacs 24.1.
- (when (boundp 'directory-sep-char)
- (defvar byte-compile-not-obsolete-var nil)
- (setq byte-compile-not-obsolete-var 'directory-sep-char)
- ;; Emacs 23.2.
- (defvar byte-compile-not-obsolete-vars nil)
- (setq byte-compile-not-obsolete-vars '(directory-sep-char)))
-
- ;; `remote-file-name-inhibit-cache' has been introduced with Emacs 24.1.
- ;; Besides t, nil, and integer, we use also timestamps (as
- ;; returned by `current-time') internally.
- (unless (boundp 'remote-file-name-inhibit-cache)
- (defvar remote-file-name-inhibit-cache nil))
-
- ;; For not existing functions, or functions with a changed argument
- ;; list, there are compiler warnings. We want to avoid them in
- ;; cases we know what we do.
- (defmacro tramp-compat-funcall (function &rest arguments)
- (if (featurep 'xemacs)
- `(funcall (symbol-function ,function) ,@arguments)
- `(when (or (subrp ,function) (functionp ,function))
- (with-no-warnings (funcall ,function ,@arguments)))))
-
- ;; `set-buffer-multibyte' comes from Emacs Leim.
- (unless (fboundp 'set-buffer-multibyte)
- (defalias 'set-buffer-multibyte 'ignore))
-
- ;; The following functions cannot be aliases of the corresponding
- ;; `tramp-handle-*' functions, because this would bypass the locking
- ;; mechanism.
-
- ;; `process-file' does not exist in XEmacs.
- (unless (fboundp 'process-file)
- (defalias 'process-file
- (lambda (program &optional infile buffer display &rest args)
- (when (tramp-tramp-file-p default-directory)
- (apply
- 'tramp-file-name-handler
- 'process-file program infile buffer display args)))))
-
- ;; `start-file-process' is new in Emacs 23.
- (unless (fboundp 'start-file-process)
- (defalias 'start-file-process
- (lambda (name buffer program &rest program-args)
- (when (tramp-tramp-file-p default-directory)
- (apply
- 'tramp-file-name-handler
- 'start-file-process name buffer program program-args)))))
-
- ;; `set-file-times' is also new in Emacs 23.
- (unless (fboundp 'set-file-times)
- (defalias 'set-file-times
- (lambda (filename &optional time)
- (when (tramp-tramp-file-p filename)
- (tramp-compat-funcall
- 'tramp-file-name-handler 'set-file-times filename time)))))
-
- ;; We currently use "[" and "]" in the filename format for IPv6
- ;; hosts of GNU Emacs. This means that Emacs wants to expand
- ;; wildcards if `find-file-wildcards' is non-nil, and then barfs
- ;; because no expansion could be found. We detect this situation
- ;; and do something really awful: we have `file-expand-wildcards'
- ;; return the original filename if it can't expand anything. Let's
- ;; just hope that this doesn't break anything else.
- ;; It is not needed anymore since GNU Emacs 23.2.
- (unless (or (featurep 'xemacs)
- ;; `featurep' has only one argument in XEmacs.
- (funcall 'featurep 'files 'remote-wildcards))
- (defadvice file-expand-wildcards
+(require 'auth-source)
+(require 'advice)
+(require 'custom)
+(require 'format-spec)
+(require 'password-cache)
+(require 'shell)
+(require 'timer)
+(require 'ucs-normalize)
+
+(require 'trampver)
+(require 'tramp-loaddefs)
+
+;; `remote-file-name-inhibit-cache' has been introduced with Emacs
+;; 24.1. Besides t, nil, and integer, we use also timestamps (as
+;; returned by `current-time') internally.
+(unless (boundp 'remote-file-name-inhibit-cache)
+ (defvar remote-file-name-inhibit-cache nil))
+
+;; For not existing functions, or functions with a changed argument
+;; list, there are compiler warnings. We want to avoid them in cases
+;; we know what we do.
+(defmacro tramp-compat-funcall (function &rest arguments)
+ `(when (or (subrp ,function) (functionp ,function))
+ (with-no-warnings (funcall ,function ,@arguments))))
+
+;; We currently use "[" and "]" in the filename format for IPv6 hosts
+;; of GNU Emacs. This means that Emacs wants to expand wildcards if
+;; `find-file-wildcards' is non-nil, and then barfs because no
+;; expansion could be found. We detect this situation and do
+;; something really awful: we have `file-expand-wildcards' return the
+;; original filename if it can't expand anything. Let's just hope
+;; that this doesn't break anything else. It is not needed anymore
+;; since GNU Emacs 23.2.
+(unless (featurep 'files 'remote-wildcards)
+ (defadvice file-expand-wildcards
(around tramp-advice-file-expand-wildcards activate)
- (let ((name (ad-get-arg 0)))
- ;; If it's a Tramp file, look if wildcards need to be expanded
- ;; at all.
- (if (and
- (tramp-tramp-file-p name)
- (not (string-match
- "[[*?]" (tramp-compat-funcall
- 'file-remote-p name 'localname))))
- (setq ad-return-value (list name))
- ;; Otherwise, just run the original function.
- ad-do-it)))
- (add-hook
- 'tramp-unload-hook
- (lambda ()
- (ad-remove-advice
- 'file-expand-wildcards 'around 'tramp-advice-file-expand-wildcards)
- (ad-activate 'file-expand-wildcards))))
-
- ;; `redisplay' does not exist in XEmacs.
- (unless (fboundp 'redisplay)
- (defalias 'redisplay 'ignore)))
-
-;; `with-temp-message' does not exist in XEmacs.
-(if (fboundp 'with-temp-message)
- (defalias 'tramp-compat-with-temp-message 'with-temp-message)
- (defmacro tramp-compat-with-temp-message (_message &rest body)
- "Display MESSAGE temporarily if non-nil while BODY is evaluated."
- `(progn ,@body)))
+ (let ((name (ad-get-arg 0)))
+ ;; If it's a Tramp file, look if wildcards need to be expanded
+ ;; at all.
+ (if (and
+ (tramp-tramp-file-p name)
+ (not (string-match "[[*?]" (file-remote-p name 'localname))))
+ (setq ad-return-value (list name))
+ ;; Otherwise, just run the original function.
+ ad-do-it)))
+ (add-hook
+ 'tramp-unload-hook
+ (lambda ()
+ (ad-remove-advice
+ 'file-expand-wildcards 'around 'tramp-advice-file-expand-wildcards)
+ (ad-activate 'file-expand-wildcards))))
;; `condition-case-unless-debug' is introduced with Emacs 24.
(if (fboundp 'condition-case-unless-debug)
(funcall ,bodysym)
,@handlers))))))
-;; `font-lock-add-keywords' does not exist in XEmacs.
-(defun tramp-compat-font-lock-add-keywords (mode keywords &optional how)
- "Add highlighting KEYWORDS for MODE."
- (ignore-errors
- (tramp-compat-funcall 'font-lock-add-keywords mode keywords how)))
-
(defsubst tramp-compat-temporary-file-directory ()
- "Return name of directory for temporary files (compat function).
-For Emacs, this is the variable `temporary-file-directory', for XEmacs
-this is the function `temp-directory'."
- (let (file-name-handler-alist)
- ;; We must return a local directory. If it is remote, we could
- ;; run into an infloop.
- (cond
- ((and (boundp 'temporary-file-directory)
- (eval (car (get 'temporary-file-directory 'standard-value)))))
- ((fboundp 'temp-directory) (tramp-compat-funcall 'temp-directory))
- ((let ((d (getenv "TEMP"))) (and d (file-directory-p d)))
- (file-name-as-directory (getenv "TEMP")))
- ((let ((d (getenv "TMP"))) (and d (file-directory-p d)))
- (file-name-as-directory (getenv "TMP")))
- ((let ((d (getenv "TMPDIR"))) (and d (file-directory-p d)))
- (file-name-as-directory (getenv "TMPDIR")))
- ((file-exists-p "c:/temp") (file-name-as-directory "c:/temp"))
- (t (message (concat "Neither `temporary-file-directory' nor "
- "`temp-directory' is defined -- using /tmp."))
- (file-name-as-directory "/tmp")))))
-
-;; `make-temp-file' exists in Emacs only. On XEmacs, we use our own
-;; implementation with `make-temp-name', creating the temporary file
-;; immediately in order to avoid a security hole.
+ "Return name of directory for temporary files.
+It is the default value of `temporary-file-directory'."
+ ;; We must return a local directory. If it is remote, we could run
+ ;; into an infloop.
+ (eval (car (get 'temporary-file-directory 'standard-value))))
+
(defsubst tramp-compat-make-temp-file (f &optional dir-flag)
- "Create a temporary file (compat function).
+ "Create a local temporary file (compat function).
Add the extension of F, if existing."
(let* (file-name-handler-alist
(prefix (expand-file-name
(symbol-value 'tramp-temp-name-prefix)
(tramp-compat-temporary-file-directory)))
- (extension (file-name-extension f t))
- result)
- (condition-case nil
- (setq result
- (tramp-compat-funcall 'make-temp-file prefix dir-flag extension))
- (error
- ;; We use our own implementation, taken from files.el.
- (while
- (condition-case ()
- (progn
- (setq result (concat (make-temp-name prefix) extension))
- (if dir-flag
- (make-directory result)
- (write-region "" nil result nil 'silent))
- nil)
- (file-already-exists t))
- ;; The file was somehow created by someone else between
- ;; `make-temp-name' and `write-region', let's try again.
- nil)))
- result))
-
-;; `most-positive-fixnum' does not exist in XEmacs.
-(defsubst tramp-compat-most-positive-fixnum ()
- "Return largest positive integer value (compat function)."
- (cond
- ((boundp 'most-positive-fixnum) (symbol-value 'most-positive-fixnum))
- ;; Default value in XEmacs.
- (t 134217727)))
-
-(defun tramp-compat-decimal-to-octal (i)
- "Return a string consisting of the octal digits of I.
-Not actually used. Use `(format \"%o\" i)' instead?"
- (cond ((< i 0) (error "Cannot convert negative number to octal"))
- ((not (integerp i)) (error "Cannot convert non-integer to octal"))
- ((zerop i) "0")
- (t (concat (tramp-compat-decimal-to-octal (/ i 8))
- (number-to-string (% i 8))))))
-
-;; Kudos to Gerd Moellmann for this suggestion.
-(defun tramp-compat-octal-to-decimal (ostr)
- "Given a string of octal digits, return a decimal number."
- (let ((x (or ostr "")))
- ;; `save-match' is in `tramp-mode-string-to-int' which calls this.
- (unless (string-match "\\`[0-7]*\\'" x)
- (error "Non-octal junk in string `%s'" x))
- (string-to-number ostr 8)))
-
-;; ID-FORMAT does not exist in XEmacs.
-(defun tramp-compat-file-attributes (filename &optional id-format)
- "Like `file-attributes' for Tramp files (compat function)."
- (cond
- ((or (null id-format) (eq id-format 'integer))
- (file-attributes filename))
- ((tramp-tramp-file-p filename)
- (tramp-compat-funcall
- 'tramp-file-name-handler 'file-attributes filename id-format))
- (t (condition-case nil
- (tramp-compat-funcall 'file-attributes filename id-format)
- (wrong-number-of-arguments (file-attributes filename))))))
-
-;; PRESERVE-UID-GID does not exist in XEmacs.
+ (extension (file-name-extension f t)))
+ (make-temp-file prefix dir-flag extension)))
+
;; PRESERVE-EXTENDED-ATTRIBUTES has been introduced with Emacs 24.1
;; (as PRESERVE-SELINUX-CONTEXT), and renamed in Emacs 24.3.
(defun tramp-compat-copy-file
'copy-file filename newname ok-if-already-exists keep-date
preserve-uid-gid preserve-extended-attributes)
(wrong-number-of-arguments
- (tramp-compat-copy-file
+ (copy-file
filename newname ok-if-already-exists keep-date preserve-uid-gid))))
- (preserve-uid-gid
- (condition-case nil
- (tramp-compat-funcall
- 'copy-file filename newname ok-if-already-exists keep-date
- preserve-uid-gid)
- (wrong-number-of-arguments
- (tramp-compat-copy-file
- filename newname ok-if-already-exists keep-date))))
(t
- (copy-file filename newname ok-if-already-exists keep-date))))
+ (copy-file
+ filename newname ok-if-already-exists keep-date preserve-uid-gid))))
-;; `copy-directory' is a new function in Emacs 23.2. Implementation
-;; is taken from there.
+;; COPY-CONTENTS has been introduced with Emacs 24.1.
(defun tramp-compat-copy-directory
(directory newname &optional keep-time parents copy-contents)
"Make a copy of DIRECTORY (compat function)."
(cond
(trash
(tramp-compat-funcall 'delete-directory directory recursive trash))
- (recursive
- (tramp-compat-funcall 'delete-directory directory recursive))
(t
- (delete-directory directory)))
- ;; This Emacs version does not support the RECURSIVE or TRASH flag. We
- ;; use the implementation from Emacs 23.2.
+ (delete-directory directory recursive)))
+ ;; This Emacs version does not support the TRASH flag. We use the
+ ;; implementation from Emacs 23.2.
(wrong-number-of-arguments
(setq directory (directory-file-name (expand-file-name directory)))
(if (not (file-symlink-p directory))
directory 'full "^\\([^.]\\|\\.\\([^.]\\|\\..\\)\\).*")))
(delete-directory directory))))
-;; MUST-SUFFIX doesn't exist on XEmacs.
-(defun tramp-compat-load (file &optional noerror nomessage nosuffix must-suffix)
- "Like `load' for Tramp files (compat function)."
- (if must-suffix
- (tramp-compat-funcall 'load file noerror nomessage nosuffix must-suffix)
- (load file noerror nomessage nosuffix)))
-
-;; `number-sequence' does not exist in XEmacs. Implementation is
-;; taken from Emacs 23.
-(defun tramp-compat-number-sequence (from &optional to inc)
- "Return a sequence of numbers from FROM to TO as a list (compat function)."
- (if (or (subrp 'number-sequence) (symbol-file 'number-sequence))
- (tramp-compat-funcall 'number-sequence from to inc)
- (if (or (not to) (= from to))
- (list from)
- (or inc (setq inc 1))
- (when (zerop inc) (error "The increment can not be zero"))
- (let (seq (n 0) (next from))
- (if (> inc 0)
- (while (<= next to)
- (setq seq (cons next seq)
- n (1+ n)
- next (+ from (* n inc))))
- (while (>= next to)
- (setq seq (cons next seq)
- n (1+ n)
- next (+ from (* n inc)))))
- (nreverse seq)))))
-
-(defun tramp-compat-split-string (string pattern)
- "Like `split-string' but omit empty strings.
-In Emacs, (split-string \"/foo/bar\" \"/\") returns (\"foo\" \"bar\").
-This is, the first, empty, element is omitted. In XEmacs, the first
-element is not omitted."
- (delete "" (split-string string pattern)))
-
(defun tramp-compat-process-running-p (process-name)
"Returns t if system process PROCESS-NAME is running for `user-login-name'."
(when (stringp process-name)
((and (fboundp 'list-system-processes) (fboundp 'process-attributes))
(let (result)
(dolist (pid (tramp-compat-funcall 'list-system-processes) result)
- (let ((attributes (tramp-compat-funcall 'process-attributes pid)))
+ (let ((attributes (process-attributes pid)))
(when (and (string-equal
(cdr (assoc 'user attributes)) (user-login-name))
(let ((comm (cdr (assoc 'comm attributes))))
(and comm (string-match
(concat "^" (regexp-quote comm))
process-name))))
- (setq result t))))))
-
- ;; Fallback, if there is no Lisp support yet.
- (t (let ((default-directory
- (if (tramp-tramp-file-p default-directory)
- (tramp-compat-temporary-file-directory)
- default-directory))
- (unix95 (getenv "UNIX95"))
- result)
- (setenv "UNIX95" "1")
- (when (member
- (user-login-name)
- (tramp-compat-split-string
- (shell-command-to-string
- (format "ps -C %s -o user=" process-name))
- "[ \f\t\n\r\v]+"))
- (setq result t))
- (setenv "UNIX95" unix95)
- result)))))
-
-;; The following functions do not exist in XEmacs. We ignore this;
-;; they are used for checking a remote tty.
-(defun tramp-compat-process-get (process propname)
- "Return the value of PROCESS' PROPNAME property.
-This is the last value stored with `(process-put PROCESS PROPNAME VALUE)'."
- (ignore-errors (tramp-compat-funcall 'process-get process propname)))
-
-(defun tramp-compat-process-put (process propname value)
- "Change PROCESS' PROPNAME property to VALUE.
-It can be retrieved with `(process-get PROCESS PROPNAME)'."
- (ignore-errors (tramp-compat-funcall 'process-put process propname value)))
-
-(defun tramp-compat-set-process-query-on-exit-flag (process flag)
- "Specify if query is needed for process when Emacs is exited.
-If the second argument flag is non-nil, Emacs will query the user before
-exiting if process is running."
- (if (fboundp 'set-process-query-on-exit-flag)
- (tramp-compat-funcall 'set-process-query-on-exit-flag process flag)
- (tramp-compat-funcall 'process-kill-without-query process flag)))
-
-;; There exist different implementations for this function.
-(defun tramp-compat-coding-system-change-eol-conversion (coding-system eol-type)
- "Return a coding system like CODING-SYSTEM but with given EOL-TYPE.
-EOL-TYPE can be one of `dos', `unix', or `mac'."
- (cond ((fboundp 'coding-system-change-eol-conversion)
- (tramp-compat-funcall
- 'coding-system-change-eol-conversion coding-system eol-type))
- ((fboundp 'subsidiary-coding-system)
- (tramp-compat-funcall
- 'subsidiary-coding-system coding-system
- (cond ((eq eol-type 'dos) 'crlf)
- ((eq eol-type 'unix) 'lf)
- ((eq eol-type 'mac) 'cr)
- (t (error
- "Unknown EOL-TYPE `%s', must be `dos', `unix', or `mac'"
- eol-type)))))
- (t (error "Can't change EOL conversion -- is MULE missing?"))))
-
-;; `replace-regexp-in-string' does not exist in XEmacs.
-;; Implementation is taken from Emacs 24.
-(if (fboundp 'replace-regexp-in-string)
- (defalias 'tramp-compat-replace-regexp-in-string 'replace-regexp-in-string)
- (defun tramp-compat-replace-regexp-in-string
- (regexp rep string &optional fixedcase literal subexp start)
- "Replace all matches for REGEXP with REP in STRING.
-
-Return a new string containing the replacements.
-
-Optional arguments FIXEDCASE, LITERAL and SUBEXP are like the
-arguments with the same names of function `replace-match'. If START
-is non-nil, start replacements at that index in STRING.
-
-REP is either a string used as the NEWTEXT arg of `replace-match' or a
-function. If it is a function, it is called with the actual text of each
-match, and its value is used as the replacement text. When REP is called,
-the match data are the result of matching REGEXP against a substring
-of STRING.
-
-To replace only the first match (if any), make REGEXP match up to \\'
-and replace a sub-expression, e.g.
- (replace-regexp-in-string \"\\\\(foo\\\\).*\\\\'\" \"bar\" \" foo foo\" nil nil 1)
- => \" bar foo\""
-
- (let ((l (length string))
- (start (or start 0))
- matches str mb me)
- (save-match-data
- (while (and (< start l) (string-match regexp string start))
- (setq mb (match-beginning 0)
- me (match-end 0))
- ;; If we matched the empty string, make sure we advance by one char
- (when (= me mb) (setq me (min l (1+ mb))))
- ;; Generate a replacement for the matched substring.
- ;; Operate only on the substring to minimize string consing.
- ;; Set up match data for the substring for replacement;
- ;; presumably this is likely to be faster than munging the
- ;; match data directly in Lisp.
- (string-match regexp (setq str (substring string mb me)))
- (setq matches
- (cons (replace-match (if (stringp rep)
- rep
- (funcall rep (match-string 0 str)))
- fixedcase literal str subexp)
- (cons (substring string start mb) ; unmatched prefix
- matches)))
- (setq start me))
- ;; Reconstruct a string from the pieces.
- (setq matches (cons (substring string start l) matches)) ; leftover
- (apply #'concat (nreverse matches))))))
+ (setq result t)))))))))
;; `default-toplevel-value' has been declared in Emacs 24.
(unless (fboundp 'default-toplevel-value)
(defalias 'default-toplevel-value 'symbol-value))
-;; `format-message' is new in Emacs 25, and does not exist in XEmacs.
+;; `format-message' is new in Emacs 25.
(unless (fboundp 'format-message)
(defalias 'format-message 'format))
-;; `delete-dups' does not exist in XEmacs 21.4.
-(if (fboundp 'delete-dups)
- (defalias 'tramp-compat-delete-dups 'delete-dups)
- (defun tramp-compat-delete-dups (list)
- "Destructively remove `equal' duplicates from LIST.
-Store the result in LIST and return it. LIST must be a proper list.
-Of several `equal' occurrences of an element in LIST, the first
-one is kept."
- (tramp-compat-funcall
- 'cl-delete-duplicates list '(:test equal :from-end) nil)))
-
(add-hook 'tramp-unload-hook
(lambda ()
(unload-feature 'tramp-loaddefs 'force)
(defvar ange-ftp-name-format)
;; Disable Ange-FTP from file-name-handler-alist.
-;; To handle EFS, the following functions need to be dealt with:
-;;
-;; * dired-before-readin-hook contains efs-dired-before-readin
-;; * file-name-handler-alist contains efs-file-handler-function
-;; and efs-root-handler-function and efs-sifn-handler-function
-;; * find-file-hooks contains efs-set-buffer-mode
-;;
-;; But it won't happen for EFS since the XEmacs maintainers
-;; don't want to use a unified filename syntax.
(defun tramp-disable-ange-ftp ()
"Turn Ange-FTP off.
This is useful for unified remoting. See
;; ... and add it to the method list.
;;;###tramp-autoload
-(unless (featurep 'xemacs)
- (add-to-list 'tramp-methods (cons tramp-ftp-method nil))
+(add-to-list 'tramp-methods (cons tramp-ftp-method nil))
- ;; Add some defaults for `tramp-default-method-alist'.
- (add-to-list 'tramp-default-method-alist
- (list "\\`ftp\\." nil tramp-ftp-method))
- (add-to-list 'tramp-default-method-alist
- (list nil "\\`\\(anonymous\\|ftp\\)\\'" tramp-ftp-method)))
+;; Add some defaults for `tramp-default-method-alist'.
+;;;###tramp-autoload
+(add-to-list 'tramp-default-method-alist
+ (list "\\`ftp\\." nil tramp-ftp-method))
+;;;###tramp-autoload
+(add-to-list 'tramp-default-method-alist
+ (list nil "\\`\\(anonymous\\|ftp\\)\\'" tramp-ftp-method))
;; Add completion function for FTP method.
;;;###tramp-autoload
tramp-ftp-method))
;;;###tramp-autoload
-(unless (featurep 'xemacs)
- (add-to-list 'tramp-foreign-file-name-handler-alist
- (cons 'tramp-ftp-file-name-p 'tramp-ftp-file-name-handler)))
+(add-to-list 'tramp-foreign-file-name-handler-alist
+ (cons 'tramp-ftp-file-name-p 'tramp-ftp-file-name-handler))
(add-hook 'tramp-unload-hook
(lambda ()
(directory-files . tramp-handle-directory-files)
(directory-files-and-attributes
. tramp-handle-directory-files-and-attributes)
- (dired-call-process . ignore)
(dired-compress-file . ignore)
(dired-uncache . tramp-handle-dired-uncache)
(expand-file-name . tramp-gvfs-handle-expand-file-name)
(shell-command . ignore)
(start-file-process . ignore)
(substitute-in-file-name . tramp-handle-substitute-in-file-name)
- (unhandled-file-name-directory . tramp-handle-unhandled-file-name-directory)
+ (unhandled-file-name-directory . ignore)
(vc-registered . ignore)
(verify-visited-file-modtime . tramp-handle-verify-visited-file-modtime)
(write-region . tramp-gvfs-handle-write-region))
(put 'with-tramp-dbus-call-method 'lisp-indent-function 2)
(put 'with-tramp-dbus-call-method 'edebug-form-spec '(form symbolp body))
-(tramp-compat-font-lock-add-keywords
- 'emacs-lisp-mode '("\\<with-tramp-dbus-call-method\\>"))
+(font-lock-add-keywords 'emacs-lisp-mode '("\\<with-tramp-dbus-call-method\\>"))
(defvar tramp-gvfs-dbus-event-vector nil
"Current Tramp file name to be used, as vector.
(and t2 (not (tramp-gvfs-file-name-p newname))))
;; We cannot copy or rename directly.
+ ;; PRESERVE-EXTENDED-ATTRIBUTES has been introduced with
+ ;; Emacs 24.1 (as PRESERVE-SELINUX-CONTEXT), and renamed
+ ;; in Emacs 24.3.
(let ((tmpfile (tramp-compat-make-temp-file filename)))
(cond
(preserve-extended-attributes
- (tramp-compat-funcall
+ (funcall
file-operation
filename tmpfile t keep-date preserve-uid-gid
preserve-extended-attributes))
- (preserve-uid-gid
- (tramp-compat-funcall
- file-operation filename tmpfile t keep-date preserve-uid-gid))
(t
- (tramp-compat-funcall
- file-operation filename tmpfile t keep-date)))
+ (funcall
+ file-operation filename tmpfile t keep-date preserve-uid-gid)))
(rename-file tmpfile newname ok-if-already-exists))
;; Direct action.
(tramp-gvfs-do-copy-or-rename-file
'copy filename newname ok-if-already-exists keep-date
preserve-uid-gid preserve-extended-attributes))
- ;; Compat section.
+ ;; Compat section. PRESERVE-EXTENDED-ATTRIBUTES has been
+ ;; introduced with Emacs 24.1 (as PRESERVE-SELINUX-CONTEXT), and
+ ;; renamed in Emacs 24.3.
(preserve-extended-attributes
(tramp-run-real-handler
'copy-file
(list filename newname ok-if-already-exists keep-date
preserve-uid-gid preserve-extended-attributes)))
- (preserve-uid-gid
- (tramp-run-real-handler
- 'copy-file
- (list filename newname ok-if-already-exists keep-date preserve-uid-gid)))
(t
(tramp-run-real-handler
- 'copy-file (list filename newname ok-if-already-exists keep-date)))))
+ 'copy-file
+ (list filename newname ok-if-already-exists keep-date preserve-uid-gid)))))
(defun tramp-gvfs-handle-delete-directory (directory &optional recursive trash)
"Like `delete-directory' for Tramp files."
(tramp-error
v 'file-error
"Cannot make local copy of non-existing file `%s'" filename))
- (copy-file filename tmpfile t t)
+ (copy-file filename tmpfile 'ok-if-already-exists 'keep-time)
tmpfile)))
(defun tramp-gvfs-handle-file-name-all-completions (filename directory)
(when cache-hit (list cache-hit))))
;; We cannot use a length of 0, because file properties
;; for "foo" and "foo/" are identical.
- (tramp-compat-number-sequence (length filename) 1 -1)))))
+ (number-sequence (length filename) 1 -1)))))
;; Cache expired or no matching cache entry found so we need
;; to perform a remote operation.
(tramp-message
v 6 "Run `%s', %S" (mapconcat 'identity (process-command p) " ") p)
(tramp-set-connection-property p "vector" v)
- (tramp-compat-process-put p 'events events)
- (tramp-compat-process-put p 'watch-name localname)
- (tramp-compat-set-process-query-on-exit-flag p nil)
+ (process-put p 'events events)
+ (process-put p 'watch-name localname)
+ (set-process-query-on-exit-flag p nil)
(set-process-filter p 'tramp-gvfs-monitor-file-process-filter)
;; There might be an error if the monitor is not supported.
;; Give the filter a chance to read the output.
(defun tramp-gvfs-monitor-file-process-filter (proc string)
"Read output from \"gvfs-monitor-file\" and add corresponding \
file-notify events."
- (let* ((rest-string (tramp-compat-process-get proc 'rest-string))
+ (let* ((rest-string (process-get proc 'rest-string))
(dd (with-current-buffer (process-buffer proc) default-directory))
(ddu (regexp-quote (tramp-gvfs-url-file-name dd))))
(when rest-string
(tramp-message proc 6 "%S\n%s" proc string)
(setq string (concat rest-string string)
;; Attribute change is returned in unused wording.
- string (tramp-compat-replace-regexp-in-string
+ string (replace-regexp-in-string
"ATTRIB CHANGED" "ATTRIBUTE_CHANGED" string))
(when (string-match "Monitoring not supported" string)
(delete-process proc))
string)
(let ((file (match-string 1 string))
(action (intern-soft
- (tramp-compat-replace-regexp-in-string
+ (replace-regexp-in-string
"_" "-" (downcase (match-string 2 string))))))
(setq string (replace-match "" nil nil string))
;; File names are returned as URL paths. We must convert them.
;; Save rest of the string.
(when (zerop (length string)) (setq string nil))
(when string (tramp-message proc 10 "Rest string:\n%s" string))
- (tramp-compat-process-put proc 'rest-string string)))
+ (process-put proc 'rest-string string)))
(defun tramp-gvfs-handle-file-readable-p (filename)
"Like `file-readable-p' for Tramp files."
(with-parsed-tramp-file-name filename nil
- (with-tramp-file-property v localname "file-executable-p"
+ (with-tramp-file-property v localname "file-readable-p"
(tramp-check-cached-permissions v ?r))))
(defun tramp-gvfs-handle-file-writable-p (filename)
(if (or (tramp-tramp-file-p filename)
(tramp-tramp-file-p newname))
(tramp-gvfs-do-copy-or-rename-file
- 'rename filename newname ok-if-already-exists t t)
+ 'rename filename newname ok-if-already-exists
+ 'keep-date 'preserve-uid-gid)
(tramp-run-real-handler
'rename-file (list filename newname ok-if-already-exists))))
(start end filename &optional append visit lockname confirm)
"Like `write-region' for Tramp files."
(with-parsed-tramp-file-name filename nil
- ;; XEmacs takes a coding system as the seventh argument, not `confirm'.
- (when (and (not (featurep 'xemacs)) confirm (file-exists-p filename))
+ (when (and confirm (file-exists-p filename))
(unless (y-or-n-p (format "File %s exists; overwrite anyway? " filename))
(tramp-error v 'file-error "File not overwritten")))
(defun tramp-gvfs-file-name (object-path)
"Retrieve file name from D-Bus OBJECT-PATH."
(dbus-unescape-from-identifier
- (tramp-compat-replace-regexp-in-string
- "^.*/\\([^/]+\\)$" "\\1" object-path)))
+ (replace-regexp-in-string "^.*/\\([^/]+\\)$" "\\1" object-path)))
(defun tramp-bluez-address (device)
"Return bluetooth device address from a given bluetooth DEVICE name."
;; host signature.
(with-temp-buffer
;; Preserve message for `progress-reporter'.
- (tramp-compat-with-temp-message ""
+ (with-temp-message ""
(insert message)
(pop-to-buffer (current-buffer))
(setq choice (if (yes-or-no-p (concat (car choices) " ")) 0 1))
:name (tramp-buffer-name vec)
:buffer (tramp-get-connection-buffer vec)
:server t :host 'local :service t)))
- (tramp-compat-set-process-query-on-exit-flag p nil)))
+ (set-process-query-on-exit-flag p nil)))
(unless (tramp-gvfs-connection-mounted-p vec)
(let* ((method (tramp-file-name-method vec))
'split-string
(shell-command-to-string (format "avahi-browse -trkp %s" service))
"[\n\r]+" 'omit "^\\+;.*$"))))
- (tramp-compat-delete-dups
+ (delete-dups
(mapcar
(lambda (x)
(let* ((list (split-string x ";"))
tramp-gw-vector 4
"Opening auxiliary process `%s', speaking with process `%s'"
proc tramp-gw-gw-proc)
- (tramp-compat-set-process-query-on-exit-flag proc nil)
+ (set-process-query-on-exit-flag proc nil)
;; We don't want debug messages, because the corresponding debug
;; buffer might be undecided.
(let ((tramp-verbose 0))
:name (tramp-buffer-name aux-vec) :buffer nil :host 'local
:server t :noquery t :service t :coding 'binary))
(set-process-sentinel tramp-gw-aux-proc 'tramp-gw-aux-proc-sentinel)
- (tramp-compat-set-process-query-on-exit-flag tramp-gw-aux-proc nil)
+ (set-process-query-on-exit-flag tramp-gw-aux-proc nil)
(tramp-message
vec 4 "Opening auxiliary process `%s', listening on port %d"
tramp-gw-aux-proc (process-contact tramp-gw-aux-proc :service))))
(tramp-file-name-port target-vec)))
(set-process-sentinel tramp-gw-gw-proc 'tramp-gw-gw-proc-sentinel)
(set-process-coding-system tramp-gw-gw-proc 'binary 'binary)
- (tramp-compat-set-process-query-on-exit-flag tramp-gw-gw-proc nil)
+ (set-process-query-on-exit-flag tramp-gw-gw-proc nil)
(tramp-message
vec 4 "Opened %s process `%s'"
(case gw-method ('tunnel "HTTP tunnel") ('socks "SOCKS"))
(setq proc (open-network-stream
name buffer (nth 1 socks-server) (nth 2 socks-server)))
(set-process-coding-system proc 'binary 'binary)
- (tramp-compat-set-process-query-on-exit-flag proc nil)
+ (set-process-query-on-exit-flag proc nil)
;; Send CONNECT command.
(process-send-string proc (format "%s%s\r\n" command authentication))
(tramp-message
tramp-gw-vector 6 "\n%s"
(format
"%s%s\r\n" command
- (tramp-compat-replace-regexp-in-string ;; no password in trace!
+ (replace-regexp-in-string ;; no password in trace!
"Basic [^\r\n]+" "Basic xxxxx" authentication t)))
(with-current-buffer buffer
;; Trap errors to be traced in the right trace buffer. Often,
(eval-when-compile
(require 'cl)
(require 'dired))
-(defvar directory-sep-char)
(defvar tramp-gw-tunnel-method)
(defvar tramp-gw-socks-method)
(defvar vc-handled-backends)
(tramp-remote-shell-args ("-c"))
(tramp-connection-timeout 10)))
;;;###tramp-autoload
+(add-to-list
+ 'tramp-methods
+ '("sg"
+ (tramp-login-program "sg")
+ (tramp-login-args (("-") ("%u")))
+ (tramp-remote-shell "/bin/sh")
+ (tramp-remote-shell-args ("-c"))
+ (tramp-connection-timeout 10)))
+;;;###tramp-autoload
(add-to-list 'tramp-methods
'("sudo"
(tramp-login-program "sudo")
(tramp-remote-shell-args ("-c"))
(tramp-connection-timeout 10)))
;;;###tramp-autoload
+(add-to-list 'tramp-methods
+ '("doas"
+ (tramp-login-program "doas")
+ (tramp-login-args (("-u" "%u") ("-s")))
+ (tramp-remote-shell "/bin/sh")
+ (tramp-remote-shell-args ("-c"))
+ (tramp-connection-timeout 10)))
+;;;###tramp-autoload
(add-to-list 'tramp-methods
'("ksu"
(tramp-login-program "ksu")
(tramp-remote-shell-args ("-c"))
(tramp-copy-program "pscp")
(tramp-copy-args (("-l" "%u") ("-P" "%p") ("-sftp") ("-p" "%k")
- ("-q") ("-r")))
- (tramp-copy-keep-date t)
- (tramp-copy-recursive t)))
+ ("-q")))
+ (tramp-copy-keep-date t)))
;;;###tramp-autoload
(add-to-list 'tramp-methods
'("fcp"
;;;###tramp-autoload
(add-to-list 'tramp-default-user-alist
- `(,(concat "\\`" (regexp-opt '("su" "sudo" "ksu")) "\\'")
+ `(,(concat "\\`" (regexp-opt '("su" "sudo" "doas" "ksu")) "\\'")
nil "root"))
;; Do not add "ssh" based methods, otherwise ~/.ssh/config would be ignored.
;; Do not add "plink" based methods, they ask interactively for the user.
'((tramp-parse-passwd "/etc/passwd"))
"Default list of (FUNCTION FILE) pairs to be examined for su methods.")
+;;;###tramp-autoload
+(defconst tramp-completion-function-alist-sg
+ '((tramp-parse-etc-group "/etc/group"))
+ "Default list of (FUNCTION FILE) pairs to be examined for sg methods.")
+
;;;###tramp-autoload
(defconst tramp-completion-function-alist-putty
`((tramp-parse-putty
,(if (memq system-type '(windows-nt))
"HKEY_CURRENT_USER\\Software\\SimonTatham\\PuTTY\\Sessions"
"~/.putty/sessions")))
- "Default list of (FUNCTION REGISTRY) pairs to be examined for putty sessions.")
+ "Default list of (FUNCTION REGISTRY) pairs to be examined for putty sessions.")
;;;###tramp-autoload
(eval-after-load 'tramp
(tramp-set-completion-function "nc" tramp-completion-function-alist-telnet)
(tramp-set-completion-function "su" tramp-completion-function-alist-su)
(tramp-set-completion-function "sudo" tramp-completion-function-alist-su)
+ (tramp-set-completion-function "doas" tramp-completion-function-alist-su)
(tramp-set-completion-function "ksu" tramp-completion-function-alist-su)
+ (tramp-set-completion-function "sg" tramp-completion-function-alist-sg)
(tramp-set-completion-function
"krlogin" tramp-completion-function-alist-rsh)
(tramp-set-completion-function "plink" tramp-completion-function-alist-ssh)
;; "getconf PATH" yields:
;; HP-UX: /usr/bin:/usr/ccs/bin:/opt/ansic/bin:/opt/langtools/bin:/opt/fortran/bin
;; Solaris: /usr/xpg4/bin:/usr/ccs/bin:/usr/bin:/opt/SUNWspro/bin
-;; GNU/Linux (Debian, Suse): /bin:/usr/bin
+;; GNU/Linux (Debian, Suse, RHEL): /bin:/usr/bin
;; FreeBSD: /usr/bin:/bin:/usr/sbin:/sbin: - beware trailing ":"!
;; Darwin: /usr/bin:/bin:/usr/sbin:/sbin
;; IRIX64: /usr/bin
(directory-files . tramp-handle-directory-files)
(directory-files-and-attributes
. tramp-sh-handle-directory-files-and-attributes)
- ;; `dired-call-process' performed by default handler.
(dired-compress-file . tramp-sh-handle-dired-compress-file)
- (dired-recursive-delete-directory
- . tramp-sh-handle-dired-recursive-delete-directory)
(dired-uncache . tramp-handle-dired-uncache)
(expand-file-name . tramp-sh-handle-expand-file-name)
(file-accessible-directory-p . tramp-handle-file-accessible-directory-p)
;; `get-file-buffer' performed by default handler.
(insert-directory . tramp-sh-handle-insert-directory)
(insert-file-contents . tramp-handle-insert-file-contents)
- (insert-file-contents-literally
- . tramp-sh-handle-insert-file-contents-literally)
(load . tramp-handle-load)
(make-auto-save-file-name . tramp-handle-make-auto-save-file-name)
(make-directory . tramp-sh-handle-make-directory)
(shell-command . tramp-handle-shell-command)
(start-file-process . tramp-sh-handle-start-file-process)
(substitute-in-file-name . tramp-handle-substitute-in-file-name)
- (unhandled-file-name-directory . tramp-handle-unhandled-file-name-directory)
+ (unhandled-file-name-directory . ignore)
(vc-registered . tramp-sh-handle-vc-registered)
(verify-visited-file-modtime . tramp-sh-handle-verify-visited-file-modtime)
(write-region . tramp-sh-handle-write-region))
(format "tramp_perl_file_truename %s"
(tramp-shell-quote-argument localname)))))
- ;; Do it yourself. We bind `directory-sep-char' here for
- ;; XEmacs on Windows, which would otherwise use backslash.
- (t (let ((directory-sep-char ?/)
- (steps (tramp-compat-split-string localname "/"))
+ ;; Do it yourself.
+ (t (let ((steps (split-string localname "/" 'omit))
(thisstep nil)
(numchase 0)
;; Don't make the following value larger than
symlink-target))
(setq symlink-target localname))
(setq steps
- (append (tramp-compat-split-string
- symlink-target "/")
- steps)))
+ (append
+ (split-string symlink-target "/" 'omit) steps)))
(t
;; It's a file.
(setq result (cons thisstep result)))))
res-gid
;; 4. Last access time, as a list of integers. Normally
;; this would be in the same format as `current-time', but
- ;; the subseconds part is not currently implemented, and (0
- ;; 0) denotes an unknown time.
+ ;; the subseconds part is not currently implemented, and
+ ;; (0 0) denotes an unknown time.
;; 5. Last modification time, likewise.
;; 6. Last status change time, likewise.
'(0 0) '(0 0) '(0 0) ;CCC how to find out?
;; 10. Inode number.
res-inode
;; 11. Device number. Will be replaced by a virtual device number.
- -1
- ))))))
+ -1))))))
(defun tramp-do-file-attributes-with-perl
(vec localname &optional id-format)
(attr (file-attributes f))
;; '(-1 65535) means file doesn't exists yet.
(modtime (or (nth 5 attr) '(-1 65535))))
- (when (boundp 'last-coding-system-used)
- (setq coding-system-used (symbol-value 'last-coding-system-used)))
+ (setq coding-system-used last-coding-system-used)
;; We use '(0 0) as a don't-know value. See also
;; `tramp-do-file-attributes-with-ls'.
(if (not (equal modtime '(0 0)))
(setq attr (buffer-substring (point) (point-at-eol))))
(tramp-set-file-property
v localname "visited-file-modtime-ild" attr))
- (when (boundp 'last-coding-system-used)
- (set 'last-coding-system-used coding-system-used))
+ (setq last-coding-system-used coding-system-used)
nil)))))
;; This function makes the same assumption as
;; connection.
(if (or (not f)
(eq (visited-file-modtime) 0)
- (not (tramp-file-name-handler 'file-remote-p f nil 'connected)))
+ (not (file-remote-p f nil 'connected)))
t
(with-parsed-tramp-file-name f nil
(let* ((remote-file-name-inhibit-cache t)
;; FIXME: extract the proper text from chmod's stderr.
(tramp-barf-unless-okay
v
- (format "chmod %s %s"
- (tramp-compat-decimal-to-octal mode)
- (tramp-shell-quote-argument localname))
+ (format "chmod %o %s" mode (tramp-shell-quote-argument localname))
"Error while changing file's mode %s" filename)))
(defun tramp-sh-handle-set-file-times (filename &optional time)
"Like `set-file-times' for Tramp files."
- (if (tramp-tramp-file-p filename)
- (with-parsed-tramp-file-name filename nil
- (when (tramp-get-remote-touch v)
- (tramp-flush-file-property v (file-name-directory localname))
- (tramp-flush-file-property v localname)
- (let ((time (if (or (null time) (equal time '(0 0)))
- (current-time)
- time))
- ;; With GNU Emacs, `format-time-string' has an
- ;; optional parameter UNIVERSAL. This is preferred,
- ;; because we could handle the case when the remote
- ;; host is located in a different time zone as the
- ;; local host.
- (utc (not (featurep 'xemacs))))
- (tramp-send-command-and-check
- v (format
- "%s %s %s %s"
- (if utc "env TZ=UTC" "")
- (tramp-get-remote-touch v)
- (if (tramp-get-connection-property v "touch-t" nil)
- (format "-t %s"
- (if utc
- (format-time-string "%Y%m%d%H%M.%S" time t)
- (format-time-string "%Y%m%d%H%M.%S" time)))
- "")
- (tramp-shell-quote-argument localname))))))
-
- ;; We handle also the local part, because in older Emacsen,
- ;; without `set-file-times', this function is an alias for this.
- ;; We are local, so we don't need the UTC settings.
- (zerop
- (tramp-call-process
- nil "touch" nil nil nil "-t"
- (format-time-string "%Y%m%d%H%M.%S" time)
- (tramp-shell-quote-argument filename)))))
+ (with-parsed-tramp-file-name filename nil
+ (when (tramp-get-remote-touch v)
+ (tramp-flush-file-property v (file-name-directory localname))
+ (tramp-flush-file-property v localname)
+ (let ((time (if (or (null time) (equal time '(0 0)))
+ (current-time)
+ time)))
+ (tramp-send-command-and-check
+ v (format
+ "env TZ=UTC %s %s %s"
+ (tramp-get-remote-touch v)
+ (if (tramp-get-connection-property v "touch-t" nil)
+ (format "-t %s" (format-time-string "%Y%m%d%H%M.%S" time t))
+ "")
+ (tramp-shell-quote-argument localname)))))))
(defun tramp-set-file-uid-gid (filename &optional uid gid)
"Set the ownership for FILENAME.
(goto-char (point-max))
(delete-blank-lines)
(when (> (point-max) (point-min))
- (tramp-compat-funcall
- 'substring-no-properties (buffer-string))))))))
+ (substring-no-properties (buffer-string))))))))
(defun tramp-sh-handle-set-file-acl (filename acl-string)
"Like `set-file-acl' for Tramp files."
(when cache-hit (list cache-hit))))
;; We cannot use a length of 0, because file properties
;; for "foo" and "foo/" are identical.
- (tramp-compat-number-sequence (length filename) 1 -1)))))
+ (number-sequence (length filename) 1 -1)))))
;; Cache expired or no matching cache entry found so we need
;; to perform a remote operation.
(format "tramp_perl_file_name_all_completions %s %s %d"
(tramp-shell-quote-argument localname)
(tramp-shell-quote-argument filename)
- (if (symbol-value
- ;; `read-file-name-completion-ignore-case'
- ;; is introduced with Emacs 22.1.
- (if (boundp
- 'read-file-name-completion-ignore-case)
- 'read-file-name-completion-ignore-case
- 'completion-ignore-case))
- 1 0)))
+ (if read-file-name-completion-ignore-case 1 0)))
(format (concat
"(cd %s 2>&1 && (%s -a %s 2>/dev/null"
(tramp-do-copy-or-rename-file
'copy filename newname ok-if-already-exists keep-date
preserve-uid-gid preserve-extended-attributes))
- ;; Compat section.
+ ;; Compat section. PRESERVE-EXTENDED-ATTRIBUTES has been
+ ;; introduced with Emacs 24.1 (as PRESERVE-SELINUX-CONTEXT), and
+ ;; renamed in Emacs 24.3.
(preserve-extended-attributes
(tramp-run-real-handler
'copy-file
(list filename newname ok-if-already-exists keep-date
preserve-uid-gid preserve-extended-attributes)))
- (preserve-uid-gid
- (tramp-run-real-handler
- 'copy-file
- (list filename newname ok-if-already-exists keep-date preserve-uid-gid)))
(t
(tramp-run-real-handler
- 'copy-file (list filename newname ok-if-already-exists keep-date)))))
+ 'copy-file
+ (list filename newname ok-if-already-exists keep-date preserve-uid-gid)))))
(defun tramp-sh-handle-copy-directory
(dirname newname &optional keep-date parents copy-contents)
(if (or (tramp-tramp-file-p filename)
(tramp-tramp-file-p newname))
(tramp-do-copy-or-rename-file
- 'rename filename newname ok-if-already-exists t t)
+ 'rename filename newname ok-if-already-exists
+ 'keep-time 'preserve-uid-gid)
(tramp-run-real-handler
'rename-file (list filename newname ok-if-already-exists))))
op))))
(localname1
(if t1
- (tramp-file-name-handler 'file-remote-p filename 'localname)
+ (file-remote-p filename 'localname)
filename))
(localname2
(if t2
- (tramp-file-name-handler 'file-remote-p newname 'localname)
+ (file-remote-p newname 'localname)
newname))
(prefix (file-remote-p (if t1 filename newname)))
cmd-result)
(zerop
(logand
(file-modes (file-name-directory localname1))
- (tramp-compat-octal-to-decimal "1000"))))
+ (string-to-number "1000" 8))))
(file-writable-p (file-name-directory localname2))
(or (file-directory-p localname2)
(file-writable-p localname2))))
(if (eq op 'copy)
- (tramp-compat-copy-file
+ (copy-file
localname1 localname2 ok-if-already-exists
keep-date preserve-uid-gid)
(tramp-run-real-handler
;; Since this does not work reliable, we also
;; give read permissions.
(set-file-modes
- (concat prefix tmpfile)
- (tramp-compat-octal-to-decimal "0777"))
+ (concat prefix tmpfile) (string-to-number "0777" 8))
(tramp-set-file-uid-gid
(concat prefix tmpfile)
(tramp-get-local-uid 'integer)
(tramp-get-local-gid 'integer)))
(t2
(if (eq op 'copy)
- (tramp-compat-copy-file
+ (copy-file
localname1 tmpfile t
keep-date preserve-uid-gid)
(tramp-run-real-handler
;; We must change the ownership as local user.
;; Since this does not work reliable, we also
;; give read permissions.
- (set-file-modes
- tmpfile (tramp-compat-octal-to-decimal "0777"))
+ (set-file-modes tmpfile (string-to-number "0777" 8))
(tramp-set-file-uid-gid
tmpfile
(tramp-get-remote-uid v 'integer)
;; Save exit.
(ignore-errors
(if dir-flag
- (tramp-compat-delete-directory
+ (delete-directory
(expand-file-name ".." tmpfile) 'recursive)
(delete-file tmpfile)))))
orig-vec 6 "%s"
(mapconcat 'identity (process-command p) " "))
(tramp-set-connection-property p "vector" orig-vec)
- (tramp-compat-set-process-query-on-exit-flag p nil)
+ (set-process-query-on-exit-flag p nil)
;; We must adapt `tramp-local-end-of-line' for
;; sending the password.
(unless (eq op 'copy)
(if (file-regular-p filename)
(delete-file filename)
- (tramp-compat-delete-directory filename 'recursive))))))
+ (delete-directory filename 'recursive))))))
(defun tramp-sh-handle-make-directory (dir &optional parents)
"Like `make-directory' for Tramp files."
;; Dired.
-;; CCC: This does not seem to be enough. Something dies when
-;; we try and delete two directories under Tramp :/
-(defun tramp-sh-handle-dired-recursive-delete-directory (filename)
- "Recursively delete the directory given.
-This is like `dired-recursive-delete-directory' for Tramp files."
- (with-parsed-tramp-file-name filename nil
- ;; Run a shell command 'rm -r <localname>'.
- ;; Code shamelessly stolen from the dired implementation and, um, hacked :)
- (unless (file-exists-p filename)
- (tramp-error v 'file-error "No such directory: %s" filename))
- ;; Which is better, -r or -R? (-r works for me <daniel@danann.net>).
- (tramp-send-command
- v
- (format "rm -rf %s" (tramp-shell-quote-argument localname))
- ;; Don't read the output, do it explicitly.
- nil t)
- ;; Wait for the remote system to return to us...
- ;; This might take a while, allow it plenty of time.
- (tramp-wait-for-output (tramp-get-connection-process v) 120)
- ;; Make sure that it worked...
- (tramp-flush-file-property v (file-name-directory localname))
- (tramp-flush-directory-property v localname)
- (and (file-exists-p filename)
- (tramp-error
- v 'file-error "Failed to recursively delete %s" filename))))
+(defvar dired-compress-file-suffixes)
+(declare-function dired-remove-file "dired-aux")
-(defun tramp-sh-handle-dired-compress-file (file &rest _ok-flag)
+(defun tramp-sh-handle-dired-compress-file (file)
"Like `dired-compress-file' for Tramp files."
- ;; OK-FLAG is valid for XEmacs only, but not implemented.
;; Code stolen mainly from dired-aux.el.
(with-parsed-tramp-file-name file nil
(tramp-flush-file-property v localname)
(save-excursion
- (let ((suffixes
- (if (not (featurep 'xemacs))
- ;; Emacs case
- (symbol-value 'dired-compress-file-suffixes)
- ;; XEmacs has `dired-compression-method-alist', which is
- ;; transformed into `dired-compress-file-suffixes' structure.
- (mapcar
- (lambda (x)
- (list (concat (regexp-quote (nth 1 x)) "\\'")
- nil
- (mapconcat 'identity (nth 3 x) " ")))
- (symbol-value 'dired-compression-method-alist))))
+ (let ((suffixes dired-compress-file-suffixes)
suffix)
;; See if any suffix rule matches this file name.
(while suffixes
(when (tramp-send-command-and-check
v (concat (nth 2 suffix) " "
(tramp-shell-quote-argument localname)))
- ;; `dired-remove-file' is not defined in XEmacs.
- (tramp-compat-funcall 'dired-remove-file file)
+ (dired-remove-file file)
(string-match (car suffix) file)
(concat (substring file 0 (match-beginning 0))))))
(t
(when (tramp-send-command-and-check
v (concat "gzip -f "
(tramp-shell-quote-argument localname)))
- ;; `dired-remove-file' is not defined in XEmacs.
- (tramp-compat-funcall 'dired-remove-file file)
+ (dired-remove-file file)
(cond ((file-exists-p (concat file ".gz"))
(concat file ".gz"))
((file-exists-p (concat file ".z"))
(narrow-to-region (point) (point))
;; We cannot use `insert-buffer-substring' because the Tramp
;; buffer changes its contents before insertion due to calling
- ;; `expand-file' and alike.
+ ;; `expand-file-name' and alike.
(insert
(with-current-buffer (tramp-get-buffer v)
(buffer-string)))
;; Decode the output, it could be multibyte.
(decode-coding-region
beg (point-max)
- (or file-name-coding-system
- (and (boundp 'default-file-name-coding-system)
- (symbol-value 'default-file-name-coding-system))))
+ (or file-name-coding-system default-file-name-coding-system))
;; The inserted file could be from somewhere else.
(when (and (not wildcard) (not full-directory-p))
;; Unless NAME is absolute, concat DIR and NAME.
(unless (file-name-absolute-p name)
(setq name (concat (file-name-as-directory dir) name)))
- ;; If NAME is not a Tramp file, run the real handler.
+ ;; If connection is not established yet, run the real handler.
(if (not (tramp-connectable-p name))
- (tramp-run-real-handler 'expand-file-name (list name nil))
+ (tramp-drop-volume-letter
+ (tramp-run-real-handler 'expand-file-name (list name nil)))
;; Dissect NAME.
(with-parsed-tramp-file-name name nil
(unless (tramp-run-real-handler 'file-name-absolute-p (list localname))
(while (string-match "//" localname)
(setq localname (replace-match "/" t t localname)))
;; No tilde characters in file name, do normal
- ;; `expand-file-name' (this does "/./" and "/../"). We bind
- ;; `directory-sep-char' here for XEmacs on Windows, which would
- ;; otherwise use backslash. `default-directory' is bound,
- ;; because on Windows there would be problems with UNC shares or
- ;; Cygwin mounts.
- (let ((directory-sep-char ?/)
- (default-directory (tramp-compat-temporary-file-directory)))
+ ;; `expand-file-name' (this does "/./" and "/../").
+ ;; `default-directory' is bound, because on Windows there would
+ ;; be problems with UNC shares or Cygwin mounts.
+ (let ((default-directory (tramp-compat-temporary-file-directory)))
(tramp-make-tramp-file-name
method user host
(tramp-drop-volume-letter
;; Send the command.
(tramp-send-command v command nil t) ; nooutput
;; Check, whether a pty is associated.
- (unless (tramp-compat-process-get
+ (unless (process-get
(tramp-get-connection-process v) 'remote-tty)
(tramp-error
v 'file-error
;; process. We ignore errors, because the process
;; could have finished already.
(ignore-errors
- (tramp-compat-set-process-query-on-exit-flag p t)
+ (set-process-query-on-exit-flag p t)
(set-marker (process-mark p) (point)))
;; Return process.
p))))
;; because the remote process could have changed them.
(when tmpinput (delete-file tmpinput))
- ;; `process-file-side-effects' has been introduced with GNU
- ;; Emacs 23.2. If set to nil, no remote file will be changed
- ;; by `program'. If it doesn't exist, we assume its default
- ;; value t.
- (unless (and (boundp 'process-file-side-effects)
- (not (symbol-value 'process-file-side-effects)))
+ (unless process-file-side-effects
(tramp-flush-directory-property v ""))
;; Return exit status.
;; `copy-file' handles direct copy and out-of-band methods.
((or (tramp-local-host-p v)
(tramp-method-out-of-band-p v size))
- (copy-file filename tmpfile t t))
+ (copy-file filename tmpfile 'ok-if-already-exists 'keep-time))
;; Use inline encoding for file transfer.
(rem-enc
(run-hooks 'tramp-handle-file-local-copy-hook)
tmpfile)))
-;; This is needed for XEmacs only. Code stolen from files.el.
-(defun tramp-sh-handle-insert-file-contents-literally
- (filename &optional visit beg end replace)
- "Like `insert-file-contents-literally' for Tramp files."
- (let ((format-alist nil)
- (after-insert-file-functions nil)
- (coding-system-for-read 'no-conversion)
- (coding-system-for-write 'no-conversion)
- (find-buffer-file-type-function
- (if (fboundp 'find-buffer-file-type)
- (symbol-function 'find-buffer-file-type)
- nil))
- (inhibit-file-name-handlers
- '(epa-file-handler image-file-handler jka-compr-handler))
- (inhibit-file-name-operation 'insert-file-contents))
- (unwind-protect
- (progn
- (fset 'find-buffer-file-type (lambda (_filename) t))
- (insert-file-contents filename visit beg end replace))
- ;; Save exit.
- (if find-buffer-file-type-function
- (fset 'find-buffer-file-type find-buffer-file-type-function)
- (fmakunbound 'find-buffer-file-type)))))
-
;; CCC grok LOCKNAME
(defun tramp-sh-handle-write-region
(start end filename &optional append visit lockname confirm)
;; (error
;; "tramp-sh-handle-write-region: LOCKNAME must be nil or equal FILENAME"))
- ;; XEmacs takes a coding system as the seventh argument, not `confirm'.
- (when (and (not (featurep 'xemacs)) confirm (file-exists-p filename))
+ (when (and confirm (file-exists-p filename))
(unless (y-or-n-p (format "File %s exists; overwrite anyway? " filename))
(tramp-error v 'file-error "File not overwritten")))
- (let ((uid (or (nth 2 (tramp-compat-file-attributes filename 'integer))
+ (let ((uid (or (nth 2 (file-attributes filename 'integer))
(tramp-get-remote-uid v 'integer)))
- (gid (or (nth 3 (tramp-compat-file-attributes filename 'integer))
+ (gid (or (nth 3 (file-attributes filename 'integer))
(tramp-get-remote-gid v 'integer))))
(if (and (tramp-local-host-p v)
(signal (car err) (cdr err))))
;; Now, `last-coding-system-used' has the right value. Remember it.
- (when (boundp 'last-coding-system-used)
- (setq coding-system-used
- (symbol-value 'last-coding-system-used))))
+ (setq coding-system-used last-coding-system-used))
;; The permissions of the temporary file should be set. If
;; FILENAME does not exist (eq modes nil) it has been
(when modes
(set-file-modes
tmpfile
- (logior (or modes 0) (tramp-compat-octal-to-decimal "0400"))))
+ (logior (or modes 0) (string-to-number "0400" 8))))
;; This is a bit lengthy due to the different methods
;; possible for file transfer. First, we check whether the
(let (last-coding-system-used (need-chown t))
;; Set file modification time.
(when (or (eq visit t) (stringp visit))
- (let ((file-attr (tramp-compat-file-attributes filename 'integer)))
+ (let ((file-attr (file-attributes filename 'integer)))
(set-visited-file-modtime
;; We must pass modtime explicitly, because FILENAME can
;; be different from (buffer-file-name), f.e. if
;; any other remote command.
(defun tramp-sh-handle-vc-registered (file)
"Like `vc-registered' for Tramp files."
- (tramp-compat-with-temp-message ""
+ (with-temp-message ""
(with-parsed-tramp-file-name file nil
(with-tramp-progress-reporter
v 3 (format-message "Checking `vc-registered' for %s" file)
(tramp-message v 6 "Run `%s', %S" (mapconcat 'identity sequence " ") p)
(tramp-set-connection-property p "vector" v)
;; Needed for `tramp-sh-gvfs-monitor-dir-process-filter'.
- (tramp-compat-process-put p 'events events)
- (tramp-compat-process-put p 'watch-name localname)
- (tramp-compat-set-process-query-on-exit-flag p nil)
+ (process-put p 'events events)
+ (process-put p 'watch-name localname)
+ (set-process-query-on-exit-flag p nil)
(set-process-filter p filter)
;; There might be an error if the monitor is not supported.
;; Give the filter a chance to read the output.
(let ((remote-prefix
(with-current-buffer (process-buffer proc)
(file-remote-p default-directory)))
- (rest-string (tramp-compat-process-get proc 'rest-string)))
+ (rest-string (process-get proc 'rest-string)))
(when rest-string
(tramp-message proc 10 "Previous string:\n%s" rest-string))
(tramp-message proc 6 "%S\n%s" proc string)
(setq string (concat rest-string string)
;; Attribute change is returned in unused wording.
- string (tramp-compat-replace-regexp-in-string
+ string (replace-regexp-in-string
"ATTRIB CHANGED" "ATTRIBUTE_CHANGED" string))
(when (string-match "Monitoring not supported" string)
(delete-process proc))
(list
proc
(intern-soft
- (tramp-compat-replace-regexp-in-string
+ (replace-regexp-in-string
"_" "-" (downcase (match-string 4 string))))
;; File names are returned as absolute paths. We must
;; add the remote prefix.
(setq string (replace-match "" nil nil string))
;; Remove watch when file or directory to be watched is deleted.
(when (and (member (cadr object) '(moved deleted))
- (string-equal
- file (tramp-compat-process-get proc 'watch-name)))
+ (string-equal file (process-get proc 'watch-name)))
(delete-process proc))
;; Usually, we would add an Emacs event now. Unfortunately,
;; `unread-command-events' does not accept several events at
;; once. Therefore, we apply the callback directly.
- (when (member (cadr object) (tramp-compat-process-get proc 'events))
+ (when (member (cadr object) (process-get proc 'events))
(tramp-compat-funcall 'file-notify-callback object))))
;; Save rest of the string.
(when (zerop (length string)) (setq string nil))
(when string (tramp-message proc 10 "Rest string:\n%s" string))
- (tramp-compat-process-put proc 'rest-string string)))
+ (process-put proc 'rest-string string)))
(defun tramp-sh-inotifywait-process-filter (proc string)
"Read output from \"inotifywait\" and add corresponding file-notify events."
(tramp-message proc 6 "%S\n%s" proc string)
- (dolist (line (split-string string "[\n\r]+" 'omit-nulls))
+ (dolist (line (split-string string "[\n\r]+" 'omit))
;; Check, whether there is a problem.
(unless
(string-match
(mapcar
(lambda (x)
(intern-soft
- (tramp-compat-replace-regexp-in-string "_" "-" (downcase x))))
- (split-string (match-string 1 line) "," 'omit-nulls))
+ (replace-regexp-in-string "_" "-" (downcase x))))
+ (split-string (match-string 1 line) "," 'omit))
(match-string 3 line))))
;; Remove watch when file or directory to be watched is deleted.
(when (equal (cadr object) 'ignored)
vec 5 (format-message "Sending script `%s'" name)
;; In bash, leading TABs like in `tramp-vc-registered-read-file-names'
;; could result in unwanted command expansion. Avoid this.
- (setq script (tramp-compat-replace-regexp-in-string
+ (setq script (replace-regexp-in-string
(make-string 1 ?\t) (make-string 8 ? ) script))
;; The script could contain a call of Perl. This is masked with `%s'.
(when (and (string-match "%s" script)
(setq result (concat "\\" progname))))
(unless result
(when ignore-tilde
- ;; Remove all ~/foo directories from dirlist. In XEmacs,
- ;; `remove' is in CL, and we want to avoid CL dependencies.
+ ;; Remove all ~/foo directories from dirlist.
(let (newdl d)
(while dirlist
(setq d (car dirlist))
(let ((cs (or (and (memq 'utf-8 (coding-system-list))
(string-match "utf-?8" (tramp-get-remote-locale vec))
(cons 'utf-8 'utf-8))
- (tramp-compat-funcall 'process-coding-system proc)
+ (process-coding-system proc)
(cons 'undecided 'undecided)))
cs-decode cs-encode)
(when (symbolp cs) (setq cs (cons cs cs)))
(setq cs-decode (or (car cs) 'undecided)
cs-encode (or (cdr cs) 'undecided))
(setq cs-encode
- (tramp-compat-coding-system-change-eol-conversion
+ (coding-system-change-eol-conversion
cs-encode
(if (string-match
"^Darwin" (tramp-get-connection-property vec "uname" ""))
(tramp-send-command vec "echo foo ; echo bar" t)
(goto-char (point-min))
(when (search-forward "\r" nil t)
- (setq cs-decode (tramp-compat-coding-system-change-eol-conversion
+ (setq cs-decode (coding-system-change-eol-conversion
cs-decode 'dos)))
;; Special setting for Mac OS X.
(when (and (string-match
(memq 'utf-8-hfs (coding-system-list)))
(setq cs-decode 'utf-8-hfs
cs-encode 'utf-8-hfs))
- (tramp-compat-funcall
- 'set-buffer-process-coding-system cs-decode cs-encode)
+ (set-buffer-process-coding-system cs-decode cs-encode)
(tramp-message
vec 5 "Setting coding system to `%s' and `%s'" cs-decode cs-encode))
;; Look for ^M and do something useful if found.
;; Set `remote-tty' process property.
(let ((tty (tramp-send-command-and-read vec "echo \\\"`tty`\\\"" 'noerror)))
(unless (zerop (length tty))
- (tramp-compat-process-put proc 'remote-tty tty)))
+ (process-put proc 'remote-tty tty)))
;; Dump stty settings in the traces.
(when (>= tramp-verbose 9)
(copy-sequence tramp-remote-process-environment)))
unset vars item)
(while env
- (setq item (tramp-compat-split-string (car env) "="))
+ (setq item (split-string (car env) "=" 'omit))
(setcdr item (mapconcat 'identity (cdr item) "="))
(if (and (stringp (cdr item)) (not (string-equal (cdr item) "")))
(push (format "%s %s" (car item) (cdr item)) vars)
value
(format-spec-make
?t
- (tramp-file-name-handler
- 'file-remote-p tmpfile 'localname)))))
+ (file-remote-p tmpfile 'localname)))))
(tramp-maybe-send-script vec value name)
(setq rem-dec name)))
(tramp-message
(push
(vector
(tramp-file-name-method hop) (tramp-file-name-user hop)
- (tramp-compat-funcall 'tramp-gw-open-connection vec gw hop) nil nil)
+ (tramp-gw-open-connection vec gw hop) nil nil)
target-alist)
;; For the password prompt, we need the correct values.
;; Therefore, we must remember the gateway vector. But we
(unless (and p (processp p) (memq (process-status p) '(run open)))
;; If `non-essential' is non-nil, don't reopen a new connection.
+ ;; This variable has been introduced with Emacs 24.1.
(when (and (boundp 'non-essential) (symbol-value 'non-essential))
(throw 'non-essential 'non-essential))
;; Set sentinel and query flag.
(tramp-set-connection-property p "vector" vec)
(set-process-sentinel p 'tramp-process-sentinel)
- (tramp-compat-set-process-query-on-exit-flag p nil)
+ (set-process-query-on-exit-flag p nil)
(setq tramp-current-connection
(cons (butlast (append vec nil) 2) (current-time))
tramp-current-host (system-name))
(when (and (numberp (nth 2 attr)) (< (nth 2 attr) 0))
(setcar (nthcdr 2 attr) -1))
(when (and (floatp (nth 2 attr))
- (<= (nth 2 attr) (tramp-compat-most-positive-fixnum)))
+ (<= (nth 2 attr) most-positive-fixnum))
(setcar (nthcdr 2 attr) (round (nth 2 attr))))
(when (and (numberp (nth 3 attr)) (< (nth 3 attr) 0))
(setcar (nthcdr 3 attr) -1))
(when (and (floatp (nth 3 attr))
- (<= (nth 3 attr) (tramp-compat-most-positive-fixnum)))
+ (<= (nth 3 attr) most-positive-fixnum))
(setcar (nthcdr 3 attr) (round (nth 3 attr))))
;; Convert last access time.
(unless (listp (nth 4 attr))
(when (< (nth 7 attr) 0)
(setcar (nthcdr 7 attr) -1))
(when (and (floatp (nth 7 attr))
- (<= (nth 7 attr) (tramp-compat-most-positive-fixnum)))
+ (<= (nth 7 attr) most-positive-fixnum))
(setcar (nthcdr 7 attr) (round (nth 7 attr))))
;; Convert file mode bits to string.
(unless (stringp (nth 8 attr))
(when elt1
(setcdr elt1
(append
- (tramp-compat-split-string (or default-remote-path "") ":")
+ (split-string (or default-remote-path "") ":" 'omit)
(cdr elt1)))
(setq remote-path (delq 'tramp-default-remote-path remote-path)))
(when elt2
(setcdr elt2
(append
- (tramp-compat-split-string (or own-remote-path "") ":")
+ (split-string (or own-remote-path "") ":" 'omit)
(cdr elt2)))
(setq remote-path (delq 'tramp-own-remote-path remote-path)))
"%s -t %s %s"
result
(format-time-string "%Y%m%d%H%M.%S")
- (tramp-file-name-handler 'file-remote-p tmpfile 'localname))))
+ (file-remote-p tmpfile 'localname))))
(delete-file tmpfile))
result)))
(directory-files . tramp-smb-handle-directory-files)
(directory-files-and-attributes
. tramp-handle-directory-files-and-attributes)
- (dired-call-process . ignore)
(dired-compress-file . ignore)
(dired-uncache . tramp-handle-dired-uncache)
(expand-file-name . tramp-smb-handle-expand-file-name)
(shell-command . tramp-handle-shell-command)
(start-file-process . tramp-smb-handle-start-file-process)
(substitute-in-file-name . tramp-smb-handle-substitute-in-file-name)
- (unhandled-file-name-directory . tramp-handle-unhandled-file-name-directory)
+ (unhandled-file-name-directory . ignore)
(vc-registered . ignore)
(verify-visited-file-modtime . tramp-handle-verify-visited-file-modtime)
(write-region . tramp-smb-handle-write-region))
(unwind-protect
(progn
(make-directory tmpdir)
- (tramp-compat-copy-directory
- dirname tmpdir keep-date 'parents)
- (tramp-compat-copy-directory
+ (copy-directory dirname tmpdir keep-date 'parents)
+ (copy-directory
(expand-file-name (file-name-nondirectory dirname) tmpdir)
newname keep-date parents))
- (tramp-compat-delete-directory tmpdir 'recursive))))
+ (delete-directory tmpdir 'recursive))))
;; We can copy recursively.
((or t1 t2)
(port (tramp-file-name-port v))
(share (tramp-smb-get-share v))
(localname (file-name-as-directory
- (tramp-compat-replace-regexp-in-string
+ (replace-regexp-in-string
"\\\\" "/" (tramp-smb-get-localname v))))
(tmpdir (make-temp-name
(expand-file-name
(tramp-message
v 6 "%s" (mapconcat 'identity (process-command p) " "))
(tramp-set-connection-property p "vector" v)
- (tramp-compat-set-process-query-on-exit-flag p nil)
+ (set-process-query-on-exit-flag p nil)
(tramp-process-actions p v nil tramp-smb-actions-with-tar)
(while (memq (process-status p) '(run open))
;; Reset the transfer process properties.
(tramp-set-connection-property v "process-name" nil)
(tramp-set-connection-property v "process-buffer" nil)
- (when t1 (tramp-compat-delete-directory tmpdir 'recurse))))
+ (when t1 (delete-directory tmpdir 'recurse))))
;; Handle KEEP-DATE argument.
(when keep-date
0 (format "Copying %s to %s" filename newname)
(if (file-directory-p filename)
- (tramp-compat-copy-directory filename newname keep-date t t)
+ (tramp-compat-copy-directory
+ filename newname keep-date 'parents 'copy-contents)
(let ((tmpfile (file-local-copy filename)))
(if tmpfile
(mapc
(lambda (file)
(if (file-directory-p file)
- (tramp-compat-delete-directory file recursive)
+ (delete-directory file recursive)
(delete-file file)))
;; We do not want to delete "." and "..".
(directory-files
;; Sort them if necessary.
(unless nosort (setq result (sort result 'string-lessp)))
;; Remove double entries.
- (tramp-compat-delete-dups result)))
+ (delete-dups result)))
(defun tramp-smb-handle-expand-file-name (name &optional dir)
"Like `expand-file-name' for Tramp files."
(domain (tramp-file-name-domain v))
(port (tramp-file-name-port v))
(share (tramp-smb-get-share v))
- (localname (tramp-compat-replace-regexp-in-string
+ (localname (replace-regexp-in-string
"\\\\" "/" (tramp-smb-get-localname v)))
(args (list (concat "//" real-host "/" share) "-E")))
(tramp-message
v 6 "%s" (mapconcat 'identity (process-command p) " "))
(tramp-set-connection-property p "vector" v)
- (tramp-compat-set-process-query-on-exit-flag p nil)
+ (set-process-query-on-exit-flag p nil)
(tramp-process-actions p v nil tramp-smb-actions-get-acl)
(when (> (point-max) (point-min))
- (tramp-compat-funcall
- 'substring-no-properties (buffer-string)))))
+ (substring-no-properties (buffer-string)))))
;; Reset the transfer process properties.
(tramp-set-connection-property v "process-name" nil)
(tramp-smb-send-command
v
(if (tramp-smb-get-cifs-capabilities v)
- (format
- "posix_mkdir \"%s\" %s"
- file (tramp-compat-decimal-to-octal (default-file-modes)))
+ (format "posix_mkdir \"%s\" %o" file (default-file-modes))
(format "mkdir \"%s\"" file)))
;; We must also flush the cache of the directory, because
;; `file-attributes' reads the values from there.
(unless outbuf
(kill-buffer (tramp-get-connection-property v "process-buffer" nil)))
- ;; `process-file-side-effects' has been introduced with GNU
- ;; Emacs 23.2. If set to nil, no remote file will be changed
- ;; by `program'. If it doesn't exist, we assume its default
- ;; value t.
- (unless (and (boundp 'process-file-side-effects)
- (not (symbol-value 'process-file-side-effects)))
+ (unless process-file-side-effects
(tramp-flush-directory-property v ""))
;; Return exit status.
(tramp-error v2 'file-error "Cannot rename `%s'" filename))))
;; We must rename via copy.
- (tramp-compat-copy-file filename newname ok-if-already-exists t t t)
+ (copy-file
+ filename newname ok-if-already-exists 'keep-time 'preserve-uid-gid)
(if (file-directory-p filename)
- (tramp-compat-delete-directory filename 'recursive)
+ (delete-directory filename 'recursive)
(delete-file filename)))))
(defun tramp-smb-action-set-acl (proc vec)
(domain (tramp-file-name-domain v))
(port (tramp-file-name-port v))
(share (tramp-smb-get-share v))
- (localname (tramp-compat-replace-regexp-in-string
+ (localname (replace-regexp-in-string
"\\\\" "/" (tramp-smb-get-localname v)))
(args (list (concat "//" real-host "/" share) "-E" "-S"
- (tramp-compat-replace-regexp-in-string
+ (replace-regexp-in-string
"\n" "," acl-string))))
(if (not (zerop (length real-user)))
(tramp-message
v 6 "%s" (mapconcat 'identity (process-command p) " "))
(tramp-set-connection-property p "vector" v)
- (tramp-compat-set-process-query-on-exit-flag p nil)
+ (set-process-query-on-exit-flag p nil)
(tramp-process-actions p v nil tramp-smb-actions-set-acl)
(goto-char (point-max))
(unless (re-search-backward "tramp_exit_status [0-9]+" nil t)
(when (tramp-smb-get-cifs-capabilities v)
(tramp-flush-file-property v localname)
(unless (tramp-smb-send-command
- v (format "chmod \"%s\" %s"
- (tramp-smb-get-localname v)
- (tramp-compat-decimal-to-octal mode)))
+ v (format "chmod \"%s\" %o" (tramp-smb-get-localname v) mode))
(tramp-error
v 'file-error "Error while changing file's mode %s" filename)))))
"Like `write-region' for Tramp files."
(setq filename (expand-file-name filename))
(with-parsed-tramp-file-name filename nil
- ;; XEmacs takes a coding system as the seventh argument, not `confirm'.
- (when (and (not (featurep 'xemacs))
- confirm (file-exists-p filename))
+ (when (and confirm (file-exists-p filename))
(unless (y-or-n-p (format "File %s exists; overwrite anyway? "
filename))
(tramp-error v 'file-error "File not overwritten")))
;; Add directory itself.
(push '("" "drwxrwxrwx" 0 (0 0)) res)
- ;; There's a very strange error (debugged with XEmacs 21.4.14)
- ;; If there's no short delay, it returns nil. No idea about.
- (when (featurep 'xemacs) (sleep-for 0.01))
-
;; Return entries.
(delq nil res))))))
(member
"pathnames"
(split-string
- (buffer-substring (point) (point-at-eol)) nil t)))))))))
+ (buffer-substring (point) (point-at-eol)) nil 'omit)))))))))
(defun tramp-smb-get-stat-capability (vec)
"Check, whether the SMB server supports the STAT command."
(tramp-message
vec 6 "%s" (mapconcat 'identity (process-command p) " "))
(tramp-set-connection-property p "vector" vec)
- (tramp-compat-set-process-query-on-exit-flag p nil)
+ (set-process-query-on-exit-flag p nil)
;; Set variables for computing the prompt for reading password.
(setq tramp-current-method tramp-smb-method
;; Notes:
;; -----
;;
-;; This package only works for Emacs 22.1 and higher, and for XEmacs 21.4
-;; and higher. For XEmacs 21, you need the package `fsf-compat' for
-;; the `with-timeout' macro.
+;; This package only works for Emacs 23.1 and higher.
;;
;; Also see the todo list at the bottom of this file.
;;
;; Pacify byte-compiler.
(eval-when-compile
(require 'cl))
-(defvar bkup-backup-directory-info)
-(defvar directory-sep-char)
(defvar eshell-path-env)
-(defvar ls-lisp-use-insert-directory-program)
-(defvar outline-regexp)
;;; User Customizable Internal Variables:
:group 'tramp
:type 'integer)
-;; Emacs case.
-(eval-and-compile
- (when (boundp 'backup-directory-alist)
- (defcustom tramp-backup-directory-alist nil
- "Alist of filename patterns and backup directory names.
+(defcustom tramp-backup-directory-alist nil
+ "Alist of filename patterns and backup directory names.
Each element looks like (REGEXP . DIRECTORY), with the same meaning like
in `backup-directory-alist'. If a Tramp file is backed up, and DIRECTORY
is a local file name, the backup directory is prepended with Tramp file
gives the same backup policy for Tramp files on their hosts like the
policy for local files."
- :group 'tramp
- :type '(repeat (cons (regexp :tag "Regexp matching filename")
- (directory :tag "Backup directory name"))))))
-
-;; XEmacs case. We cannot check for `bkup-backup-directory-info', because
-;; the package "backup-dir" might not be loaded yet.
-(eval-and-compile
- (when (featurep 'xemacs)
- (defcustom tramp-bkup-backup-directory-info nil
- "Alist of (FILE-REGEXP BACKUP-DIR OPTIONS ...))
-It has the same meaning like `bkup-backup-directory-info' from package
-`backup-dir'. If a Tramp file is backed up, and BACKUP-DIR is a local
-file name, the backup directory is prepended with Tramp file name prefix
-\(method, user, host) of file.
-
-\(setq tramp-bkup-backup-directory-info bkup-backup-directory-info)
-
-gives the same backup policy for Tramp files on their hosts like the
-policy for local files."
- :type '(repeat
- (list (regexp :tag "File regexp")
- (string :tag "Backup Dir")
- (set :inline t
- (const ok-create)
- (const full-path)
- (const prepend-name)
- (const search-upward))))
- :group 'tramp)))
+ :group 'tramp
+ :type '(repeat (cons (regexp :tag "Regexp matching filename")
+ (directory :tag "Backup directory name"))))
(defcustom tramp-auto-save-directory nil
"Put auto-save files in this directory, if set.
;; PuTTY is installed. We don't take it, if it is installed on a
;; non-windows system, or pscp from the pssh (parallel ssh) package
;; is found.
- ((and (eq system-type 'windows-nt)
- (executable-find "pscp"))
- (if (or (fboundp 'password-read)
- (fboundp 'auth-source-user-or-password)
- (fboundp 'auth-source-search)
- ;; Pageant is running.
- (tramp-compat-process-running-p "Pageant"))
- "pscp"
- "plink"))
+ ((and (eq system-type 'windows-nt) (executable-find "pscp")) "pscp")
;; There is an ssh installation.
- ((executable-find "scp")
- (if (or (fboundp 'password-read)
- (fboundp 'auth-source-user-or-password)
- (fboundp 'auth-source-search)
- ;; ssh-agent is running.
- (getenv "SSH_AUTH_SOCK")
- (getenv "SSH_AGENT_PID"))
- "scp"
- "ssh"))
+ ((executable-find "scp") "scp")
;; Fallback.
(t "ftp"))
"Default method to use for transferring files.
* `tramp-parse-sknownhosts' for \"~/.ssh2/knownhosts/*\" like files,
* `tramp-parse-hosts' for \"/etc/hosts\" like files,
* `tramp-parse-passwd' for \"/etc/passwd\" like files.
+ * `tramp-parse-etc-group' for \"/etc/group\" like files.
* `tramp-parse-netrc' for \"~/.netrc\" like files.
* `tramp-parse-putty' for PuTTY registered sessions.
;; regexp works only for GNU Emacs.
;; Allow also [] style prompts. They can appear only during
;; connection initialization; Tramp redefines the prompt afterwards.
- (concat (if (featurep 'xemacs) "" "\\(?:^\\|\r\\)")
+ (concat "\\(?:^\\|\r\\)"
"[^]#$%>\n]*#?[]#$%>] *\\(\e\\[[0-9;]*[a-zA-Z] *\\)*")
"Regexp to match prompts from remote shell.
Normally, Tramp expects you to configure `shell-prompt-pattern'
(defcustom tramp-password-prompt-regexp
(format "^.*\\(%s\\).*:\^@? *"
+ ;; `password-word-equivalents' has been introduced with Emacs 24.4.
(if (boundp 'password-word-equivalents)
(regexp-opt (symbol-value 'password-word-equivalents))
"password\\|passphrase"))
(make-variable-buffer-local 'tramp-temp-buffer-file-name)
(put 'tramp-temp-buffer-file-name 'permanent-local t)
-;; XEmacs is distributed with few Lisp packages. Further packages are
-;; installed using EFS. If we use a unified filename format, then
-;; Tramp is required in addition to EFS. (But why can't Tramp just
-;; disable EFS when Tramp is loaded? Then XEmacs can ship with EFS
-;; just like before.) Another reason for using a separate filename
-;; syntax on XEmacs is that EFS hooks into XEmacs in many places, but
-;; Tramp only knows how to deal with `file-name-handler-alist', not
-;; the other places.
-
-;; Currently, we have the choice between 'ftp and 'sep.
;;;###autoload
-(defcustom tramp-syntax
- (if (featurep 'xemacs) 'sep 'ftp)
+(defcustom tramp-syntax 'ftp
"Tramp filename syntax to be used.
It can have the following values:
- `ftp' -- Ange-FTP respective EFS like syntax (GNU Emacs default)
- `sep' -- Syntax as defined for XEmacs."
+ `ftp' -- Ange-FTP like syntax
+ `sep' -- Syntax as defined for XEmacs originally."
:group 'tramp
:version "24.4"
- :type `(choice (const :tag ,(if (featurep 'xemacs) "EFS" "Ange-FTP") ftp)
+ :type '(choice (const :tag "Ange-FTP" ftp)
(const :tag "XEmacs" sep)))
(defconst tramp-prefix-format
"\\`/\\(\\[.*\\]\\|[^/|:]\\{2,\\}[^/|]*\\):"
"\\`/[^/|:][^/|]*:")
"Value for `tramp-file-name-regexp' for unified remoting.
-Emacs (not XEmacs) uses a unified filename syntax for Ange-FTP and
-Tramp. See `tramp-file-name-structure' for more explanations.
+See `tramp-file-name-structure' for more explanations.
On W32 systems, the volume letter must be ignored.")
;;;###autoload
(defconst tramp-file-name-regexp-separate "\\`/\\[.*\\]"
"Value for `tramp-file-name-regexp' for separate remoting.
-XEmacs uses a separate filename syntax for Tramp and EFS.
See `tramp-file-name-structure' for more explanations.")
;;;###autoload
(if (memq system-type '(cygwin windows-nt))
"\\`/[^/]\\{2,\\}\\'" "\\`/[^/]*\\'")
"Value for `tramp-completion-file-name-regexp' for unified remoting.
-GNU Emacs uses a unified filename syntax for Tramp and Ange-FTP.
See `tramp-file-name-structure' for more explanations.
On W32 systems, the volume letter must be ignored.")
(defconst tramp-completion-file-name-regexp-separate
"\\`/\\([[][^]]*\\)?\\'"
"Value for `tramp-completion-file-name-regexp' for separate remoting.
-XEmacs uses a separate filename syntax for Tramp and EFS.
See `tramp-file-name-structure' for more explanations.")
;;;###autoload
;; to drop bytes when data is sent too quickly. There is also a connection
;; buffer local variable, which is computed depending on remote host properties
;; when `tramp-chunksize' is zero or nil.
-(defcustom tramp-chunksize
- (when (and (not (featurep 'xemacs))
- (memq system-type '(hpux)))
- 500)
+(defcustom tramp-chunksize (when (memq system-type '(hpux)) 500)
;; Parentheses in docstring starting at beginning of line are escaped.
;; Fontification is messed up when
;; `open-paren-in-column-0-is-defun-start' set to t.
Afterwards, check in `tramp-methods'. If the `tramp-methods'
entry does not exist, return nil."
(let ((hash-entry
- (tramp-compat-replace-regexp-in-string
- "^tramp-" "" (symbol-name param))))
+ (replace-regexp-in-string "^tramp-" "" (symbol-name param))))
(if (tramp-connection-property-p vec hash-entry)
;; We use the cached property.
- (tramp-get-connection-property vec hash-entry nil)
+ (tramp-get-connection-property vec hash-entry nil)
;; Use the static value from `tramp-methods'.
(let ((methods-entry
(assoc param (assoc (tramp-file-name-method vec) tramp-methods))))
;; This works with the current set of `tramp-obsolete-methods'.
;; Must be improved, if their are more sophisticated replacements.
(setq result (substring result 0 -1)))
- ;; We must mark, whether a default value has been used. Not
- ;; applicable for XEmacs.
- (if (or method (null result) (null (functionp 'propertize)))
+ ;; We must mark, whether a default value has been used.
+ (if (or method (null result))
result
- (tramp-compat-funcall 'propertize result 'tramp-default t))))
+ (propertize result 'tramp-default t))))
(defun tramp-find-user (method user host)
"Return the right user string to use.
(setq choices nil)))
luser)
tramp-default-user)))
- ;; We must mark, whether a default value has been used. Not
- ;; applicable for XEmacs.
- (if (or user (null result) (null (functionp 'propertize)))
+ ;; We must mark, whether a default value has been used.
+ (if (or user (null result))
result
- (tramp-compat-funcall 'propertize result 'tramp-default t))))
+ (propertize result 'tramp-default t))))
(defun tramp-find-host (method user host)
"Return the right host string to use.
(when (bobp)
(insert
(format
- ";; %sEmacs: %s Tramp: %s -*- mode: outline; -*-"
- (if (featurep 'sxemacs) "SX" (if (featurep 'xemacs) "X" "GNU "))
+ ";; Emacs: %s Tramp: %s -*- mode: outline; -*-"
emacs-version tramp-version))
(when (>= tramp-verbose 10)
(insert
'("tramp-backtrace"
"tramp-compat-condition-case-unless-debug"
"tramp-compat-funcall"
- "tramp-compat-with-temp-message"
"tramp-condition-case-unless-debug"
"tramp-debug-message"
"tramp-error"
(put 'with-parsed-tramp-file-name 'lisp-indent-function 2)
(put 'with-parsed-tramp-file-name 'edebug-form-spec '(form symbolp body))
-(tramp-compat-font-lock-add-keywords
- 'emacs-lisp-mode '("\\<with-parsed-tramp-file-name\\>"))
+(font-lock-add-keywords 'emacs-lisp-mode '("\\<with-parsed-tramp-file-name\\>"))
(defun tramp-progress-reporter-update (reporter &optional value)
(let* ((parameters (cdr reporter))
(message (aref parameters 3)))
(when (string-match message (or (current-message) ""))
- (tramp-compat-funcall 'progress-reporter-update reporter value))))
+ (progress-reporter-update reporter value))))
(defmacro with-tramp-progress-reporter (vec level message &rest body)
"Executes BODY, spinning a progress reporter with MESSAGE.
;; Display only when there is a minimum level.
(<= ,level (min tramp-verbose 3)))
(ignore-errors
- (let ((pr (tramp-compat-funcall
- #'make-progress-reporter ,message)))
+ (let ((pr (make-progress-reporter ,message nil nil)))
(when pr
- (run-at-time 3 0.1
- #'tramp-progress-reporter-update pr)))))))
+ (run-at-time
+ 3 0.1 #'tramp-progress-reporter-update pr)))))))
(unwind-protect
;; Execute the body.
(prog1 (progn ,@body) (setq cookie "done"))
;; Stop progress reporter.
- (if tm (tramp-compat-funcall 'cancel-timer tm))
+ (if tm (cancel-timer tm))
(tramp-message ,vec ,level "%s...%s" ,message cookie)))))
-(tramp-compat-font-lock-add-keywords
+(font-lock-add-keywords
'emacs-lisp-mode '("\\<with-tramp-progress-reporter\\>"))
(defmacro with-tramp-file-property (vec file property &rest body)
(put 'with-tramp-file-property 'lisp-indent-function 3)
(put 'with-tramp-file-property 'edebug-form-spec t)
-(tramp-compat-font-lock-add-keywords
- 'emacs-lisp-mode '("\\<with-tramp-file-property\\>"))
+(font-lock-add-keywords 'emacs-lisp-mode '("\\<with-tramp-file-property\\>"))
(defmacro with-tramp-connection-property (key property &rest body)
"Check in Tramp for property PROPERTY, otherwise executes BODY and set."
(put 'with-tramp-connection-property 'lisp-indent-function 2)
(put 'with-tramp-connection-property 'edebug-form-spec t)
-(tramp-compat-font-lock-add-keywords
+(font-lock-add-keywords
'emacs-lisp-mode '("\\<with-tramp-connection-property\\>"))
(defun tramp-drop-volume-letter (name)
special handling of `substitute-in-file-name'."
(when (symbol-value 'minibuffer-completing-file-name)
(setq tramp-rfn-eshadow-overlay
- (tramp-compat-funcall
- 'make-overlay
- (tramp-compat-funcall 'minibuffer-prompt-end)
- (tramp-compat-funcall 'minibuffer-prompt-end)))
+ (make-overlay (minibuffer-prompt-end) (minibuffer-prompt-end)))
;; Copy rfn-eshadow-overlay properties.
- (let ((props (tramp-compat-funcall
- 'overlay-properties (symbol-value 'rfn-eshadow-overlay))))
+ (let ((props (overlay-properties (symbol-value 'rfn-eshadow-overlay))))
(while props
;; The `field' property prevents correct minibuffer
;; completion; we exclude it.
(if (not (eq (car props) 'field))
- (tramp-compat-funcall
- 'overlay-put tramp-rfn-eshadow-overlay (pop props) (pop props))
+ (overlay-put tramp-rfn-eshadow-overlay (pop props) (pop props))
(pop props) (pop props))))))
-(when (boundp 'rfn-eshadow-setup-minibuffer-hook)
- (add-hook 'rfn-eshadow-setup-minibuffer-hook
- 'tramp-rfn-eshadow-setup-minibuffer)
- (add-hook 'tramp-unload-hook
- (lambda ()
- (remove-hook 'rfn-eshadow-setup-minibuffer-hook
- 'tramp-rfn-eshadow-setup-minibuffer))))
+(add-hook 'rfn-eshadow-setup-minibuffer-hook
+ 'tramp-rfn-eshadow-setup-minibuffer)
+(add-hook 'tramp-unload-hook
+ (lambda ()
+ (remove-hook 'rfn-eshadow-setup-minibuffer-hook
+ 'tramp-rfn-eshadow-setup-minibuffer)))
(defconst tramp-rfn-eshadow-update-overlay-regexp
(format "[^%s/~]*\\(/\\|~\\)" tramp-postfix-host-format))
been set up by `rfn-eshadow-setup-minibuffer'."
;; In remote files name, there is a shadowing just for the local part.
(ignore-errors
- (let ((end (or (tramp-compat-funcall
- 'overlay-end (symbol-value 'rfn-eshadow-overlay))
- (tramp-compat-funcall 'minibuffer-prompt-end)))
+ (let ((end (or (overlay-end (symbol-value 'rfn-eshadow-overlay))
+ (minibuffer-prompt-end)))
;; We do not want to send any remote command.
(non-essential t))
(when
(tramp-tramp-file-p
- (tramp-compat-funcall
- 'buffer-substring-no-properties end (point-max)))
+ (buffer-substring-no-properties end (point-max)))
(save-excursion
(save-restriction
(narrow-to-region
(let ((rfn-eshadow-overlay tramp-rfn-eshadow-overlay)
(rfn-eshadow-update-overlay-hook nil)
file-name-handler-alist)
- (tramp-compat-funcall
- 'move-overlay rfn-eshadow-overlay (point-max) (point-max))
- (tramp-compat-funcall 'rfn-eshadow-update-overlay))))))))
-
-(when (boundp 'rfn-eshadow-update-overlay-hook)
- (add-hook 'rfn-eshadow-update-overlay-hook
- 'tramp-rfn-eshadow-update-overlay)
- (add-hook 'tramp-unload-hook
- (lambda ()
- (remove-hook 'rfn-eshadow-update-overlay-hook
- 'tramp-rfn-eshadow-update-overlay))))
+ (move-overlay rfn-eshadow-overlay (point-max) (point-max))
+ (rfn-eshadow-update-overlay))))))))
+
+(add-hook 'rfn-eshadow-update-overlay-hook
+ 'tramp-rfn-eshadow-update-overlay)
+(add-hook 'tramp-unload-hook
+ (lambda ()
+ (remove-hook 'rfn-eshadow-update-overlay-hook
+ 'tramp-rfn-eshadow-update-overlay)))
;; Inodes don't exist for some file systems. Therefore we must
;; generate virtual ones. Used in `find-buffer-visiting'. The method
If the file modes of FILENAME cannot be determined, return the
value of `default-file-modes', without execute permissions."
(or (file-modes filename)
- (logand (default-file-modes) (tramp-compat-octal-to-decimal "0666"))))
+ (logand (default-file-modes) (string-to-number "0666" 8))))
(defun tramp-replace-environment-variables (filename)
"Replace environment variables in FILENAME.
Return the string with the replaced variables."
(or (ignore-errors
+ ;; Optional arg has been introduced with Emacs 24 (?).
(tramp-compat-funcall 'substitute-env-vars filename 'only-defined))
;; We need an own implementation.
(save-match-data
t nil filename)))
filename))))
-;; In XEmacs, electricity is implemented via a key map for ?/ and ?~,
-;; which calls corresponding functions (see minibuf.el).
-(when (fboundp 'minibuffer-electric-separator)
- (mapc
- (lambda (x)
- (eval
- `(defadvice ,x
- (around ,(intern (format "tramp-advice-%s" x)) activate)
- "Invoke `substitute-in-file-name' for Tramp files."
- (if (and (symbol-value 'minibuffer-electric-file-name-behavior)
- (tramp-tramp-file-p (buffer-substring)))
- ;; We don't need to handle `last-input-event', because
- ;; due to the key map we know it must be ?/ or ?~.
- (let ((s (concat (buffer-substring (point-min) (point))
- (string last-command-char))))
- (delete-region (point-min) (point))
- (insert (substitute-in-file-name s))
- (setq ad-return-value last-command-char))
- ad-do-it)))
- (eval
- `(add-hook
- 'tramp-unload-hook
- (lambda ()
- (ad-remove-advice ',x 'around ',(intern (format "tramp-advice-%s" x)))
- (ad-activate ',x)))))
-
- '(minibuffer-electric-separator
- minibuffer-electric-tilde)))
-
(defun tramp-find-file-name-coding-system-alist (filename tmpname)
"Like `find-operation-coding-system' for Tramp filenames.
Tramp's `insert-file-contents' and `write-region' work over
(cond
;; FILE resp DIRECTORY.
((member operation
- (list 'access-file 'byte-compiler-base-file-name 'delete-directory
- 'delete-file 'diff-latest-backup-file 'directory-file-name
- 'directory-files 'directory-files-and-attributes
- 'dired-compress-file 'dired-uncache
- 'file-accessible-directory-p 'file-attributes
- 'file-directory-p 'file-executable-p 'file-exists-p
- 'file-local-copy 'file-modes
- 'file-name-as-directory 'file-name-directory
- 'file-name-nondirectory 'file-name-sans-versions
- 'file-ownership-preserved-p 'file-readable-p
- 'file-regular-p 'file-remote-p 'file-symlink-p 'file-truename
- 'file-writable-p 'find-backup-file-name 'find-file-noselect
- 'get-file-buffer 'insert-directory 'insert-file-contents
- 'load 'make-directory 'make-directory-internal
- 'set-file-modes 'substitute-in-file-name
- 'unhandled-file-name-directory 'vc-registered
- ;; Emacs 22+ only.
- 'set-file-times
- ;; Emacs 24+ only.
- 'file-acl 'file-notify-add-watch
- 'file-selinux-context 'set-file-acl 'set-file-selinux-context
- ;; XEmacs only.
- 'abbreviate-file-name 'create-file-buffer
- 'dired-file-modtime 'dired-make-compressed-filename
- 'dired-recursive-delete-directory 'dired-set-file-modtime
- 'dired-shell-unhandle-file-name 'dired-uucode-file
- 'insert-file-contents-literally 'make-temp-name 'recover-file
- 'vm-imap-check-mail 'vm-pop-check-mail 'vm-spool-check-mail))
+ '(access-file byte-compiler-base-file-name delete-directory
+ delete-file diff-latest-backup-file directory-file-name
+ directory-files directory-files-and-attributes
+ dired-compress-file dired-uncache
+ file-accessible-directory-p file-attributes
+ file-directory-p file-executable-p file-exists-p
+ file-local-copy file-modes
+ file-name-as-directory file-name-directory
+ file-name-nondirectory file-name-sans-versions
+ file-ownership-preserved-p file-readable-p
+ file-regular-p file-remote-p file-symlink-p file-truename
+ file-writable-p find-backup-file-name find-file-noselect
+ get-file-buffer insert-directory insert-file-contents
+ load make-directory make-directory-internal
+ set-file-modes set-file-times substitute-in-file-name
+ unhandled-file-name-directory vc-registered
+ ;; Emacs 24+ only.
+ file-acl file-notify-add-watch file-selinux-context
+ set-file-acl set-file-selinux-context))
(if (file-name-absolute-p (nth 0 args))
(nth 0 args)
(expand-file-name (nth 0 args))))
;; FILE DIRECTORY resp FILE1 FILE2.
((member operation
- (list 'add-name-to-file 'copy-file 'expand-file-name
- 'file-name-all-completions 'file-name-completion
- 'file-newer-than-file-p 'make-symbolic-link 'rename-file
- ;; Emacs 23+ only.
- 'copy-directory
- ;; Emacs 24+ only.
- 'file-equal-p 'file-in-directory-p
- ;; XEmacs only.
- 'dired-make-relative-symlink
- 'vm-imap-move-mail 'vm-pop-move-mail 'vm-spool-move-mail))
+ '(add-name-to-file copy-directory copy-file expand-file-name
+ file-name-all-completions file-name-completion
+ file-newer-than-file-p make-symbolic-link rename-file
+ ;; Emacs 24+ only.
+ file-equal-p file-in-directory-p))
(save-match-data
(cond
((tramp-tramp-file-p (nth 0 args)) (nth 0 args))
(nth 2 args))
;; BUFFER.
((member operation
- (list 'set-visited-file-modtime 'verify-visited-file-modtime
- ;; Emacs 22+ only.
- 'make-auto-save-file-name
- ;; XEmacs only.
- 'backup-buffer))
+ '(make-auto-save-file-name
+ set-visited-file-modtime verify-visited-file-modtime))
(buffer-file-name
(if (bufferp (nth 0 args)) (nth 0 args) (current-buffer))))
;; COMMAND.
((member operation
- (list ;; not in Emacs 23+.
- 'dired-call-process
- ;; Emacs only.
- 'shell-command
- ;; Emacs 22+ only.
- 'process-file
- ;; Emacs 23+ only.
- 'start-file-process
- ;; XEmacs only.
- 'dired-print-file 'dired-shell-call-process))
+ '(process-file shell-command start-file-process))
default-directory)
;; PROC.
- ((member operation (list 'file-notify-rm-watch 'file-notify-valid-p))
+ ((member operation
+ '(;; Emacs 24+ only.
+ file-notify-rm-watch
+ ;; Emacs 25+ only.
+ file-notify-valid-p))
(when (processp (nth 0 args))
(with-current-buffer (process-buffer (nth 0 args))
default-directory)))
(tramp-replace-environment-variables
(apply 'tramp-file-name-for-operation operation args)))
(completion (tramp-completion-mode-p))
- (foreign (tramp-find-foreign-file-name-handler filename)))
+ (foreign (tramp-find-foreign-file-name-handler filename))
+ result)
(with-parsed-tramp-file-name filename nil
;; Call the backend function.
(if foreign
(tramp-condition-case-unless-debug err
- (let ((sf (symbol-function foreign))
- result)
+ (let ((sf (symbol-function foreign)))
;; Some packages set the default directory to a
;; remote path, before respective Tramp packages
;; are already loaded. This results in
;; Propagate the error.
(t (signal (car err) (cdr err))))))
- ;; Nothing to do for us.
- (tramp-run-real-handler operation args)))))
+ ;; Nothing to do for us. However, since we are in
+ ;; `tramp-mode', we must suppress the volume letter on
+ ;; MS Windows.
+ (setq result (tramp-run-real-handler operation args))
+ (if (stringp result)
+ (tramp-drop-volume-letter result)
+ result)))))
;; When `tramp-mode' is not enabled, we don't do anything.
(tramp-run-real-handler operation args)))
(progn (defun tramp-completion-file-name-handler (operation &rest args)
"Invoke Tramp file name completion handler.
Falls back to normal file name handler if no Tramp file name handler exists."
- ;; We bind `directory-sep-char' here for XEmacs on Windows, which
- ;; would otherwise use backslash.
- (let ((directory-sep-char ?/)
- (fn (assoc operation tramp-completion-file-name-handler-alist)))
+ (let ((fn (assoc operation tramp-completion-file-name-handler-alist)))
(if (and
;; When `tramp-mode' is not enabled, we don't do anything.
fn tramp-mode
;; indicated his interest in using a fancier completion system.
(or (eq tramp-syntax 'sep)
(featurep 'tramp) ;; If it's loaded, we may as well use it.
- ;; `partial-completion-mode' does not exist in XEmacs.
- ;; It is obsoleted with Emacs 24.1.
+ ;; `partial-completion-mode' is obsoleted with Emacs 24.1.
(and (boundp 'partial-completion-mode)
(symbol-value 'partial-completion-mode))
;; FIXME: These may have been loaded even if the user never
;;;###autoload
(progn (defun tramp-autoload-file-name-handler (operation &rest args)
"Load Tramp file name handler, and perform OPERATION."
- ;; Avoid recursive loading of tramp.el. `temporary-file-directory'
- ;; does not exist in XEmacs, so we must use something else.
- (let ((default-directory "/"))
+ ;; Avoid recursive loading of tramp.el.
+ (let ((default-directory temporary-file-directory))
(load "tramp" nil t))
(apply operation args)))
;; variable. On the other hand, those files shouldn't have partial
;; Tramp file name syntax. Maybe another variable should be introduced
;; overwriting this check in such cases. Or we change Tramp file name
-;; syntax in order to avoid ambiguities, like in XEmacs ...
+;; syntax in order to avoid ambiguities.
;;;###tramp-autoload
(defun tramp-completion-mode-p ()
"Check, whether method / user name / host name completion is active."
;; Signal from outside. `non-essential' has been introduced in Emacs 24.
(and (boundp 'non-essential) (symbol-value 'non-essential))
tramp-completion-mode
- ;; Emacs.
(equal last-input-event 'tab)
(and (natnump last-input-event)
(or
(equal last-input-event ?\t)
(and (not (event-modifiers last-input-event))
(or (equal last-input-event ?\?)
- (equal last-input-event ?\ )))))
- ;; XEmacs.
- (and (featurep 'xemacs)
- ;; `last-input-event' might be nil.
- (not (null last-input-event))
- ;; `last-input-event' may have no character approximation.
- (tramp-compat-funcall 'event-to-character last-input-event)
- (or
- ;; ?\t has event-modifier 'control.
- (equal
- (tramp-compat-funcall 'event-to-character last-input-event) ?\t)
- (and (not (event-modifiers last-input-event))
- (or (equal
- (tramp-compat-funcall 'event-to-character last-input-event)
- ?\?)
- (equal
- (tramp-compat-funcall 'event-to-character last-input-event)
- ?\ )))))))
+ (equal last-input-event ?\ )))))))
(defun tramp-connectable-p (filename)
"Check, whether it is possible to connect the remote host w/o side-effects.
(tramp-parse-group
(concat "^\\(" tramp-ipv6-regexp "\\|" tramp-host-regexp "\\)") 1 " \t"))
-;; For su-alike methods it would be desirable to return "root@localhost"
-;; as default. Unfortunately, we have no information whether any user name
-;; has been typed already. So we use `tramp-current-user' as indication,
-;; assuming it is set in `tramp-completion-handle-file-name-all-completions'.
;;;###tramp-autoload
(defun tramp-parse-passwd (filename)
"Return a list of (user host) tuples allowed to access.
Host is always \"localhost\"."
- (if (zerop (length tramp-current-user))
- '(("root" nil))
- (tramp-parse-file filename 'tramp-parse-passwd-group)))
+ (with-tramp-connection-property nil "parse-passwd"
+ (if (executable-find "getent")
+ (with-temp-buffer
+ (when (zerop (tramp-call-process nil "getent" nil t nil "passwd"))
+ (goto-char (point-min))
+ (loop while (not (eobp)) collect
+ (tramp-parse-etc-group-group))))
+ (tramp-parse-file filename 'tramp-parse-passwd-group))))
(defun tramp-parse-passwd-group ()
"Return a (user host) tuple allowed to access.
(forward-line 1)
result))
+;;;###tramp-autoload
+(defun tramp-parse-etc-group (filename)
+ "Return a list of (group host) tuples allowed to access.
+Host is always \"localhost\"."
+ (with-tramp-connection-property nil "parse-group"
+ (if (executable-find "getent")
+ (with-temp-buffer
+ (when (zerop (tramp-call-process nil "getent" nil t nil "group"))
+ (goto-char (point-min))
+ (loop while (not (eobp)) collect
+ (tramp-parse-etc-group-group))))
+ (tramp-parse-file filename 'tramp-parse-etc-group-group))))
+
+(defun tramp-parse-etc-group-group ()
+ "Return a (group host) tuple allowed to access.
+Host is always \"localhost\"."
+ (let ((result)
+ (split (split-string (buffer-substring (point) (point-at-eol)) ":")))
+ (when (member (user-login-name) (split-string (nth 3 split) "," 'omit))
+ (setq result (list (nth 0 split) "localhost")))
+ (forward-line 1)
+ result))
+
;;;###tramp-autoload
(defun tramp-parse-netrc (filename)
"Return a list of (user host) tuples allowed to access.
"Return a list of (user host) tuples allowed to access.
User is always nil."
(if (memq system-type '(windows-nt))
- (with-temp-buffer
- (when (zerop (tramp-call-process
- nil "reg" nil t nil "query" registry-or-dirname))
- (goto-char (point-min))
- (loop while (not (eobp)) collect
- (tramp-parse-putty-group registry-or-dirname))))
+ (with-tramp-connection-property nil "parse-putty"
+ (with-temp-buffer
+ (when (zerop (tramp-call-process
+ nil "reg" nil t nil "query" registry-or-dirname))
+ (goto-char (point-min))
+ (loop while (not (eobp)) collect
+ (tramp-parse-putty-group registry-or-dirname)))))
;; UNIX case.
(tramp-parse-shostkeys-sknownhosts
registry-or-dirname (concat "^\\(" tramp-host-regexp "\\)$"))))
(substring directory 0 -1)
directory)))
-(defun tramp-handle-directory-files
- (directory &optional full match nosort files-only)
+(defun tramp-handle-directory-files (directory &optional full match nosort)
"Like `directory-files' for Tramp files."
- ;; FILES-ONLY is valid for XEmacs only.
(when (file-directory-p directory)
(setq directory (file-name-as-directory (expand-file-name directory)))
(let ((temp (nreverse (file-name-all-completions "" directory)))
(while temp
(setq item (directory-file-name (pop temp)))
- (when (and (or (null match) (string-match match item))
- (or (null files-only)
- ;; Files only.
- (and (equal files-only t) (file-regular-p item))
- ;; Directories only.
- (file-directory-p item)))
+ (when (or (null match) (string-match match item))
(push (if full (concat directory item) item)
result)))
(if nosort result (sort result 'string<)))))
"Like `directory-files-and-attributes' for Tramp files."
(mapcar
(lambda (x)
- (cons x (tramp-compat-file-attributes
+ (cons x (file-attributes
(if full x (expand-file-name x directory)) id-format)))
(directory-files directory full match nosort)))
-(defun tramp-handle-dired-uncache (dir &optional dir-p)
+(defun tramp-handle-dired-uncache (dir)
"Like `dired-uncache' for Tramp files."
- ;; DIR-P is valid for XEmacs only.
(with-parsed-tramp-file-name
- (if (or dir-p (file-directory-p dir)) dir (file-name-directory dir)) nil
+ (if (file-directory-p dir) dir (file-name-directory dir)) nil
(tramp-flush-directory-property v localname)))
(defun tramp-handle-file-accessible-directory-p (filename)
(defun tramp-handle-find-backup-file-name (filename)
"Like `find-backup-file-name' for Tramp files."
(with-parsed-tramp-file-name filename nil
- ;; We set both variables. It doesn't matter whether it is
- ;; Emacs or XEmacs.
(let ((backup-directory-alist
- ;; Emacs case.
- (when (boundp 'backup-directory-alist)
- (if (symbol-value 'tramp-backup-directory-alist)
- (mapcar
- (lambda (x)
- (cons
- (car x)
- (if (and (stringp (cdr x))
- (file-name-absolute-p (cdr x))
- (not (tramp-file-name-p (cdr x))))
- (tramp-make-tramp-file-name method user host (cdr x))
- (cdr x))))
- (symbol-value 'tramp-backup-directory-alist))
- (symbol-value 'backup-directory-alist))))
-
- (bkup-backup-directory-info
- ;; XEmacs case.
- (when (boundp 'bkup-backup-directory-info)
- (if (symbol-value 'tramp-bkup-backup-directory-info)
- (mapcar
- (lambda (x)
- (nconc
- (list (car x))
- (list
- (if (and (stringp (car (cdr x)))
- (file-name-absolute-p (car (cdr x)))
- (not (tramp-file-name-p (car (cdr x)))))
- (tramp-make-tramp-file-name
- method user host (car (cdr x)))
- (car (cdr x))))
- (cdr (cdr x))))
- (symbol-value 'tramp-bkup-backup-directory-info))
- (symbol-value 'bkup-backup-directory-info)))))
-
+ (if tramp-backup-directory-alist
+ (mapcar
+ (lambda (x)
+ (cons
+ (car x)
+ (if (and (stringp (cdr x))
+ (file-name-absolute-p (cdr x))
+ (not (tramp-file-name-p (cdr x))))
+ (tramp-make-tramp-file-name method user host (cdr x))
+ (cdr x))))
+ tramp-backup-directory-alist)
+ backup-directory-alist)))
(tramp-run-real-handler 'find-backup-file-name (list filename)))))
(defun tramp-handle-insert-directory
;; When the file is not readable for the owner, it
;; cannot be inserted, even if it is readable for the
;; group or for everybody.
- (set-file-modes
- local-copy (tramp-compat-octal-to-decimal "0600"))
+ (set-file-modes local-copy (string-to-number "0600" 8))
(when (and (null remote-copy)
(tramp-get-method-parameter
(setq tramp-temp-buffer-file-name local-copy))
;; We must ensure that `file-coding-system-alist'
- ;; matches `local-copy'. We must also use `visit',
- ;; otherwise there might be an error in the
- ;; `revert-buffer' function under XEmacs.
+ ;; matches `local-copy'.
(let ((file-coding-system-alist
(tramp-find-file-name-coding-system-alist
filename local-copy)))
(with-tramp-progress-reporter v 0 (format "Loading %s" file)
(let ((local-copy (file-local-copy file)))
(unwind-protect
- (tramp-compat-load local-copy noerror t nosuffix must-suffix)
+ (load local-copy noerror t nosuffix must-suffix)
(delete-file local-copy)))))
t)))
(current-buffer))))
;; There's some output, display it.
(when (with-current-buffer output-buffer (> (point-max) (point-min)))
- (if (functionp 'display-message-or-buffer)
- (tramp-compat-funcall 'display-message-or-buffer output-buffer)
- (pop-to-buffer output-buffer))))))))
+ (display-message-or-buffer output-buffer)))))))
(defun tramp-handle-substitute-in-file-name (filename)
"Like `substitute-in-file-name' for Tramp files.
(let (process-environment)
(tramp-run-real-handler 'substitute-in-file-name (list filename)))))
-(defun tramp-handle-unhandled-file-name-directory (_filename)
- "Like `unhandled-file-name-directory' for Tramp files."
- ;; Starting with Emacs 23, we must simply return nil. But we must
- ;; keep backward compatibility, also with XEmacs. "~/" cannot be
- ;; returned, because there might be machines without a HOME
- ;; directory (like hydra).
- (and (< emacs-major-version 23) "/"))
-
(defun tramp-handle-set-visited-file-modtime (&optional time-list)
"Like `set-visited-file-modtime' for Tramp files."
(unless (buffer-file-name)
;; connection.
(if (or (not f)
(eq (visited-file-modtime) 0)
- (not (tramp-file-name-handler 'file-remote-p f nil 'connected)))
+ (not (file-remote-p f nil 'connected)))
t
(with-parsed-tramp-file-name f nil
(let* ((remote-file-name-inhibit-cache t)
(with-current-buffer (process-buffer proc)
(file-exists-p
(concat (file-remote-p default-directory)
- (tramp-compat-process-get proc 'watch-name))))))
+ (process-get proc 'watch-name))))))
;;; Functions for establishing connection:
;; Under Windows XP, accept-process-output doesn't return
;; sometimes. So we add an additional timeout.
(with-timeout ((or timeout 1))
- (if (featurep 'xemacs)
- (accept-process-output p timeout timeout-msecs)
- (accept-process-output p timeout timeout-msecs (and proc t))))
+ (accept-process-output p timeout timeout-msecs (and proc t)))
(tramp-message proc 10 "%s %s %s\n%s"
proc (process-status proc) p (buffer-string)))))
(when (or (not (tramp-get-connection-property proc "check-remote-echo" nil))
;; Sometimes, the echo string is suppressed on the remote side.
(not (string-equal
- (tramp-compat-funcall
- 'substring-no-properties tramp-echo-mark-marker
+ (substring-no-properties
+ tramp-echo-mark-marker
0 (min tramp-echo-mark-marker-length (1- (point-max))))
- (tramp-compat-funcall
- 'buffer-substring-no-properties
+ (buffer-substring-no-properties
(point-min)
(min (+ (point-min) tramp-echo-mark-marker-length)
(point-max))))))
the string that matched, or nil. Waits indefinitely if TIMEOUT is
nil."
(with-current-buffer (process-buffer proc)
- (let ((found (tramp-check-for-regexp proc regexp))
- (start-time (current-time)))
+ (let ((found (tramp-check-for-regexp proc regexp)))
(cond (timeout
- ;; Work around a bug in XEmacs 21, where the timeout
- ;; expires faster than it should. This degenerates
- ;; to polling for buggy XEmacsen, but oh, well.
- (while (and (not found)
- (< (tramp-time-diff (current-time) start-time)
- timeout))
- (with-timeout (timeout)
- (while (not found)
- (tramp-accept-process-output proc 1)
- (unless (memq (process-status proc) '(run open))
- (tramp-error-with-buffer
- nil proc 'file-error "Process has died"))
- (setq found (tramp-check-for-regexp proc regexp))))))
+ (with-timeout (timeout)
+ (while (not found)
+ (tramp-accept-process-output proc 1)
+ (unless (memq (process-status proc) '(run open))
+ (tramp-error-with-buffer
+ nil proc 'file-error "Process has died"))
+ (setq found (tramp-check-for-regexp proc regexp)))))
(t
(while (not found)
(tramp-accept-process-output proc 1)
(let (buffer-read-only) (delete-region (point-min) (point-max)))
;; Replace "\n" by `tramp-rsh-end-of-line'.
(setq string
- (mapconcat 'identity
- (tramp-compat-split-string string "\n")
- tramp-rsh-end-of-line))
+ (mapconcat
+ 'identity (split-string string "\n") tramp-rsh-end-of-line))
(unless (or (string= string "")
(string-equal (substring string -1) tramp-rsh-end-of-line))
(setq string (concat string tramp-rsh-end-of-line)))
(save-match-data
(logior
(cond
- ((char-equal owner-read ?r) (tramp-compat-octal-to-decimal "00400"))
+ ((char-equal owner-read ?r) (string-to-number "00400" 8))
((char-equal owner-read ?-) 0)
(t (error "Second char `%c' must be one of `r-'" owner-read)))
(cond
- ((char-equal owner-write ?w) (tramp-compat-octal-to-decimal "00200"))
+ ((char-equal owner-write ?w) (string-to-number "00200" 8))
((char-equal owner-write ?-) 0)
(t (error "Third char `%c' must be one of `w-'" owner-write)))
(cond
- ((char-equal owner-execute-or-setid ?x)
- (tramp-compat-octal-to-decimal "00100"))
- ((char-equal owner-execute-or-setid ?S)
- (tramp-compat-octal-to-decimal "04000"))
- ((char-equal owner-execute-or-setid ?s)
- (tramp-compat-octal-to-decimal "04100"))
+ ((char-equal owner-execute-or-setid ?x) (string-to-number "00100" 8))
+ ((char-equal owner-execute-or-setid ?S) (string-to-number "04000" 8))
+ ((char-equal owner-execute-or-setid ?s) (string-to-number "04100" 8))
((char-equal owner-execute-or-setid ?-) 0)
(t (error "Fourth char `%c' must be one of `xsS-'"
owner-execute-or-setid)))
(cond
- ((char-equal group-read ?r) (tramp-compat-octal-to-decimal "00040"))
+ ((char-equal group-read ?r) (string-to-number "00040" 8))
((char-equal group-read ?-) 0)
(t (error "Fifth char `%c' must be one of `r-'" group-read)))
(cond
- ((char-equal group-write ?w) (tramp-compat-octal-to-decimal "00020"))
+ ((char-equal group-write ?w) (string-to-number "00020" 8))
((char-equal group-write ?-) 0)
(t (error "Sixth char `%c' must be one of `w-'" group-write)))
(cond
- ((char-equal group-execute-or-setid ?x)
- (tramp-compat-octal-to-decimal "00010"))
- ((char-equal group-execute-or-setid ?S)
- (tramp-compat-octal-to-decimal "02000"))
- ((char-equal group-execute-or-setid ?s)
- (tramp-compat-octal-to-decimal "02010"))
+ ((char-equal group-execute-or-setid ?x) (string-to-number "00010" 8))
+ ((char-equal group-execute-or-setid ?S) (string-to-number "02000" 8))
+ ((char-equal group-execute-or-setid ?s) (string-to-number "02010" 8))
((char-equal group-execute-or-setid ?-) 0)
(t (error "Seventh char `%c' must be one of `xsS-'"
group-execute-or-setid)))
(cond
- ((char-equal other-read ?r)
- (tramp-compat-octal-to-decimal "00004"))
+ ((char-equal other-read ?r) (string-to-number "00004" 8))
((char-equal other-read ?-) 0)
(t (error "Eighth char `%c' must be one of `r-'" other-read)))
(cond
- ((char-equal other-write ?w) (tramp-compat-octal-to-decimal "00002"))
- ((char-equal other-write ?-) 0)
- (t (error "Ninth char `%c' must be one of `w-'" other-write)))
+ ((char-equal other-write ?w) (string-to-number "00002" 8))
+ ((char-equal other-write ?-) 0)
+ (t (error "Ninth char `%c' must be one of `w-'" other-write)))
(cond
- ((char-equal other-execute-or-sticky ?x)
- (tramp-compat-octal-to-decimal "00001"))
- ((char-equal other-execute-or-sticky ?T)
- (tramp-compat-octal-to-decimal "01000"))
- ((char-equal other-execute-or-sticky ?t)
- (tramp-compat-octal-to-decimal "01001"))
+ ((char-equal other-execute-or-sticky ?x) (string-to-number "00001" 8))
+ ((char-equal other-execute-or-sticky ?T) (string-to-number "01000" 8))
+ ((char-equal other-execute-or-sticky ?t) (string-to-number "01001" 8))
((char-equal other-execute-or-sticky ?-) 0)
(t (error "Tenth char `%c' must be one of `xtT-'"
other-execute-or-sticky)))))))
;;;###tramp-autoload
(defun tramp-get-local-gid (id-format)
+ ;; `group-gid' has been introduced with Emacs 24.4.
(if (and (fboundp 'group-gid) (equal id-format 'integer))
(tramp-compat-funcall 'group-gid)
- (nth 3 (tramp-compat-file-attributes "~/" id-format))))
+ (nth 3 (file-attributes "~/" id-format))))
;;;###tramp-autoload
(defun tramp-check-cached-permissions (vec access)
(tramp-get-file-property
vec (tramp-file-name-localname vec)
(concat "file-attributes-" suffix) nil)
- (tramp-compat-file-attributes
+ (file-attributes
(tramp-make-tramp-file-name
(tramp-file-name-method vec)
(tramp-file-name-user vec)
(or (tramp-get-method-parameter vec 'tramp-tmpdir) "/tmp"))))
(with-tramp-connection-property vec "tmpdir"
(or (and (file-directory-p dir) (file-writable-p dir)
- (tramp-file-name-handler 'file-remote-p dir 'localname))
+ (file-remote-p dir 'localname))
(tramp-error vec 'file-error "Directory %s not accessible" dir)))
dir))
(setq result nil)
;; This creates the file by side effect.
(set-file-times result)
- (set-file-modes result (tramp-compat-octal-to-decimal "0700"))))
+ (set-file-modes result (string-to-number "0700" 8))))
;; Return the local part.
(with-parsed-tramp-file-name result nil localname)))
(remove-hook 'kill-buffer-hook
'tramp-delete-temp-file-function)))
-;;; Auto saving to a special directory:
-(defvar auto-save-file-name-transforms)
-
(defun tramp-handle-make-auto-save-file-name ()
"Like `make-auto-save-file-name' for Tramp files.
Returns a file name in `tramp-auto-save-directory' for autosaving
(let ((system-type 'not-windows)
(auto-save-file-name-transforms
- (if (and (null tramp-auto-save-directory)
- (boundp 'auto-save-file-name-transforms))
- (symbol-value 'auto-save-file-name-transforms)))
+ (if (null tramp-auto-save-directory)
+ auto-save-file-name-transforms))
(buffer-file-name
(if (null tramp-auto-save-directory)
buffer-file-name
("]" . "_r"))
(buffer-file-name))
tramp-auto-save-directory))))
- ;; Run plain `make-auto-save-file-name'. There might be an advice when
- ;; it is not a magic file name operation (since Emacs 22).
- ;; We must deactivate it temporarily.
- (if (not (ad-is-active 'make-auto-save-file-name))
- (tramp-run-real-handler 'make-auto-save-file-name nil)
- ;; else
- (ad-deactivate 'make-auto-save-file-name)
- (prog1
- (tramp-run-real-handler 'make-auto-save-file-name nil)
- (ad-activate 'make-auto-save-file-name)))))
-
-(unless (tramp-exists-file-name-handler 'make-auto-save-file-name)
- (defadvice make-auto-save-file-name
- (around tramp-advice-make-auto-save-file-name () activate)
- "Invoke `tramp-*-handle-make-auto-save-file-name' for Tramp files."
- (if (tramp-tramp-file-p (buffer-file-name))
- ;; We cannot call `tramp-handle-make-auto-save-file-name'
- ;; directly, because this would bypass the locking mechanism.
- (setq ad-return-value
- (tramp-file-name-handler 'make-auto-save-file-name))
- ad-do-it))
- (add-hook
- 'tramp-unload-hook
- (lambda ()
- (ad-remove-advice
- 'make-auto-save-file-name
- 'around 'tramp-advice-make-auto-save-file-name)
- (ad-activate 'make-auto-save-file-name))))
-
-;; In XEmacs < 21.5, autosaved remote files have permission 0666 minus
-;; umask. This is a security threat.
-
-(defun tramp-set-auto-save-file-modes ()
- "Set permissions of autosaved remote files to the original permissions."
- (let ((bfn (buffer-file-name)))
- (when (and (tramp-tramp-file-p bfn)
- (buffer-modified-p)
- (stringp buffer-auto-save-file-name)
- (not (equal bfn buffer-auto-save-file-name)))
- (unless (file-exists-p buffer-auto-save-file-name)
- (write-region "" nil buffer-auto-save-file-name))
- ;; Permissions should be set always, because there might be an old
- ;; auto-saved file belonging to another original file. This could
- ;; be a security threat.
- (set-file-modes
- buffer-auto-save-file-name
- (or (file-modes bfn) (tramp-compat-octal-to-decimal "0600"))))))
-
-(unless (and (featurep 'xemacs)
- (= emacs-major-version 21)
- (> emacs-minor-version 4))
- (add-hook 'auto-save-hook 'tramp-set-auto-save-file-modes)
- (add-hook 'tramp-unload-hook
- (lambda ()
- (remove-hook 'auto-save-hook 'tramp-set-auto-save-file-modes))))
+ ;; Run plain `make-auto-save-file-name'.
+ (tramp-run-real-handler 'make-auto-save-file-name nil)))
(defun tramp-subst-strs-in-string (alist string)
"Replace all occurrences of the string FROM with TO in STRING.
(tramp-check-for-regexp proc tramp-password-prompt-regexp)
(format "%s for %s " (capitalize (match-string 1)) key))))
;; We suspend the timers while reading the password.
- (stimers (and (functionp 'with-timeout-suspend)
- (tramp-compat-funcall 'with-timeout-suspend)))
+ (stimers (with-timeout-suspend))
auth-info auth-passwd)
(unwind-protect
(with-parsed-tramp-file-name key nil
(prog1
(or
- ;; See if auth-sources contains something useful, if
- ;; it's bound. `auth-source-user-or-password' is an
- ;; obsoleted function, it has been replaced by
+ ;; See if auth-sources contains something useful.
+ ;; `auth-source-user-or-password' is an obsoleted
+ ;; function since Emacs 24.1, it has been replaced by
;; `auth-source-search'.
(ignore-errors
- (and (boundp 'auth-sources)
- (tramp-get-connection-property
+ (and (tramp-get-connection-property
v "first-password-request" nil)
;; Try with Tramp's current method.
(if (fboundp 'auth-source-search)
(setq auth-info
- (tramp-compat-funcall
- 'auth-source-search
+ (auth-source-search
:max 1
:user (or tramp-current-user t)
:host tramp-current-host
auth-passwd (if (functionp auth-passwd)
(funcall auth-passwd)
auth-passwd))
- (tramp-compat-funcall
- 'auth-source-user-or-password
+ (tramp-compat-funcall 'auth-source-user-or-password
"password" tramp-current-host tramp-current-method))))
;; Try the password cache.
- (when (functionp 'password-read)
- (let ((password
- (tramp-compat-funcall 'password-read pw-prompt key)))
- (tramp-compat-funcall 'password-cache-add key password)
- password))
+ (let ((password (password-read pw-prompt key)))
+ (password-cache-add key password)
+ password)
;; Else, get the password interactively.
(read-passwd pw-prompt))
(tramp-set-connection-property v "first-password-request" nil)))
;; Reenable the timers.
- (and (functionp 'with-timeout-unsuspend)
- (tramp-compat-funcall 'with-timeout-unsuspend stimers)))))
+ (with-timeout-unsuspend stimers))))
;;;###tramp-autoload
(defun tramp-clear-passwd (vec)
(tramp-dissect-file-name
(concat
tramp-prefix-format
- (tramp-compat-replace-regexp-in-string
+ (replace-regexp-in-string
(concat tramp-postfix-hop-regexp "$")
tramp-postfix-host-format hop))))))
- (tramp-compat-funcall
- 'password-cache-remove
+ (password-cache-remove
(tramp-make-tramp-file-name
(tramp-file-name-method vec)
(tramp-file-name-user vec)
(defun tramp-time-diff (t1 t2)
"Return the difference between the two times, in seconds.
T1 and T2 are time values (as returned by `current-time' for example)."
- (cond ((and (fboundp 'subtract-time)
- (fboundp 'float-time))
- (tramp-compat-funcall
- 'float-time (tramp-compat-funcall 'subtract-time t1 t2)))
- ((and (fboundp 'subtract-time)
- (fboundp 'time-to-seconds))
- (tramp-compat-funcall
- 'time-to-seconds (tramp-compat-funcall 'subtract-time t1 t2)))
- ((fboundp 'itimer-time-difference)
- (tramp-compat-funcall
- 'itimer-time-difference
- (if (< (length t1) 3) (append t1 '(0)) t1)
- (if (< (length t2) 3) (append t2 '(0)) t2)))
- (t
- (let ((time (time-subtract t1 t2)))
- (+ (* (car time) 65536.0)
- (cadr time)
- (/ (or (nth 2 time) 0) 1000000.0))))))
+ (float-time (subtract-time t1 t2)))
;; Currently (as of Emacs 20.5), the function `shell-quote-argument'
;; does not deal well with newline characters. Newline is replaced by
;; * In Emacs 21, `insert-directory' shows total number of bytes used
;; by the files in that directory. Add this here.
;; * Avoid screen blanking when hitting `g' in dired. (Eli Tziperman)
-;; * abbreviate-file-name
;; * Better error checking. At least whenever we see something
;; strange when doing zerop, we should kill the process and start
;; again. (Greg Stark)
;; Author: Kai Großjohann <kai.grossjohann@gmx.net>
;; Keywords: comm, processes
;; Package: tramp
-;; Version: 2.2.13.25.1
+;; Version: 2.3.0-pre
;; This file is part of GNU Emacs.
;; In the Tramp GIT repository, the version number and the bug report
;; address are auto-frobbed from configure.ac, so you should edit that
-;; file and run "autoconf && ./configure" to change them. (X)Emacs
+;; file and run "autoconf && ./configure" to change them. Emacs
;; version check is defined in macro AC_EMACS_INFO of aclocal.m4;
;; should be changed only there.
;;;###tramp-autoload
-(defconst tramp-version "2.2.13.25.1"
+(defconst tramp-version "2.3.0-pre"
"This version of Tramp.")
;;;###tramp-autoload
(defconst tramp-bug-report-address "tramp-devel@gnu.org"
"Email address to send bug reports to.")
-;; `locate-dominating-file' does not exist in XEmacs. But it is not used here.
-(autoload 'locate-dominating-file "files")
-(autoload 'tramp-compat-replace-regexp-in-string "tramp-compat")
-
(defun tramp-repository-get-version ()
"Try to return as a string the repository revision of the Tramp sources."
- (unless (featurep 'xemacs)
- (let ((dir (locate-dominating-file (locate-library "tramp") ".git")))
- (when dir
- (with-temp-buffer
- (let ((default-directory (file-name-as-directory dir)))
- (and (zerop
- (ignore-errors
- (call-process "git" nil '(t nil) nil "rev-parse" "HEAD")))
- (not (zerop (buffer-size)))
- (tramp-compat-replace-regexp-in-string
- "\n" "" (buffer-string)))))))))
-
-;; Check for (X)Emacs version.
-(let ((x (if (or (>= emacs-major-version 22)
- (and (featurep 'xemacs)
- (= emacs-major-version 21)
- (>= emacs-minor-version 4)))
- "ok"
- (format "Tramp 2.2.13.25.1 is not fit for %s"
- (when (string-match "^.*$" (emacs-version))
- (match-string 0 (emacs-version)))))))
+ (let ((dir (locate-dominating-file (locate-library "tramp") ".git")))
+ (when dir
+ (with-temp-buffer
+ (let ((default-directory (file-name-as-directory dir)))
+ (and (zerop
+ (ignore-errors
+ (call-process "git" nil '(t nil) nil "rev-parse" "HEAD")))
+ (not (zerop (buffer-size)))
+ (replace-regexp-in-string "\n" "" (buffer-string))))))))
+
+;; Check for Emacs version.
+(let ((x (if (>= emacs-major-version 23)
+ "ok"
+ (format "Tramp 2.3.0-pre is not fit for %s"
+ (when (string-match "^.*$" (emacs-version))
+ (match-string 0 (emacs-version)))))))
(unless (string-match "\\`ok\\'" x) (error "%s" x)))
(add-hook 'tramp-unload-hook
(goto-char (point-max))))))
(set-marker end nil))
-(defun comment-make-bol-ws (len)
- "Make a white-space string of width LEN for use at BOL.
-When `indent-tabs-mode' is non-nil, tab characters will be used."
- (if (and indent-tabs-mode (> tab-width 0))
- (concat (make-string (/ len tab-width) ?\t)
- (make-string (% len tab-width) ? ))
- (make-string len ? )))
-
(defun comment-make-extra-lines (cs ce ccs cce min-indent max-indent &optional block)
"Make the leading and trailing extra lines.
This is used for `extra-line' style (or `box' style if BLOCK is specified)."
(setq cs (replace-match fill t t s)))
(string-match re e)
(setq ce (replace-match fill t t e))))
- (cons (concat cs "\n" (comment-make-bol-ws min-indent) ccs)
- (concat cce "\n" (comment-make-bol-ws (+ min-indent eindent)) ce))))
+ (cons (concat cs "\n" (make-string min-indent ? ) ccs)
+ (concat cce "\n" (make-string (+ min-indent eindent) ? ) ce))))
(defmacro comment-with-narrowing (beg end &rest body)
"Execute BODY with BEG..END narrowing.
-;;; nxml-enc.el --- XML encoding auto-detection
+;;; nxml-enc.el --- XML encoding auto-detection -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
(and nxml-non-xml-set-auto-coding-function
(funcall nxml-non-xml-set-auto-coding-function file-name size))))
-(defun nxml-set-xml-coding (file-name size)
+(defun nxml-set-xml-coding (_file-name size)
"Function to use as `set-auto-coding-function' when file is known to be XML."
(nxml-detect-coding-system (+ (point) (min size 1024))))
+++ /dev/null
-;;; nxml-glyph.el --- glyph-handling for nxml-mode
-
-;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
-
-;; Author: James Clark
-;; Keywords: wp, hypermedia, languages, XML
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software: you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; The entry point to this file is `nxml-glyph-display-string'.
-;; The current implementation is heuristic due to a lack of
-;; Emacs primitives necessary to implement it properly. The user
-;; can tweak the heuristics using `nxml-glyph-set-functions'.
-
-;;; Code:
-
-(defconst nxml-ascii-glyph-set
- [(#x0020 . #x007E)])
-
-(defconst nxml-latin1-glyph-set
- [(#x0020 . #x007E)
- (#x00A0 . #x00FF)])
-
-;; These were generated by using nxml-insert-target-repertoire-glyph-set
-;; on the TARGET[123] files in
-;; http://www.cl.cam.ac.uk/~mgk25/download/ucs-fonts.tar.gz
-
-(defconst nxml-misc-fixed-1-glyph-set
- [(#x0020 . #x007E)
- (#x00A0 . #x00FF)
- (#x0100 . #x017F)
- #x018F #x0192
- (#x0218 . #x021B)
- #x0259
- (#x02C6 . #x02C7)
- (#x02D8 . #x02DD)
- (#x0374 . #x0375)
- #x037A #x037E
- (#x0384 . #x038A)
- #x038C
- (#x038E . #x03A1)
- (#x03A3 . #x03CE)
- (#x0401 . #x040C)
- (#x040E . #x044F)
- (#x0451 . #x045C)
- (#x045E . #x045F)
- (#x0490 . #x0491)
- (#x05D0 . #x05EA)
- (#x1E02 . #x1E03)
- (#x1E0A . #x1E0B)
- (#x1E1E . #x1E1F)
- (#x1E40 . #x1E41)
- (#x1E56 . #x1E57)
- (#x1E60 . #x1E61)
- (#x1E6A . #x1E6B)
- (#x1E80 . #x1E85)
- (#x1EF2 . #x1EF3)
- (#x2010 . #x2022)
- #x2026 #x2030
- (#x2039 . #x203A)
- #x20AC #x2116 #x2122 #x2126
- (#x215B . #x215E)
- (#x2190 . #x2193)
- #x2260
- (#x2264 . #x2265)
- (#x23BA . #x23BD)
- (#x2409 . #x240D)
- #x2424 #x2500 #x2502 #x250C #x2510 #x2514 #x2518 #x251C #x2524 #x252C #x2534 #x253C #x2592 #x25C6 #x266A #xFFFD]
- "Glyph set for TARGET1 glyph repertoire of misc-fixed-* font.
-This repertoire is supported for the bold and oblique fonts.")
-
-(defconst nxml-misc-fixed-2-glyph-set
- [(#x0020 . #x007E)
- (#x00A0 . #x00FF)
- (#x0100 . #x017F)
- #x018F #x0192
- (#x01FA . #x01FF)
- (#x0218 . #x021B)
- #x0259
- (#x02C6 . #x02C7)
- #x02C9
- (#x02D8 . #x02DD)
- (#x0300 . #x0311)
- (#x0374 . #x0375)
- #x037A #x037E
- (#x0384 . #x038A)
- #x038C
- (#x038E . #x03A1)
- (#x03A3 . #x03CE)
- #x03D1
- (#x03D5 . #x03D6)
- #x03F1
- (#x0401 . #x040C)
- (#x040E . #x044F)
- (#x0451 . #x045C)
- (#x045E . #x045F)
- (#x0490 . #x0491)
- (#x05D0 . #x05EA)
- (#x1E02 . #x1E03)
- (#x1E0A . #x1E0B)
- (#x1E1E . #x1E1F)
- (#x1E40 . #x1E41)
- (#x1E56 . #x1E57)
- (#x1E60 . #x1E61)
- (#x1E6A . #x1E6B)
- (#x1E80 . #x1E85)
- (#x1EF2 . #x1EF3)
- (#x2010 . #x2022)
- #x2026 #x2030
- (#x2032 . #x2034)
- (#x2039 . #x203A)
- #x203C #x203E #x2044
- (#x2070 . #x2071)
- (#x2074 . #x208E)
- (#x20A3 . #x20A4)
- #x20A7 #x20AC
- (#x20D0 . #x20D7)
- #x2102 #x2105 #x2113
- (#x2115 . #x2116)
- #x211A #x211D #x2122 #x2124 #x2126 #x212E
- (#x215B . #x215E)
- (#x2190 . #x2195)
- (#x21A4 . #x21A8)
- (#x21D0 . #x21D5)
- (#x2200 . #x2209)
- (#x220B . #x220C)
- #x220F
- (#x2211 . #x2213)
- #x2215
- (#x2218 . #x221A)
- (#x221D . #x221F)
- #x2221
- (#x2224 . #x222B)
- #x222E #x223C #x2243 #x2245
- (#x2248 . #x2249)
- #x2259
- (#x225F . #x2262)
- (#x2264 . #x2265)
- (#x226A . #x226B)
- (#x2282 . #x228B)
- #x2295 #x2297
- (#x22A4 . #x22A7)
- (#x22C2 . #x22C3)
- #x22C5 #x2300 #x2302
- (#x2308 . #x230B)
- #x2310
- (#x2320 . #x2321)
- (#x2329 . #x232A)
- (#x23BA . #x23BD)
- (#x2409 . #x240D)
- #x2424 #x2500 #x2502 #x250C #x2510 #x2514 #x2518 #x251C #x2524 #x252C #x2534 #x253C
- (#x254C . #x2573)
- (#x2580 . #x25A1)
- (#x25AA . #x25AC)
- (#x25B2 . #x25B3)
- #x25BA #x25BC #x25C4 #x25C6
- (#x25CA . #x25CB)
- #x25CF
- (#x25D8 . #x25D9)
- #x25E6
- (#x263A . #x263C)
- #x2640 #x2642 #x2660 #x2663
- (#x2665 . #x2666)
- (#x266A . #x266B)
- (#xFB01 . #xFB02)
- #xFFFD]
- "Glyph set for TARGET2 glyph repertoire of the misc-fixed-* fonts.
-This repertoire is supported for the following fonts:
-5x7.bdf 5x8.bdf 6x9.bdf 6x10.bdf 6x12.bdf 7x13.bdf 7x14.bdf clR6x12.bdf")
-
-(defconst nxml-misc-fixed-3-glyph-set
- [(#x0020 . #x007E)
- (#x00A0 . #x00FF)
- (#x0100 . #x01FF)
- (#x0200 . #x0220)
- (#x0222 . #x0233)
- (#x0250 . #x02AD)
- (#x02B0 . #x02EE)
- (#x0300 . #x034F)
- (#x0360 . #x036F)
- (#x0374 . #x0375)
- #x037A #x037E
- (#x0384 . #x038A)
- #x038C
- (#x038E . #x03A1)
- (#x03A3 . #x03CE)
- (#x03D0 . #x03F6)
- (#x0400 . #x0486)
- (#x0488 . #x04CE)
- (#x04D0 . #x04F5)
- (#x04F8 . #x04F9)
- (#x0500 . #x050F)
- (#x0531 . #x0556)
- (#x0559 . #x055F)
- (#x0561 . #x0587)
- (#x0589 . #x058A)
- (#x05B0 . #x05B9)
- (#x05BB . #x05C4)
- (#x05D0 . #x05EA)
- (#x05F0 . #x05F4)
- (#x10D0 . #x10F8)
- #x10FB
- (#x1E00 . #x1E9B)
- (#x1EA0 . #x1EF9)
- (#x1F00 . #x1F15)
- (#x1F18 . #x1F1D)
- (#x1F20 . #x1F45)
- (#x1F48 . #x1F4D)
- (#x1F50 . #x1F57)
- #x1F59 #x1F5B #x1F5D
- (#x1F5F . #x1F7D)
- (#x1F80 . #x1FB4)
- (#x1FB6 . #x1FC4)
- (#x1FC6 . #x1FD3)
- (#x1FD6 . #x1FDB)
- (#x1FDD . #x1FEF)
- (#x1FF2 . #x1FF4)
- (#x1FF6 . #x1FFE)
- (#x2000 . #x200A)
- (#x2010 . #x2027)
- (#x202F . #x2052)
- #x2057
- (#x205F . #x2063)
- (#x2070 . #x2071)
- (#x2074 . #x208E)
- (#x20A0 . #x20B1)
- (#x20D0 . #x20EA)
- (#x2100 . #x213A)
- (#x213D . #x214B)
- (#x2153 . #x2183)
- (#x2190 . #x21FF)
- (#x2200 . #x22FF)
- (#x2300 . #x23CE)
- (#x2400 . #x2426)
- (#x2440 . #x244A)
- (#x2500 . #x25FF)
- (#x2600 . #x2613)
- (#x2616 . #x2617)
- (#x2619 . #x267D)
- (#x2680 . #x2689)
- (#x27E6 . #x27EB)
- (#x27F5 . #x27FF)
- (#x2A00 . #x2A06)
- #x2A1D #x2A3F #x303F
- (#xFB00 . #xFB06)
- (#xFB13 . #xFB17)
- (#xFB1D . #xFB36)
- (#xFB38 . #xFB3C)
- #xFB3E
- (#xFB40 . #xFB41)
- (#xFB43 . #xFB44)
- (#xFB46 . #xFB4F)
- (#xFE20 . #xFE23)
- (#xFF61 . #xFF9F)
- #xFFFD]
- "Glyph set for TARGET3 glyph repertoire of the misc-fixed-* fonts.
-This repertoire is supported for the following fonts:
-6x13.bdf 8x13.bdf 9x15.bdf 9x18.bdf 10x20.bdf")
-
-(defconst nxml-wgl4-glyph-set
- [(#x0020 . #x007E)
- (#x00A0 . #x017F)
- #x0192
- (#x01FA . #x01FF)
- (#x02C6 . #x02C7)
- #x02C9
- (#x02D8 . #x02DB)
- #x02DD
- (#x0384 . #x038A)
- #x038C
- (#x038E . #x03A1)
- (#x03A3 . #x03CE)
- (#x0401 . #x040C)
- (#x040E . #x044F)
- (#x0451 . #x045C)
- (#x045E . #x045F)
- (#x0490 . #x0491)
- (#x1E80 . #x1E85)
- (#x1EF2 . #x1EF3)
- (#x2013 . #x2015)
- (#x2017 . #x201E)
- (#x2020 . #x2022)
- #x2026 #x2030
- (#x2032 . #x2033)
- (#x2039 . #x203A)
- #x203C #x203E #x2044 #x207F
- (#x20A3 . #x20A4)
- #x20A7 #x20AC #x2105 #x2113 #x2116 #x2122 #x2126 #x212E
- (#x215B . #x215E)
- (#x2190 . #x2195)
- #x21A8 #x2202 #x2206 #x220F
- (#x2211 . #x2212)
- #x2215
- (#x2219 . #x221A)
- (#x221E . #x221F)
- #x2229 #x222B #x2248
- (#x2260 . #x2261)
- (#x2264 . #x2265)
- #x2302 #x2310
- (#x2320 . #x2321)
- #x2500 #x2502 #x250C #x2510 #x2514 #x2518 #x251C #x2524
- #x252C #x2534 #x253C
- (#x2550 . #x256C)
- #x2580 #x2584 #x2588 #x258C
- (#x2590 . #x2593)
- (#x25A0 . #x25A1)
- (#x25AA . #x25AC)
- #x25B2 #x25BA #x25BC #x25C4
- (#x25CA . #x25CB)
- #x25CF
- (#x25D8 . #x25D9)
- #x25E6
- (#x263A . #x263C)
- #x2640 #x2642 #x2660 #x2663
- (#x2665 . #x2666)
- (#x266A . #x266B)
- (#xFB01 . #xFB02)]
- "Glyph set corresponding to Windows Glyph List 4.")
-
-(defvar nxml-glyph-set-functions nil
- "Abnormal hook for determining the set of glyphs in a face.
-Each function in this hook is called in turn, unless one of them
-returns non-nil. Each function is called with a single argument
-FACE. If it can determine the set of glyphs representable by
-FACE, it must set the variable `nxml-glyph-set' and return
-non-nil. Otherwise, it must return nil.
-
-The constants `nxml-ascii-glyph-set', `nxml-latin1-glyph-set',
-`nxml-misc-fixed-1-glyph-set', `nxml-misc-fixed-2-glyph-set',
-`nxml-misc-fixed-3-glyph-set' and `nxml-wgl4-glyph-set' are
-predefined for use by `nxml-glyph-set-functions'.")
-
-(define-obsolete-variable-alias 'nxml-glyph-set-hook
- 'nxml-glyph-set-functions "24.3")
-
-(defvar nxml-glyph-set nil
- "Used by `nxml-glyph-set-functions' to return set of glyphs in a FACE.
-This should dynamically bound by any function that runs
-`nxml-glyph-set-functions'. The value must be either nil representing an
-empty set or a vector. Each member of the vector is either a single
-integer or a cons (FIRST . LAST) representing the range of integers
-from FIRST to LAST. An integer represents a glyph with that Unicode
-code-point. The vector must be ordered.")
-
-(defun nxml-x-set-glyph-set (face)
- (setq nxml-glyph-set
- (if (equal (face-attribute face :family) "misc-fixed")
- nxml-misc-fixed-3-glyph-set
- nxml-wgl4-glyph-set)))
-
-(defun nxml-w32-set-glyph-set (face)
- (setq nxml-glyph-set nxml-wgl4-glyph-set))
-
-(defun nxml-window-system-set-glyph-set (face)
- (setq nxml-glyph-set nxml-latin1-glyph-set))
-
-(defun nxml-terminal-set-glyph-set (face)
- (setq nxml-glyph-set nxml-ascii-glyph-set))
-
-(add-hook 'nxml-glyph-set-functions
- (or (cdr (assq window-system
- '((x . nxml-x-set-glyph-set)
- (w32 . nxml-w32-set-glyph-set)
- (nil . nxml-terminal-set-glyph-set))))
- 'nxml-window-system-set-glyph-set)
- t)
-
-;;;###autoload
-(defun nxml-glyph-display-string (n face)
- "Return a string that can display a glyph for Unicode code-point N.
-FACE gives the face that will be used for displaying the string.
-Return nil if the face cannot display a glyph for N."
- (let ((nxml-glyph-set nil))
- (run-hook-with-args-until-success 'nxml-glyph-set-functions face)
- (and nxml-glyph-set
- (nxml-glyph-set-contains-p n nxml-glyph-set)
- (let ((ch (decode-char 'ucs n)))
- (and ch (string ch))))))
-
-(defun nxml-glyph-set-contains-p (n v)
- (let ((start 0)
- (end (length v))
- found mid mid-val mid-start-val mid-end-val)
- (while (> end start)
- (setq mid (+ start
- (/ (- end start) 2)))
- (setq mid-val (aref v mid))
- (if (consp mid-val)
- (setq mid-start-val (car mid-val)
- mid-end-val (cdr mid-val))
- (setq mid-start-val mid-val
- mid-end-val mid-val))
- (cond ((and (<= mid-start-val n)
- (<= n mid-end-val))
- (setq found t)
- (setq start end))
- ((< n mid-start-val)
- (setq end mid))
- (t
- (setq start
- (if (eq start mid)
- end
- mid)))))
- found))
-
-(provide 'nxml-glyph)
-
-;;; nxml-glyph.el ends here
-;;; nxml-maint.el --- commands for maintainers of nxml-*.el
+;;; nxml-maint.el --- commands for maintainers of nxml-*.el -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
;;; Code:
-;;; Generating files with Unicode char names.
-
-(require 'nxml-uchnm)
-
-(defun nxml-create-unicode-char-name-sets (file)
- "Generate files containing char names from Unicode standard."
- (interactive "fUnicodeData file: ")
- (mapc (lambda (block)
- (let ((nameset (nxml-unicode-block-char-name-set (nth 0 block))))
- (save-excursion
- (find-file (concat (get nameset 'nxml-char-name-set-file)
- ".el"))
- (erase-buffer)
- (insert "(nxml-define-char-name-set '")
- (prin1 nameset (current-buffer))
- (insert "\n '())\n")
- (goto-char (- (point) 3)))))
- nxml-unicode-blocks)
- (save-excursion
- (find-file file)
- (goto-char (point-min))
- (let ((blocks nxml-unicode-blocks)
- code name)
- (while (re-search-forward "^\\([0-9A-F]+\\);\\([^<;][^;]*\\);"
- nil
- t)
- (setq code (string-to-number (match-string 1) 16))
- (setq name (match-string 2))
- (while (and blocks
- (> code (nth 2 (car blocks))))
- (setq blocks (cdr blocks)))
- (when (and (<= (nth 1 (car blocks)) code)
- (<= code (nth 2 (car blocks))))
- (save-excursion
- (find-file (concat (get (nxml-unicode-block-char-name-set
- (nth 0 (car blocks)))
- 'nxml-char-name-set-file)
- ".el"))
- (insert "(")
- (prin1 name (current-buffer))
- (insert (format " #x%04X)\n " code))))))))
-
;;; Parsing target repertoire files from ucs-fonts.
;; This is for converting the TARGET? files in
;; http://www.cl.cam.ac.uk/~mgk25/download/ucs-fonts.tar.gz
;;; Code:
-(when (featurep 'mucs)
- (error "nxml-mode is not compatible with Mule-UCS"))
-
(eval-when-compile (require 'cl-lib))
(require 'xmltok)
(require 'nxml-enc)
-(require 'nxml-glyph)
(require 'nxml-util)
(require 'nxml-rap)
(require 'nxml-outln)
;; So we might as well just require it and silence the compiler.
(provide 'nxml-mode) ; avoid recursive require
(require 'rng-nxml)
+(require 'sgml-mode)
;;; Customization
(defcustom nxml-char-ref-display-glyph-flag t
"Non-nil means display glyph following character reference.
-The glyph is displayed in face `nxml-glyph'. The abnormal hook
-`nxml-glyph-set-functions' can be used to change the characters
-for which glyphs are displayed."
+The glyph is displayed in face `nxml-glyph'."
:group 'nxml
:type 'boolean)
"Face used to highlight text."
:group 'nxml-faces)
-(defface nxml-comment-content
- '((t (:inherit font-lock-comment-face)))
- "Face used to highlight the content of comments."
- :group 'nxml-faces)
-
-(defface nxml-comment-delimiter
- '((t (:inherit font-lock-comment-delimiter-face)))
- "Face used for the delimiters of comments, i.e., <!-- and -->."
- :group 'nxml-faces)
-
(defface nxml-processing-instruction-delimiter
'((t (:inherit nxml-delimiter)))
"Face used for the delimiters of processing instructions, i.e., <? and ?>."
"Face used for the delimiters of attribute values."
:group 'nxml-faces)
-(defface nxml-namespace-attribute-value
- '((t (:inherit nxml-attribute-value)))
- "Face used for the value of namespace attributes."
- :group 'nxml-faces)
-
-(defface nxml-namespace-attribute-value-delimiter
- '((t (:inherit nxml-attribute-value-delimiter)))
- "Face used for the delimiters of namespace attribute values."
- :group 'nxml-faces)
(defface nxml-prolog-literal-delimiter
'((t (:inherit nxml-delimited-data)))
;;; Global variables
-(defvar nxml-parent-document nil
+(defvar-local nxml-parent-document nil
"The parent document for a part of a modular document.
Use `nxml-parent-document-set' to set it.")
-(make-variable-buffer-local 'nxml-parent-document)
(put 'nxml-parent-document 'safe-local-variable 'stringp)
-(defvar nxml-prolog-regions nil
+(defvar-local nxml-prolog-regions nil
"List of regions in the prolog to be fontified.
See the function `xmltok-forward-prolog' for more information.")
-(make-variable-buffer-local 'nxml-prolog-regions)
-(defvar nxml-degraded nil
+(defvar-local nxml-degraded nil
"Non-nil if currently operating in degraded mode.
Degraded mode is enabled when an internal error is encountered in the
fontification or after-change functions.")
-(make-variable-buffer-local 'nxml-degraded)
(defvar nxml-completion-hook nil
"Hook run by `nxml-complete'.
(defvar nxml-end-tag-indent-scan-distance 4000
"Maximum distance from point to scan backwards when indenting end-tag.")
-(defvar nxml-char-ref-extra-display t
+(defvar-local nxml-char-ref-extra-display t
"Non-nil means display extra information for character references.
The extra information consists of a tooltip with the character name
and, if `nxml-char-ref-display-glyph-flag' is non-nil, a glyph
corresponding to the referenced character following the character
reference.")
-(make-variable-buffer-local 'nxml-char-ref-extra-display)
(defvar nxml-mode-map
(let ((map (make-sparse-keymap)))
(defsubst nxml-set-face (start end face)
(when (and face (< start end))
- (font-lock-append-text-property start end 'face face)))
+ ;; Prepend, so the character reference highlighting takes precedence over
+ ;; the string highlighting applied syntactically.
+ (font-lock-prepend-text-property start end 'face face)))
(defun nxml-parent-document-set (parent-document)
"Set `nxml-parent-document' and inherit the DTD &c."
;; FIXME: Use the fact that we're parsing the document already
;; rather than using regex-based filtering.
(setq-local tildify-foreach-region-function
- (apply-partially 'tildify-foreach-ignore-environments
+ (apply-partially #'tildify-foreach-ignore-environments
'(("<! *--" . "-- *>") ("<" . ">"))))
- (set (make-local-variable 'mode-line-process) '((nxml-degraded "/degraded")))
+ (setq-local mode-line-process '((nxml-degraded "/degraded")))
;; We'll determine the fill prefix ourselves
- (make-local-variable 'adaptive-fill-mode)
- (setq adaptive-fill-mode nil)
- (make-local-variable 'forward-sexp-function)
- (setq forward-sexp-function 'nxml-forward-balanced-item)
- (make-local-variable 'indent-line-function)
- (setq indent-line-function 'nxml-indent-line)
- (make-local-variable 'fill-paragraph-function)
- (setq fill-paragraph-function 'nxml-do-fill-paragraph)
+ (setq-local adaptive-fill-mode nil)
+ (setq-local forward-sexp-function #'nxml-forward-balanced-item)
+ (setq-local indent-line-function #'nxml-indent-line)
+ (setq-local fill-paragraph-function #'nxml-do-fill-paragraph)
;; Comment support
;; This doesn't seem to work too well;
;; I think we should probably roll our own nxml-comment-dwim function.
- (make-local-variable 'comment-indent-function)
- (setq comment-indent-function 'nxml-indent-line)
- (make-local-variable 'comment-start)
- (setq comment-start "<!--")
- (make-local-variable 'comment-start-skip)
- (setq comment-start-skip "<!--[ \t\r\n]*")
- (make-local-variable 'comment-end)
- (setq comment-end "-->")
- (make-local-variable 'comment-end-skip)
- (setq comment-end-skip "[ \t\r\n]*-->")
- (make-local-variable 'comment-line-break-function)
- (setq comment-line-break-function 'nxml-newline-and-indent)
- (setq-local comment-quote-nested-function 'nxml-comment-quote-nested)
- (use-local-map nxml-mode-map)
+ (setq-local comment-indent-function #'nxml-indent-line)
+ (setq-local comment-start "<!--")
+ (setq-local comment-start-skip "<!--[ \t\r\n]*")
+ (setq-local comment-end "-->")
+ (setq-local comment-end-skip "[ \t\r\n]*-->")
+ (setq-local comment-line-break-function #'nxml-newline-and-indent)
+ (setq-local comment-quote-nested-function #'nxml-comment-quote-nested)
(save-excursion
(save-restriction
(widen)
- (setq nxml-scan-end (copy-marker (point-min) nil))
(with-silent-modifications
- (nxml-clear-inside (point-min) (point-max))
(nxml-with-invisible-motion
(nxml-scan-prolog)))))
- (add-hook 'completion-at-point-functions
- #'nxml-completion-at-point-function nil t)
- (setq-local syntax-propertize-function #'nxml-after-change)
- (add-hook 'change-major-mode-hook 'nxml-cleanup nil t)
+ (setq-local syntax-ppss-table sgml-tag-syntax-table)
+ (setq-local syntax-propertize-function sgml-syntax-propertize-function)
+ (add-hook 'change-major-mode-hook #'nxml-cleanup nil t)
;; Emacs 23 handles the encoding attribute on the xml declaration
;; transparently to nxml-mode, so there is no longer a need for the below
;; hook. The hook also had the drawback of overriding explicit user
;; instruction to save as some encoding other than utf-8.
- ;;(add-hook 'write-contents-hooks 'nxml-prepare-to-save)
+ ;;(add-hook 'write-contents-hooks #'nxml-prepare-to-save)
(when (not (and (buffer-file-name) (file-exists-p (buffer-file-name))))
(when (and nxml-default-buffer-file-coding-system
(not (local-variable-p 'buffer-file-coding-system)))
(setq font-lock-defaults
'(nxml-font-lock-keywords
- t ; keywords-only; we highlight comments and strings here
+ nil ; highlight comments and strings based on syntax-tables
nil ; font-lock-keywords-case-fold-search. XML is case sensitive
nil ; no special syntax table
- nil ; no automatic syntactic fontification
(font-lock-extend-region-functions . (nxml-extend-region))
(jit-lock-contextually . t)
(font-lock-unfontify-region-function . nxml-unfontify-region)))
- (rng-nxml-mode-init)
- (nxml-enable-unicode-char-name-sets))
+ (with-demoted-errors (rng-nxml-mode-init)))
(defun nxml-cleanup ()
"Clean up after nxml-mode."
(with-silent-modifications
(nxml-with-invisible-motion
(remove-text-properties (point-min) (point-max) '(face)))))
- (remove-hook 'change-major-mode-hook 'nxml-cleanup t))
+ (remove-hook 'change-major-mode-hook #'nxml-cleanup t))
(defun nxml-degrade (context err)
(message "Internal nXML mode error in %s (%s), degrading"
(error-message-string err))
(ding)
(setq nxml-degraded t)
- (setq nxml-prolog-end 1)
- (save-excursion
- (save-restriction
- (widen)
- (with-silent-modifications
- (nxml-clear-inside (point-min) (point-max))))))
+ (setq nxml-prolog-end 1))
;;; Change management
(goto-char font-lock-beg)
(set-mark font-lock-end)))
-(defun nxml-after-change (start end)
- ;; Called via syntax-propertize-function.
- (unless nxml-degraded
- (nxml-with-degradation-on-error 'nxml-after-change
- (save-restriction
- (widen)
- (nxml-with-invisible-motion
- (nxml-after-change1 start end))))))
-
-(defun nxml-after-change1 (start end)
- "After-change bookkeeping.
-Returns a cons cell containing a possibly-enlarged change region.
-You must call `nxml-extend-region' on this expanded region to obtain
-the full extent of the area needing refontification.
-
-For bookkeeping, call this function even when fontification is
-disabled."
- ;; If the prolog might have changed, rescan the prolog.
- (when (<= start
- ;; Add 2 so as to include the < and following char that
- ;; start the instance (document element), since changing
- ;; these can change where the prolog ends.
- (+ nxml-prolog-end 2))
- (nxml-scan-prolog)
- (setq start (point-min)))
-
- (when (> end nxml-prolog-end)
- (goto-char start)
- (nxml-move-tag-backwards (point-min))
- (setq start (point))
- (setq end (max (nxml-scan-after-change start end)
- end)))
-
- (nxml-debug-change "nxml-after-change1" start end))
-
;;; Encodings
(defun nxml-insert-xml-declaration ()
[1 -1 nxml-entity-ref-name]
[-1 nil nxml-entity-ref-delimiter]))
-(put 'comment
- 'nxml-fontify-rule
- '([nil 4 nxml-comment-delimiter]
- [4 -3 nxml-comment-content]
- [-3 nil nxml-comment-delimiter]))
+;; (put 'comment
+;; 'nxml-fontify-rule
+;; '([nil 4 nxml-comment-delimiter]
+;; [4 -3 nxml-comment-content]
+;; [-3 nil nxml-comment-delimiter]))
(put 'processing-instruction
'nxml-fontify-rule
'nxml-fontify-rule
'([nil nil nxml-attribute-local-name]))
-(put 'xml-declaration-attribute-value
+(put 'xml-declaration-attribute-value ;FIXME: What is this for?
'nxml-fontify-rule
'([nil 1 nxml-attribute-value-delimiter]
[1 -1 nxml-attribute-value]
'nxml-attribute-prefix
'nxml-attribute-colon
'nxml-attribute-local-name))
- (let ((start (xmltok-attribute-value-start att))
- (end (xmltok-attribute-value-end att))
- (refs (xmltok-attribute-refs att))
- (delimiter-face (if namespace-declaration
- 'nxml-namespace-attribute-value-delimiter
- 'nxml-attribute-value-delimiter))
- (value-face (if namespace-declaration
- 'nxml-namespace-attribute-value
- 'nxml-attribute-value)))
- (when start
- (nxml-set-face (1- start) start delimiter-face)
- (nxml-set-face end (1+ end) delimiter-face)
- (while refs
- (let* ((ref (car refs))
- (ref-type (aref ref 0))
- (ref-start (aref ref 1))
- (ref-end (aref ref 2)))
- (nxml-set-face start ref-start value-face)
- (nxml-apply-fontify-rule ref-type ref-start ref-end)
- (setq start ref-end))
- (setq refs (cdr refs)))
- (nxml-set-face start end value-face))))
+ (dolist (ref (xmltok-attribute-refs att))
+ (let* ((ref-type (aref ref 0))
+ (ref-start (aref ref 1))
+ (ref-end (aref ref 2)))
+ (nxml-apply-fontify-rule ref-type ref-start ref-end))))
(defun nxml-fontify-qname (start
colon
(t (back-to-indentation)))
(current-column))
-;;; Completion
-
-(defun nxml-complete ()
- "Perform completion on the symbol preceding point.
-
-Inserts as many characters as can be completed. However, if not even
-one character can be completed, then a buffer with the possibilities
-is popped up and the symbol is read from the minibuffer with
-completion. If the symbol is complete, then any characters that must
-follow the symbol are also inserted.
-
-The name space used for completion and what is treated as a symbol
-depends on the context. The contexts in which completion is performed
-depend on `nxml-completion-hook'."
- (interactive)
- (unless (run-hook-with-args-until-success 'nxml-completion-hook)
- ;; Eventually we will complete on entity names here.
- (ding)
- (message "Cannot complete in this context")))
-
-(defun nxml-completion-at-point-function ()
- "Call `nxml-complete' to perform completion at point."
- (when nxml-bind-meta-tab-to-complete-flag
- #'nxml-complete))
+(define-obsolete-function-alias 'nxml-complete #'completion-at-point "26.1")
;;; Movement
(t end)))))
(nxml-scan-error
(goto-char (cadr err))
- (apply 'error (cddr err)))))
+ (apply #'error (cddr err)))))
(defun nxml-backward-single-balanced-item ()
(condition-case err
(t xmltok-start)))))
(nxml-scan-error
(goto-char (cadr err))
- (apply 'error (cddr err)))))
+ (apply #'error (cddr err)))))
(defun nxml-scan-forward-within (end)
(setq end (- end (nxml-end-delimiter-length xmltok-type)))
(setq arg (1- arg)))
(nxml-scan-error
(goto-char (cadr err))
- (apply 'error (cddr err))))))
+ (apply #'error (cddr err))))))
(defun nxml-backward-up-element (&optional arg)
(interactive "p")
(setq arg (1- arg)))
(nxml-scan-error
(goto-char (cadr err))
- (apply 'error (cddr err))))))
+ (apply #'error (cddr err))))))
(defun nxml-down-element (&optional arg)
"Move forward down into the content of an element.
(setq arg (1- arg)))
(nxml-scan-error
(goto-char (cadr err))
- (apply 'error (cddr err))))))
+ (apply #'error (cddr err))))))
(defun nxml-backward-element (&optional arg)
"Move backward over one element.
(setq arg (1- arg)))
(nxml-scan-error
(goto-char (cadr err))
- (apply 'error (cddr err))))))
+ (apply #'error (cddr err))))))
(defun nxml-mark-token-after ()
(interactive)
;;; Character names
-(defvar nxml-char-name-ignore-case t)
-
-(defvar nxml-char-name-alist nil
- "Alist of character names.
-Each member of the list has the form (NAME CODE . NAMESET),
-where NAME is a string naming a character, NAMESET is a symbol
-identifying a set of names and CODE is an integer specifying the
-Unicode scalar value of the named character.
-The NAME will only be used for completion if NAMESET has
-a non-nil `nxml-char-name-set-enabled' property.
-If NAMESET does does not have `nxml-char-name-set-defined' property,
-then it must have a `nxml-char-name-set-file' property and `load'
-will be applied to the value of this property if the nameset
-is enabled.")
-
-(defvar nxml-char-name-table (make-hash-table :test 'eq)
- "Hash table for mapping char codes to names.
-Each key is a Unicode scalar value.
-Each value is a list of pairs of the form (NAMESET . NAME),
-where NAMESET is a symbol identifying a set of names,
-and NAME is a string naming a character.")
-
-(defvar nxml-autoload-char-name-set-list nil
- "List of char namesets that can be autoloaded.")
-
-(defun nxml-enable-char-name-set (nameset)
- (put nameset 'nxml-char-name-set-enabled t))
-
-(defun nxml-disable-char-name-set (nameset)
- (put nameset 'nxml-char-name-set-enabled nil))
-
-(defun nxml-char-name-set-enabled-p (nameset)
- (get nameset 'nxml-char-name-set-enabled))
-
-(defun nxml-autoload-char-name-set (nameset file)
- (unless (memq nameset nxml-autoload-char-name-set-list)
- (setq nxml-autoload-char-name-set-list
- (cons nameset nxml-autoload-char-name-set-list)))
- (put nameset 'nxml-char-name-set-file file))
-
-(defun nxml-define-char-name-set (nameset alist)
- "Define a set of character names.
-NAMESET is a symbol identifying the set.
-ALIST is a list where each member has the form (NAME CODE),
-where NAME is a string naming a character and code is an
-integer giving the Unicode scalar value of the character."
- (when (get nameset 'nxml-char-name-set-defined)
- (error "Nameset `%s' already defined" nameset))
- (let ((iter alist))
- (while iter
- (let* ((name-code (car iter))
- (name (car name-code))
- (code (cadr name-code)))
- (puthash code
- (cons (cons nameset name)
- (gethash code nxml-char-name-table))
- nxml-char-name-table))
- (setcdr (cdr (car iter)) nameset)
- (setq iter (cdr iter))))
- (setq nxml-char-name-alist
- (nconc alist nxml-char-name-alist))
- (put nameset 'nxml-char-name-set-defined t))
-
-(defun nxml-get-char-name (code)
- (mapc 'nxml-maybe-load-char-name-set nxml-autoload-char-name-set-list)
- (let ((names (gethash code nxml-char-name-table))
- name)
- (while (and names (not name))
- (if (nxml-char-name-set-enabled-p (caar names))
- (setq name (cdar names))
- (setq names (cdr names))))
- name))
-
-(defvar nxml-named-char-history nil)
-
(defun nxml-insert-named-char (arg)
"Insert a character using its name.
The name is read from the minibuffer.
Normally, inserts the character as a numeric character reference.
With a prefix argument, inserts the character directly."
(interactive "*P")
- (mapc 'nxml-maybe-load-char-name-set nxml-autoload-char-name-set-list)
- (let ((name
- (let ((completion-ignore-case nxml-char-name-ignore-case))
- (completing-read "Character name: "
- nxml-char-name-alist
- (lambda (member)
- (get (cddr member) 'nxml-char-name-set-enabled))
- t
- nil
- 'nxml-named-char-history)))
- (alist nxml-char-name-alist)
- elt code)
- (while (and alist (not code))
- (setq elt (assoc name alist))
- (if (get (cddr elt) 'nxml-char-name-set-enabled)
- (setq code (cadr elt))
- (setq alist (cdr (member elt alist)))))
+ (let ((code (read-char-by-name "Character name: ")))
(when code
- (insert (if arg
- (or (decode-char 'ucs code)
- (error "Character %x is not supported by Emacs"
- code))
- (format "&#x%X;" code))))))
-
-(defun nxml-maybe-load-char-name-set (sym)
- (when (and (get sym 'nxml-char-name-set-enabled)
- (not (get sym 'nxml-char-name-set-defined))
- (stringp (get sym 'nxml-char-name-set-file)))
- (load (get sym 'nxml-char-name-set-file))))
+ (insert (if arg code (format "&#x%X;" code))))))
(defun nxml-toggle-char-ref-extra-display (arg)
"Toggle the display of extra information for character references."
(defun nxml-char-ref-display-extra (start end n)
(when nxml-char-ref-extra-display
- (let ((name (nxml-get-char-name n))
+ (let ((name (or (get-char-code-property n 'name)
+ (get-char-code-property n 'old-name)))
(glyph-string (and nxml-char-ref-display-glyph-flag
- (nxml-glyph-display-string n 'nxml-glyph)))
+ (char-displayable-p n)
+ (string n)))
ov)
(when (or name glyph-string)
(setq ov (make-overlay start end nil t))
-;;; nxml-outln.el --- outline support for nXML mode
+;;; nxml-outln.el --- outline support for nXML mode -*- lexical-binding:t -*-
;; Copyright (C) 2004, 2007-2016 Free Software Foundation, Inc.
(interactive)
(nxml-transform-subtree-outline '((hide-children . t))))
+;; These variables are dynamically bound. They are use to pass information to
+;; nxml-section-tag-transform-outline-state.
+
+(defvar nxml-outline-state-transform-exceptions nil)
+(defvar nxml-target-section-pos nil)
+(defvar nxml-depth-in-target-section nil)
+(defvar nxml-outline-state-transform-alist nil)
+
+(defvar nxml-outline-display-section-tag-function nil)
+
(defun nxml-hide-other ()
"Hide text content other than that directly in the section containing point.
Hide headings other than those of ancestors of that section and their
(nxml-transform-buffer-outline '((nil . hide-children)
(t . hide-children)))))
-;; These variables are dynamically bound. They are use to pass information to
-;; nxml-section-tag-transform-outline-state.
-
-(defvar nxml-outline-state-transform-exceptions nil)
-(defvar nxml-target-section-pos nil)
-(defvar nxml-depth-in-target-section nil)
-(defvar nxml-outline-state-transform-alist nil)
-
(defun nxml-transform-buffer-outline (alist)
(let ((nxml-target-section-pos nil)
(nxml-depth-in-target-section 0)
(defun nxml-section-tag-transform-outline-state (startp
section-start-pos
&optional
- heading-start-pos)
+ _heading-start-pos)
(if (not startp)
(setq nxml-depth-in-target-section
(and nxml-depth-in-target-section
(nxml-outline-error
(nxml-report-outline-error "Cannot display outline: %s" err)))))
-(defvar nxml-outline-display-section-tag-function nil)
-
(defun nxml-outline-display-rest (outline-state start-tag-indent tag-qnames)
"Display up to and including the end of the current element.
OUTLINE-STATE can be nil, t, hide-children. START-TAG-INDENT is the
(defun nxml-end-of-heading ()
"Move from the start of the content of the heading to the end.
Do not move past the end of the line."
- (let ((pos (condition-case err
+ (let ((pos (condition-case nil
(and (nxml-scan-element-forward (point) t)
xmltok-start)
(nxml-scan-error nil))))
(nxml-ensure-scan-up-to-date)
(let ((pos (nxml-inside-start (point))))
(when pos
- (goto-char (1- pos))
+ (goto-char pos)
t))))
((progn
(xmltok-forward)
-;;; nxml-parse.el --- XML parser, sharing infrastructure with nxml-mode
+;;; nxml-parse.el --- XML parser, sharing infrastructure with nxml-mode -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
-;;; nxml-rap.el --- low-level support for random access parsing for nXML mode
+;;; nxml-rap.el --- low-level support for random access parsing for nXML mode -*- lexical-binding:t -*-
;; Copyright (C) 2003-2004, 2007-2016 Free Software Foundation, Inc.
;; look like it scales to large numbers of overlays in a buffer.
;;
;; We don't in fact track all these constructs, but only track them in
-;; some initial part of the instance. The variable `nxml-scan-end'
-;; contains the limit of where we have scanned up to for them.
+;; some initial part of the instance.
;;
;; Thus to parse some random point in the file we first ensure that we
;; have scanned up to that point. Then we search backwards for a
(require 'xmltok)
(require 'nxml-util)
+(require 'sgml-mode)
-(defvar nxml-prolog-end nil
+(defvar-local nxml-prolog-end nil
"Integer giving position following end of the prolog.")
-(make-variable-buffer-local 'nxml-prolog-end)
-
-(defvar nxml-scan-end nil
- "Marker giving position up to which we have scanned.
-nxml-scan-end must be >= nxml-prolog-end. Furthermore, nxml-scan-end
-must not be an inside position in the following sense. A position is
-inside if the following character is a part of, but not the first
-character of, a CDATA section, comment or processing instruction.
-Furthermore all positions >= nxml-prolog-end and < nxml-scan-end that
-are inside positions must have a non-nil `nxml-inside' property whose
-value is a symbol specifying what it is inside. Any characters with a
-non-nil `fontified' property must have position < nxml-scan-end and
-the correct face. Dependent regions must also be established for any
-unclosed constructs starting before nxml-scan-end.
-There must be no `nxml-inside' properties after nxml-scan-end.")
-(make-variable-buffer-local 'nxml-scan-end)
(defsubst nxml-get-inside (pos)
- (get-text-property pos 'nxml-inside))
-
-(defsubst nxml-clear-inside (start end)
- (nxml-debug-clear-inside start end)
- (remove-text-properties start end '(nxml-inside nil)))
-
-(defsubst nxml-set-inside (start end type)
- (nxml-debug-set-inside start end)
- (put-text-property start end 'nxml-inside type))
+ (save-excursion (nth 8 (syntax-ppss pos))))
(defun nxml-inside-end (pos)
"Return the end of the inside region containing POS.
Return nil if the character at POS is not inside."
- (if (nxml-get-inside pos)
- (or (next-single-property-change pos 'nxml-inside)
- (point-max))
- nil))
+ (save-excursion
+ (let ((ppss (syntax-ppss pos)))
+ (when (nth 8 ppss)
+ (goto-char (nth 8 ppss))
+ (with-syntax-table sgml-tag-syntax-table
+ (if (nth 3 ppss)
+ (progn (forward-comment 1) (point))
+ (or (scan-sexps (point) 1) (point-max))))))))
(defun nxml-inside-start (pos)
"Return the start of the inside region containing POS.
Return nil if the character at POS is not inside."
- (if (nxml-get-inside pos)
- (or (previous-single-property-change (1+ pos) 'nxml-inside)
- (point-min))
- nil))
+ (save-excursion (nth 8 (syntax-ppss pos))))
;;; Change management
-(defun nxml-scan-after-change (start end)
- "Restore `nxml-scan-end' invariants after a change.
-The change happened between START and END.
-Return position after which lexical state is unchanged.
-END must be > `nxml-prolog-end'. START must be outside
-any “inside” regions and at the beginning of a token."
- (if (>= start nxml-scan-end)
- nxml-scan-end
- (let ((inside-remove-start start)
- xmltok-errors)
- (while (or (when (xmltok-forward-special (min end nxml-scan-end))
- (when (memq xmltok-type
- '(comment
- cdata-section
- processing-instruction))
- (nxml-clear-inside inside-remove-start
- (1+ xmltok-start))
- (nxml-set-inside (1+ xmltok-start)
- (point)
- xmltok-type)
- (setq inside-remove-start (point)))
- (if (< (point) (min end nxml-scan-end))
- t
- (setq end (point))
- nil))
- ;; The end of the change was inside but is now outside.
- ;; Imagine something really weird like
- ;; <![CDATA[foo <!-- bar ]]> <![CDATA[ stuff --> <!-- ]]> -->
- ;; and suppose we deleted "<![CDATA[f"
- (let ((inside-end (nxml-inside-end end)))
- (when inside-end
- (setq end inside-end)
- t))))
- (nxml-clear-inside inside-remove-start end))
- (when (> end nxml-scan-end)
- (set-marker nxml-scan-end end))
- end))
-
;; n-s-p only called from nxml-mode.el, where this variable is defined.
(defvar nxml-prolog-regions)
(let (xmltok-dtd
xmltok-errors)
(setq nxml-prolog-regions (xmltok-forward-prolog))
- (setq nxml-prolog-end (point))
- (nxml-clear-inside (point-min) nxml-prolog-end))
- (when (< nxml-scan-end nxml-prolog-end)
- (set-marker nxml-scan-end nxml-prolog-end)))
+ (setq nxml-prolog-end (point))))
;;; Random access parsing
(defun nxml-tokenize-forward ()
(let (xmltok-errors)
- (when (and (xmltok-forward)
- (> (point) nxml-scan-end))
- (cond ((memq xmltok-type '(comment
- cdata-section
- processing-instruction))
- (with-silent-modifications
- (nxml-set-inside (1+ xmltok-start) (point) xmltok-type))))
- (set-marker nxml-scan-end (point)))
+ (xmltok-forward)
xmltok-type))
(defun nxml-move-tag-backwards (bound)
Leave point unmoved if it is not inside anything special."
(let ((start (nxml-inside-start (point))))
(when start
- (goto-char (1- start))
+ (goto-char start)
(when (nxml-get-inside (point))
- (error "Char before inside-start at %s had nxml-inside property %s"
- (point)
- (nxml-get-inside (point)))))))
+ (error "Char before inside-start at %s is still \"inside\"" (point))))))
(defun nxml-ensure-scan-up-to-date ()
- (let ((pos (point)))
- (when (< nxml-scan-end pos)
- (save-excursion
- (goto-char nxml-scan-end)
- (let (xmltok-errors)
- (while (when (xmltok-forward-special pos)
- (when (memq xmltok-type
- '(comment
- processing-instruction
- cdata-section))
- (with-silent-modifications
- (nxml-set-inside (1+ xmltok-start)
- (point)
- xmltok-type)))
- (if (< (point) pos)
- t
- (setq pos (point))
- nil)))
- (set-marker nxml-scan-end pos))))))
+ (syntax-propertize (point)))
;;; Element scanning
+++ /dev/null
-;;; nxml-uchnm.el --- support for Unicode standard cha names in nxml-mode
-
-;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
-
-;; Author: James Clark
-;; Keywords: wp, hypermedia, languages, XML
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software: you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; This enables the use of the character names defined in the Unicode
-;; Standard. The use of the names can be controlled on a per-block
-;; basis, so as both to reduce memory usage and loading time,
-;; and to make completion work better.
-
-;;; Code:
-
-(require 'nxml-mode)
-
-(defconst nxml-unicode-blocks
- '(("Basic Latin" #x0000 #x007F)
- ("Latin-1 Supplement" #x0080 #x00FF)
- ("Latin Extended-A" #x0100 #x017F)
- ("Latin Extended-B" #x0180 #x024F)
- ("IPA Extensions" #x0250 #x02AF)
- ("Spacing Modifier Letters" #x02B0 #x02FF)
- ("Combining Diacritical Marks" #x0300 #x036F)
- ("Greek and Coptic" #x0370 #x03FF)
- ("Cyrillic" #x0400 #x04FF)
- ("Cyrillic Supplementary" #x0500 #x052F)
- ("Armenian" #x0530 #x058F)
- ("Hebrew" #x0590 #x05FF)
- ("Arabic" #x0600 #x06FF)
- ("Syriac" #x0700 #x074F)
- ("Thaana" #x0780 #x07BF)
- ("Devanagari" #x0900 #x097F)
- ("Bengali" #x0980 #x09FF)
- ("Gurmukhi" #x0A00 #x0A7F)
- ("Gujarati" #x0A80 #x0AFF)
- ("Oriya" #x0B00 #x0B7F)
- ("Tamil" #x0B80 #x0BFF)
- ("Telugu" #x0C00 #x0C7F)
- ("Kannada" #x0C80 #x0CFF)
- ("Malayalam" #x0D00 #x0D7F)
- ("Sinhala" #x0D80 #x0DFF)
- ("Thai" #x0E00 #x0E7F)
- ("Lao" #x0E80 #x0EFF)
- ("Tibetan" #x0F00 #x0FFF)
- ("Myanmar" #x1000 #x109F)
- ("Georgian" #x10A0 #x10FF)
- ("Hangul Jamo" #x1100 #x11FF)
- ("Ethiopic" #x1200 #x137F)
- ("Cherokee" #x13A0 #x13FF)
- ("Unified Canadian Aboriginal Syllabics" #x1400 #x167F)
- ("Ogham" #x1680 #x169F)
- ("Runic" #x16A0 #x16FF)
- ("Tagalog" #x1700 #x171F)
- ("Hanunoo" #x1720 #x173F)
- ("Buhid" #x1740 #x175F)
- ("Tagbanwa" #x1760 #x177F)
- ("Khmer" #x1780 #x17FF)
- ("Mongolian" #x1800 #x18AF)
- ("Latin Extended Additional" #x1E00 #x1EFF)
- ("Greek Extended" #x1F00 #x1FFF)
- ("General Punctuation" #x2000 #x206F)
- ("Superscripts and Subscripts" #x2070 #x209F)
- ("Currency Symbols" #x20A0 #x20CF)
- ("Combining Diacritical Marks for Symbols" #x20D0 #x20FF)
- ("Letterlike Symbols" #x2100 #x214F)
- ("Number Forms" #x2150 #x218F)
- ("Arrows" #x2190 #x21FF)
- ("Mathematical Operators" #x2200 #x22FF)
- ("Miscellaneous Technical" #x2300 #x23FF)
- ("Control Pictures" #x2400 #x243F)
- ("Optical Character Recognition" #x2440 #x245F)
- ("Enclosed Alphanumerics" #x2460 #x24FF)
- ("Box Drawing" #x2500 #x257F)
- ("Block Elements" #x2580 #x259F)
- ("Geometric Shapes" #x25A0 #x25FF)
- ("Miscellaneous Symbols" #x2600 #x26FF)
- ("Dingbats" #x2700 #x27BF)
- ("Miscellaneous Mathematical Symbols-A" #x27C0 #x27EF)
- ("Supplemental Arrows-A" #x27F0 #x27FF)
- ("Braille Patterns" #x2800 #x28FF)
- ("Supplemental Arrows-B" #x2900 #x297F)
- ("Miscellaneous Mathematical Symbols-B" #x2980 #x29FF)
- ("Supplemental Mathematical Operators" #x2A00 #x2AFF)
- ("CJK Radicals Supplement" #x2E80 #x2EFF)
- ("Kangxi Radicals" #x2F00 #x2FDF)
- ("Ideographic Description Characters" #x2FF0 #x2FFF)
- ("CJK Symbols and Punctuation" #x3000 #x303F)
- ("Hiragana" #x3040 #x309F)
- ("Katakana" #x30A0 #x30FF)
- ("Bopomofo" #x3100 #x312F)
- ("Hangul Compatibility Jamo" #x3130 #x318F)
- ("Kanbun" #x3190 #x319F)
- ("Bopomofo Extended" #x31A0 #x31BF)
- ("Katakana Phonetic Extensions" #x31F0 #x31FF)
- ("Enclosed CJK Letters and Months" #x3200 #x32FF)
- ("CJK Compatibility" #x3300 #x33FF)
- ("CJK Unified Ideographs Extension A" #x3400 #x4DBF)
- ;;("CJK Unified Ideographs" #x4E00 #x9FFF)
- ("Yi Syllables" #xA000 #xA48F)
- ("Yi Radicals" #xA490 #xA4CF)
- ;;("Hangul Syllables" #xAC00 #xD7AF)
- ;;("High Surrogates" #xD800 #xDB7F)
- ;;("High Private Use Surrogates" #xDB80 #xDBFF)
- ;;("Low Surrogates" #xDC00 #xDFFF)
- ;;("Private Use Area" #xE000 #xF8FF)
- ;;("CJK Compatibility Ideographs" #xF900 #xFAFF)
- ("Alphabetic Presentation Forms" #xFB00 #xFB4F)
- ("Arabic Presentation Forms-A" #xFB50 #xFDFF)
- ("Variation Selectors" #xFE00 #xFE0F)
- ("Combining Half Marks" #xFE20 #xFE2F)
- ("CJK Compatibility Forms" #xFE30 #xFE4F)
- ("Small Form Variants" #xFE50 #xFE6F)
- ("Arabic Presentation Forms-B" #xFE70 #xFEFF)
- ("Halfwidth and Fullwidth Forms" #xFF00 #xFFEF)
- ("Specials" #xFFF0 #xFFFF)
- ("Old Italic" #x10300 #x1032F)
- ("Gothic" #x10330 #x1034F)
- ("Deseret" #x10400 #x1044F)
- ("Byzantine Musical Symbols" #x1D000 #x1D0FF)
- ("Musical Symbols" #x1D100 #x1D1FF)
- ("Mathematical Alphanumeric Symbols" #x1D400 #x1D7FF)
- ;;("CJK Unified Ideographs Extension B" #x20000 #x2A6DF)
- ;;("CJK Compatibility Ideographs Supplement" #x2F800 #x2FA1F)
- ("Tags" #xE0000 #xE007F)
- ;;("Supplementary Private Use Area-A" #xF0000 #xFFFFF)
- ;;("Supplementary Private Use Area-B" #x100000 #x10FFFF)
- )
- "List of Unicode blocks.
-For each block there is a list (NAME FIRST LAST), where
-NAME is a string giving the official name of the block,
-FIRST is the first code-point and LAST is the last code-point.
-Blocks containing only characters with algorithmic names or no names
-are omitted.")
-
-(defun nxml-unicode-block-char-name-set (name)
- "Return a symbol for a block whose official Unicode name is NAME.
-The symbol is generated by downcasing and replacing each space
-by a hyphen."
- (intern (replace-regexp-in-string " " "-" (downcase name))))
-
-;; This is intended to be a superset of the coverage
-;; of existing standard entity sets.
-(defvar nxml-enabled-unicode-blocks-default
- '(basic-latin
- latin-1-supplement
- latin-extended-a
- latin-extended-b
- ipa-extensions
- spacing-modifier-letters
- combining-diacritical-marks
- greek-and-coptic
- cyrillic
- general-punctuation
- superscripts-and-subscripts
- currency-symbols
- combining-diacritical-marks-for-symbols
- letterlike-symbols
- number-forms
- arrows
- mathematical-operators
- miscellaneous-technical
- control-pictures
- optical-character-recognition
- enclosed-alphanumerics
- box-drawing
- block-elements
- geometric-shapes
- miscellaneous-symbols
- dingbats
- miscellaneous-mathematical-symbols-a
- supplemental-arrows-a
- supplemental-arrows-b
- miscellaneous-mathematical-symbols-b
- supplemental-mathematical-operators
- cjk-symbols-and-punctuation
- alphabetic-presentation-forms
- variation-selectors
- small-form-variants
- specials
- mathematical-alphanumeric-symbols)
- "Default value for `nxml-enabled-unicode-blocks'.")
-
-(mapc (lambda (block)
- (nxml-autoload-char-name-set
- (nxml-unicode-block-char-name-set (car block))
- (expand-file-name
- (format "nxml/%05X-%05X"
- (nth 1 block)
- (nth 2 block))
- data-directory)))
- nxml-unicode-blocks)
-
-;; Internal flag to control whether customize reloads the character tables.
-;; Should be set the first time the
-(defvar nxml-internal-unicode-char-name-sets-enabled nil)
-
-(defcustom nxml-enabled-unicode-blocks nxml-enabled-unicode-blocks-default
- "List of Unicode blocks for which Unicode character names are enabled.
-Each block is identified by a symbol derived from the name
-of the block by downcasing and replacing each space by a hyphen."
- :group 'nxml
- :set (lambda (sym value)
- (set-default 'nxml-enabled-unicode-blocks value)
- (when nxml-internal-unicode-char-name-sets-enabled
- (nxml-enable-unicode-char-name-sets)))
- :type (cons 'set
- (mapcar (lambda (block)
- `(const :tag ,(format "%s (%04X-%04X)"
- (nth 0 block)
- (nth 1 block)
- (nth 2 block))
- ,(nxml-unicode-block-char-name-set
- (nth 0 block))))
- nxml-unicode-blocks)))
-
-;;;###autoload
-(defun nxml-enable-unicode-char-name-sets ()
- "Enable the use of Unicode standard names for characters.
-The Unicode blocks for which names are enabled is controlled by
-the variable `nxml-enabled-unicode-blocks'."
- (interactive)
- (setq nxml-internal-unicode-char-name-sets-enabled t)
- (mapc (lambda (block)
- (nxml-disable-char-name-set
- (nxml-unicode-block-char-name-set (car block))))
- nxml-unicode-blocks)
- (mapc (lambda (nameset)
- (nxml-enable-char-name-set nameset))
- nxml-enabled-unicode-blocks))
-
-(provide 'nxml-uchnm)
-
-;;; nxml-uchnm.el ends here
`(nxml-debug "%s: %S" ,name
(buffer-substring-no-properties ,start ,end))))
-(defmacro nxml-debug-set-inside (start end)
- (when nxml-debug
- `(let ((overlay (make-overlay ,start ,end)))
- (overlay-put overlay 'face '(:background "red"))
- (overlay-put overlay 'nxml-inside-debug t)
- (nxml-debug-change "nxml-set-inside" ,start ,end))))
-
-(defmacro nxml-debug-clear-inside (start end)
- (when nxml-debug
- `(cl-loop for overlay in (overlays-in ,start ,end)
- if (overlay-get overlay 'nxml-inside-debug)
- do (delete-overlay overlay)
- finally (nxml-debug-change "nxml-clear-inside" ,start ,end))))
-
(defun nxml-make-namespace (str)
"Return a symbol for the namespace URI STR.
STR must be a string. If STR is the empty string, return nil.
-;;; rng-cmpct.el --- parsing of RELAX NG Compact Syntax schemas
+;;; rng-cmpct.el --- parsing of RELAX NG Compact Syntax schemas -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
(substring rng-c-current-token n (- n)))))
(defun rng-c-fix-escaped-newlines (str)
- (let ((pos 0))
- (while (progn
- (let ((n (string-match "\C-@" str pos)))
- (and n
- (aset str n ?\n)
- (setq pos (1+ n)))))))
- str)
+ (subst-char-in-string ?\C-@ ?\n str))
(defun rng-c-parse-identifier-or-keyword ()
(cond ((rng-c-current-token-ncname-p)
-;;; rng-dt.el --- datatype library interface for RELAX NG
+;;; rng-dt.el --- datatype library interface for RELAX NG -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
(t
(rng-dt-error "There is no built-in datatype %s" name))))
-(put (rng-make-datatypes-uri "") 'rng-dt-compile 'rng-dt-builtin-compile)
+(put (rng-make-datatypes-uri "") 'rng-dt-compile #'rng-dt-builtin-compile)
(provide 'rng-dt)
-;;; rng-loc.el --- locate the schema to use for validation
+;;; rng-loc.el --- Locate the schema to use for validation -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
(require 'rng-util)
(require 'xmltok)
-(defvar rng-current-schema-file-name nil
+(defvar-local rng-current-schema-file-name nil
"Filename of schema being used for current buffer.
It is nil if using a vacuous schema.")
-(make-variable-buffer-local 'rng-current-schema-file-name)
(defvar rng-schema-locating-files-default
(list "schemas.xml" (expand-file-name "schema/schemas.xml" data-directory))
rules))))))))
best-so-far))
-(put 'documentElement 'rng-rule-matcher 'rng-match-document-element-rule)
-(put 'namespace 'rng-rule-matcher 'rng-match-namespace-rule)
-(put 'uri 'rng-rule-matcher 'rng-match-uri-rule)
-(put 'transformURI 'rng-rule-matcher 'rng-match-transform-uri-rule)
-(put 'default 'rng-rule-matcher 'rng-match-default-rule)
+(put 'documentElement 'rng-rule-matcher #'rng-match-document-element-rule)
+(put 'namespace 'rng-rule-matcher #'rng-match-namespace-rule)
+(put 'uri 'rng-rule-matcher #'rng-match-uri-rule)
+(put 'transformURI 'rng-rule-matcher #'rng-match-transform-uri-rule)
+(put 'default 'rng-rule-matcher #'rng-match-default-rule)
(defun rng-match-document-element-rule (props)
(let ((document-element (rng-document-element))
-;;; rng-maint.el --- commands for RELAX NG maintainers
+;;; rng-maint.el --- commands for RELAX NG maintainers -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
;;; Inline functions
(defsubst rng-update-match-state (new-state)
- (if (and (eq new-state rng-not-allowed-ipattern)
- (not (eq rng-match-state rng-not-allowed-ipattern)))
- nil
+ (if (eq new-state rng-not-allowed-ipattern)
+ (eq rng-match-state rng-not-allowed-ipattern)
(setq rng-match-state new-state)
t))
-;;; rng-nxml.el --- make nxml-mode take advantage of rng-validate-mode
+;;; rng-nxml.el --- make nxml-mode take advantage of rng-validate-mode -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
(require 'rng-valid)
(require 'nxml-mode)
(require 'rng-loc)
+(require 'sgml-mode)
(defcustom rng-nxml-auto-validate-flag t
"Non-nil means automatically turn on validation with nxml-mode."
["Validation" rng-validate-mode
:style toggle
:selected rng-validate-mode]
+ ["Electric Pairs" sgml-electric-tag-pair-mode
+ :style toggle
+ :selected sgml-electric-tag-pair-mode]
"---"
("Set Schema"
["Automatically" rng-auto-set-schema]
'append)
(cond (rng-nxml-auto-validate-flag
(rng-validate-mode 1)
- (add-hook 'nxml-completion-hook 'rng-complete nil t)
- (add-hook 'nxml-in-mixed-content-hook 'rng-in-mixed-content-p nil t))
+ (add-hook 'completion-at-point-functions #'rng-completion-at-point nil t)
+ (add-hook 'nxml-in-mixed-content-hook #'rng-in-mixed-content-p nil t))
(t
(rng-validate-mode 0)
- (remove-hook 'nxml-completion-hook 'rng-complete t)
- (remove-hook 'nxml-in-mixed-content-hook 'rng-in-mixed-content-p t))))
-
-(defvar rng-tag-history nil)
-(defvar rng-attribute-name-history nil)
-(defvar rng-attribute-value-history nil)
-
-(defvar rng-complete-target-names nil)
-(defvar rng-complete-name-attribute-flag nil)
-(defvar rng-complete-extra-strings nil)
+ (remove-hook 'completion-at-point-functions #'rng-completion-at-point t)
+ (remove-hook 'nxml-in-mixed-content-hook #'rng-in-mixed-content-p t))))
-(defun rng-complete ()
- "Complete the string before point using the current schema.
-Return non-nil if in a context it understands."
- (interactive)
+(defun rng-completion-at-point ()
+ "Return completion data for the string before point using the current schema."
(and rng-validate-mode
(let ((lt-pos (save-excursion (search-backward "<" nil t)))
xmltok-dtd)
t))
(defun rng-complete-tag (lt-pos)
- (let (rng-complete-extra-strings)
- (when (and (= lt-pos (1- (point)))
- rng-complete-end-tags-after-<
- rng-open-elements
- (not (eq (car rng-open-elements) t))
- (or rng-collecting-text
- (rng-match-save
- (rng-match-end-tag))))
- (setq rng-complete-extra-strings
- (cons (concat "/"
- (if (caar rng-open-elements)
- (concat (caar rng-open-elements)
- ":"
- (cdar rng-open-elements))
- (cdar rng-open-elements)))
- rng-complete-extra-strings)))
+ (let ((extra-strings
+ (when (and (= lt-pos (1- (point)))
+ rng-complete-end-tags-after-<
+ rng-open-elements
+ (not (eq (car rng-open-elements) t))
+ (or rng-collecting-text
+ (rng-match-save
+ (rng-match-end-tag))))
+ (list (concat "/"
+ (if (caar rng-open-elements)
+ (concat (caar rng-open-elements)
+ ":"
+ (cdar rng-open-elements))
+ (cdar rng-open-elements)))))))
(when (save-excursion
(re-search-backward rng-in-start-tag-name-regex
lt-pos
t))
(and rng-collecting-text (rng-flush-text))
- (let ((completion
- (let ((rng-complete-target-names
- (rng-match-possible-start-tag-names))
- (rng-complete-name-attribute-flag nil))
- (rng-complete-before-point (1+ lt-pos)
- 'rng-complete-qname-function
- "Tag: "
- nil
- 'rng-tag-history)))
- name)
- (when completion
- (cond ((rng-qname-p completion)
- (setq name (rng-expand-qname completion
- t
- 'rng-start-tag-expand-recover))
- (when (and name
- (rng-match-start-tag-open name)
- (or (not (rng-match-start-tag-close))
- ;; need a namespace decl on the root element
- (and (car name)
- (not rng-open-elements))))
- ;; attributes are required
- (insert " ")))
- ((member completion rng-complete-extra-strings)
- (insert ">")))))
- t)))
+ (let ((target-names (rng-match-possible-start-tag-names)))
+ `(,(1+ lt-pos)
+ ,(save-excursion (skip-chars-forward "[[:alnum:]_.-:]") (point))
+ ,(apply-partially #'rng-complete-qname-function
+ target-names nil extra-strings)
+ :exit-function
+ ,(lambda (completion status)
+ (cond
+ ((not (eq status 'finished)) nil)
+ ((rng-qname-p completion)
+ (let ((name (rng-expand-qname completion
+ t
+ #'rng-start-tag-expand-recover)))
+ (when (and name
+ (rng-match-start-tag-open name)
+ (or (not (rng-match-start-tag-close))
+ ;; need a namespace decl on the root element
+ (and (car name)
+ (not rng-open-elements))))
+ ;; attributes are required
+ (insert " "))))
+ ((member completion extra-strings)
+ (insert ">")))))))))
(defconst rng-in-end-tag-name-regex
(replace-regexp-in-string
(concat (caar rng-open-elements)
":"
(cdar rng-open-elements))
- (cdar rng-open-elements)))
- (end-tag-name
- (buffer-substring-no-properties (+ (match-beginning 0) 2)
- (point))))
- (cond ((or (> (length end-tag-name)
- (length start-tag-name))
- (not (string= (substring start-tag-name
- 0
- (length end-tag-name))
- end-tag-name)))
- (message "Expected end-tag %s"
- (rng-quote-string
- (concat "</" start-tag-name ">")))
- (ding))
- (t
- (delete-region (- (point) (length end-tag-name))
- (point))
- (insert start-tag-name ">")
- (when (not (or rng-collecting-text
- (rng-match-end-tag)))
- (message "Element %s is incomplete"
- (rng-quote-string start-tag-name))))))))
- t))
+ (cdar rng-open-elements))))
+ `(,(+ (match-beginning 0) 2)
+ ,(save-excursion (skip-chars-forward "[[:alnum:]_.-:]") (point))
+ ,(list start-tag-name) ;Sole completion candidate.
+ :exit-function
+ ,(lambda (_completion status)
+ (when (eq status 'finished)
+ (unless (eq (char-after) ?>) (insert ">"))
+ (when (not (or rng-collecting-text
+ (rng-match-end-tag)))
+ (message "Element \"%s\" is incomplete"
+ start-tag-name))))))))))
(defconst rng-in-attribute-regex
(replace-regexp-in-string
rng-undeclared-prefixes)
(and (rng-adjust-state-for-attribute lt-pos
attribute-start)
- (let ((rng-complete-target-names
+ (let ((target-names
(rng-match-possible-attribute-names))
- (rng-complete-extra-strings
+ (extra-strings
(mapcar (lambda (prefix)
(if prefix
(concat "xmlns:" prefix)
"xmlns"))
- rng-undeclared-prefixes))
- (rng-complete-name-attribute-flag t))
- (rng-complete-before-point attribute-start
- 'rng-complete-qname-function
- "Attribute: "
- nil
- 'rng-attribute-name-history))
- (insert "=\"")))
- t))
+ rng-undeclared-prefixes)))
+ `(,attribute-start
+ ,(save-excursion (skip-chars-forward "[[:alnum:]_.-:]") (point))
+ ,(apply-partially #'rng-complete-qname-function
+ target-names t extra-strings)
+ :exit-function
+ ,(lambda (_completion status)
+ (when (and (eq status 'finished)
+ (not (looking-at "=")))
+ (insert "=\"\"")
+ (forward-char -1)))))))))
(defconst rng-in-attribute-value-regex
(replace-regexp-in-string
(defun rng-complete-attribute-value (lt-pos)
(when (save-excursion
(re-search-backward rng-in-attribute-value-regex lt-pos t))
- (let ((name-start (match-beginning 1))
- (name-end (match-end 1))
- (colon (match-beginning 2))
- (value-start (1+ (match-beginning 3))))
+ (let* ((name-start (match-beginning 1))
+ (name-end (match-end 1))
+ (colon (match-beginning 2))
+ (value-start (1+ (match-beginning 3)))
+ (exit-function
+ (lambda (_completion status)
+ (when (eq status 'finished)
+ (let ((delim (char-before value-start)))
+ (unless (eq (char-after) delim) (insert delim)))))))
(and (rng-adjust-state-for-attribute lt-pos
name-start)
(if (string= (buffer-substring-no-properties name-start
(or colon name-end))
"xmlns")
- (rng-complete-before-point
- value-start
- (rng-strings-to-completion-alist
- (rng-possible-namespace-uris
- (and colon
- (buffer-substring-no-properties (1+ colon) name-end))))
- "Namespace URI: "
- nil
- 'rng-namespace-uri-history)
+ `(,value-start ,(point)
+ ,(rng-strings-to-completion-table
+ (rng-possible-namespace-uris
+ (and colon
+ (buffer-substring-no-properties (1+ colon) name-end))))
+ :exit-function ,exit-function)
(rng-adjust-state-for-attribute-value name-start
colon
name-end)
- (rng-complete-before-point
- value-start
- (rng-strings-to-completion-alist
- (rng-match-possible-value-strings))
- "Value: "
- nil
- 'rng-attribute-value-history))
- (insert (char-before value-start))))
- t))
+ `(,value-start ,(point)
+ ,(rng-strings-to-completion-table
+ (rng-match-possible-value-strings))
+ :exit-function ,exit-function))))))
(defun rng-possible-namespace-uris (prefix)
(let ((ns (if prefix (nxml-ns-get-prefix prefix)
(nxml-ns-get-default))))
(if (and ns (memq prefix (nxml-ns-changed-prefixes)))
(list (nxml-namespace-name ns))
- (mapcar 'nxml-namespace-name
+ (mapcar #'nxml-namespace-name
(delq nxml-xml-namespace-uri
(rng-match-possible-namespace-uris))))))
(recover-fun (funcall recover-fun prefix (cdr qname)))))
(cons (and defaultp (nxml-ns-get-default)) (cdr qname)))))
-(defun rng-start-tag-expand-recover (prefix local-name)
+(defun rng-start-tag-expand-recover (_prefix local-name)
(let ((ns (rng-match-infer-start-tag-namespace local-name)))
(and ns
(cons ns local-name))))
(save-restriction
(widen)
(nxml-with-invisible-motion
- (if (= pos 1)
+ (if (= pos (point-min))
(rng-set-initial-state)
(let ((state (get-text-property (1- pos) 'rng-state)))
(cond (state
(and (or (not prefix) ns)
(rng-match-attribute-name (cons ns local-name)))))
-(defun rng-complete-qname-function (string predicate flag)
- (let ((alist (mapcar (lambda (name) (cons name nil))
- (rng-generate-qname-list string))))
- (cond ((not flag)
- (try-completion string alist predicate))
- ((eq flag t)
- (all-completions string alist predicate))
- ((eq flag 'lambda)
- (and (assoc string alist) t)))))
-
-(defun rng-generate-qname-list (&optional string)
+(defun rng-complete-qname-function (candidates attributes-flag extra-strings
+ string predicate flag)
+ (complete-with-action flag
+ (rng-generate-qname-list
+ string candidates attributes-flag extra-strings)
+ string predicate))
+
+(defun rng-generate-qname-list (&optional string candidates attribute-flag extra-strings)
(let ((forced-prefix (and string
(string-match ":" string)
(> (match-beginning 0) 0)
(substring string
0
(match-beginning 0))))
- (namespaces (mapcar 'car rng-complete-target-names))
+ (namespaces (mapcar #'car candidates))
ns-prefixes-alist ns-prefixes iter ns prefer)
(while namespaces
(setq ns (car namespaces))
(setq ns-prefixes-alist
(cons (cons ns (nxml-ns-prefixes-for
ns
- rng-complete-name-attribute-flag))
+ attribute-flag))
ns-prefixes-alist)))
(setq namespaces (delq ns (cdr namespaces))))
(setq iter ns-prefixes-alist)
(setcdr ns-prefixes (list prefer)))
;; Unless it's an attribute with a non-nil namespace,
;; allow no prefix for this namespace.
- (unless rng-complete-name-attribute-flag
+ (unless attribute-flag
(setcdr ns-prefixes (cons nil (cdr ns-prefixes))))))
(setq iter (cdr iter)))
(rng-uniquify-equal
- (sort (apply 'append
- (cons rng-complete-extra-strings
+ (sort (apply #'append
+ (cons extra-strings
(mapcar (lambda (name)
(if (car name)
(mapcar (lambda (prefix)
(cdr (assoc (car name)
ns-prefixes-alist)))
(list (cdr name))))
- rng-complete-target-names)))
+ candidates)))
'string<))))
(defun rng-get-preferred-unused-prefix (ns)
nil))))
prefix))
-(defun rng-strings-to-completion-alist (strings)
- (mapcar (lambda (s) (cons s s))
- (rng-uniquify-equal (sort (mapcar 'rng-escape-string strings)
- 'string<))))
+(defun rng-strings-to-completion-table (strings)
+ (mapcar #'rng-escape-string strings))
(provide 'rng-nxml)
-;;; rng-parse.el --- parse an XML file and validate it against a schema
+;;; rng-parse.el --- parse an XML file and validate it against a schema -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
-;;; rng-pttrn.el --- RELAX NG patterns
+;;; rng-pttrn.el --- RELAX NG patterns -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
-;;; rng-uri.el --- URI parsing and manipulation
+;;; rng-uri.el --- URI parsing and manipulation -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
(cons item nil))))))))
list)))
-(defun rng-complete-before-point (start table prompt &optional predicate hist)
- "Complete text between START and point.
-Replaces the text between START and point with a string chosen using a
-completion table and, when needed, input read from the user with the
-minibuffer.
-Returns the new string if either a complete and unique completion was
-determined automatically or input was read from the user. Otherwise,
-returns nil.
-TABLE is an alist, a symbol bound to a function or an obarray as with
-the function `completing-read'.
-PROMPT is the string to prompt with if user input is needed.
-PREDICATE is nil or a function as with `completing-read'.
-HIST, if non-nil, specifies a history list as with `completing-read'."
- (let* ((orig (buffer-substring-no-properties start (point)))
- (completion (try-completion orig table predicate)))
- (cond ((not completion)
- (if (string= orig "")
- (message "No completions available")
- (message "No completion for %s" (rng-quote-string orig)))
- (ding)
- nil)
- ((eq completion t) orig)
- ((not (string= completion orig))
- (delete-region start (point))
- (insert completion)
- (cond ((not (rng-completion-exact-p completion table predicate))
- (message "Incomplete")
- nil)
- ((eq (try-completion completion table predicate) t)
- completion)
- (t
- (message "Complete but not unique")
- nil)))
- (t
- (setq completion
- (let ((saved-minibuffer-setup-hook
- (default-value 'minibuffer-setup-hook)))
- (add-hook 'minibuffer-setup-hook
- 'minibuffer-completion-help
- t)
- (unwind-protect
- (completing-read prompt
- table
- predicate
- nil
- orig
- hist)
- (setq-default minibuffer-setup-hook
- saved-minibuffer-setup-hook))))
- (delete-region start (point))
- (insert completion)
- completion))))
-
-(defun rng-completion-exact-p (string table predicate)
- (cond ((symbolp table)
- (funcall table string predicate 'lambda))
- ((vectorp table)
- (intern-soft string table))
- (t (assoc string table))))
-
-(defun rng-quote-string (s)
- (concat "\"" s "\""))
-
(defun rng-escape-string (s)
(replace-regexp-in-string "[&\"<>]"
(lambda (match)
-;;; rng-valid.el --- real-time validation of XML using RELAX NG
+;;; rng-valid.el --- real-time validation of XML using RELAX NG -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
(when (buffer-live-p buffer) ; bug#13999
(with-current-buffer buffer
(if rng-validate-mode
- (if (let ((rng-validate-display-point (point))
- (rng-validate-display-modified-p (buffer-modified-p)))
- (rng-do-some-validation 'rng-validate-while-idle-continue-p))
- (force-mode-line-update)
- (rng-validate-done))
- ;; must have done kill-all-local-variables
- (rng-kill-timers)))))
+ (if (let ((rng-validate-display-point (point))
+ (rng-validate-display-modified-p (buffer-modified-p)))
+ (rng-do-some-validation 'rng-validate-while-idle-continue-p))
+ (force-mode-line-update)
+ (rng-validate-done))
+ ;; Must have done kill-all-local-variables.
+ (rng-kill-timers)))))
(defun rng-validate-quick-while-idle (buffer)
(when (buffer-live-p buffer) ; bug#13999
;; If we don't do this, then the front delimiter can move
;; past the end delimiter.
-(defun rng-error-modified (overlay after-p beg end &optional pre-change-len)
+(defun rng-error-modified (overlay after-p _beg _end &optional _pre-change-len)
(when (and after-p
(overlay-start overlay) ; check not deleted
(>= (overlay-start overlay)
(rng-match-start-tag-open required)
(rng-match-after)
(rng-match-start-tag-open name))
- (rng-mark-invalid (concat "Missing element "
- (rng-quote-string
- (rng-name-to-string required)))
+ (rng-mark-invalid (format "Missing element \"%s\""
+ (rng-name-to-string required))
xmltok-start
(1+ xmltok-start)))
((and (rng-match-optionalize-elements)
(cond ((not required-attributes)
"Required attributes missing")
((not (cdr required-attributes))
- (concat "Missing attribute "
- (rng-quote-string
- (rng-name-to-string (car required-attributes) t))))
+ (format "Missing attribute \"%s\""
+ (rng-name-to-string (car required-attributes) t)))
(t
- (concat "Missing attributes "
+ (format "Missing attributes \"%s\""
(mapconcat (lambda (nm)
- (rng-quote-string
- (rng-name-to-string nm t)))
+ (rng-name-to-string nm t))
required-attributes
- ", "))))))
+ "\", \""))))))
(defun rng-process-end-tag (&optional partial)
(cond ((not rng-open-elements)
(defun rng-missing-element-message ()
(let ((element (rng-match-required-element-name)))
(if element
- (concat "Missing element "
- (rng-quote-string (rng-name-to-string element)))
+ (format "Missing element \"%s\"" (rng-name-to-string element))
"Required child elements missing")))
(defun rng-recover-mismatched-end-tag ()
(defun rng-mark-missing-end-tags (missing)
(rng-mark-not-well-formed
- (format "Missing end-tag%s %s"
+ (format "Missing end-tag%s \"%s\""
(if (null (cdr missing)) "" "s")
(mapconcat (lambda (name)
- (rng-quote-string
- (if (car name)
- (concat (car name)
- ":"
- (cdr name))
- (cdr name))))
+ (if (car name)
+ (concat (car name)
+ ":"
+ (cdr name))
+ (cdr name)))
missing
- ", "))
+ "\", \""))
xmltok-start
(+ xmltok-start 2)))
-;;; rng-xsd.el --- W3C XML Schema datatypes library for RELAX NG
+;;; rng-xsd.el --- W3C XML Schema datatypes library for RELAX NG -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
;;;###autoload
(put 'http://www.w3.org/2001/XMLSchema-datatypes
'rng-dt-compile
- 'rng-xsd-compile)
+ #'rng-xsd-compile)
;;;###autoload
(defun rng-xsd-compile (name params)
NAME is a symbol giving the local name of the datatype. PARAMS is a
list of pairs (PARAM-NAME . PARAM-VALUE) where PARAM-NAME is a symbol
giving the name of the parameter and PARAM-VALUE is a string giving
-its value. If NAME or PARAMS are invalid, it calls rng-dt-error
+its value. If NAME or PARAMS are invalid, it calls `rng-dt-error'
passing it arguments in the same style as format; the value from
-rng-dt-error will be returned. Otherwise, it returns a list. The
+`rng-dt-error' will be returned. Otherwise, it returns a list. The
first member of the list is t if any string is a legal value for the
datatype and nil otherwise. The second argument is a symbol; this
symbol will be called as a function passing it a string followed by
;; preceding part of the instance. This allows the instance to be
;; parsed incrementally. The main entry point is `xmltok-forward':
;; this can be called at any point in the instance provided it is
-;; between tokens. The other entry point is `xmltok-forward-special'
-;; which skips over tokens other comments, processing instructions or
-;; CDATA sections (i.e. the constructs in an instance that can contain
-;; less than signs that don't start a token).
+;; between tokens.
;;
;; This is a non-validating XML 1.0 processor. It does not resolve
;; parameter entities (including the external DTD subset) and it does
(vector message start end))
(defun xmltok-add-error (message &optional start end)
- (setq xmltok-errors
- (cons (xmltok-make-error message
- (or start xmltok-start)
- (or end (point)))
- xmltok-errors)))
+ (push (xmltok-make-error message
+ (or start xmltok-start)
+ (or end (point)))
+ xmltok-errors))
(defun xmltok-forward ()
(setq xmltok-start (point))
(goto-char (point-max))
(setq xmltok-type 'data)))))
-(defun xmltok-forward-special (bound)
- "Scan forward past the first special token starting at or after point.
-Return nil if there is no special token that starts before BOUND.
-CDATA sections, processing instructions and comments (and indeed
-anything starting with < following by ? or !) count as special.
-Return the type of the token."
- (when (re-search-forward "<[?!]" (1+ bound) t)
- (setq xmltok-start (match-beginning 0))
- (goto-char (1+ xmltok-start))
- (let ((case-fold-search nil))
- (xmltok-scan-after-lt))))
-
(eval-when-compile
;; A symbolic regexp is represented by a list whose CAR is the string
(setq xmltok-type 'processing-instruction))
(defun xmltok-scan-after-comment-open ()
- (let ((found-- (search-forward "--" nil 'move)))
- (setq xmltok-type
- (cond ((or (eq (char-after) ?>) (not found--))
- (goto-char (1+ (point)))
- 'comment)
- (t
- ;; just include the <!-- in the token
- (goto-char (+ xmltok-start 4))
- ;; Need do this after the goto-char because
- ;; marked error should just apply to <!--
- (xmltok-add-error "First following `--' not followed by `>'")
- (goto-char (point-max))
- 'comment)))))
+ (while (and (re-search-forward "--\\(>\\)?" nil 'move)
+ (not (match-end 1)))
+ (xmltok-add-error "`--' not followed by `>'" (match-beginning 0)))
+ (setq xmltok-type 'comment))
(defun xmltok-scan-attributes ()
(let ((recovering nil)
-;;; xsd-regexp.el --- translate W3C XML Schema regexps to Emacs regexps
+;;; xsd-regexp.el --- translate W3C XML Schema regexps to Emacs regexps -*- lexical-binding:t -*-
;; Copyright (C) 2003, 2007-2016 Free Software Foundation, Inc.
(defun xsdre-range-list-difference (orig subtract)
"Return a range-list for the difference of two range-lists."
(when orig
- (let (new head next first last)
+ (let (new head first last)
(while orig
(setq head (car orig))
(setq first (xsdre-range-first head))
(save-excursion
(goto-char start)
(down-list 2)
- (while (condition-case err
+ (while (condition-case nil
(progn
(forward-sexp)
t)
+++ /dev/null
-;;; awk-mode.el --- AWK code editing commands for Emacs
-
-;; Copyright (C) 1988, 1994, 1996, 2000-2016 Free Software Foundation,
-;; Inc.
-
-;; Maintainer: emacs-devel@gnu.org
-;; Keywords: unix, languages
-;; Obsolete-since: 22.1
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software: you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; Sets up C-mode with support for awk-style #-comments and a lightly
-;; hacked syntax table.
-
-;;; Code:
-
-(defvar awk-mode-syntax-table
- (let ((st (make-syntax-table)))
- (modify-syntax-entry ?\\ "\\" st)
- (modify-syntax-entry ?\n "> " st)
- (modify-syntax-entry ?\f "> " st)
- (modify-syntax-entry ?\# "< " st)
- ;; / can delimit regexes or be a division operator. We assume that it is
- ;; more commonly used for regexes and fix the remaining cases with
- ;; `font-lock-syntactic-keywords'.
- (modify-syntax-entry ?/ "\"" st)
- (modify-syntax-entry ?* "." st)
- (modify-syntax-entry ?+ "." st)
- (modify-syntax-entry ?- "." st)
- (modify-syntax-entry ?= "." st)
- (modify-syntax-entry ?% "." st)
- (modify-syntax-entry ?< "." st)
- (modify-syntax-entry ?> "." st)
- (modify-syntax-entry ?& "." st)
- (modify-syntax-entry ?| "." st)
- (modify-syntax-entry ?_ "_" st)
- (modify-syntax-entry ?\' "\"" st)
- st)
- "Syntax table in use in `awk-mode' buffers.")
-
-;; Regexps written with help from Peter Galbraith <galbraith@mixing.qc.dfo.ca>.
-(defconst awk-font-lock-keywords
- (eval-when-compile
- (list
- ;;
- ;; Function names.
- '("^[ \t]*\\(function\\)\\>[ \t]*\\(\\sw+\\)?"
- (1 font-lock-keyword-face) (2 font-lock-function-name-face nil t))
- ;;
- ;; Variable names.
- (cons (regexp-opt
- '("ARGC" "ARGIND" "ARGV" "CONVFMT" "ENVIRON" "ERRNO"
- "FIELDWIDTHS" "FILENAME" "FNR" "FS" "IGNORECASE" "NF" "NR"
- "OFMT" "OFS" "ORS" "RLENGTH" "RS" "RSTART" "SUBSEP") 'words)
- 'font-lock-variable-name-face)
- ;;
- ;; Keywords.
- (regexp-opt
- '("BEGIN" "END" "break" "continue" "delete" "do" "exit" "else" "for"
- "getline" "if" "next" "print" "printf" "return" "while") 'words)
- ;;
- ;; Builtins.
- (list (regexp-opt
- '("atan2" "close" "cos" "ctime" "exp" "gsub" "index" "int"
- "length" "log" "match" "rand" "sin" "split" "sprintf"
- "sqrt" "srand" "sub" "substr" "system" "time"
- "tolower" "toupper") 'words)
- 1 'font-lock-builtin-face)
- ;;
- ;; Operators. Is this too much?
- (cons (regexp-opt '("&&" "||" "<=" "<" ">=" ">" "==" "!=" "!~" "~"))
- 'font-lock-constant-face)
- ))
- "Default expressions to highlight in AWK mode.")
-
-(require 'syntax)
-
-(defconst awk-font-lock-syntactic-keywords
- ;; `/' is mostly used for /.../ regular expressions, but is also
- ;; used as a division operator. Distinguishing between the two is
- ;; a pain in the youknowwhat.
- ;; '(("\\(^\\|[<=>-+*%/!^,~(?:|&]\\)\\s-*\\(/\\)\\([^/\n\\]\\|\\\\.\\)*\\(/\\)"
- ;; (2 "\"") (4 "\"")))
- '(("[^<=>-+*%/!^,~(?:|& \t\n\f]\\s-*\\(/\\)"
- (1 (unless (nth 3 (syntax-ppss (match-beginning 1))) "."))))
- "Syntactic keywords for `awk-mode'.")
-
-;; No longer autoloaded since it might clobber the autoload directive in CC Mode.
-(define-derived-mode awk-mode c-mode "AWK"
- "Major mode for editing AWK code.
-This is much like C mode except for the syntax of comments. Its keymap
-inherits from C mode's and it has the same variables for customizing
-indentation. It has its own abbrev table and its own syntax table.
-
-Turning on AWK mode runs `awk-mode-hook'."
- (set (make-local-variable 'paragraph-start) (concat "$\\|" page-delimiter))
- (set (make-local-variable 'paragraph-separate) paragraph-start)
- (set (make-local-variable 'comment-start) "# ")
- (set (make-local-variable 'comment-end) "")
- (set (make-local-variable 'comment-start-skip) "#+ *")
- (setq font-lock-defaults '(awk-font-lock-keywords
- nil nil ((?_ . "w")) nil
- (parse-sexp-lookup-properties . t)
- (font-lock-syntactic-keywords
- . awk-font-lock-syntactic-keywords))))
-
-(provide 'awk-mode)
-
-;;; awk-mode.el ends here
+++ /dev/null
-;;; iso-acc.el --- minor mode providing electric accent keys
-
-;; Copyright (C) 1993-1994, 1996, 2001-2016 Free Software Foundation,
-;; Inc.
-
-;; Author: Johan Vromans
-;; Maintainer: emacs-devel@gnu.org
-;; Keywords: i18n
-;; Obsolete-since: 22.1
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software: you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; Function `iso-accents-mode' activates a minor mode in which
-;; typewriter "dead keys" are emulated. The purpose of this emulation
-;; is to provide a simple means for inserting accented characters
-;; according to the ISO-8859-1...3 character sets.
-;;
-;; In `iso-accents-mode', pseudo accent characters are used to
-;; introduce accented keys. The pseudo-accent characters are:
-;;
-;; ' (minute) -> acute accent
-;; ` (backtick) -> grave accent
-;; " (second) -> diaeresis
-;; ^ (caret) -> circumflex
-;; ~ (tilde) -> tilde over the character
-;; / (slash) -> slash through the character.
-;; Also: /A is A-with-ring and /E is AE ligature.
-;; These two are enabled only if you set iso-accents-enable
-;; to include them:
-;; . (period) -> dot over the character (some languages only)
-;; , (cedilla) -> cedilla under the character (some languages only)
-;;
-;; The action taken depends on the key that follows the pseudo accent.
-;; In general:
-;;
-;; pseudo-accent + appropriate letter -> accented letter
-;; pseudo-accent + space -> pseudo-accent (except comma and period)
-;; pseudo-accent + pseudo-accent -> accent (if available)
-;; pseudo-accent + other -> pseudo-accent + other
-;;
-;; If the pseudo-accent is followed by anything else than a
-;; self-insert-command, the dead-key code is terminated, the
-;; pseudo-accent inserted ‘as is’ and the bell is rung to signal this.
-;;
-;; Function `iso-accents-mode' can be used to enable the iso accents
-;; minor mode, or disable it.
-
-;; If you want only some of these characters to serve as accents,
-;; add a language to `iso-languages' which specifies the accent characters
-;; that you want, then select the language with `iso-accents-customize'.
-\f
-;;; Code:
-
-(provide 'iso-acc)
-
-(defgroup iso-acc nil
- "Minor mode providing electric accent keys."
- :prefix "iso-accents-"
- :group 'i18n)
-
-(defcustom iso-accents-insert-offset nonascii-insert-offset
- "Offset added by ISO Accents mode to character codes 0200 and above."
- :type 'integer
- :group 'iso-acc)
-
-(defvar iso-languages
- '(("catalan"
- ;; Note this includes some extra characters used in Spanish,
- ;; on the idea that someone who uses Catalan is likely to use Spanish
- ;; as well.
- (?' (?A . ?\301) (?E . ?\311) (?I . ?\315) (?O . ?\323) (?U . ?\332)
- (?a . ?\341) (?e . ?\351) (?i . ?\355) (?o . ?\363) (?u . ?\372)
- (?\ . ?'))
- (?` (?A . ?\300) (?E . ?\310) (?O . ?\322)
- (?a . ?\340) (?e . ?\350) (?o . ?\362)
- (?\ . ?`))
- (?\" (?I . ?\317) (?U . ?\334) (?i . ?\357) (?u . ?\374)
- (?\ . ?\"))
- (?~ (?C . ?\307) (?N . ?\321) (?c . ?\347) (?n . ?\361)
- (?> . ?\273) (?< . ?\253) (?! . ?\241) (?? . ?\277)
- (?\ . ?\~)))
-
- ("esperanto"
- (?^ (?H . ?\246) (?J . ?\254) (?h . ?\266) (?j . ?\274) (?C . ?\306)
- (?G . ?\330) (?S . ?\336) (?c . ?\346) (?g . ?\370) (?s . ?\376)
- (?^ . ?^) (?\ . ?^))
- (?~ (?U . ?\335) (?u . ?\375) (?\ . ?~)))
-
- ("french"
- (?' (?E . ?\311) (?C . ?\307) (?e . ?\351) (?c . ?\347)
- (?\ . ?'))
- (?` (?A . ?\300) (?E . ?\310) (?U . ?\331)
- (?a . ?\340) (?e . ?\350) (?u . ?\371)
- (?\ . ?`))
- (?^ (?A . ?\302) (?E . ?\312) (?I . ?\316) (?O . ?\324) (?U . ?\333)
- (?a . ?\342) (?e . ?\352) (?i . ?\356) (?o . ?\364) (?u . ?\373)
- (?\ . ?^))
- (?\" (?E . ?\313) (?I . ?\317)
- (?e . ?\353) (?i . ?\357)
- (?\ . ?\"))
- (?~ (?< . ?\253) (?> . ?\273) (?C . ?\307) (?c . ?\347)
- (?\ . ?~))
- (?, (?C . ?\307) (?c . ?\347) (?\ . ?\,)))
-
- ("german"
- (?\" (?A . ?\304) (?O . ?\326) (?U . ?\334)
- (?a . ?\344) (?o . ?\366) (?u . ?\374) (?s . ?\337) (?\ . ?\")))
-
- ("irish"
- (?' (?A . ?\301) (?E . ?\311) (?I . ?\315) (?O . ?\323) (?U . ?\332)
- (?a . ?\341) (?e . ?\351) (?i . ?\355) (?o . ?\363) (?u . ?\372)
- (?\ . ?')))
-
- ("portuguese"
- (?' (?A . ?\301) (?E . ?\311) (?I . ?\315) (?O . ?\323) (?U . ?\332)
- (?C . ?\307) (?a . ?\341) (?e . ?\351) (?i . ?\355) (?o . ?\363)
- (?u . ?\372) (?c . ?\347)
- (?\ . ?'))
- (?` (?A . ?\300) (?a . ?\340)
- (?\ . ?`))
- (?^ (?A . ?\302) (?E . ?\312) (?O . ?\324)
- (?a . ?\342) (?e . ?\352) (?o . ?\364)
- (?\ . ?^))
- (?\" (?U . ?\334) (?u . ?\374)
- (?\ . ?\"))
- (?~ (?A . ?\303) (?O . ?\325) (?a . ?\343) (?o . ?\365)
- (?C . ?\307) (?N . ?\321) (?c . ?\347) (?n . ?\361)
- (?\ . ?~))
- (?, (?c . ?\347) (?C . ?\307) (?, . ?,)))
-
- ("spanish"
- (?' (?A . ?\301) (?E . ?\311) (?I . ?\315) (?O . ?\323) (?U . ?\332)
- (?a . ?\341) (?e . ?\351) (?i . ?\355) (?o . ?\363) (?u . ?\372)
- (?\ . ?'))
- (?\" (?U . ?\334) (?u . ?\374) (?\ . ?\"))
- (?\~ (?N . ?\321) (?n . ?\361) (?> . ?\273) (?< . ?\253) (?! . ?\241)
- (?? . ?\277) (?\ . ?\~)))
-
- ("latin-1"
- (?' (?A . ?\301) (?E . ?\311) (?I . ?\315) (?O . ?\323) (?U . ?\332)
- (?Y . ?\335) (?a . ?\341) (?e . ?\351) (?i . ?\355) (?o . ?\363)
- (?u . ?\372) (?y . ?\375) (?' . ?\264)
- (?\ . ?'))
- (?` (?A . ?\300) (?E . ?\310) (?I . ?\314) (?O . ?\322) (?U . ?\331)
- (?a . ?\340) (?e . ?\350) (?i . ?\354) (?o . ?\362) (?u . ?\371)
- (?` . ?`) (?\ . ?`))
- (?^ (?A . ?\302) (?E . ?\312) (?I . ?\316) (?O . ?\324) (?U . ?\333)
- (?a . ?\342) (?e . ?\352) (?i . ?\356) (?o . ?\364) (?u . ?\373)
- (?^ . ?^) (?\ . ?^))
- (?\" (?A . ?\304) (?E . ?\313) (?I . ?\317) (?O . ?\326) (?U . ?\334)
- (?a . ?\344) (?e . ?\353) (?i . ?\357) (?o . ?\366) (?s . ?\337)
- (?u . ?\374) (?y . ?\377)
- (?\" . ?\250) (?\ . ?\"))
- (?~ (?A . ?\303) (?C . ?\307) (?D . ?\320) (?N . ?\321) (?O . ?\325)
- (?T . ?\336) (?a . ?\343) (?c . ?\347) (?d . ?\360) (?n . ?\361)
- (?o . ?\365) (?t . ?\376)
- (?> . ?\273) (?< . ?\253) (?! . ?\241) (?? . ?\277)
- (?\~ . ?\270) (?\ . ?~))
- (?/ (?A . ?\305) (?E . ?\306) (?O . ?\330) (?a . ?\345) (?e . ?\346)
- (?o . ?\370)
- (?/ . ?\260) (?\ . ?/)))
-
- ("latin-2" latin-iso8859-2
- (?' (?A . ?\301) (?C . ?\306) (?D . ?\320) (?E . ?\311) (?I . ?\315)
- (?L . ?\305) (?N . ?\321) (?O . ?\323) (?R . ?\300) (?S . ?\246)
- (?U . ?\332) (?Y . ?\335) (?Z . ?\254)
- (?a . ?\341) (?c . ?\346) (?d . ?\360) (?e . ?\351) (?i . ?\355)
- (?l . ?\345) (?n . ?\361) (?o . ?\363) (?r . ?\340) (?s . ?\266)
- (?u . ?\372) (?y . ?\375) (?z . ?\274)
- (?' . ?\264) (?\ . ?'))
- (?` (?A . ?\241) (?C . ?\307) (?E . ?\312) (?L . ?\243) (?S . ?\252)
- (?T . ?\336) (?Z . ?\257)
- (?a . ?\261) (?l . ?\263) (?c . ?\347) (?e . ?\352) (?s . ?\272)
- (?t . ?\376) (?z . ?\277)
- (?` . ?\252)
- (?. . ?\377) (?\ . ?`))
- (?^ (?A . ?\302) (?I . ?\316) (?O . ?\324)
- (?a . ?\342) (?i . ?\356) (?o . ?\364)
- (?^ . ?^) ; no special code?
- (?\ . ?^))
- (?\" (?A . ?\304) (?E . ?\313) (?O . ?\326) (?U . ?\334)
- (?a . ?\344) (?e . ?\353) (?o . ?\366) (?s . ?\337) (?u . ?\374)
- (?\" . ?\250)
- (?\ . ?\"))
- (?~ (?A . ?\303) (?C . ?\310) (?D . ?\317) (?L . ?\245) (?N . ?\322)
- (?O . ?\325) (?R . ?\330) (?S . ?\251) (?T . ?\253) (?U . ?\333)
- (?Z . ?\256)
- (?a . ?\343) (?c . ?\350) (?d . ?\357) (?l . ?\265) (?n . ?\362)
- (?o . ?\365) (?r . ?\370) (?s . ?\271) (?t . ?\273) (?u . ?\373)
- (?z . ?\276)
- (?v . ?\242) ; v accent
- (?\~ . ?\242) ; v accent
- (?\. . ?\270) ; cedilla accent
- (?\ . ?~)))
-
- ("latin-3" latin-iso8859-3
- (?' (?A . ?\301) (?E . ?\311) (?I . ?\315) (?O . ?\323) (?U . ?\332)
- (?a . ?\341) (?e . ?\351) (?i . ?\355) (?o . ?\363) (?u . ?\372)
- (?' . ?\264) (?\ . ?'))
- (?` (?A . ?\300) (?E . ?\310) (?I . ?\314) (?O . ?\322) (?U . ?\331)
- (?a . ?\340) (?e . ?\350) (?i . ?\354) (?o . ?\362) (?u . ?\371)
- (?` . ?`) (?\ . ?`))
- (?^ (?A . ?\302) (?C . ?\306) (?E . ?\312) (?G . ?\330) (?H . ?\246)
- (?I . ?\316) (?J . ?\254) (?O . ?\324) (?S . ?\336) (?U . ?\333)
- (?a . ?\342) (?c . ?\346) (?e . ?\352) (?g . ?\370) (?h . ?\266)
- (?i . ?\356) (?j . ?\274) (?o . ?\364) (?s . ?\376) (?u . ?\373)
- (?^ . ?^) (?\ . ?^))
- (?\" (?A . ?\304) (?E . ?\313) (?I . ?\317) (?O . ?\326) (?U . ?\334)
- (?a . ?\344) (?e . ?\353) (?i . ?\357) (?o . ?\366) (?u . ?\374)
- (?s . ?\337)
- (?\" . ?\250) (?\ . ?\"))
- (?~ (?A . ?\303) (?C . ?\307) (?D . ?\320) (?N . ?\321) (?O . ?\325)
- (?a . ?\343) (?c . ?\347) (?d . ?\360) (?n . ?\361) (?o . ?\365)
- (?$ . ?\245) (?S . ?\252) (?s . ?\272) (?G . ?\253) (?g . ?\273)
- (?U . ?\335) (?u . ?\375) (?` . ?\242)
- (?~ . ?\270) (?\ . ?~))
- (?/ (?C . ?\305) (?G . ?\325) (?H . ?\241) (?I . ?\251) (?Z . ?\257)
- (?c . ?\345) (?g . ?\365) (?h . ?\261) (?i . ?\271) (?z . ?\277)
- (?r . ?\256)
- (?. . ?\377) (?# . ?\243) (?$ . ?\244)
- (?/ . ?\260) (?\ . ?/))
- (?. (?C . ?\305) (?G . ?\325) (?I . ?\251) (?Z . ?\257)
- (?c . ?\345) (?g . ?\365) (?z . ?\277))))
- "List of language-specific customizations for the ISO Accents mode.
-
-Each element of the list is of the form
-
- (LANGUAGE [CHARSET]
- (PSEUDO-ACCENT MAPPINGS)
- (PSEUDO-ACCENT MAPPINGS)
- ...)
-
-LANGUAGE is a string naming the language.
-CHARSET (which may be omitted) is the symbol name
- of the character set used in this language.
- If CHARSET is omitted, latin-iso8859-1 is the default.
-PSEUDO-ACCENT is a char specifying an accent key.
-MAPPINGS are cons cells of the form (CHAR . ISO-CHAR).
-
-The net effect is that the key sequence PSEUDO-ACCENT CHAR is mapped
-to ISO-CHAR on input.")
-
-(defvar iso-language nil
- "Language for which ISO Accents mode is currently customized.
-Change it with the `iso-accents-customize' function.")
-
-(defvar iso-accents-list nil
- "Association list for ISO accent combinations, for the chosen language.")
-
-(defcustom iso-accents-mode nil
- "Non-nil enables ISO Accents mode.
-Setting this variable makes it local to the current buffer.
-See the function `iso-accents-mode'."
- :type 'boolean
- :group 'iso-acc)
-(make-variable-buffer-local 'iso-accents-mode)
-
-(defcustom iso-accents-enable '(?' ?` ?^ ?\" ?~ ?/)
- "List of accent keys that become prefixes in ISO Accents mode.
-The default is (?\\=' ?\\=` ?^ ?\" ?~ ?/), which contains all the supported
-accent keys. If you set this variable to a list in which some of those
-characters are missing, the missing ones do not act as accents.
-
-Note that if you specify a language with `iso-accents-customize',
-that can also turn off certain prefixes (whichever ones are not needed in
-the language you choose)."
- :type '(repeat character)
- :group 'iso-acc)
-
-(defun iso-accents-accent-key (prompt)
- "Modify the following character by adding an accent to it."
- ;; Pick up the accent character.
- (if (and iso-accents-mode
- (memq last-input-event iso-accents-enable))
- (iso-accents-compose prompt)
- (vector last-input-event)))
-
-
-;; The iso-accents-compose function is called deep inside Emacs' read
-;; key sequence machinery, so the call to read-event below actually
-;; recurses into that machinery. Doing that does not cause any
-;; problem on its own, but read-event will have marked the window's
-;; display matrix to be accurate -- which is broken by the subsequent
-;; call to delete-region. Therefore, we must call force-window-update
-;; after delete-region to explicitly clear the accurate state of the
-;; window's display matrix.
-
-(defun iso-accents-compose (prompt)
- (let* ((first-char last-input-event)
- (list (assq first-char iso-accents-list))
- ;; Wait for the second key and look up the combination.
- (second-char (if (or prompt
- (not (eq (key-binding "a")
- 'self-insert-command))
- ;; Not at start of a key sequence.
- (> (length (this-single-command-keys)) 1)
- ;; Called from anything but the command loop.
- this-command)
- (progn
- (message "%s%c"
- (or prompt "Compose with ")
- first-char)
- (read-event))
- (insert first-char)
- (prog1 (read-event)
- (delete-region (1- (point)) (point))
- ;; Display is no longer up-to-date.
- (force-window-update (selected-window)))))
- (entry (cdr (assq second-char list))))
- (if entry
- ;; Found it: return the mapped char
- (vector
- (if (and enable-multibyte-characters
- (>= entry ?\200))
- (+ iso-accents-insert-offset entry)
- entry))
- ;; Otherwise, advance and schedule the second key for execution.
- (push second-char unread-command-events)
- (vector first-char))))
-
-;; It is a matter of taste if you want the minor mode indicated
-;; in the mode line...
-;; If so, uncomment the next four lines.
-;; (or (assq 'iso-accents-mode minor-mode-alist)
-;; (setq minor-mode-alist
-;; (append minor-mode-alist
-;; '((iso-accents-mode " ISO-Acc")))))
-
-;;;###autoload
-(defun iso-accents-mode (&optional arg)
- "Toggle ISO Accents mode, in which accents modify the following letter.
-This permits easy insertion of accented characters according to ISO-8859-1.
-When Iso-accents mode is enabled, accent character keys
-\(\\=`, \\=', \", ^, / and ~) do not self-insert; instead, they modify the following
-letter key so that it inserts an ISO accented letter.
-
-You can customize ISO Accents mode to a particular language
-with the command `iso-accents-customize'.
-
-Special combinations: ~c gives a c with cedilla,
-~d gives an Icelandic eth (d with dash).
-~t gives an Icelandic thorn.
-\"s gives German sharp s.
-/a gives a with ring.
-/e gives an a-e ligature.
-~< and ~> give guillemots.
-~! gives an inverted exclamation mark.
-~? gives an inverted question mark.
-
-With an argument, a positive argument enables ISO Accents mode,
-and a negative argument disables it."
-
- (interactive "P")
-
- (if (if arg
- ;; Negative arg means switch it off.
- (<= (prefix-numeric-value arg) 0)
- ;; No arg means toggle.
- iso-accents-mode)
- (setq iso-accents-mode nil)
-
- ;; Enable electric accents.
- (setq iso-accents-mode t)))
-
-(defun iso-accents-customize (language)
- "Customize the ISO accents machinery for a particular language.
-It selects the customization based on the specifications in the
-`iso-languages' variable."
- (interactive (list (completing-read "Language: " iso-languages nil t)))
- (let ((table (cdr (assoc language iso-languages)))
- all-accents tail)
- (if (not table)
- (error "Unknown language `%s'" language)
- (setq iso-accents-insert-offset (- (make-char (if (symbolp (car table))
- (car table)
- 'latin-iso8859-1))
- 128))
- (if (symbolp (car table))
- (setq table (cdr table)))
- (setq iso-language language
- iso-accents-list table)
- (if key-translation-map
- (substitute-key-definition
- 'iso-accents-accent-key nil key-translation-map)
- (setq key-translation-map (make-sparse-keymap)))
- ;; Set up translations for all the characters that are used as
- ;; accent prefixes in this language.
- (setq tail iso-accents-list)
- (while tail
- (define-key key-translation-map (vector (car (car tail)))
- 'iso-accents-accent-key)
- (setq tail (cdr tail))))))
-
-(defun iso-accentuate (start end)
- "Convert two-character sequences in region into accented characters.
-Noninteractively, this operates on text from START to END.
-This uses the same conversion that ISO Accents mode uses for type-in."
- (interactive "r")
- (save-excursion
- (save-restriction
- (narrow-to-region start end)
- (goto-char start)
- (forward-char 1)
- (let (entry)
- (while (< (point) end)
- (if (and (memq (preceding-char) iso-accents-enable)
- (setq entry (cdr (assq (following-char) (assq (preceding-char) iso-accents-list)))))
- (progn
- (forward-char -1)
- (delete-char 2)
- (insert entry)
- (setq end (1- end)))
- (forward-char 1)))))))
-
-(defun iso-accent-rassoc-unit (value alist)
- (let (elt acc)
- (while (and alist (not elt))
- (setq acc (car (car alist))
- elt (car (rassq value (cdr (car alist))))
- alist (cdr alist)))
- (if elt
- (cons acc elt))))
-
-(defun iso-unaccentuate (start end)
- "Convert accented characters in the region into two-character sequences.
-Noninteractively, this operates on text from START to END.
-This uses the opposite of the conversion done by ISO Accents mode for type-in."
- (interactive "r")
- (save-excursion
- (save-restriction
- (narrow-to-region start end)
- (goto-char start)
- (let (entry)
- (while (< (point) end)
- (if (and (> (following-char) 127)
- (setq entry (iso-accent-rassoc-unit (following-char)
- iso-accents-list)))
- (progn
- (delete-char 1)
- (insert (car entry) (cdr entry))
- (setq end (1+ end)))
- (forward-char 1)))))))
-
-(defun iso-deaccentuate (start end)
- "Convert accented characters in the region into unaccented characters.
-Noninteractively, this operates on text from START to END."
- (interactive "r")
- (save-excursion
- (save-restriction
- (narrow-to-region start end)
- (goto-char start)
- (let (entry)
- (while (< (point) end)
- (if (and (> (following-char) 127)
- (setq entry (iso-accent-rassoc-unit (following-char)
- iso-accents-list)))
- (progn
- (delete-char 1)
- (insert (cdr entry)))
- (forward-char 1)))))))
-
-;; Set up the default settings.
-(iso-accents-customize "latin-1")
-
-;; Use Iso-Accents mode in the minibuffer
-;; if it was in use in the previous buffer.
-(defun iso-acc-minibuf-setup ()
- (setq iso-accents-mode
- (with-current-buffer (window-buffer minibuffer-scroll-window)
- iso-accents-mode)))
-
-(add-hook 'minibuffer-setup-hook 'iso-acc-minibuf-setup)
-
-;;; iso-acc.el ends here
+++ /dev/null
-;;; iso-insert.el --- insert functions for ISO 8859/1
-
-;; Copyright (C) 1987, 1994, 2001-2016 Free Software Foundation, Inc.
-
-;; Author: Howard Gayle
-;; Maintainer: emacs-devel@gnu.org
-;; Keywords: i18n
-;; Obsolete-since: 22.1
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software: you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; Provides keys for inserting ISO Latin-1 characters. They use the
-;; prefix key C-x 8. Type C-x 8 C-h for a list.
-
-;;; Code:
-
-(defun insert-no-break-space ()
- (interactive "*")
- (insert ?\ )
-)
-
-(defun insert-inverted-exclamation-mark ()
- (interactive "*")
- (insert ?\¡)
-)
-
-(defun insert-cent-sign ()
- (interactive "*")
- (insert ?\¢)
-)
-
-(defun insert-pound-sign ()
- (interactive "*")
- (insert ?\£)
-)
-
-(defun insert-general-currency-sign ()
- (interactive "*")
- (insert ?\¤)
-)
-
-(defun insert-yen-sign ()
- (interactive "*")
- (insert ?\¥)
-)
-
-(defun insert-broken-vertical-line ()
- (interactive "*")
- (insert ?\¦)
-)
-
-(defun insert-section-sign ()
- (interactive "*")
- (insert ?\§)
-)
-
-(defun insert-diaeresis ()
- (interactive "*")
- (insert ?\¨)
-)
-
-(defun insert-copyright-sign ()
- (interactive "*")
- (insert ?\©)
-)
-
-(defun insert-ordinal-indicator-feminine ()
- (interactive "*")
- (insert ?\ª)
-)
-
-(defun insert-angle-quotation-mark-left ()
- (interactive "*")
- (insert ?\«)
-)
-
-(defun insert-not-sign ()
- (interactive "*")
- (insert ?\¬)
-)
-
-(defun insert-soft-hyphen ()
- (interactive "*")
- (insert ?\)
-)
-
-(defun insert-registered-sign ()
- (interactive "*")
- (insert ?\®)
-)
-
-(defun insert-macron ()
- (interactive "*")
- (insert ?\¯)
-)
-
-(defun insert-degree-sign ()
- (interactive "*")
- (insert ?\°)
-)
-
-(defun insert-plus-or-minus-sign ()
- (interactive "*")
- (insert ?\±)
-)
-
-(defun insert-superscript-two ()
- (interactive "*")
- (insert ?\²)
-)
-
-(defun insert-superscript-three ()
- (interactive "*")
- (insert ?\³)
-)
-
-(defun insert-acute-accent ()
- (interactive "*")
- (insert ?\´)
-)
-
-(defun insert-micro-sign ()
- (interactive "*")
- (insert ?\µ)
-)
-
-(defun insert-pilcrow ()
- (interactive "*")
- (insert ?\¶)
-)
-
-(defun insert-middle-dot ()
- (interactive "*")
- (insert ?\·)
-)
-
-(defun insert-cedilla ()
- (interactive "*")
- (insert ?\¸)
-)
-
-(defun insert-superscript-one ()
- (interactive "*")
- (insert ?\¹)
-)
-
-(defun insert-ordinal-indicator-masculine ()
- (interactive "*")
- (insert ?\º)
-)
-
-(defun insert-angle-quotation-mark-right ()
- (interactive "*")
- (insert ?\»)
-)
-
-(defun insert-fraction-one-quarter ()
- (interactive "*")
- (insert ?\¼)
-)
-
-(defun insert-fraction-one-half ()
- (interactive "*")
- (insert ?\½)
-)
-
-(defun insert-fraction-three-quarters ()
- (interactive "*")
- (insert ?\¾)
-)
-
-(defun insert-inverted-question-mark ()
- (interactive "*")
- (insert ?\¿)
-)
-
-(defun insert-A-grave ()
- (interactive "*")
- (insert ?\À)
-)
-
-(defun insert-A-acute ()
- (interactive "*")
- (insert ?\Á)
-)
-
-(defun insert-A-circumflex ()
- (interactive "*")
- (insert ?\Â)
-)
-
-(defun insert-A-tilde ()
- (interactive "*")
- (insert ?\Ã)
-)
-
-(defun insert-A-umlaut ()
- (interactive "*")
- (insert ?\Ä)
-)
-
-(defun insert-A-ring ()
- (interactive "*")
- (insert ?\Å)
-)
-
-(defun insert-AE ()
- (interactive "*")
- (insert ?\Æ)
-)
-
-(defun insert-C-cedilla ()
- (interactive "*")
- (insert ?\Ç)
-)
-
-(defun insert-E-grave ()
- (interactive "*")
- (insert ?\È)
-)
-
-(defun insert-E-acute ()
- (interactive "*")
- (insert ?\É)
-)
-
-(defun insert-E-circumflex ()
- (interactive "*")
- (insert ?\Ê)
-)
-
-(defun insert-E-umlaut ()
- (interactive "*")
- (insert ?\Ë)
-)
-
-(defun insert-I-grave ()
- (interactive "*")
- (insert ?\Ì)
-)
-
-(defun insert-I-acute ()
- (interactive "*")
- (insert ?\Í)
-)
-
-(defun insert-I-circumflex ()
- (interactive "*")
- (insert ?\Î)
-)
-
-(defun insert-I-umlaut ()
- (interactive "*")
- (insert ?\Ï)
-)
-
-(defun insert-D-stroke ()
- (interactive "*")
- (insert ?\Ð)
-)
-
-(defun insert-N-tilde ()
- (interactive "*")
- (insert ?\Ñ)
-)
-
-(defun insert-O-grave ()
- (interactive "*")
- (insert ?\Ò)
-)
-
-(defun insert-O-acute ()
- (interactive "*")
- (insert ?\Ó)
-)
-
-(defun insert-O-circumflex ()
- (interactive "*")
- (insert ?\Ô)
-)
-
-(defun insert-O-tilde ()
- (interactive "*")
- (insert ?\Õ)
-)
-
-(defun insert-O-umlaut ()
- (interactive "*")
- (insert ?\Ö)
-)
-
-(defun insert-multiplication-sign ()
- (interactive "*")
- (insert ?\×)
-)
-
-(defun insert-O-slash ()
- (interactive "*")
- (insert ?\Ø)
-)
-
-(defun insert-U-grave ()
- (interactive "*")
- (insert ?\Ù)
-)
-
-(defun insert-U-acute ()
- (interactive "*")
- (insert ?\Ú)
-)
-
-(defun insert-U-circumflex ()
- (interactive "*")
- (insert ?\Û)
-)
-
-(defun insert-U-umlaut ()
- (interactive "*")
- (insert ?\Ü)
-)
-
-(defun insert-Y-acute ()
- (interactive "*")
- (insert ?\Ý)
-)
-
-(defun insert-THORN ()
- (interactive "*")
- (insert ?\Þ)
-)
-
-(defun insert-ss ()
- (interactive "*")
- (insert ?\ß)
-)
-
-(defun insert-a-grave ()
- (interactive "*")
- (insert ?\à)
-)
-
-(defun insert-a-acute ()
- (interactive "*")
- (insert ?\á)
-)
-
-(defun insert-a-circumflex ()
- (interactive "*")
- (insert ?\â)
-)
-
-(defun insert-a-tilde ()
- (interactive "*")
- (insert ?\ã)
-)
-
-(defun insert-a-umlaut ()
- (interactive "*")
- (insert ?\ä)
-)
-
-(defun insert-a-ring ()
- (interactive "*")
- (insert ?\å)
-)
-
-(defun insert-ae ()
- (interactive "*")
- (insert ?\æ)
-)
-
-(defun insert-c-cedilla ()
- (interactive "*")
- (insert ?\ç)
-)
-
-(defun insert-e-grave ()
- (interactive "*")
- (insert ?\è)
-)
-
-(defun insert-e-acute ()
- (interactive "*")
- (insert ?\é)
-)
-
-(defun insert-e-circumflex ()
- (interactive "*")
- (insert ?\ê)
-)
-
-(defun insert-e-umlaut ()
- (interactive "*")
- (insert ?\ë)
-)
-
-(defun insert-i-grave ()
- (interactive "*")
- (insert ?\ì)
-)
-
-(defun insert-i-acute ()
- (interactive "*")
- (insert ?\í)
-)
-
-(defun insert-i-circumflex ()
- (interactive "*")
- (insert ?\î)
-)
-
-(defun insert-i-umlaut ()
- (interactive "*")
- (insert ?\ï)
-)
-
-(defun insert-d-stroke ()
- (interactive "*")
- (insert ?\ð)
-)
-
-(defun insert-n-tilde ()
- (interactive "*")
- (insert ?\ñ)
-)
-
-(defun insert-o-grave ()
- (interactive "*")
- (insert ?\ò)
-)
-
-(defun insert-o-acute ()
- (interactive "*")
- (insert ?\ó)
-)
-
-(defun insert-o-circumflex ()
- (interactive "*")
- (insert ?\ô)
-)
-
-(defun insert-o-tilde ()
- (interactive "*")
- (insert ?\õ)
-)
-
-(defun insert-o-umlaut ()
- (interactive "*")
- (insert ?\ö)
-)
-
-(defun insert-division-sign ()
- (interactive "*")
- (insert ?\÷)
-)
-
-(defun insert-o-slash ()
- (interactive "*")
- (insert ?\ø)
-)
-
-(defun insert-u-grave ()
- (interactive "*")
- (insert ?\ù)
-)
-
-(defun insert-u-acute ()
- (interactive "*")
- (insert ?\ú)
-)
-
-(defun insert-u-circumflex ()
- (interactive "*")
- (insert ?\û)
-)
-
-(defun insert-u-umlaut ()
- (interactive "*")
- (insert ?\ü)
-)
-
-(defun insert-y-acute ()
- (interactive "*")
- (insert ?\ý)
-)
-
-(defun insert-thorn ()
- (interactive "*")
- (insert ?\þ)
-)
-
-(defun insert-y-umlaut ()
- (interactive "*")
- (insert ?\ÿ)
-)
-
-(defvar 8859-1-map nil "Keymap for ISO 8859/1 character insertion.")
-(if 8859-1-map nil
- (setq 8859-1-map (make-keymap))
- (define-key 8859-1-map " " 'insert-no-break-space)
- (define-key 8859-1-map "!" 'insert-inverted-exclamation-mark)
- (define-key 8859-1-map "\"" (make-sparse-keymap))
- (define-key 8859-1-map "\"\"" 'insert-diaeresis)
- (define-key 8859-1-map "\"A" 'insert-A-umlaut)
- (define-key 8859-1-map "\"E" 'insert-E-umlaut)
- (define-key 8859-1-map "\"I" 'insert-I-umlaut)
- (define-key 8859-1-map "\"O" 'insert-O-umlaut)
- (define-key 8859-1-map "\"U" 'insert-U-umlaut)
- (define-key 8859-1-map "\"a" 'insert-a-umlaut)
- (define-key 8859-1-map "\"e" 'insert-e-umlaut)
- (define-key 8859-1-map "\"i" 'insert-i-umlaut)
- (define-key 8859-1-map "\"o" 'insert-o-umlaut)
- (define-key 8859-1-map "\"u" 'insert-u-umlaut)
- (define-key 8859-1-map "\"y" 'insert-y-umlaut)
- (define-key 8859-1-map "'" (make-sparse-keymap))
- (define-key 8859-1-map "''" 'insert-acute-accent)
- (define-key 8859-1-map "'A" 'insert-A-acute)
- (define-key 8859-1-map "'E" 'insert-E-acute)
- (define-key 8859-1-map "'I" 'insert-I-acute)
- (define-key 8859-1-map "'O" 'insert-O-acute)
- (define-key 8859-1-map "'U" 'insert-U-acute)
- (define-key 8859-1-map "'Y" 'insert-Y-acute)
- (define-key 8859-1-map "'a" 'insert-a-acute)
- (define-key 8859-1-map "'e" 'insert-e-acute)
- (define-key 8859-1-map "'i" 'insert-i-acute)
- (define-key 8859-1-map "'o" 'insert-o-acute)
- (define-key 8859-1-map "'u" 'insert-u-acute)
- (define-key 8859-1-map "'y" 'insert-y-acute)
- (define-key 8859-1-map "$" 'insert-general-currency-sign)
- (define-key 8859-1-map "+" 'insert-plus-or-minus-sign)
- (define-key 8859-1-map "," (make-sparse-keymap))
- (define-key 8859-1-map ",," 'insert-cedilla)
- (define-key 8859-1-map ",C" 'insert-C-cedilla)
- (define-key 8859-1-map ",c" 'insert-c-cedilla)
- (define-key 8859-1-map "-" 'insert-soft-hyphen)
- (define-key 8859-1-map "." 'insert-middle-dot)
- (define-key 8859-1-map "/" (make-sparse-keymap))
- (define-key 8859-1-map "//" 'insert-division-sign)
- (define-key 8859-1-map "/O" 'insert-O-slash)
- (define-key 8859-1-map "/o" 'insert-o-slash)
- (define-key 8859-1-map "1" (make-sparse-keymap))
- (define-key 8859-1-map "1/" (make-sparse-keymap))
- (define-key 8859-1-map "1/2" 'insert-fraction-one-half)
- (define-key 8859-1-map "1/4" 'insert-fraction-one-quarter)
- (define-key 8859-1-map "3" (make-sparse-keymap))
- (define-key 8859-1-map "3/" (make-sparse-keymap))
- (define-key 8859-1-map "3/4" 'insert-fraction-three-quarters)
- (define-key 8859-1-map "<" 'insert-angle-quotation-mark-left)
- (define-key 8859-1-map "=" 'insert-macron)
- (define-key 8859-1-map ">" 'insert-angle-quotation-mark-right)
- (define-key 8859-1-map "?" 'insert-inverted-question-mark)
- (define-key 8859-1-map "A" 'insert-A-ring)
- (define-key 8859-1-map "E" 'insert-AE)
- (define-key 8859-1-map "C" 'insert-copyright-sign)
- (define-key 8859-1-map "D" 'insert-D-stroke)
- (define-key 8859-1-map "L" 'insert-pound-sign)
- (define-key 8859-1-map "P" 'insert-pilcrow)
- (define-key 8859-1-map "R" 'insert-registered-sign)
- (define-key 8859-1-map "S" 'insert-section-sign)
- (define-key 8859-1-map "T" 'insert-THORN)
- (define-key 8859-1-map "Y" 'insert-yen-sign)
- (define-key 8859-1-map "^" (make-sparse-keymap))
- (define-key 8859-1-map "^1" 'insert-superscript-one)
- (define-key 8859-1-map "^2" 'insert-superscript-two)
- (define-key 8859-1-map "^3" 'insert-superscript-three)
- (define-key 8859-1-map "^A" 'insert-A-circumflex)
- (define-key 8859-1-map "^E" 'insert-E-circumflex)
- (define-key 8859-1-map "^I" 'insert-I-circumflex)
- (define-key 8859-1-map "^O" 'insert-O-circumflex)
- (define-key 8859-1-map "^U" 'insert-U-circumflex)
- (define-key 8859-1-map "^a" 'insert-a-circumflex)
- (define-key 8859-1-map "^e" 'insert-e-circumflex)
- (define-key 8859-1-map "^i" 'insert-i-circumflex)
- (define-key 8859-1-map "^o" 'insert-o-circumflex)
- (define-key 8859-1-map "^u" 'insert-u-circumflex)
- (define-key 8859-1-map "_" (make-sparse-keymap))
- (define-key 8859-1-map "_a" 'insert-ordinal-indicator-feminine)
- (define-key 8859-1-map "_o" 'insert-ordinal-indicator-masculine)
- (define-key 8859-1-map "`" (make-sparse-keymap))
- (define-key 8859-1-map "`A" 'insert-A-grave)
- (define-key 8859-1-map "`E" 'insert-E-grave)
- (define-key 8859-1-map "`I" 'insert-I-grave)
- (define-key 8859-1-map "`O" 'insert-O-grave)
- (define-key 8859-1-map "`U" 'insert-U-grave)
- (define-key 8859-1-map "`a" 'insert-a-grave)
- (define-key 8859-1-map "`e" 'insert-e-grave)
- (define-key 8859-1-map "`i" 'insert-i-grave)
- (define-key 8859-1-map "`o" 'insert-o-grave)
- (define-key 8859-1-map "`u" 'insert-u-grave)
- (define-key 8859-1-map "a" 'insert-a-ring)
- (define-key 8859-1-map "e" 'insert-ae)
- (define-key 8859-1-map "c" 'insert-cent-sign)
- (define-key 8859-1-map "d" 'insert-d-stroke)
- (define-key 8859-1-map "o" 'insert-degree-sign)
- (define-key 8859-1-map "s" 'insert-ss)
- (define-key 8859-1-map "t" 'insert-thorn)
- (define-key 8859-1-map "u" 'insert-micro-sign)
- (define-key 8859-1-map "x" 'insert-multiplication-sign)
- (define-key 8859-1-map "|" 'insert-broken-vertical-line)
- (define-key 8859-1-map "~" (make-sparse-keymap))
- (define-key 8859-1-map "~A" 'insert-A-tilde)
- (define-key 8859-1-map "~N" 'insert-N-tilde)
- (define-key 8859-1-map "~O" 'insert-O-tilde)
- (define-key 8859-1-map "~a" 'insert-a-tilde)
- (define-key 8859-1-map "~n" 'insert-n-tilde)
- (define-key 8859-1-map "~o" 'insert-o-tilde)
- (define-key 8859-1-map "~~" 'insert-not-sign)
- (if (not (lookup-key global-map "\C-x8"))
- (define-key global-map "\C-x8" 8859-1-map))
-)
-(defalias '8859-1-map 8859-1-map)
-
-(provide 'iso-insert)
-
-;;; iso-insert.el ends here
+++ /dev/null
-;;; iso-swed.el --- set up char tables for ISO 8859/1 for Swedish/Finnish ttys
-
-;; Copyright (C) 1987, 2001-2016 Free Software Foundation, Inc.
-
-;; Author: Howard Gayle
-;; Maintainer: emacs-devel@gnu.org
-;; Keywords: i18n
-;; Obsolete-since: 22.1
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software: you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; Written by Howard Gayle. See case-table.el for details.
-
-;;; Code:
-
-;; This code sets up to display ISO 8859/1 characters on
-;; terminals that have ASCII in the G0 set and a Swedish/Finnish
-;; version of ISO 646 in the G1 set. The G1 set differs from
-;; ASCII as follows:
-;;
-;; ASCII G1
-;; $ general currency sign
-;; @ capital E with acute accent
-;; [ capital A with diaeresis or umlaut mark
-;; \ capital O with diaeresis or umlaut mark
-;; ] capital A with ring
-;; ^ capital U with diaeresis or umlaut mark
-;; ` small e with acute accent
-;; { small a with diaeresis or umlaut mark
-;; | small o with diaeresis or umlaut mark
-;; } small a with ring
-;; ~ small u with diaeresis or umlaut mark
-
-(require 'disp-table)
-
-(standard-display-ascii 160 "{_}") ; NBSP (no-break space)
-(standard-display-ascii 161 "{!}") ; inverted exclamation mark
-(standard-display-ascii 162 "{c}") ; cent sign
-(standard-display-ascii 163 "{GBP}") ; pound sign
-(standard-display-g1 164 ?$) ; general currency sign
-(standard-display-ascii 165 "{JPY}") ; yen sign
-(standard-display-ascii 166 "{|}") ; broken vertical line
-(standard-display-ascii 167 "{S}") ; section sign
-(standard-display-ascii 168 "{\"}") ; diaeresis
-(standard-display-ascii 169 "{C}") ; copyright sign
-(standard-display-ascii 170 "{_a}") ; ordinal indicator, feminine
-(standard-display-ascii 171 "{<<}") ; left angle quotation mark
-(standard-display-ascii 172 "{~}") ; not sign
-(standard-display-ascii 173 "{-}") ; soft hyphen
-(standard-display-ascii 174 "{R}") ; registered sign
-(standard-display-ascii 175 "{=}") ; macron
-(standard-display-ascii 176 "{o}") ; degree sign
-(standard-display-ascii 177 "{+-}") ; plus or minus sign
-(standard-display-ascii 178 "{2}") ; superscript two
-(standard-display-ascii 179 "{3}") ; superscript three
-(standard-display-ascii 180 "{'}") ; acute accent
-(standard-display-ascii 181 "{u}") ; micro sign
-(standard-display-ascii 182 "{P}") ; pilcrow
-(standard-display-ascii 183 "{.}") ; middle dot
-(standard-display-ascii 184 "{,}") ; cedilla
-(standard-display-ascii 185 "{1}") ; superscript one
-(standard-display-ascii 186 "{_o}") ; ordinal indicator, masculine
-(standard-display-ascii 187 "{>>}") ; right angle quotation mark
-(standard-display-ascii 188 "{1/4}") ; fraction one-quarter
-(standard-display-ascii 189 "{1/2}") ; fraction one-half
-(standard-display-ascii 190 "{3/4}") ; fraction three-quarters
-(standard-display-ascii 191 "{?}") ; inverted question mark
-(standard-display-ascii 192 "{`A}") ; A with grave accent
-(standard-display-ascii 193 "{'A}") ; A with acute accent
-(standard-display-ascii 194 "{^A}") ; A with circumflex accent
-(standard-display-ascii 195 "{~A}") ; A with tilde
-(standard-display-g1 196 ?[) ; A with diaeresis or umlaut mark
-(standard-display-g1 197 ?]) ; A with ring
-(standard-display-ascii 198 "{AE}") ; AE diphthong
-(standard-display-ascii 199 "{,C}") ; C with cedilla
-(standard-display-ascii 200 "{`E}") ; E with grave accent
-(standard-display-g1 201 ?@) ; E with acute accent
-(standard-display-ascii 202 "{^E}") ; E with circumflex accent
-(standard-display-ascii 203 "{\"E}") ; E with diaeresis or umlaut mark
-(standard-display-ascii 204 "{`I}") ; I with grave accent
-(standard-display-ascii 205 "{'I}") ; I with acute accent
-(standard-display-ascii 206 "{^I}") ; I with circumflex accent
-(standard-display-ascii 207 "{\"I}") ; I with diaeresis or umlaut mark
-(standard-display-ascii 208 "{-D}") ; D with stroke, Icelandic eth
-(standard-display-ascii 209 "{~N}") ; N with tilde
-(standard-display-ascii 210 "{`O}") ; O with grave accent
-(standard-display-ascii 211 "{'O}") ; O with acute accent
-(standard-display-ascii 212 "{^O}") ; O with circumflex accent
-(standard-display-ascii 213 "{~O}") ; O with tilde
-(standard-display-g1 214 ?\\) ; O with diaeresis or umlaut mark
-(standard-display-ascii 215 "{x}") ; multiplication sign
-(standard-display-ascii 216 "{/O}") ; O with slash
-(standard-display-ascii 217 "{`U}") ; U with grave accent
-(standard-display-ascii 218 "{'U}") ; U with acute accent
-(standard-display-ascii 219 "{^U}") ; U with circumflex accent
-(standard-display-g1 220 ?^) ; U with diaeresis or umlaut mark
-(standard-display-ascii 221 "{'Y}") ; Y with acute accent
-(standard-display-ascii 222 "{TH}") ; capital thorn, Icelandic
-(standard-display-ascii 223 "{ss}") ; small sharp s, German
-(standard-display-ascii 224 "{`a}") ; a with grave accent
-(standard-display-ascii 225 "{'a}") ; a with acute accent
-(standard-display-ascii 226 "{^a}") ; a with circumflex accent
-(standard-display-ascii 227 "{~a}") ; a with tilde
-(standard-display-g1 228 ?{) ; a with diaeresis or umlaut mark
-(standard-display-g1 229 ?}) ; a with ring
-(standard-display-ascii 230 "{ae}") ; ae diphthong
-(standard-display-ascii 231 "{,c}") ; c with cedilla
-(standard-display-ascii 232 "{`e}") ; e with grave accent
-(standard-display-g1 233 ?`) ; e with acute accent
-(standard-display-ascii 234 "{^e}") ; e with circumflex accent
-(standard-display-ascii 235 "{\"e}") ; e with diaeresis or umlaut mark
-(standard-display-ascii 236 "{`i}") ; i with grave accent
-(standard-display-ascii 237 "{'i}") ; i with acute accent
-(standard-display-ascii 238 "{^i}") ; i with circumflex accent
-(standard-display-ascii 239 "{\"i}") ; i with diaeresis or umlaut mark
-(standard-display-ascii 240 "{-d}") ; d with stroke, Icelandic eth
-(standard-display-ascii 241 "{~n}") ; n with tilde
-(standard-display-ascii 242 "{`o}") ; o with grave accent
-(standard-display-ascii 243 "{'o}") ; o with acute accent
-(standard-display-ascii 244 "{^o}") ; o with circumflex accent
-(standard-display-ascii 245 "{~o}") ; o with tilde
-(standard-display-g1 246 ?|) ; o with diaeresis or umlaut mark
-(standard-display-ascii 247 "{/}") ; division sign
-(standard-display-ascii 248 "{/o}") ; o with slash
-(standard-display-ascii 249 "{`u}") ; u with grave accent
-(standard-display-ascii 250 "{'u}") ; u with acute accent
-(standard-display-ascii 251 "{^u}") ; u with circumflex accent
-(standard-display-g1 252 ?~) ; u with diaeresis or umlaut mark
-(standard-display-ascii 253 "{'y}") ; y with acute accent
-(standard-display-ascii 254 "{th}") ; small thorn, Icelandic
-(standard-display-ascii 255 "{\"y}") ; small y with diaeresis or umlaut mark
-
-(provide 'iso-swed)
-
-;;; iso-swed.el ends here
+++ /dev/null
-;;; resume.el --- process command line args from within a suspended Emacs job
-
-;; Copyright (C) 1992, 2001-2016 Free Software Foundation, Inc.
-
-;; Author: Joe Wells <jbw@bucsf.bu.edu>
-;; Adapted-By: ESR
-;; Keywords: processes
-;; Obsolete-since: 23.1
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software: you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; The purpose of this library is to handle command line arguments
-;; when you resume an existing Emacs job.
-
-;; In order to use it, you must put this code in your .emacs file.
-
-;; (add-hook 'suspend-hook 'resume-suspend-hook)
-;; (add-hook 'suspend-resume-hook 'resume-process-args)
-
-;; You can't get the benefit of this library by using the `emacs' command,
-;; since that always starts a new Emacs job. Instead you must use a
-;; command called `edit' which knows how to resume an existing Emacs job
-;; if you have one, or start a new Emacs job if you don't have one.
-
-;; To define the `edit' command, run the script etc/emacs.csh (if you use CSH),
-;; or etc/emacs.bash if you use BASH. You would normally do this in your
-;; login script.
-
-;; Stephan Gildea suggested bug fix (gildea@bbn.com).
-;; Ideas from Michael DeCorte and other people.
-
-;;; Code:
-
-(defvar resume-emacs-args-file (expand-file-name "~/.emacs_args")
- "This file is where arguments are placed for a suspended Emacs job.")
-
-(defvar resume-emacs-args-buffer " *Command Line Args*"
- "Buffer that is used by `resume-process-args'.")
-
-(defun resume-process-args ()
- "Handler for command line args given when Emacs is resumed."
- (let ((start-buffer (current-buffer))
- (args-buffer (get-buffer-create resume-emacs-args-buffer))
- length args
- (command-line-default-directory default-directory))
- (unwind-protect
- (progn
- (set-buffer args-buffer)
- (erase-buffer)
- ;; get the contents of resume-emacs-args-file
- (condition-case ()
- (let ((result (insert-file-contents resume-emacs-args-file)))
- (setq length (car (cdr result))))
- ;; the file doesn't exist, ergo no arguments
- (file-error
- (erase-buffer)
- (setq length 0)))
- (if (<= length 0)
- (setq args nil)
- ;; get the arguments from the buffer
- (goto-char (point-min))
- (while (not (eobp))
- (skip-chars-forward " \t\n")
- (let ((begin (point)))
- (skip-chars-forward "^ \t\n")
- (setq args (cons (buffer-substring begin (point)) args)))
- (skip-chars-forward " \t\n"))
- ;; arguments are now in reverse order
- (setq args (nreverse args))
- ;; make sure they're not read again
- (erase-buffer))
- (resume-write-buffer-to-file (current-buffer) resume-emacs-args-file)
- ;; if nothing was in buffer, args will be null
- (or (null args)
- (setq command-line-default-directory
- (file-name-as-directory (car args))
- args (cdr args)))
- ;; actually process the arguments
- (command-line-1 args))
- ;; If the command line args don't result in a find-file, the
- ;; buffer will be left in args-buffer. So we change back to the
- ;; original buffer. The reason I don't just use
- ;; (let ((default-directory foo))
- ;; (command-line-1 args))
- ;; in the context of the original buffer is because let does not
- ;; work properly with buffer-local variables.
- (if (eq (current-buffer) args-buffer)
- (set-buffer start-buffer)))))
-
-;;;###autoload
-(defun resume-suspend-hook ()
- "Clear out the file used for transmitting args when Emacs resumes."
- (with-current-buffer (get-buffer-create resume-emacs-args-buffer)
- (erase-buffer)
- (resume-write-buffer-to-file (current-buffer) resume-emacs-args-file)))
-
-(defun resume-write-buffer-to-file (buffer file)
- "Writes the contents of BUFFER into FILE, if permissions allow."
- (if (not (file-writable-p file))
- (error "No permission to write file %s" file))
- (with-current-buffer buffer
- (clear-visited-file-modtime)
- (save-restriction
- (widen)
- (write-region (point-min) (point-max) file nil 'quiet))
- (set-buffer-modified-p nil)))
-
-(provide 'resume)
-
-;;; resume.el ends here
+++ /dev/null
-;;; scribe.el --- scribe mode, and its idiosyncratic commands
-
-;; Copyright (C) 1985, 2001-2016 Free Software Foundation, Inc.
-
-;; Author: William Sommerfeld
-;; (according to ack.texi)
-;; Maintainer: emacs-devel@gnu.org
-;; Keywords: wp
-;; Obsolete-since: 22.1
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software: you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; A major mode for editing source in written for the Scribe text formatter.
-;; Knows about Scribe syntax and standard layout rules. The command to
-;; run Scribe on a buffer is bogus; someone interested should fix it.
-
-;;; Code:
-
-(defvar compile-command)
-
-(defgroup scribe nil
- "Scribe mode."
- :prefix "scribe-"
- :group 'wp)
-
-(defvar scribe-mode-syntax-table nil
- "Syntax table used while in scribe mode.")
-
-(defvar scribe-mode-abbrev-table nil
- "Abbrev table used while in scribe mode.")
-
-(defcustom scribe-fancy-paragraphs nil
- "Non-nil makes Scribe mode use a different style of paragraph separation."
- :type 'boolean
- :group 'scribe)
-
-(defcustom scribe-electric-quote nil
- "Non-nil makes insert of double quote use \\=`\\=` or \\='\\=' depending on context."
- :type 'boolean
- :group 'scribe)
-
-(defcustom scribe-electric-parenthesis nil
- "Non-nil makes parenthesis char ( (]}> ) automatically insert its close
-if typed after an @Command form."
- :type 'boolean
- :group 'scribe)
-
-(defconst scribe-open-parentheses "[({<"
- "Open parenthesis characters for Scribe.")
-
-(defconst scribe-close-parentheses "])}>"
- "Close parenthesis characters for Scribe.
-These should match up with `scribe-open-parenthesis'.")
-
-(if (null scribe-mode-syntax-table)
- (let ((st (syntax-table)))
- (unwind-protect
- (progn
- (setq scribe-mode-syntax-table (copy-syntax-table
- text-mode-syntax-table))
- (set-syntax-table scribe-mode-syntax-table)
- (modify-syntax-entry ?\" " ")
- (modify-syntax-entry ?\\ " ")
- (modify-syntax-entry ?@ "w ")
- (modify-syntax-entry ?< "(> ")
- (modify-syntax-entry ?> ")< ")
- (modify-syntax-entry ?[ "(] ")
- (modify-syntax-entry ?] ")[ ")
- (modify-syntax-entry ?{ "(} ")
- (modify-syntax-entry ?} "){ ")
- (modify-syntax-entry ?' "w "))
- (set-syntax-table st))))
-
-(defvar scribe-mode-map nil)
-
-(if scribe-mode-map
- nil
- (setq scribe-mode-map (make-sparse-keymap))
- (define-key scribe-mode-map "\t" 'scribe-tab)
- (define-key scribe-mode-map "\e\t" 'tab-to-tab-stop)
- (define-key scribe-mode-map "\es" 'center-line)
- (define-key scribe-mode-map "\e}" 'up-list)
- (define-key scribe-mode-map "\eS" 'center-paragraph)
- (define-key scribe-mode-map "\"" 'scribe-insert-quote)
- (define-key scribe-mode-map "(" 'scribe-parenthesis)
- (define-key scribe-mode-map "[" 'scribe-parenthesis)
- (define-key scribe-mode-map "{" 'scribe-parenthesis)
- (define-key scribe-mode-map "<" 'scribe-parenthesis)
- (define-key scribe-mode-map "\C-c\C-c" 'scribe-chapter)
- (define-key scribe-mode-map "\C-c\C-t" 'scribe-section)
- (define-key scribe-mode-map "\C-c\C-s" 'scribe-subsection)
- (define-key scribe-mode-map "\C-c\C-v" 'scribe-insert-environment)
- (define-key scribe-mode-map "\C-c\C-e" 'scribe-bracket-region-be)
- (define-key scribe-mode-map "\C-c[" 'scribe-begin)
- (define-key scribe-mode-map "\C-c]" 'scribe-end)
- (define-key scribe-mode-map "\C-c\C-i" 'scribe-italicize-word)
- (define-key scribe-mode-map "\C-c\C-b" 'scribe-bold-word)
- (define-key scribe-mode-map "\C-c\C-u" 'scribe-underline-word))
-
-;;;###autoload
-(define-derived-mode scribe-mode text-mode "Scribe"
- "Major mode for editing files of Scribe (a text formatter) source.
-Scribe-mode is similar to text-mode, with a few extra commands added.
-\\{scribe-mode-map}
-
-Interesting variables:
-
-`scribe-fancy-paragraphs'
- Non-nil makes Scribe mode use a different style of paragraph separation.
-
-`scribe-electric-quote'
- Non-nil makes insert of double quote use \\=`\\=` or \\='\\=' depending on context.
-
-`scribe-electric-parenthesis'
- Non-nil makes an open-parenthesis char (one of `([<{')
- automatically insert its close if typed after an @Command form."
- (set (make-local-variable 'comment-start) "@Comment[")
- (set (make-local-variable 'comment-start-skip) (concat "@Comment[" scribe-open-parentheses "]"))
- (set (make-local-variable 'comment-column) 0)
- (set (make-local-variable 'comment-end) "]")
- (set (make-local-variable 'paragraph-start)
- (concat "\\([\n\f]\\)\\|\\(@\\w+["
- scribe-open-parentheses
- "].*["
- scribe-close-parentheses
- "]$\\)"))
- (set (make-local-variable 'paragraph-separate)
- (if scribe-fancy-paragraphs paragraph-start "$"))
- (set (make-local-variable 'sentence-end)
- "\\([.?!]\\|@:\\)[]\"')}]*\\($\\| $\\|\t\\| \\)[ \t\n]*")
- (set (make-local-variable 'compile-command)
- (concat "scribe "
- (if buffer-file-name
- (shell-quote-argument (buffer-file-name))))))
-
-(defun scribe-tab ()
- (interactive)
- (insert "@\\"))
-
-;; This algorithm could probably be improved somewhat.
-;; Right now, it loses seriously...
-
-(defun scribe ()
- "Run Scribe on the current buffer."
- (interactive)
- (call-interactively 'compile))
-
-(defun scribe-envelop-word (string count)
- "Surround current word with Scribe construct @STRING[...].
-COUNT specifies how many words to surround. A negative count means
-to skip backward."
- (let ((spos (point)) (epos (point)) (ccoun 0) noparens)
- (if (not (zerop count))
- (progn (if (= (char-syntax (preceding-char)) ?w)
- (forward-sexp (min -1 count)))
- (setq spos (point))
- (if (looking-at (concat "@\\w[" scribe-open-parentheses "]"))
- (forward-char 2)
- (goto-char epos)
- (skip-chars-backward "\\W")
- (forward-char -1))
- (forward-sexp (max count 1))
- (setq epos (point))))
- (goto-char spos)
- (while (and (< ccoun (length scribe-open-parentheses))
- (save-excursion
- (or (search-forward (char-to-string
- (aref scribe-open-parentheses ccoun))
- epos t)
- (search-forward (char-to-string
- (aref scribe-close-parentheses ccoun))
- epos t)))
- (setq ccoun (1+ ccoun))))
- (if (>= ccoun (length scribe-open-parentheses))
- (progn (goto-char epos)
- (insert "@end(" string ")")
- (goto-char spos)
- (insert "@begin(" string ")"))
- (goto-char epos)
- (insert (aref scribe-close-parentheses ccoun))
- (goto-char spos)
- (insert "@" string (aref scribe-open-parentheses ccoun))
- (goto-char epos)
- (forward-char 3)
- (skip-chars-forward scribe-close-parentheses))))
-
-(defun scribe-underline-word (count)
- "Underline COUNT words around point by means of Scribe constructs."
- (interactive "p")
- (scribe-envelop-word "u" count))
-
-(defun scribe-bold-word (count)
- "Boldface COUNT words around point by means of Scribe constructs."
- (interactive "p")
- (scribe-envelop-word "b" count))
-
-(defun scribe-italicize-word (count)
- "Italicize COUNT words around point by means of Scribe constructs."
- (interactive "p")
- (scribe-envelop-word "i" count))
-
-(defun scribe-begin ()
- (interactive)
- (insert "\n")
- (forward-char -1)
- (scribe-envelop-word "Begin" 0)
- (re-search-forward (concat "[" scribe-open-parentheses "]")))
-
-(defun scribe-end ()
- (interactive)
- (insert "\n")
- (forward-char -1)
- (scribe-envelop-word "End" 0)
- (re-search-forward (concat "[" scribe-open-parentheses "]")))
-
-(defun scribe-chapter ()
- (interactive)
- (insert "\n")
- (forward-char -1)
- (scribe-envelop-word "Chapter" 0)
- (re-search-forward (concat "[" scribe-open-parentheses "]")))
-
-(defun scribe-section ()
- (interactive)
- (insert "\n")
- (forward-char -1)
- (scribe-envelop-word "Section" 0)
- (re-search-forward (concat "[" scribe-open-parentheses "]")))
-
-(defun scribe-subsection ()
- (interactive)
- (insert "\n")
- (forward-char -1)
- (scribe-envelop-word "SubSection" 0)
- (re-search-forward (concat "[" scribe-open-parentheses "]")))
-
-(defun scribe-bracket-region-be (env min max)
- (interactive "sEnvironment: \nr")
- (save-excursion
- (goto-char max)
- (insert "@end(" env ")\n")
- (goto-char min)
- (insert "@begin(" env ")\n")))
-
-(defun scribe-insert-environment (env)
- (interactive "sEnvironment: ")
- (scribe-bracket-region-be env (point) (point))
- (forward-line 1)
- (insert ?\n)
- (forward-char -1))
-
-(defun scribe-insert-quote (count)
- "Insert \\=`\\=`, \\='\\=' or \" according to preceding character.
-If `scribe-electric-quote' is non-nil, insert \\=`\\=`, \\='\\=' or \" according
-to preceding character. With numeric arg N, always insert N \" characters.
-Else just insert \"."
- (interactive "P")
- (if (or count (not scribe-electric-quote))
- (self-insert-command (prefix-numeric-value count))
- (let (lastfore lastback lastquote)
- (insert
- (cond
- ((= (preceding-char) ?\\) ?\")
- ((bobp) "``")
- (t
- (setq lastfore (save-excursion (and (search-backward
- "``" (- (point) 1000) t)
- (point)))
- lastback (save-excursion (and (search-backward
- "''" (- (point) 1000) t)
- (point)))
- lastquote (save-excursion (and (search-backward
- "\"" (- (point) 100) t)
- (point))))
- (if (not lastquote)
- (cond ((not lastfore) "``")
- ((not lastback) "''")
- ((> lastfore lastback) "''")
- (t "``"))
- (cond ((and (not lastback) (not lastfore)) "\"")
- ((and lastback (not lastfore) (> lastquote lastback)) "\"")
- ((and lastback (not lastfore) (> lastback lastquote)) "``")
- ((and lastfore (not lastback) (> lastquote lastfore)) "\"")
- ((and lastfore (not lastback) (> lastfore lastquote)) "''")
- ((and (> lastquote lastfore) (> lastquote lastback)) "\"")
- ((> lastfore lastback) "''")
- (t "``")))))))))
-
-(defun scribe-parenthesis (count)
- "If scribe-electric-parenthesis is non-nil, insertion of an open-parenthesis
-character inserts the following close parenthesis character if the
-preceding text is of the form @Command."
- (interactive "P")
- (self-insert-command (prefix-numeric-value count))
- (let (at-command paren-char point-save)
- (if (or count (not scribe-electric-parenthesis))
- nil
- (save-excursion
- (forward-char -1)
- (setq point-save (point))
- (skip-chars-backward (concat "^ \n\t\f" scribe-open-parentheses))
- (setq at-command (and (equal (following-char) ?@)
- (/= (point) (1- point-save)))))
- (if (and at-command
- (setq paren-char
- (string-match (regexp-quote
- (char-to-string (preceding-char)))
- scribe-open-parentheses)))
- (save-excursion
- (insert (aref scribe-close-parentheses paren-char)))))))
-
-(provide 'scribe)
-
-;;; scribe.el ends here
+++ /dev/null
-;;; spell.el --- spelling correction interface for Emacs
-
-;; Copyright (C) 1985, 2001-2016 Free Software Foundation, Inc.
-
-;; Maintainer: emacs-devel@gnu.org
-;; Keywords: wp, unix
-;; Obsolete-since: 23.1
-;; (not in obsolete/ directory then, but all functions marked obsolete)
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software: you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; This mode provides an Emacs interface to the UNIX spell(1) program.
-;; Entry points are `spell-buffer', `spell-word', `spell-region' and
-;; `spell-string'.
-
-;; See also ispell.el for an interface to the ispell program.
-
-;;; Code:
-
-(defgroup spell nil
- "Interface to the UNIX spell(1) program."
- :prefix "spell-"
- :group 'applications)
-
-(defcustom spell-command "spell"
- "Command to run the spell program."
- :type 'string
- :group 'spell)
-
-(defcustom spell-filter nil
- "Filter function to process text before passing it to spell program.
-This function might remove text-processor commands.
-nil means don't alter the text before checking it."
- :type '(choice (const nil) function)
- :group 'spell)
-
-;;;###autoload
-(put 'spell-filter 'risky-local-variable t)
-
-;;;###autoload
-(defun spell-buffer ()
- "Check spelling of every word in the buffer.
-For each incorrect word, you are asked for the correct spelling
-and then put into a query-replace to fix some or all occurrences.
-If you do not want to change a word, just give the same word
-as its \"correct\" spelling; then the query replace is skipped."
- (interactive)
- ;; Don't warn about spell-region being obsolete.
- (with-no-warnings
- (spell-region (point-min) (point-max) "buffer")))
-;;;###autoload
-(make-obsolete 'spell-buffer 'ispell-buffer "23.1")
-
-;;;###autoload
-(defun spell-word ()
- "Check spelling of word at or before point.
-If it is not correct, ask user for the correct spelling
-and `query-replace' the entire buffer to substitute it."
- (interactive)
- (let (beg end spell-filter)
- (save-excursion
- (if (not (looking-at "\\<"))
- (forward-word -1))
- (setq beg (point))
- (forward-word 1)
- (setq end (point)))
- ;; Don't warn about spell-region being obsolete.
- (with-no-warnings
- (spell-region beg end (buffer-substring beg end)))))
-;;;###autoload
-(make-obsolete 'spell-word 'ispell-word "23.1")
-
-;;;###autoload
-(defun spell-region (start end &optional description)
- "Like `spell-buffer' but applies only to region.
-Used in a program, applies from START to END.
-DESCRIPTION is an optional string naming the unit being checked:
-for example, \"word\"."
- (interactive "r")
- (let ((filter spell-filter)
- (buf (get-buffer-create " *temp*")))
- (with-current-buffer buf
- (widen)
- (erase-buffer))
- (message "Checking spelling of %s..." (or description "region"))
- (if (and (null filter) (= ?\n (char-after (1- end))))
- (if (string= "spell" spell-command)
- (call-process-region start end "spell" nil buf)
- (call-process-region start end shell-file-name
- nil buf nil "-c" spell-command))
- (let ((oldbuf (current-buffer)))
- (with-current-buffer buf
- (insert-buffer-substring oldbuf start end)
- (or (bolp) (insert ?\n))
- (if filter (funcall filter))
- (if (string= "spell" spell-command)
- (call-process-region (point-min) (point-max) "spell" t buf)
- (call-process-region (point-min) (point-max) shell-file-name
- t buf nil "-c" spell-command)))))
- (message "Checking spelling of %s...%s"
- (or description "region")
- (if (with-current-buffer buf
- (> (buffer-size) 0))
- "not correct"
- "correct"))
- (let (word newword
- (case-fold-search t)
- (case-replace t))
- (while (with-current-buffer buf
- (> (buffer-size) 0))
- (with-current-buffer buf
- (goto-char (point-min))
- (setq word (downcase
- (buffer-substring (point)
- (progn (end-of-line) (point)))))
- (forward-char 1)
- (delete-region (point-min) (point))
- (setq newword
- (read-string (concat "`" word
- "' not recognized; edit a replacement: ")
- word))
- (flush-lines (concat "^" (regexp-quote word) "$")))
- (if (not (equal word newword))
- (progn
- (goto-char (point-min))
- (query-replace-regexp (concat "\\b" (regexp-quote word) "\\b")
- newword)))))))
-;;;###autoload
-(make-obsolete 'spell-region 'ispell-region "23.1")
-
-;;;###autoload
-(defun spell-string (string)
- "Check spelling of string supplied as argument."
- (interactive "sSpell string: ")
- (with-temp-buffer
- (widen)
- (erase-buffer)
- (insert string "\n")
- (if (string= "spell" spell-command)
- (call-process-region (point-min) (point-max) "spell"
- t t)
- (call-process-region (point-min) (point-max) shell-file-name
- t t nil "-c" spell-command))
- (if (= 0 (buffer-size))
- (message "%s is correct" string)
- (goto-char (point-min))
- (while (search-forward "\n" nil t)
- (replace-match " "))
- (message "%sincorrect" (buffer-substring 1 (point-max))))))
-;;;###autoload
-(make-obsolete 'spell-string "The `spell' package is obsolete - use `ispell'."
- "23.1")
-
-(provide 'spell)
-
-;;; spell.el ends here
+++ /dev/null
-;;; swedish.el --- miscellaneous functions for dealing with Swedish
-
-;; Copyright (C) 1988, 2001-2016 Free Software Foundation, Inc.
-
-;; Author: Howard Gayle
-;; Maintainer: emacs-devel@gnu.org
-;; Keywords: i18n
-;; Obsolete-since: 22.1
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software: you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; Fixme: Is this actually used? if so, it should be in language,
-;; possibly as a feature property of Swedish, probably defining a
-;; `swascii' coding system.
-
-;;; Code:
-
-;; Written by Howard Gayle. See case-table.el for details.
-
-;; See iso-swed.el for a description of the character set.
-
-(defvar mail-send-hook)
-(defvar news-group-hook-alist)
-(defvar news-inews-hook)
-
-(defvar swedish-re
- "[ \t\n]\\(och\\|att\\|en\\|{r\\|\\[R\\|p}\\|P\\]\\|som\\|det\\|av\\|den\\|f|r\\|F\\\\R\\)[ \t\n.,?!:;'\")}]"
- "Regular expression for common Swedish words.")
-
-(defvar swascii-to-8859-trans
- (let ((string (make-string 256 ? ))
- (i 0))
- (while (< i 256)
- (aset string i i)
- (setq i (1+ i)))
- (aset string ?\[ 196)
- (aset string ?\] 197)
- (aset string ?\\ 214)
- (aset string ?^ 220)
- (aset string ?\{ 228)
- (aset string ?\} 229)
- (aset string ?\` 233)
- (aset string ?\| 246)
- (aset string ?~ 252)
- string)
- "Trans table from SWASCII to 8859.")
-
-; $ is not converted because it almost always means US
-; dollars, not general currency sign. @ is not converted
-; because it is more likely to be an at sign in a mail address
-; than an E with acute accent.
-
-(defun swascii-to-8859-buffer ()
- "Convert characters in buffer from Swedish/Finnish-ascii to ISO 8859/1.
-Works even on read-only buffers. `$' and `@' are not converted."
- (interactive)
- (let ((buffer-read-only nil))
- (translate-region (point-min) (point-max) swascii-to-8859-trans)))
-
-(defun swascii-to-8859-buffer-maybe ()
- "Call swascii-to-8859-buffer if the buffer looks like Swedish-ascii.
-Leaves point just after the word that looks Swedish."
- (interactive)
- (let ((case-fold-search t))
- (if (re-search-forward swedish-re nil t)
- (swascii-to-8859-buffer))))
-
-(setq rmail-show-message-hook 'swascii-to-8859-buffer-maybe)
-
-(setq news-group-hook-alist
- (append '(("^swnet." . swascii-to-8859-buffer-maybe))
- (bound-and-true-p news-group-hook-alist)))
-
-(defvar 8859-to-swascii-trans
- (let ((string (make-string 256 ? ))
- (i 0))
- (while (< i 256)
- (aset string i i)
- (setq i (1+ i)))
- (aset string 164 ?$)
- (aset string 196 ?\[)
- (aset string 197 ?\])
- (aset string 201 ?@)
- (aset string 214 ?\\)
- (aset string 220 ?^)
- (aset string 228 ?\{)
- (aset string 229 ?\})
- (aset string 233 ?\`)
- (aset string 246 ?\|)
- (aset string 252 ?~)
- string)
- "8859 to SWASCII trans table.")
-
-(defun 8859-to-swascii-buffer ()
- "Convert characters in buffer from ISO 8859/1 to Swedish/Finnish-ascii."
- (interactive "*")
- (translate-region (point-min) (point-max) 8859-to-swascii-trans))
-
-(setq mail-send-hook '8859-to-swascii-buffer)
-(setq news-inews-hook '8859-to-swascii-buffer)
-
-;; It's not clear what purpose is served by a separate
-;; Swedish mode that differs from Text mode only in having
-;; a separate abbrev table. Nothing says that the abbrevs you
-;; define in Text mode have to be English!
-
-;(defvar swedish-mode-abbrev-table nil
-; "Abbrev table used while in swedish mode.")
-;(define-abbrev-table 'swedish-mode-abbrev-table ())
-
-;(defun swedish-mode ()
-; "Major mode for editing Swedish text intended for humans to
-;read. Special commands:\\{text-mode-map}
-;Turning on swedish-mode calls the value of the variable
-;text-mode-hook, if that value is non-nil."
-; (interactive)
-; (kill-all-local-variables)
-; (use-local-map text-mode-map)
-; (setq mode-name "Swedish")
-; (setq major-mode 'swedish-mode)
-; (setq local-abbrev-table swedish-mode-abbrev-table)
-; (set-syntax-table text-mode-syntax-table)
-; (run-mode-hooks 'text-mode-hook))
-
-;(defun indented-swedish-mode ()
-; "Major mode for editing indented Swedish text intended for
-;humans to read.\\{indented-text-mode-map}
-;Turning on indented-swedish-mode calls the value of the
-;variable text-mode-hook, if that value is non-nil."
-; (interactive)
-; (kill-all-local-variables)
-; (use-local-map text-mode-map)
-; (define-abbrev-table 'swedish-mode-abbrev-table ())
-; (setq local-abbrev-table swedish-mode-abbrev-table)
-; (set-syntax-table text-mode-syntax-table)
-; (make-local-variable 'indent-line-function)
-; (setq indent-line-function 'indent-relative-maybe)
-; (use-local-map indented-text-mode-map)
-; (setq mode-name "Indented Swedish")
-; (setq major-mode 'indented-swedish-mode)
-; (run-mode-hooks 'text-mode-hook))
-
-(provide 'swedish)
-
-;;; swedish.el ends here
+++ /dev/null
-;;; sym-comp.el --- mode-dependent symbol completion
-
-;; Copyright (C) 2004, 2008-2016 Free Software Foundation, Inc.
-
-;; Author: Dave Love <fx@gnu.org>
-;; Keywords: extensions
-;; URL: http://www.loveshack.ukfsn.org/emacs
-;; Obsolete-since: 23.2
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software: you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; This defines `symbol-complete', which is a generalization of the
-;; old `lisp-complete-symbol'. It provides the following hooks to
-;; allow major modes to set up completion appropriate for the mode:
-;; `symbol-completion-symbol-function',
-;; `symbol-completion-completions-function',
-;; `symbol-completion-predicate-function',
-;; `symbol-completion-transform-function'. Typically it is only
-;; necessary for a mode to set
-;; `symbol-completion-completions-function' locally and to bind
-;; `symbol-complete' appropriately.
-
-;; It's unfortunate that there doesn't seem to be a good way of
-;; combining this with `complete-symbol'.
-
-;; There is also `symbol-completion-try-complete', for use with
-;; Hippie-exp.
-
-;;; Code:
-
-;;;; Mode-dependent symbol completion.
-
-(defun symbol-completion-symbol ()
- "Default `symbol-completion-symbol-function'.
-Uses `current-word' with the buffer narrowed to the part before
-point."
- (save-restriction
- ;; Narrow in case point is in the middle of a symbol -- we want
- ;; just the preceding part.
- (narrow-to-region (point-min) (point))
- (current-word)))
-
-(defvar symbol-completion-symbol-function 'symbol-completion-symbol
- "Function to return a partial symbol before point for completion.
-The value it returns should be a string (or nil).
-Major modes may set this locally if the default isn't appropriate.
-
-Beware: the length of the string STR returned need to be equal to the length
-of text before point that's subject to completion. Typically, this amounts
-to saying that STR is equal to
-\(buffer-substring (- (point) (length STR)) (point)).")
-
-(defvar symbol-completion-completions-function nil
- "Function to return possible symbol completions.
-It takes an argument which is the string to be completed and
-returns a value suitable for the second argument of
-`try-completion'. This value need not use the argument, i.e. it
-may be all possible completions, such as `obarray' in the case of
-Emacs Lisp.
-
-Major modes may set this locally to allow them to support
-`symbol-complete'. See also `symbol-completion-symbol-function',
-`symbol-completion-predicate-function' and
-`symbol-completion-transform-function'.")
-
-(defvar symbol-completion-predicate-function nil
- "If non-nil, function to return a predicate for selecting symbol completions.
-The function gets two args, the positions of the beginning and
-end of the symbol to be completed.
-
-Major modes may set this locally if the default isn't
-appropriate. This is a function returning a predicate so that
-the predicate can be context-dependent, e.g. to select only
-function names if point is at a function call position. The
-function's args may be useful for determining the context.")
-
-(defvar symbol-completion-transform-function nil
- "If non-nil, function to transform symbols in the symbol-completion buffer.
-E.g., for Lisp, it may annotate the symbol as being a function,
-not a variable.
-
-The function takes the symbol name as argument. If it needs to
-annotate this, it should return a value suitable as an element of
-the list passed to `display-completion-list'.
-
-The predicate being used for selecting completions (from
-`symbol-completion-predicate-function') is available
-dynamically-bound as `symbol-completion-predicate' in case the
-transform needs it.")
-
-(defvar symbol-completion-predicate)
-
-;;;###autoload
-(defun symbol-complete (&optional predicate)
- "Perform completion of the symbol preceding point.
-This is done in a way appropriate to the current major mode,
-perhaps by interrogating an inferior interpreter. Compare
-`complete-symbol'.
-If no characters can be completed, display a list of possible completions.
-Repeating the command at that point scrolls the list.
-
-When called from a program, optional arg PREDICATE is a predicate
-determining which symbols are considered.
-
-This function requires `symbol-completion-completions-function'
-to be set buffer-locally. Variables `symbol-completion-symbol-function',
-`symbol-completion-predicate-function' and
-`symbol-completion-transform-function' are also consulted."
- (interactive)
- ;; Fixme: Punt to `complete-symbol' in this case?
- (unless (functionp symbol-completion-completions-function)
- (error "symbol-completion-completions-function not defined"))
- (let* ((pattern (or (funcall symbol-completion-symbol-function)
- (error "No preceding symbol to complete")))
- ;; FIXME: We assume below that `pattern' holds the text just
- ;; before point. This is a problem in the way
- ;; symbol-completion-symbol-function was defined.
- (predicate (or predicate
- (if symbol-completion-predicate-function
- (funcall symbol-completion-predicate-function
- (- (point) (length pattern))
- (point)))))
- (completions (funcall symbol-completion-completions-function
- pattern))
- ;; In case the transform needs to access it.
- (symbol-completion-predicate predicate)
- (completion-extra-properties
- (if (functionp symbol-completion-transform-function)
- '(:annotation-function
- (lambda (str)
- (car-safe (cdr-safe
- (funcall symbol-completion-transform-function
- str))))))))
- (completion-in-region (- (point) (length pattern)) (point)
- completions predicate)))
-\f
-(defvar he-search-string)
-(defvar he-tried-table)
-(defvar he-expand-list)
-(declare-function he-init-string "hippie-exp" (beg end))
-(declare-function he-string-member "hippie-exp" (str lst &optional trans-case))
-(declare-function he-substitute-string "hippie-exp" (str &optional trans-case))
-(declare-function he-reset-string "hippie-exp" ())
-
-;;;###autoload
-(defun symbol-completion-try-complete (old)
- "Completion function for use with `hippie-expand'.
-Uses `symbol-completion-symbol-function' and
-`symbol-completion-completions-function'. It is intended to be
-used something like this in a major mode which provides symbol
-completion:
-
- (if (featurep \\='hippie-exp)
- (set (make-local-variable \\='hippie-expand-try-functions-list)
- (cons \\='symbol-completion-try-complete
- hippie-expand-try-functions-list)))"
- (when (and symbol-completion-symbol-function
- symbol-completion-completions-function)
- (unless old
- (let ((symbol (funcall symbol-completion-symbol-function)))
- (he-init-string (- (point) (length symbol)) (point))
- (if (not (he-string-member he-search-string he-tried-table))
- (push he-search-string he-tried-table))
- (setq he-expand-list
- (and symbol
- (funcall symbol-completion-completions-function symbol)))))
- (while (and he-expand-list
- (he-string-member (car he-expand-list) he-tried-table))
- (pop he-expand-list))
- (if he-expand-list
- (progn
- (he-substitute-string (pop he-expand-list))
- t)
- (if old (he-reset-string))
- nil)))
-\f
-;;; Emacs Lisp symbol completion.
-
-(defun lisp-completion-symbol ()
- "`symbol-completion-symbol-function' for Lisp."
- (let ((end (point))
- (beg (with-syntax-table emacs-lisp-mode-syntax-table
- (save-excursion
- (backward-sexp 1)
- (while (= (char-syntax (following-char)) ?\')
- (forward-char 1))
- (point)))))
- (buffer-substring-no-properties beg end)))
-
-(defun lisp-completion-predicate (beg end)
- "`symbol-completion-predicate-function' for Lisp."
- (save-excursion
- (goto-char beg)
- (if (not (eq (char-before) ?\())
- (lambda (sym) ;why not just nil ? -sm
- ;To avoid interned symbols with
- ;no slots. -- fx
- (or (boundp sym) (fboundp sym)
- (symbol-plist sym)))
- ;; Looks like a funcall position. Let's double check.
- (if (condition-case nil
- (progn (up-list -2) (forward-char 1)
- (eq (char-after) ?\())
- (error nil))
- ;; If the first element of the parent list is an open
- ;; parenthesis we are probably not in a funcall position.
- ;; Maybe a `let' varlist or something.
- nil
- ;; Else, we assume that a function name is expected.
- 'fboundp))))
-
-(defun lisp-symbol-completion-transform ()
- "`symbol-completion-transform-function' for Lisp."
- (lambda (elt)
- (if (and (not (eq 'fboundp symbol-completion-predicate))
- (fboundp (intern elt)))
- (list elt " <f>")
- elt)))
-
-(provide 'sym-comp)
-
-;;; sym-comp.el ends here
+++ /dev/null
-;;; vc-mcvs.el --- VC backend for the Meta-CVS version-control system
-
-;; Copyright (C) 2003-2016 Free Software Foundation, Inc.
-
-;; Author: FSF (see vc.el for full credits)
-;; Maintainer: None
-;; Obsolete-since: 23.1
-
-;; This file is part of GNU Emacs.
-
-;; GNU Emacs is free software: you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; GNU Emacs is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; ********** READ THIS! **********
-;;
-;; This file apparently does not work with the new (as of Emacs 23)
-;; VC code. Use at your own risk. Please contact emacs-devel if you
-;; can maintain this file and update it to work correctly.
-;;
-;; ********** READ THIS! **********
-
-;; The home page of the Meta-CVS version control system is at
-;;
-;; http://users.footprints.net/~kaz/mcvs.html
-;;
-;; This is derived from vc-cvs.el as follows:
-;; - cp vc-cvs.el vc-mcvs.el
-;; - Replace CVS/ with MCVS/CVS/
-;; - Replace 'CVS with 'MCVS
-;; - Replace -cvs- with -mcvs-
-;; - Replace most of the rest of CVS to Meta-CVS
-;;
-;; Then of course started the hacking. Only a small part of the code
-;; has been touched and not much more than that was tested, so if
-;; you bump into a bug, don't be surprised: just report it to me.
-;;
-;; What has been partly tested:
-;; - C-x v v to start editing a file that was checked out with CVSREAD on.
-;; - C-x v v to commit a file
-;; - C-x v =
-;; - C-x v l
-;; - C-x v i
-;; - C-x v g
-;; - M-x vc-rename-file RET
-
-;;; Bugs:
-
-;; - Retrieving tags doesn't filter `cvs update' output and thus
-;; parses bogus filenames. Don't know if it harms.
-
-;;; Code:
-
-(eval-when-compile (require 'vc))
-(require 'vc-cvs)
-
-;;;
-;;; Customization options
-;;;
-
-(defcustom vc-mcvs-global-switches nil
- "Global switches to pass to any Meta-CVS command."
- :type '(choice (const :tag "None" nil)
- (string :tag "Argument String")
- (repeat :tag "Argument List" :value ("") string))
- :version "22.1"
- :group 'vc)
-
-(defcustom vc-mcvs-register-switches nil
- "Switches for registering a file into Meta-CVS.
-A string or list of strings passed to the checkin program by
-\\[vc-register]. If nil, use the value of `vc-register-switches'.
-If t, use no switches."
- :type '(choice (const :tag "Unspecified" nil)
- (const :tag "None" t)
- (string :tag "Argument String")
- (repeat :tag "Argument List" :value ("") string))
- :version "22.1"
- :group 'vc)
-
-(defcustom vc-mcvs-diff-switches nil
- "String or list of strings specifying switches for Meta-CVS diff under VC.
-If nil, use the value of `vc-diff-switches'. If t, use no switches."
- :type '(choice (const :tag "Unspecified" nil)
- (const :tag "None" t)
- (string :tag "Argument String")
- (repeat :tag "Argument List" :value ("") string))
- :version "22.1"
- :group 'vc)
-
-(defcustom vc-mcvs-header vc-cvs-header
- "Header keywords to be inserted by `vc-insert-headers'."
- :version "24.1" ; no longer consult the obsolete vc-header-alist
- :type '(repeat string)
- :group 'vc)
-
-(defcustom vc-mcvs-use-edit vc-cvs-use-edit
- "Non-nil means to use `cvs edit' to \"check out\" a file.
-This is only meaningful if you don't use the implicit checkout model
-\(i.e. if you have $CVSREAD set)."
- :type 'boolean
- :version "22.1"
- :group 'vc)
-
-;;; Properties of the backend
-
-(defalias 'vc-mcvs-revision-granularity 'vc-cvs-revision-granularity)
-(defalias 'vc-mcvs-checkout-model 'vc-cvs-checkout-model)
-
-;;;
-;;; State-querying functions
-;;;
-
-;;;###autoload (defun vc-mcvs-registered (file)
-;;;###autoload (if (vc-find-root file "MCVS/CVS")
-;;;###autoload (progn
-;;;###autoload (load "vc-mcvs")
-;;;###autoload (vc-mcvs-registered file))))
-
-(defun vc-mcvs-root (file)
- "Return the root directory of a Meta-CVS project, if any."
- (or (vc-file-getprop file 'mcvs-root)
- (vc-file-setprop file 'mcvs-root (vc-find-root file "MCVS/CVS"))))
-
-(defun vc-mcvs-read (file)
- (if (file-readable-p file)
- (with-temp-buffer
- (insert-file-contents file)
- (goto-char (point-min))
- (read (current-buffer)))))
-
-(defun vc-mcvs-map-file (dir file)
- (let ((map (vc-mcvs-read (expand-file-name "MCVS/MAP" dir)))
- inode)
- (dolist (x map inode)
- (if (equal (nth 2 x) file) (setq inode (nth 1 x))))))
-
-(defun vc-mcvs-registered (file)
- (let (root inode cvsfile)
- (when (and (setq root (vc-mcvs-root file))
- (setq inode (vc-mcvs-map-file
- root (file-relative-name file root))))
- (vc-file-setprop file 'mcvs-inode inode)
- ;; Avoid calling `mcvs diff' in vc-workfile-unchanged-p.
- (vc-file-setprop file 'vc-checkout-time
- (if (vc-cvs-registered
- (setq cvsfile (expand-file-name inode root)))
- (vc-file-getprop cvsfile 'vc-checkout-time)
- ;; The file might not be registered yet because
- ;; of lazy-adding.
- 0))
- t)))
-
-(defun vc-mcvs-state (file)
- ;; This would assume the Meta-CVS sandbox is synchronized.
- ;; (vc-mcvs-cvs state file))
- "Meta-CVS-specific version of `vc-state'."
- (if (vc-stay-local-p file)
- (let ((state (vc-file-getprop file 'vc-state)))
- ;; If we should stay local, use the heuristic but only if
- ;; we don't have a more precise state already available.
- (if (memq state '(up-to-date edited))
- (vc-mcvs-state-heuristic file)
- state))
- (with-temp-buffer
- (setq default-directory (vc-mcvs-root file))
- (vc-mcvs-command t 0 file "status")
- (vc-cvs-parse-status t))))
-
-
-(defalias 'vc-mcvs-state-heuristic 'vc-cvs-state-heuristic)
-
-(defun vc-mcvs-working-revision (file)
- (vc-cvs-working-revision
- (expand-file-name (vc-file-getprop file 'mcvs-inode)
- (vc-file-getprop file 'mcvs-root))))
-
-;;;
-;;; State-changing functions
-;;;
-(autoload 'vc-checkout "vc")
-(autoload 'vc-switches "vc")
-
-(defun vc-mcvs-register (files &optional rev comment)
- "Register FILES into the Meta-CVS version-control system.
-COMMENT can be used to provide an initial description of FILE.
-Passes either `vc-mcvs-register-switches' or `vc-register-switches'
-to the Meta-CVS command."
- ;; FIXME: multiple-file case should be made to work.
- (if (> (length files) 1) (error "Registering filesets is not yet supported"))
- (let* ((file (car files))
- (filename (file-name-nondirectory file))
- (extpos (string-match "\\." filename))
- (ext (if extpos (substring filename (1+ extpos))))
- (root (vc-mcvs-root file))
- (types-file (expand-file-name "MCVS/TYPES" root))
- (map-file (expand-file-name "MCVS/MAP" root))
- (types (vc-mcvs-read types-file)))
- ;; Make sure meta files like MCVS/MAP are not read-only (happens with
- ;; CVSREAD) since Meta-CVS doesn't pay attention to it at all and goes
- ;; belly-up.
- (unless (file-writable-p map-file)
- (vc-checkout map-file t))
- (unless (or (file-writable-p types-file) (not (file-exists-p types-file)))
- (vc-checkout types-file t))
- ;; Make sure the `mcvs add' will not fire up the CVSEDITOR
- ;; to add a rule for the given file's extension.
- (when (and ext (not (assoc ext types)))
- (let ((type (completing-read "Type to use (default): "
- '("default" "name-only" "keep-old"
- "binary" "value-only")
- nil t nil nil "default")))
- (push (list ext (make-symbol (upcase (concat ":" type)))) types)
- (setq types (sort types (lambda (x y) (string< (car x) (car y)))))
- (with-current-buffer (find-file-noselect types-file)
- (erase-buffer)
- (pp types (current-buffer))
- (save-buffer)
- (unless (get-buffer-window (current-buffer) t)
- (kill-buffer (current-buffer))))))
- ;; Now do the ADD.
- (prog1 (apply 'vc-mcvs-command nil 0 file
- "add"
- (and comment (string-match "[^\t\n ]" comment)
- (concat "-m" comment))
- (vc-switches 'MCVS 'register))
- ;; I'm not sure exactly why, but if we don't setup the inode and root
- ;; prop of the file, things break later on in vc-mode-line that
- ;; ends up calling vc-mcvs-working-revision.
- ;; We also need to set vc-checkout-time so that vc-workfile-unchanged-p
- ;; doesn't try to call `mcvs diff' on the file.
- (vc-mcvs-registered file))))
-
-(defalias 'vc-mcvs-responsible-p 'vc-mcvs-root
- "Return non-nil if CVS thinks it is responsible for FILE.")
-
-(defalias 'vc-cvs-could-register 'vc-cvs-responsible-p
- "Return non-nil if FILE could be registered in Meta-CVS.
-This is only possible if Meta-CVS is responsible for FILE's directory.")
-
-(defun vc-mcvs-checkin (files rev comment)
- "Meta-CVS-specific version of `vc-backend-checkin'."
- (unless (or (not rev) (vc-mcvs-valid-revision-number-p rev))
- (if (not (vc-mcvs-valid-symbolic-tag-name-p rev))
- (error "%s is not a valid symbolic tag name" rev)
- ;; If the input revision is a valid symbolic tag name, we create it
- ;; as a branch, commit and switch to it.
- ;; This file-specific form of branching is deprecated.
- ;; We can't use `mcvs branch' and `mcvs switch' because they cannot
- ;; be applied just to this one file.
- (apply 'vc-mcvs-command nil 0 files "tag" "-b" (list rev))
- (apply 'vc-mcvs-command nil 0 files "update" "-r" (list rev))
- (mapc (lambda (file) (vc-file-setprop file 'vc-mcvs-sticky-tag rev))
- files)
- (setq rev nil)))
- ;; This commit might cvs-commit several files (e.g. MAP and TYPES)
- ;; so using numbered revs here is dangerous and somewhat meaningless.
- (when rev (error "Cannot commit to a specific revision number"))
- (let ((status (apply 'vc-mcvs-command nil 1 files
- "ci" "-m" comment
- (vc-switches 'MCVS 'checkin))))
- (set-buffer "*vc*")
- (goto-char (point-min))
- (when (not (zerop status))
- ;; Check checkin problem.
- (cond
- ((re-search-forward "Up-to-date check failed" nil t)
- (mapc (lambda (file) (vc-file-setprop file 'vc-state 'needs-merge))
- files)
- (error "%s" (substitute-command-keys
- (concat "Up-to-date check failed: "
- "type \\[vc-next-action] to merge in changes"))))
- (t
- (pop-to-buffer (current-buffer))
- (goto-char (point-min))
- (shrink-window-if-larger-than-buffer)
- (error "Check-in failed"))))
- ;; Single-file commit? Then update the revision by parsing the buffer.
- ;; Otherwise we can't necessarily tell what goes with what; clear
- ;; its properties so they have to be refetched.
- (if (= (length files) 1)
- (vc-file-setprop
- (car files) 'vc-working-revision
- (vc-parse-buffer "^\\(new\\|initial\\) revision: \\([0-9.]+\\)" 2))
- (mapc (lambda (file) (vc-file-clearprops file)) files))
- ;; Anyway, forget the checkout model of the file, because we might have
- ;; guessed wrong when we found the file. After commit, we can
- ;; tell it from the permissions of the file (see
- ;; vc-mcvs-checkout-model).
- (mapc (lambda (file) (vc-file-setprop file 'vc-checkout-model nil))
- files)
-
- ;; if this was an explicit check-in (does not include creation of
- ;; a branch), remove the sticky tag.
- (if (and rev (not (vc-mcvs-valid-symbolic-tag-name-p rev)))
- (vc-mcvs-command nil 0 files "update" "-A"))))
-
-(defun vc-mcvs-find-revision (file rev buffer)
- (apply 'vc-mcvs-command
- buffer 0 file
- "-Q" ; suppress diagnostic output
- "update"
- (and rev (not (string= rev ""))
- (concat "-r" rev))
- "-p"
- (vc-switches 'MCVS 'checkout)))
-
-(defun vc-mcvs-checkout (file &optional editable rev)
- (message "Checking out %s..." file)
- (with-current-buffer (or (get-file-buffer file) (current-buffer))
- (vc-mcvs-update file editable rev (vc-switches 'MCVS 'checkout)))
- (vc-mode-line file)
- (message "Checking out %s...done" file))
-
-(defun vc-mcvs-update (file editable rev switches)
- (if (and (file-exists-p file) (not rev))
- ;; If no revision was specified, just make the file writable
- ;; if necessary (using `cvs-edit' if requested).
- (and editable (not (eq (vc-mcvs-checkout-model (list file)) 'implicit))
- (if vc-mcvs-use-edit
- (vc-mcvs-command nil 0 file "edit")
- (set-file-modes file (logior (file-modes file) 128))
- (if (equal file buffer-file-name) (read-only-mode -1))))
- ;; Check out a particular revision (or recreate the file).
- (vc-file-setprop file 'vc-working-revision nil)
- (apply 'vc-mcvs-command nil 0 file
- (if editable "-w")
- "update"
- ;; default for verbose checkout: clear the sticky tag so
- ;; that the actual update will get the head of the trunk
- (if (or (not rev) (string= rev ""))
- "-A"
- (concat "-r" rev))
- switches)))
-
-(defun vc-mcvs-rename-file (old new)
- (vc-mcvs-command nil 0 new "move" (file-relative-name old)))
-
-(autoload 'vc-default-revert "vc")
-
-(defun vc-mcvs-revert (file &optional contents-done)
- "Revert FILE to the working revision it was based on."
- (vc-default-revert 'MCVS file contents-done)
- (unless (eq (vc-mcvs-checkout-model (list file)) 'implicit)
- (if vc-mcvs-use-edit
- (vc-mcvs-command nil 0 file "unedit")
- ;; Make the file read-only by switching off all w-bits
- (set-file-modes file (logand (file-modes file) 3950)))))
-
-(defun vc-mcvs-merge (file first-revision &optional second-revision)
- "Merge changes into current working copy of FILE.
-The changes are between FIRST-REVISION and SECOND-REVISION."
- (vc-mcvs-command nil 0 file
- "update" "-kk"
- (concat "-j" first-revision)
- (concat "-j" second-revision))
- (vc-file-setprop file 'vc-state 'edited)
- (with-current-buffer (get-buffer "*vc*")
- (goto-char (point-min))
- (if (re-search-forward "conflicts during merge" nil t)
- 1 ; signal error
- 0))) ; signal success
-
-(defun vc-mcvs-merge-news (file)
- "Merge in any new changes made to FILE."
- (message "Merging changes into %s..." file)
- ;; (vc-file-setprop file 'vc-working-revision nil)
- (vc-file-setprop file 'vc-checkout-time 0)
- (vc-mcvs-command nil 0 file "update")
- ;; Analyze the merge result reported by Meta-CVS, and set
- ;; file properties accordingly.
- (with-current-buffer (get-buffer "*vc*")
- (goto-char (point-min))
- ;; get new working revision
- (if (re-search-forward
- "^Merging differences between [0-9.]* and \\([0-9.]*\\) into" nil t)
- (vc-file-setprop file 'vc-working-revision (match-string 1))
- (vc-file-setprop file 'vc-working-revision nil))
- ;; get file status
- (prog1
- (if (eq (buffer-size) 0)
- 0 ;; there were no news; indicate success
- (if (re-search-forward
- (concat "^\\([CMUP] \\)?"
- ".*"
- "\\( already contains the differences between \\)?")
- nil t)
- (cond
- ;; Merge successful, we are in sync with repository now
- ((or (match-string 2)
- (string= (match-string 1) "U ")
- (string= (match-string 1) "P "))
- (vc-file-setprop file 'vc-state 'up-to-date)
- (vc-file-setprop file 'vc-checkout-time
- (nth 5 (file-attributes file)))
- 0);; indicate success to the caller
- ;; Merge successful, but our own changes are still in the file
- ((string= (match-string 1) "M ")
- (vc-file-setprop file 'vc-state 'edited)
- 0);; indicate success to the caller
- ;; Conflicts detected!
- (t
- (vc-file-setprop file 'vc-state 'edited)
- 1);; signal the error to the caller
- )
- (pop-to-buffer "*vc*")
- (error "Couldn't analyze mcvs update result")))
- (message "Merging changes into %s...done" file))))
-
-(defun vc-mcvs-modify-change-comment (files rev comment)
- "Modify the change comments for FILES on a specified REV.
-Will fail unless you have administrative privileges on the repo."
- (vc-mcvs-command nil 0 files "rcs" (concat "-m" comment ":" rev)))
-
-
-;;;
-;;; History functions
-;;;
-
-(defun vc-mcvs-print-log (files &optional buffer)
- "Get change log associated with FILES."
- (let ((default-directory (vc-mcvs-root (car files))))
- ;; Run the command from the root dir so that `mcvs filt' returns
- ;; valid relative names.
- (vc-mcvs-command
- buffer
- (if (vc-stay-local-p files) 'async 0)
- files "log")))
-
-(defun vc-mcvs-diff (files &optional oldvers newvers buffer)
- "Get a difference report using Meta-CVS between two revisions of FILES."
- (let* ((async (and (not vc-disable-async-diff)
- (vc-stay-local-p files)))
- ;; Run the command from the root dir so that `mcvs filt' returns
- ;; valid relative names.
- (default-directory (vc-mcvs-root (car files)))
- (status
- (apply 'vc-mcvs-command (or buffer "*vc-diff*")
- (if async 'async 1)
- files "diff"
- (and oldvers (concat "-r" oldvers))
- (and newvers (concat "-r" newvers))
- (vc-switches 'MCVS 'diff))))
- (if async 1 status))) ; async diff, pessimistic assumption.
-
-(defun vc-mcvs-annotate-command (file buffer &optional revision)
- "Execute \"mcvs annotate\" on FILE, inserting the contents in BUFFER.
-Optional arg REVISION is a revision to annotate from."
- (vc-mcvs-command
- buffer
- (if (vc-stay-local-p file) 'async 0)
- file "annotate" (if revision (concat "-r" revision)))
- (with-current-buffer buffer
- (goto-char (point-min))
- (re-search-forward "^[0-9]")
- (delete-region (point-min) (1- (point)))))
-
-(defalias 'vc-mcvs-annotate-current-time 'vc-cvs-annotate-current-time)
-(defalias 'vc-mcvs-annotate-time 'vc-cvs-annotate-time)
-
-;;;
-;;; Tag system
-;;;
-
-(defun vc-mcvs-create-tag (dir name branchp)
- "Assign to DIR's current revision a given NAME.
-If BRANCHP is non-nil, the name is created as a branch (and the current
-workspace is immediately moved to that new branch)."
- (if (not branchp)
- (vc-mcvs-command nil 0 dir "tag" "-c" name)
- (vc-mcvs-command nil 0 dir "branch" name)
- (vc-mcvs-command nil 0 dir "switch" name)))
-
-;; vc-mcvs-command calls the autoloaded vc-do-command from vc-dispatcher.
-(declare-function vc-resynch-buffer "vc-dispatcher"
- (file &optional keep noquery reset-vc-info))
-
-(defun vc-mcvs-retrieve-tag (dir name update)
- "Retrieve a tag at and below DIR.
-NAME is the name of the tag; if it is empty, do a `cvs update'.
-If UPDATE is non-nil, then update (resynch) any affected buffers."
- (with-current-buffer (get-buffer-create "*vc*")
- (let ((default-directory dir)
- (sticky-tag))
- (erase-buffer)
- (if (or (not name) (string= name ""))
- (vc-mcvs-command t 0 nil "update")
- (vc-mcvs-command t 0 nil "update" "-r" name)
- (setq sticky-tag name))
- (when update
- (goto-char (point-min))
- (while (not (eobp))
- (if (looking-at "\\([CMUP]\\) \\(.*\\)")
- (let* ((file (expand-file-name (match-string 2) dir))
- (state (match-string 1))
- (buffer (find-buffer-visiting file)))
- (when buffer
- (cond
- ((or (string= state "U")
- (string= state "P"))
- (vc-file-setprop file 'vc-state 'up-to-date)
- (vc-file-setprop file 'vc-working-revision nil)
- (vc-file-setprop file 'vc-checkout-time
- (nth 5 (file-attributes file))))
- ((or (string= state "M")
- (string= state "C"))
- (vc-file-setprop file 'vc-state 'edited)
- (vc-file-setprop file 'vc-working-revision nil)
- (vc-file-setprop file 'vc-checkout-time 0)))
- (vc-file-setprop file 'vc-mcvs-sticky-tag sticky-tag)
- (vc-resynch-buffer file t t))))
- (forward-line 1))))))
-
-
-;;;
-;;; Miscellaneous
-;;;
-
-(defalias 'vc-mcvs-make-version-backups-p 'vc-stay-local-p
- "Return non-nil if version backups should be made for FILE.")
-(defalias 'vc-mcvs-check-headers 'vc-cvs-check-headers)
-
-
-;;;
-;;; Internal functions
-;;;
-
-(defun vc-mcvs-command (buffer okstatus file &rest flags)
- "A wrapper around `vc-do-command' for use in vc-mcvs.el.
-The difference to vc-do-command is that this function always invokes `mcvs',
-and that it passes `vc-mcvs-global-switches' to it before FLAGS."
- (let ((args (append '("--error-terminate")
- (if (stringp vc-mcvs-global-switches)
- (cons vc-mcvs-global-switches flags)
- (append vc-mcvs-global-switches flags)))))
- (if (not (member (car flags) '("diff" "log" "status")))
- ;; No need to filter: do it the easy way.
- (apply 'vc-do-command (or buffer "*vc*") okstatus "mcvs" file args)
- ;; We need to filter the output.
- ;; The output of the filter uses filenames relative to the root,
- ;; so we need to change the default-directory.
- ;; (assert (equal default-directory (vc-mcvs-root file)))
- (vc-do-command
- (or buffer "*vc*") okstatus "sh" nil "-c"
- (concat "mcvs "
- (mapconcat
- 'shell-quote-argument
- (append (remq nil args)
- (if file (list (file-relative-name file))))
- " ")
- " | mcvs filt")))))
-
-(defun vc-mcvs-repository-hostname (dirname)
- (vc-cvs-repository-hostname (vc-mcvs-root dirname)))
-
-(defun vc-mcvs-dir-state-heuristic (dir)
- "Find the Meta-CVS state of all files in DIR, using only local information."
- (with-temp-buffer
- (vc-cvs-get-entries dir)
- (goto-char (point-min))
- (while (not (eobp))
- ;; Meta-MCVS-removed files are not taken under VC control.
- (when (looking-at "/\\([^/]*\\)/[^/-]")
- (let ((file (expand-file-name (match-string 1) dir)))
- (unless (vc-file-getprop file 'vc-state)
- (vc-cvs-parse-entry file t))))
- (forward-line 1))))
-
-(defalias 'vc-mcvs-valid-symbolic-tag-name-p 'vc-cvs-valid-symbolic-tag-name-p)
-(defalias 'vc-mcvs-valid-revision-number-p 'vc-cvs-valid-revision-number-p)
-
-(provide 'vc-mcvs)
-
-;; ********** READ THIS! **********
-;;
-;; This file apparently does not work with the new (as of Emacs 23)
-;; VC code. Use at your own risk. Please contact emacs-devel if you
-;; can maintain this file and update it to work correctly.
-;;
-;; ********** READ THIS! **********
-
-;;; vc-mcvs.el ends here
* ox-html.el (org-html-link): Don't skip the link description when
it matches the name of the headline it targets.
- * ox-ascii.el (ascii): Remove inexistant function.
+ * ox-ascii.el (ascii): Remove nonexistent function.
* ox-icalendar.el (icalendar): Ignore footnotes.
(org-icalendar--combine-files): Small refactoring.
org-confirm-babel-evaluate)))
(code-block (if ,info (format " %s " ,lang) " "))
(block-name (if ,name (format " (%s) " ,name) " ")))
+ ;; Silence byte-compiler is `body' doesn't use those vars.
+ (ignore noeval query)
,@body)))
(defsubst org-babel-check-evaluate (info)
through use of the :var header argument) this marker points to
the outer-most code block.")
+(defvar *this*)
+
;;;###autoload
(defun org-babel-execute-src-block (&optional arg info params)
"Execute the current source code block.
(end-of-line 1) (forward-char 1)
(let ((result (org-babel-read-result)))
(message (replace-regexp-in-string
- "%" "%%" (format "%S" result))) result)))
+ "%" "%%" (format "%S" result)))
+ result)))
((org-babel-confirm-evaluate
(let ((i info)) (setf (nth 2 i) merged-params) i))
(let* ((lang (nth 0 info))
"\n")))
;;;###autoload
-(defun org-babel-expand-src-block (&optional arg info params)
+(defun org-babel-expand-src-block (&optional _arg info params)
"Expand the current source code block.
Expand according to the source code block's header
arguments and pop open the results in a preview buffer."
(let ((results (copy-sequence original)))
(dolist (new-list others)
(dolist (arg-pair new-list)
- (let ((header (car arg-pair))
- (args (cdr arg-pair)))
+ (let ((header (car arg-pair)))
(setq results
(cons arg-pair (org-remove-if
(lambda (pair) (equal header (car pair)))
(add-hook 'org-tab-first-hook 'org-babel-header-arg-expand)
;;;###autoload
-(defun org-babel-load-in-session (&optional arg info)
+(defun org-babel-load-in-session (&optional _arg info)
"Load the body of the current source-code block.
Evaluate the header arguments for the source block before
entering the session. After loading the body this pops open the
(defvar org-src-window-setup)
;;;###autoload
-(defun org-babel-switch-to-session-with-code (&optional arg info)
+(defun org-babel-switch-to-session-with-code (&optional arg _info)
"Switch to code buffer and display session."
(interactive "P")
(let ((swap-windows
(body (match-string 5))
(beg-body (match-beginning 5))
(end-body (match-end 5)))
- ,@body
+ ;; Silence byte-compiler in case `body' doesn't use all
+ ;; those variables.
+ (ignore full-block beg-block end-block lang
+ beg-lang end-lang switches beg-switches
+ end-switches header-args beg-header-args
+ end-header-args body beg-body end-body)
+ ,@body
(goto-char end-block)))))
(unless visited-p (kill-buffer to-be-removed))
(goto-char point))))
(rownames (funcall (lambda ()
(let ((tp table))
(mapcar
- (lambda (row)
+ (lambda (_row)
(prog1
(pop (car tp))
(setq tp (cdr tp))))
org-babel-named-src-block-regexp."
(save-excursion
(let ((case-fold-search t)
- (regexp (org-babel-named-src-block-regexp-for-name name)) msg)
+ (regexp (org-babel-named-src-block-regexp-for-name name)))
(goto-char (point-min))
(when (or (re-search-forward regexp nil t)
(re-search-backward regexp nil t))
(catch 'is-a-code-block
(when (re-search-forward
(concat org-babel-result-regexp
- "[ \t]" (regexp-quote name) "[ \t]*[\n\f\v\r]") nil t)
+ "[ \t]" (regexp-quote name) "[ \t]*[\n\f\v\r]")
+ nil t)
(when (and (string= "name" (downcase (match-string 1)))
(or (beginning-of-line 1)
(looking-at org-babel-src-block-regexp)
`org-edit-src-save'")
(defvar org-edit-src-code-timer nil)
+(defvar org-inhibit-startup)
+
(defun org-edit-src-code (&optional context code edit-buffer-name)
"Edit the source CODE block at point.
The code is copied to a separate buffer and the appropriate mode
;; just one empty line, i.e. beg == end.
(end (copy-marker (make-marker) t))
(allow-write-back-p (null code))
- block-nindent total-nindent ovl lang lang-f single lfmt buffer msg
+ block-nindent total-nindent ovl lang lang-f single buffer msg
begline markline markcol line col transmitted-variables)
(setq beg (move-marker beg (nth 0 info))
end (move-marker end (nth 1 info))
(org-mode-p (derived-mode-p 'org-mode))
(beg (make-marker))
(end (make-marker))
- (preserve-indentation org-src-preserve-indentation)
block-nindent ovl beg1 end1 code begline buffer)
(beginning-of-line 1)
(if (looking-at "[ \t]*[^:\n \t]")
'(font-lock-fontified t fontified t font-lock-multiline t))
(set-buffer-modified-p modified)))))
+(defvar org-src-fontify-natively)
+
(defun org-src-fontify-block ()
"Fontify code block at point."
(interactive)
(beginning-of-line)
(looking-at ada-compile-goto-error-file-linenr-re))
(save-excursion
- (if (looking-at "\\([0-9]+\\)") (backward-word-strictly 1))
+ (if (looking-at "\\([0-9]+\\)") (backward-word 1))
(looking-at "line \\([0-9]+\\)"))))
)
(let ((line (if (match-beginning 2) (match-string 2) (match-string 1)))
(save-excursion
(let ((aa-end (point)))
(ada-adjust-case-region
- (progn (goto-char (symbol-value 'beg)) (forward-word-strictly -1)
- (point))
+ (progn (goto-char (symbol-value 'beg)) (forward-word -1) (point))
(goto-char aa-end)))))
(defun ada-region-selected ()
(save-excursion
(skip-syntax-backward "w")
(setq word (buffer-substring-no-properties
- (point) (save-excursion (forward-word-strictly 1)
- (point)))))))
+ (point) (save-excursion (forward-word 1) (point)))))))
;; Reread the exceptions file, in case it was modified by some other,
(ada-case-read-exceptions-from-file file-name)
(skip-syntax-backward "w")
(setq word (buffer-substring-no-properties
(point)
- (save-excursion (forward-word-strictly 1)
- (point))))))
+ (save-excursion (forward-word 1) (point))))))
(modify-syntax-entry ?_ (make-string 1 underscore-syntax)
(syntax-table))))))
;; do not add it again. This way, the user can easily decide which
;; priority should be applied to each casing exception
(let ((word (buffer-substring-no-properties
- (point) (save-excursion (forward-word-strictly 1)
- (point)))))
+ (point) (save-excursion (forward-word 1) (point)))))
;; Handling a substring ?
(if (char-equal (string-to-char word) ?*)
(defun ada-after-keyword-p ()
"Return t if cursor is after a keyword that is not an attribute."
(save-excursion
- (forward-word-strictly -1)
+ (forward-word -1)
(and (not (and (char-before)
(or (= (char-before) ?_)
(= (char-before) ?'))));; unless we have a _ or '
(goto-char apos)
(ada-goto-next-non-ws)
(while (looking-at "\\<\\(in\\|out\\|access\\)\\>")
- (forward-word-strictly 1)
+ (forward-word 1)
(ada-goto-next-non-ws))
;; read type of parameter
(forward-comment -1000)
(if (= (char-before) ?\))
(forward-sexp -1)
- (forward-word-strictly -1))
+ (forward-word -1))
;; If there is a parameter list, and we have a function declaration
;; or a access to subprogram declaration
(if (and (= (following-char) ?\()
(save-excursion
(or (progn
- (backward-word-strictly 1)
+ (backward-word 1)
(looking-at "\\(function\\|procedure\\)\\>"))
(progn
- (backward-word-strictly 1)
+ (backward-word 1)
(setq num-back 2)
(looking-at "\\(function\\|procedure\\)\\>")))))
;; The indentation depends of the value of ada-indent-return
(if (<= (eval var) 0)
(list (point) (list '- var))
- (list (progn (backward-word-strictly num-back) (point))
+ (list (progn (backward-word num-back) (point))
var))
;; Else there is no parameter list, but we have a function
;; Only do something special if the user want to indent
;; relative to the "function" keyword
(if (and (> (eval var) 0)
- (save-excursion (forward-word-strictly -1)
+ (save-excursion (forward-word -1)
(looking-at "function\\>")))
- (list (progn (forward-word-strictly -1) (point)) var)
+ (list (progn (forward-word -1) (point)) var)
;; Else...
(ada-indent-on-previous-lines nil orgpoint orgpoint)))))))
;; avoid "with procedure"... in generic parts
(save-excursion
- (forward-word-strictly -1)
+ (forward-word -1)
(setq found (not (looking-at "with"))))))
(cond
;; yes, look what's following 'end'
(progn
- (forward-word-strictly 1)
+ (forward-word 1)
(ada-goto-next-non-ws)
(cond
;;
(save-excursion
(ada-check-matching-start (match-string 0))
;; we are now looking at the matching "record" statement
- (forward-word-strictly 1)
+ (forward-word 1)
(ada-goto-stmt-start)
;; now on the matching type declaration, or use clause
(unless (looking-at "\\(for\\|type\\)\\>")
(looking-at "\\<then\\>"))
(setq cur-indent (save-excursion (back-to-indentation) (point))))
;; skip 'then'
- (forward-word-strictly 1)
+ (forward-word 1)
(list cur-indent 'ada-indent))
(list cur-indent 'ada-broken-indent))))
(let ((pos nil))
(cond
((save-excursion
- (forward-word-strictly 1)
+ (forward-word 1)
(setq pos (ada-goto-next-non-ws orgpoint)))
(goto-char pos)
(save-excursion
(and
(goto-char (match-end 0))
(ada-goto-next-non-ws orgpoint)
- (forward-word-strictly 1)
- (if (= (char-after) ?') (forward-word-strictly 1) t)
+ (forward-word 1)
+ (if (= (char-after) ?') (forward-word 1) t)
(ada-goto-next-non-ws orgpoint)
(looking-at "\\<use\\>")
;;
"end" nil orgpoint nil 'word-search-forward))
(ada-goto-next-non-ws)
(looking-at "\\<record\\>")
- (forward-word-strictly 1)
+ (forward-word 1)
(ada-goto-next-non-ws)
(= (char-after) ?\;)))
(goto-char (car match-dat))
(save-excursion
(ada-goto-previous-word)
(looking-at "\\<\\(end\\|or\\|and\\)\\>[ \t]*[^;]")))
- (forward-word-strictly -1))
+ (forward-word -1))
((looking-at "is")
(setq found
((looking-at "private")
(save-excursion
- (backward-word-strictly 1)
+ (backward-word 1)
(setq found (not (looking-at "is")))))
(t
(if (looking-at "\\<declare\\>")
(progn
(forward-comment -1)
- (backward-word-strictly 1))
+ (backward-word 1))
;;
;; no, => 'procedure'/'function'/'task'/'protected'
;;
(progn
- (forward-word-strictly 2)
- (backward-word-strictly 1)
+ (forward-word 2)
+ (backward-word 1)
;;
;; skip 'body' 'type'
;;
(if (looking-at "\\<\\(body\\|type\\)\\>")
- (forward-word-strictly 1))
+ (forward-word 1))
(forward-sexp 1)
(backward-sexp 1)))
;;
;;
((looking-at "if")
(save-excursion
- (forward-word-strictly -1)
+ (forward-word -1)
(unless (looking-at "\\<end[ \t\n]*if\\>")
(progn
(setq nest-count (1- nest-count))
;;
((looking-at "when")
(save-excursion
- (forward-word-strictly -1)
+ (forward-word -1)
(unless (looking-at "\\<exit[ \t\n]*when\\>")
(progn
(if stop-at-when
(unless (and (looking-at "\\<record\\>")
(save-excursion
- (forward-word-strictly -1)
+ (forward-word -1)
(looking-at "\\<null\\>")))
(progn
;; calculate nest-depth
(number-to-string (count-lines 1 (1+ current)))))))
(unless (looking-at "renames")
(progn
- (forward-word-strictly 1)
+ (forward-word 1)
(ada-goto-next-non-ws)
;; ignore it if it is only a declaration with 'new'
;; We could have package Foo is new ....
;; found task start => check if it has a body
((looking-at "task")
(save-excursion
- (forward-word-strictly 1)
+ (forward-word 1)
(ada-goto-next-non-ws)
(cond
((looking-at "\\<body\\>"))
((looking-at "\\<type\\>")
;; In that case, do nothing if there is a "is"
- (forward-word-strictly 2);; skip "type"
+ (forward-word 2);; skip "type"
(ada-goto-next-non-ws);; skip type name
;; Do nothing if we are simply looking at a simple
(t
;; Check if that task declaration had a block attached to
;; it (i.e do nothing if we have just "task name;")
- (unless (progn (forward-word-strictly 1)
+ (unless (progn (forward-word 1)
(looking-at "[ \t]*;"))
(setq nest-count (1- nest-count))))))
(setq last-was-begin (cdr last-was-begin))
;;
;; calculate nest-depth
;;
- (backward-word-strictly 1)
+ (backward-word 1)
(cond
;; procedures and functions need to be processed recursively, in
;; case they are defined in a declare/begin block, as in:
((and (looking-at "\\<procedure\\|function\\>"))
(if first
- (forward-word-strictly 1)
+ (forward-word 1)
(setq pos (point))
(ada-search-ignore-string-comment "is\\|;")
(skip-chars-forward "end")
(ada-goto-next-non-ws)
(looking-at "\\<\\(loop\\|select\\|record\\|case\\|if\\)\\>"))
- (forward-word-strictly 1)))
+ (forward-word 1)))
;; found package start => check if it really starts a block, and is not
;; in fact a generic instantiation for instance
(if (not first)
(setq nest-count (1+ nest-count)))
(setq found (<= nest-count 0))
- (forward-word-strictly 1))) ; end of 'cond'
+ (forward-word 1))) ; end of 'cond'
(setq first nil))
(save-excursion
(and (looking-at "\\<or\\>")
(progn
- (forward-word-strictly 1)
+ (forward-word 1)
(ada-goto-stmt-start)
(looking-at "\\<or\\>")))))
(progn (forward-comment -1000)
(and (not (bobp))
(or (= (char-before) ?\;)
- (and (forward-word-strictly -3)
+ (and (forward-word -3)
(looking-at "\\<package\\>"))))))))
(skip-chars-backward " \t\n")
(if (= (char-before) ?\")
(backward-char 3)
- (backward-word-strictly 1))
+ (backward-word 1))
t)
;; and now over the second one
- (backward-word-strictly 1)
+ (backward-word 1)
;; We should ignore the case when the reserved keyword is in a
;; comment (for instance, when we have:
If BACKWARDP is non-nil, search backward; search forward otherwise."
(let (result)
(while (and (setq result (ada-search-ignore-string-comment regexp backwardp))
- (save-excursion (forward-word-strictly -1)
+ (save-excursion (forward-word -1)
(looking-at "and then\\|or else"))))
result))
(ada-in-string-or-comment-p)
(and (progn
(or (looking-at "[ \t]*\\<end\\>")
- (backward-word-strictly 1))
+ (backward-word 1))
(or (looking-at "[ \t]*\\<end\\>")
- (backward-word-strictly 1))
+ (backward-word 1))
(or (looking-at "[ \t]*\\<end\\>")
(error "Not on end ...;")))
(ada-goto-matching-start 1)
((save-excursion
(and (ada-goto-stmt-start)
(looking-at "\\<task\\>" )
- (forward-word-strictly 1)
+ (forward-word 1)
(ada-goto-next-non-ws)
(looking-at "\\<body\\>")))
(ada-search-ignore-string-comment "begin" nil nil nil
(skip-chars-forward " \t\n")
(if (looking-at "return")
(progn
- (forward-word-strictly 1)
+ (forward-word 1)
(skip-chars-forward " \t\n")
(skip-chars-forward "a-zA-Z0-9_'")))
((or (looking-at "^[ \t]*procedure")
(setq func-found (looking-at "^[ \t]*function")))
;; treat it as a proc/func
- (forward-word-strictly 2)
- (forward-word-strictly -1)
+ (forward-word 2)
+ (forward-word -1)
(setq procname (buffer-substring (point) (cdr match))) ; store proc name
;; goto end of procname
;; if function, skip over 'return' and result type.
(if func-found
(progn
- (forward-word-strictly 1)
+ (forward-word 1)
(skip-chars-forward " \t\n")
(setq functype (buffer-substring (point)
(progn
(if (looking-at "^[ \t]*task")
(progn
(message "Task conversion is not yet implemented")
- (forward-word-strictly 2)
+ (forward-word 2)
(if (looking-at "[ \t]*;")
(forward-line)
(ada-move-to-end))
Works with: inher-cont."
(save-excursion
(goto-char (c-langelem-pos langelem))
- (forward-word-strictly 1)
+ (forward-word 1)
(if (looking-at "[ \t]*$")
c-basic-offset
(c-forward-syntactic-ws)
(eval-and-compile
(defmacro c--macroexpand-all (form &optional environment)
;; Macro to smooth out the renaming of `cl-macroexpand-all' in Emacs 24.3.
- (if (eq c--mapcan-status 'cl-mapcan)
+ (if (fboundp 'macroexpand-all)
`(macroexpand-all ,form ,environment)
`(cl-macroexpand-all ,form ,environment)))
wouldn't be able to undo them.
The return value is the value of the last form in BODY."
- `(let* ((modified (buffer-modified-p)) (buffer-undo-list t)
- (inhibit-read-only t) (inhibit-point-motion-hooks t)
- before-change-functions after-change-functions
- deactivate-mark
- buffer-file-name buffer-file-truename ; Prevent primitives checking
- ; for file modification
- ,@varlist)
- (unwind-protect
- (progn ,@body)
- (and (not modified)
- (buffer-modified-p)
- (set-buffer-modified-p nil)))))
-(put 'c-save-buffer-state 'lisp-indent-function 1)
+ (declare (debug t) (indent 1))
+ (if (fboundp 'with-silent-modifications)
+ `(with-silent-modifications (let* ,varlist ,@body))
+ `(let* ((modified (buffer-modified-p)) (buffer-undo-list t)
+ (inhibit-read-only t) (inhibit-point-motion-hooks t)
+ before-change-functions after-change-functions
+ deactivate-mark
+ buffer-file-name buffer-file-truename ; Prevent primitives checking
+ ; for file modification
+ ,@varlist)
+ (unwind-protect
+ (progn ,@body)
+ (and (not modified)
+ (buffer-modified-p)
+ (set-buffer-modified-p nil))))))
(defmacro c-tentative-buffer-changes (&rest body)
"Eval BODY and optionally restore the buffer contents to the state it
(when (or (looking-at "extends")
(looking-at "super"))
- (forward-word-strictly)
+ (forward-word)
(c-forward-syntactic-ws)
(let ((c-promote-possible-types t)
(c-record-found-types t))
(c-backward-syntactic-ws))
(c-back-over-list-of-member-inits)
(and (eq (char-before) ?:)
- (save-excursion
- (c-backward-token-2)
- (not (looking-at c-:$-multichar-token-regexp)))
(c-just-after-func-arglist-p))))
(while (and (not (and level-plausible
(c-backward-syntactic-ws)
(c-back-over-list-of-member-inits)
(and (eq (char-before) ?:)
- (save-excursion
- (c-backward-token-2)
- (not (looking-at c-:$-multichar-token-regexp)))
(c-just-after-func-arglist-p)))))
(and at-top-level level-plausible)))
(c-lang-defvar c-assignment-op-regexp
(c-lang-const c-assignment-op-regexp))
-(c-lang-defconst c-:$-multichar-token-regexp
- ;; Regexp matching all tokens ending in ":" which are longer than one char.
- ;; Currently (2016-01-07) only used in C++ Mode.
- t (c-make-keywords-re nil
- (c-filter-ops (c-lang-const c-operators) t ".+:$")))
-(c-lang-defvar c-:$-multichar-token-regexp
- (c-lang-const c-:$-multichar-token-regexp))
-
(c-lang-defconst c-<>-multichar-token-regexp
;; Regexp matching all tokens containing "<" or ">" which are longer
;; than one char.
;; derived-mode-ex.el>.
(defun c-leave-cc-mode-mode ()
- (setq c-buffer-is-cc-mode nil))
+ (when c-buffer-is-cc-mode
+ (save-restriction
+ (widen)
+ (c-save-buffer-state ()
+ (c-clear-char-properties (point-min) (point-max) 'category)
+ (c-clear-char-properties (point-min) (point-max) 'syntax-table)
+ (c-clear-char-properties (point-min) (point-max) 'c-is-sws)
+ (c-clear-char-properties (point-min) (point-max) 'c-in-sws)
+ (c-clear-char-properties (point-min) (point-max) 'c-type)
+ (if (c-major-mode-is 'awk-mode)
+ (c-clear-char-properties (point-min) (point-max) 'c-awk-NL-prop))))
+ (setq c-buffer-is-cc-mode nil)))
(defun c-init-language-vars-for (mode)
"Initialize the language variables for one of the language modes
(memq this-command '(self-insert-command newline))))
head1 notlast name p really-delete over)
(and (save-excursion
- (forward-word-strictly -1)
+ (forward-word -1)
(and
(eq (preceding-char) ?=)
(progn
(progn
(insert "\n\n=cut")
(cperl-ensure-newlines 2)
- (forward-word-strictly -2)
+ (forward-word -2)
(if (and head1
(not
(save-excursion
(re-search-backward "\\(\\`\n?\\|\n\n\\)=head1\\>"
nil t)))) ; Only one
(progn
- (forward-word-strictly 1)
+ (forward-word 1)
(setq name (file-name-base)
p (point))
(insert " NAME\n\n" name
"=head1 DESCRIPTION")
(cperl-ensure-newlines 4)
(goto-char p)
- (forward-word-strictly 2)
+ (forward-word 2)
(end-of-line)
(setq really-delete t))
- (forward-word-strictly 1))))
+ (forward-word 1))))
(if over
(progn
(setq p (point))
"=back")
(cperl-ensure-newlines 2)
(goto-char p)
- (forward-word-strictly 1)
+ (forward-word 1)
(end-of-line)
(setq really-delete t)))
(if (and delete really-delete)
(if (and over
(progn
(forward-paragraph -1)
- (forward-word-strictly 1)
+ (forward-word 1)
(setq pos (point))
(setq cut (buffer-substring (point) (point-at-eol)))
(delete-char (- (point-at-eol) (point)))
;; and do no indentation for them.
(and (eq last-command-event ?:)
(save-excursion
- (forward-word-strictly 1)
+ (forward-word 1)
(skip-chars-forward " \t")
(and (< (point) end)
(progn (goto-char (- end 1))
;; Now: tail: if the second part is non-matching without ///e
(if (eq (char-syntax (following-char)) ?w)
(progn
- (forward-word-strictly 1) ; skip modifiers s///s
+ (forward-word 1) ; skip modifiers s///s
(if tail (cperl-commentify tail (point) t))
(cperl-postpone-fontification
e1 (point) 'face my-cperl-REx-modifiers-face)))
(if (looking-at
"[ \t]*}?[ \t]*\\<\\(\\els\\(e\\|if\\)\\|continue\\|unless\\|if\\|while\\|for\\(each\\)?\\|until\\)\\>\\(\t*\\|[ \t][ \t]+\\)[^ \t\n#]")
(progn
- (forward-word-strictly 1)
+ (forward-word 1)
(delete-horizontal-space)
(insert (make-string cperl-indent-region-fix-constructs ?\s))
(beginning-of-line)))
(if (looking-at
"[ \t]*\\<for\\(each\\)?[ \t]+\\(my\\|local\\|our\\)\\(\t*\\|[ \t][ \t]+\\)[^ \t\n]")
(progn
- (forward-word-strictly 2)
+ (forward-word 2)
(delete-horizontal-space)
(insert (make-string cperl-indent-region-fix-constructs ?\s))
(beginning-of-line)))
(insert B " ")
(and B-comment (insert B-comment " "))
(just-one-space)
- (forward-word-strictly 1)
+ (forward-word 1)
(setq pre-A (point))
(insert " " A ";")
(delete-horizontal-space)
;; Font-locking support.
(defun elisp--font-lock-flush-elisp-buffers (&optional file)
- ;; FIXME: Aren't we only ever called from after-load-functions?
- ;; Don't flush during load unless called from after-load-functions.
- ;; In that case, FILE is non-nil. It's somehow strange that
- ;; load-in-progress is t when an after-load-function is called since
- ;; that should run *after* the load...
+ ;; We're only ever called from after-load-functions, load-in-progress can
+ ;; still be t in case of nested loads.
(when (or (not load-in-progress) file)
;; FIXME: If the loaded file did not define any macros, there shouldn't
;; be any need to font-lock-flush all the Elisp buffers.
(setq ref-point (point)
;; FIXME this does not work for constructs with
;; embedded space, eg "sync all".
- back-point (save-excursion (backward-word-strictly 1)
- (point))
+ back-point (save-excursion (backward-word 1) (point))
saveword (buffer-substring back-point ref-point))
(funcall change-word -1)
(or (string= saveword (buffer-substring back-point ref-point))
(let* ((default (save-excursion
(beginning-of-line)
(cond ((looking-at hif-ifx-else-endif-regexp)
- (forward-word-strictly 2)
+ (forward-word 2)
(current-word 'strict))
(t
nil))))
(ch-syntax (char-syntax ch)))
(if (eq ch-syntax ?w)
(assoc (buffer-substring
- (progn (forward-word-strictly -1) (point))
- (progn (forward-word-strictly 1) (point)))
+ (progn (forward-word -1) (point))
+ (progn (forward-word 1) (point)))
icon-resword-alist)
(not (memq ch '(0 ?\; ?\} ?\{ ?\) ?\] ?\" ?\' ?\# ?\, ?\. ?\n))))))
((and (eq (char-syntax (following-char)) ?w)
(cdr
(assoc (buffer-substring (point)
- (save-excursion (forward-word-strictly 1)
- (point)))
+ (save-excursion (forward-word 1) (point)))
icon-resword-alist))) 0)
(t (end-of-line 0) (icon-backward-to-start-of-continued-exp lim))))
(interactive)
(if (not (bobp)) (forward-char -1))
(re-search-forward "\\(\\s \\|^\\)end\\(\\s \\|$\\)" (point-max) 'move)
- (forward-word-strictly -1)
+ (forward-word -1)
(forward-line 1))
\f
(defun indent-icon-exp ()
(if (not (idlwave-quoted))
(if
(save-excursion
- (backward-word-strictly 1)
+ (backward-word 1)
(backward-char 1)
(looking-at "[ \t\n\f]"))
(idlwave-show-begin))))
"Go to the beginning of the current block."
(interactive)
(idlwave-block-jump-out -1 'nomark)
- (forward-word-strictly 1))
+ (forward-word 1))
(defun idlwave-end-of-block ()
"Go to the beginning of the current block."
(interactive)
(idlwave-block-jump-out 1 'nomark)
- (backward-word-strictly 1))
+ (backward-word 1))
(defun idlwave-forward-block (&optional arg)
"Move across next nested block."
(if (>= dir 0) (end-of-line)) ;Make sure we are in current block
(if (setq found (idlwave-find-key block-reg dir t unit-limit))
(while (and found (looking-at block-limit))
- (if (>= dir 0) (forward-word-strictly 1))
+ (if (>= dir 0) (forward-word 1))
(idlwave-block-jump-out dir t)
(setq found (idlwave-find-key block-reg dir t unit-limit))))
(if (not nomark) (push-mark here))
(if (not found) (goto-char unit-limit)
- (if (>= dir 0) (forward-word-strictly 1)))))
+ (if (>= dir 0) (forward-word 1)))))
(defun idlwave-min-current-statement-indent (&optional end-reg)
"The minimum indent in the current statement."
(is-self
(and arrow
(save-excursion (goto-char apos)
- (forward-word-strictly -1)
+ (forward-word -1)
(let ((case-fold-search t))
(looking-at "self\\>")))))
(force-query idlwave-force-class-query)
determined. Otherwise, return nil."
(cl-assert (looking-at "\\_<function\\_>"))
(let ((name t))
- (forward-word-strictly)
+ (forward-word)
(forward-comment most-positive-fixnum)
(when (eq (char-after) ?*)
(forward-char)
"^template class [A-z :&*<>~=,0-9+!]*(" nil t nil)
(progn
(beginning-of-line)
- (forward-word-strictly 1)
- (delete-region (point) (progn (forward-word-strictly 1) (point)))))))
+ (forward-word 1)
+ (delete-region (point) (progn (forward-word 1) (point)))))))
(defun mantemp-make-mantemps ()
"Gathering interface to the functions modifying the buffer."
(save-excursion
(goto-char (point-min))
(when (equal (funcall smie-forward-token-function) "function")
- (forward-word-strictly -1)
+ (forward-word -1)
(let* ((start (point))
(end (progn (forward-sexp 1) (point)))
(name (when (progn
(let ((lineup (if (or (looking-at "\\<var\\>\\|\\<record\\>") arg start)
":" "="))
(stpos (if start start
- (forward-word-strictly 2) (backward-word 1) (point)))
+ (forward-word 2) (backward-word 1) (point)))
(edpos (set-marker (make-marker)
(if end end
(max (progn (pascal-declaration-end)
;; sub tr {...}
(3 (ignore
(if (save-excursion (goto-char (match-beginning 0))
- (forward-word-strictly -1)
+ (forward-word -1)
(looking-at-p "sub[ \t\n]"))
;; This is defining a function.
nil
(skip-syntax-backward " ")
(skip-syntax-backward "w")
(member (buffer-substring
- (point) (progn (forward-word-strictly 1)
- (point)))
+ (point) (progn (forward-word 1) (point)))
'("tr" "s" "y"))))
(close (cdr (assq char perl-quote-like-pairs)))
(st (perl-quote-syntax-table char)))
((memq c '(?\) ?\] ?\} ?\"))
(forward-sexp -1) (forward-comment (- (point))) t)
((eq ?w (char-syntax c))
- (forward-word-strictly -1) (forward-comment (- (point))) t)
+ (forward-word -1) (forward-comment (- (point))) t)
(t (forward-char -1) (forward-comment (- (point))) t)))))
\f
;; note: this may be slower than the c-mode version, but I can understand it.
(goto-char (max 1 (1- (point)))))
(when (looking-at "[0-9]")
(forward-char 1)
- (forward-word-strictly -1)
+ (forward-word -1)
(when (looking-at "[0-9]+")
(let (i)
(setq
(defun python-shell-calculate-pythonpath ()
"Calculate the PYTHONPATH using `python-shell-extra-pythonpaths'."
(let ((pythonpath
- (tramp-compat-split-string
- (or (getenv "PYTHONPATH") "") path-separator)))
+ (split-string
+ (or (getenv "PYTHONPATH") "") path-separator 'omit)))
(python-shell--add-to-path-with-priority
pythonpath python-shell-extra-pythonpaths)
(mapconcat 'identity pythonpath path-separator)))
(md5 tramp-end-of-output)))
unset vars item)
(while env
- (setq item (tramp-compat-split-string (car env) "="))
+ (setq item (split-string (car env) "=" 'omit))
(setcdr item (mapconcat 'identity (cdr item) "="))
(if (and (stringp (cdr item)) (not (string-equal (cdr item) "")))
(push (format "%s %s" (car item) (cdr item)) vars)
(defun ruby-smie--redundant-do-p (&optional skip)
(save-excursion
- (if skip (backward-word-strictly 1))
+ (if skip (backward-word 1))
(member (nth 2 (smie-backward-sexp ";")) '("while" "until" "for"))))
(defun ruby-smie--opening-pipe-p ()
(setq tok (concat "." tok)))
(cond
((member tok '("unless" "if" "while" "until"))
- (if (save-excursion (forward-word-strictly -1) (ruby-smie--bosp))
+ (if (save-excursion (forward-word -1) (ruby-smie--bosp))
tok "iuwu-mod"))
((string-match-p "\\`|[*&]?\\'" tok)
(forward-char (- 1 (length tok)))
((equal tok "do")
(cond
((not (ruby-smie--redundant-do-p)) tok)
- ((> (save-excursion (forward-word-strictly 1)
+ ((> (save-excursion (forward-word 1)
(forward-comment (point-max)) (point))
(line-end-position))
(ruby-smie--backward-token)) ;Fully redundant.
(defun ruby-singleton-class-p (&optional pos)
(save-excursion
(when pos (goto-char pos))
- (forward-word-strictly -1)
+ (forward-word -1)
(and (or (bolp) (not (eq (char-before (point)) ?_)))
(looking-at ruby-singleton-class-re))))
((let ((s (ruby-parse-region (point) ruby-indent-point)))
(and (nth 2 s) (> (nth 2 s) 0)
(or (goto-char (cdr (nth 1 s))) t)))
- (forward-word-strictly -1)
+ (forward-word -1)
(setq indent (ruby-indent-size (current-column)
(nth 2 state))))
(t
(if (null (cdr (nth 1 state)))
(error "Invalid nesting"))
(goto-char (cdr (nth 1 state)))
- (forward-word-strictly -1) ; skip back a keyword
+ (forward-word -1) ; skip back a keyword
(setq begin (point))
(cond
((looking-at "do\\>[^_]") ; iter block is a special case
(forward-char -1)
(not (looking-at "{")))
(progn
- (forward-word-strictly -1)
+ (forward-word -1)
(not (looking-at "do\\>[^_]")))))
(t t))))
(not (eq ?, c))
(not (eq (char-before (point)) ?.))
(not (eq (char-before (point)) ?:)))
(ruby-end-of-block)
- (forward-word-strictly 1))
+ (forward-word 1))
((looking-at "\\(\\$\\|@@?\\)?\\sw")
(while (progn
- (while (progn (forward-word-strictly 1)
- (looking-at "_")))
+ (while (progn (forward-word 1) (looking-at "_")))
(cond ((looking-at "::") (forward-char 2) t)
((> (skip-chars-forward ".") 0))
((looking-at "\\?\\|!\\(=[~=>]\\|[^~=]\\)")
(skip-chars-forward "<"))
(not expr))))
(setq i (1- i)))
- ((error) (forward-word-strictly 1)))
+ ((error) (forward-word 1)))
i))))
(defun ruby-backward-sexp (&optional arg)
((looking-at "\\s(") nil)
(t
(forward-char 1)
- (while (progn (forward-word-strictly -1)
+ (while (progn (forward-word -1)
(pcase (char-before)
(`?_ t)
(`?. (forward-char -1) t)
Point should be before the newline."
(save-excursion
(let ((tok (funcall smie-backward-token-function)))
- (if (or (when (equal tok "not") (forward-word-strictly 1) t)
+ (if (or (when (equal tok "not") (forward-word 1) t)
(and (zerop (length tok)) (eq (char-before) ?\))))
(not (sh-smie--rc-after-special-arg-p))
(sh-smie--newline-semi-p tok)))))
(if (and (eq (char-syntax (preceding-char)) ?w)
(eq (char-syntax (following-char)) ?w))
(save-excursion
- (backward-word-strictly 1)
+ (backward-word 1)
(if (looking-at "end\\>\\|else\\>\\|otherwise\\>\\|when\\>")
(setq return-value nil)))))
((memq (preceding-char) '(?! ?t ?T))
(1+ count)))))
(while (< count 0)
(re-search-forward "\\<begin\\>\\|\\<end\\>")
- (backward-word-strictly 1)
+ (backward-word 1)
(if (not (simula-context))
(setq count (if (memq (following-char) '(?e ?E))
(1+ count)
(1- count))))
- (backward-word-strictly -1)))
+ (backward-word -1)))
;; If block level not found, jump back to origin and signal an error
(error (progn
(goto-char origin)
(if (< count start-count) (signal 'error nil)))
(while (> count 0)
(re-search-forward "\\<begin\\>\\|\\<end\\>")
- (backward-word-strictly 1)
+ (backward-word 1)
(if (not (simula-context))
(setq count (if (memq (following-char) '(?b ?B))
(1- count)
(1+ count))))
- (backward-word-strictly -1)
+ (backward-word -1)
;; deeper level has to be found within starting block
(if (> count start-count) (signal 'error nil))))
;; If block level not found, jump back to origin and signal an error
(simula-skip-comment-backward)
(if (memq (preceding-char) '(?n ?N))
(progn
- (backward-word-strictly 1)
+ (backward-word 1)
(if (not (looking-at "\\<begin\\>"))
- (backward-word-strictly -1)))
+ (backward-word -1)))
(if (eq (preceding-char) ?\;)
(backward-char 1))
)
(progn
(if (eq (following-char) ?\;)
(forward-char 1)
- (backward-word-strictly -1))))
+ (backward-word -1))))
(simula-skip-comment-forward))
(error (progn (goto-char origin)
(error "Incomplete statement (too many ENDs)")))
(condition-case ()
(progn
(simula-skip-comment-forward)
- (if (looking-at "\\<end\\>") (forward-word-strictly 1))
+ (if (looking-at "\\<end\\>") (forward-word 1))
(while (and (natnump (setq count (1- count)))
(setq status (simula-search-forward
";\\|\\<end\\>" (point-max) 'move))))
(if (and status (/= (preceding-char) ?\;))
(progn
- (backward-word-strictly 1)
+ (backward-word 1)
(simula-skip-comment-backward))))
(error (progn (goto-char origin)
(error "Incomplete statement (too few ENDs)")))
((eq context 2)
;; an END-comment must belong to an END
(re-search-backward "\\<end\\>")
- (forward-word-strictly 1)
+ (forward-word 1)
(throw 'simula-out nil))
;; should be impossible to get here..
)))))
((memq (following-char) '(?E ?e))
(setq indent (cdr simula-if-indent)))
(t
- (forward-word-strictly 1)
+ (forward-word 1)
(setq indent 0)))
(simula-find-if))
;;
(not (eq (preceding-char) ?\;))
(if (memq (preceding-char) '(?N ?n))
(save-excursion
- (backward-word-strictly 1)
+ (backward-word 1)
(not (looking-at "begin\\>")))
t))
(progn
;; (not found-end)
(if (eq (char-syntax (preceding-char)) ?w)
(progn
- (backward-word-strictly 1)
+ (backward-word 1)
(not (looking-at
"begin\\|then\\|else\\|when\\|otherwise\\|do"
)))
((looking-at "begin\\>")
(setq indent (+ indent simula-indent-level)))
((looking-at "end\\>")
- (forward-word-strictly 1)
+ (forward-word 1)
(simula-previous-statement 1))
((looking-at "do\\>")
(setq indent (+ indent simula-substatement-offset))
(simula-find-do-match))
((looking-at "\\(if\\|then\\|else\\)\\>")
(if (memq temp '(?I ?i))
- (forward-word-strictly 1)
+ (forward-word 1)
(setq indent (+ indent
simula-substatement-offset
(if (memq temp '(?T ?t))
(and (not (bobp))
(if (eq (char-syntax (preceding-char)) ?w)
(save-excursion
- (backward-word-strictly 1)
+ (backward-word 1)
(not (looking-at
"begin\\|then\\|else\\|when\\|otherwise\\|do")))
(not (memq (preceding-char) '(?: ?\;))))))
(simula-skip-comment-backward)
(if (and (eq (char-syntax (preceding-char)) ?w)
(progn
- (backward-word-strictly 1)
+ (backward-word 1)
(looking-at "else\\>")))
()
(throw 'simula-out t)))
(if where
(if (and (eq where 2) (eq (char-syntax (preceding-char)) ?w))
(save-excursion
- (backward-word-strictly 1)
+ (backward-word 1)
(not (looking-at "end\\>"))))))
(unexpand-abbrev)
(cond
;; check if the expanded word is on the beginning of the line.
(if (and (eq (char-syntax (preceding-char)) ?w)
(progn
- (backward-word-strictly 1)
+ (backward-word 1)
(if (looking-at "end\\>")
(save-excursion
(simula-backward-up-level 1)
;; Return the list of table names (public schema name can be omitted)
(mapcar #'(lambda (tbl)
(if (string= (car tbl) "public")
- (cadr tbl)
- (format "%s.%s" (car tbl) (cadr tbl))))
+ (format "\"%s\"" (cadr tbl))
+ (format "\"%s\".\"%s\"" (car tbl) (cadr tbl))))
cl))))
\f
((and (save-excursion
(vera-backward-syntactic-ws nil t)
;; previous line ends with a block opening?
- (or (/= (skip-chars-backward "{") 0) (backward-word-strictly 1))
+ (or (/= (skip-chars-backward "{") 0) (backward-word 1))
(when (looking-at vera-beg-block-re)
;; go to beginning of substatement
(vera-beginning-of-substatement)
;; is this line preceded by a substatement opening statement?
((save-excursion (vera-backward-syntactic-ws nil t)
(when (= (preceding-char) ?\)) (backward-sexp))
- (backward-word-strictly 1)
+ (backward-word 1)
(setq placeholder (point))
(looking-at vera-beg-substatement-re))
(goto-char placeholder)
"If previous word is a block closing or `else', indent line again."
(when (= (char-syntax (preceding-char)) ?w)
(save-excursion
- (backward-word-strictly 1)
+ (backward-word 1)
(when (and (not (vera-in-literal))
(looking-at (concat vera-end-block-re "\\|\\<else\\>")))
(indent-according-to-mode)))))
;;
;; This variable will always hold the version number of the mode
-(defconst verilog-mode-version "2015-09-18-314cf1d-vpo-GNU"
+(defconst verilog-mode-version "2015-11-21-8112ca0-vpo-GNU"
"Version of this Verilog mode.")
(defconst verilog-mode-release-emacs t
"If non-nil, this version of Verilog mode was released with Emacs itself.")
`(customize ,var))
)
- (unless (boundp 'inhibit-point-motion-hooks)
- (defvar inhibit-point-motion-hooks nil))
- (unless (boundp 'deactivate-mark)
- (defvar deactivate-mark nil))
+ (defvar inhibit-modification-hooks)
+ (defvar inhibit-point-motion-hooks)
+ (defvar deactivate-mark)
)
;;
;; OK, do this stuff if we are NOT XEmacs:
(looking-at (concat "\\(?:" regexp "\\)\\'")))))
(not (null pos)))))))
+(eval-and-compile
+ (cond
+ ((fboundp 'restore-buffer-modified-p)
+ ;; Faster, as does not update mode line when nothing changes
+ (defalias 'verilog-restore-buffer-modified-p 'restore-buffer-modified-p))
+ (t
+ (defalias 'verilog-restore-buffer-modified-p 'set-buffer-modified-p))))
+
(eval-and-compile
;; Both xemacs and emacs
(condition-case nil
difference buffer, and the point in original buffer with the
first difference.")
+(defvar verilog-diff-ignore-regexp nil
+ "Non-nil specifies regexp which `verilog-diff-auto' will ignore.
+This is typically nil.")
+
;;; Compile support:
;;
(modify-syntax-entry ?> "." table)
(modify-syntax-entry ?& "." table)
(modify-syntax-entry ?| "." table)
- ;; FIXME: This goes against Emacs conventions. Use "_" syntax instead and
- ;; then use regexps with things like "\\_<...\\_>".
(modify-syntax-entry ?` "w" table) ; ` is part of definition symbols in Verilog
(modify-syntax-entry ?_ "w" table)
(modify-syntax-entry ?\' "." table)
in any way that isn't completely restored again. Any
user-visible changes to the buffer must not be within a
`verilog-save-buffer-state'."
- ;; From c-save-buffer-state
- `(let* ((modified (buffer-modified-p))
- (buffer-undo-list t)
- (inhibit-read-only t)
- (inhibit-point-motion-hooks t)
- (verilog-no-change-functions t)
- before-change-functions
- after-change-functions
- deactivate-mark
- buffer-file-name ; Prevent primitives checking
- buffer-file-truename) ; for file modification
- (unwind-protect
- (progn ,@body)
- (and (not modified)
- (buffer-modified-p)
- (set-buffer-modified-p nil)))))
+ `(let ((inhibit-point-motion-hooks t)
+ (verilog-no-change-functions t))
+ ,(if (fboundp 'with-silent-modifications)
+ `(with-silent-modifications ,@body)
+ ;; Backward compatible version of with-silent-modifications
+ `(let* ((modified (buffer-modified-p))
+ (buffer-undo-list t)
+ (inhibit-read-only t)
+ (inhibit-modification-hooks t)
+ ;; XEmacs ignores inhibit-modification-hooks.
+ before-change-functions after-change-functions
+ deactivate-mark
+ buffer-file-name ; Prevent primitives checking
+ buffer-file-truename) ; for file modification
+ (unwind-protect
+ (progn ,@body)
+ (and (not modified)
+ (buffer-modified-p)
+ (verilog-restore-buffer-modified-p nil)))))))
-(defmacro verilog-save-no-change-functions (&rest body)
- "Execute BODY forms, disabling all change hooks in BODY.
-For insignificant changes, see instead `verilog-save-buffer-state'."
- `(let* ((inhibit-point-motion-hooks t)
- (verilog-no-change-functions t)
- before-change-functions
- after-change-functions)
- (progn ,@body)))
(defvar verilog-save-font-mod-hooked nil
- "Local variable when inside a `verilog-save-font-mods' block.")
+ "Local variable when inside a `verilog-save-font-no-change-functions' block.")
(make-variable-buffer-local 'verilog-save-font-mod-hooked)
-(defmacro verilog-save-font-mods (&rest body)
- "Execute BODY forms, disabling text modifications to allow performing BODY.
+(defmacro verilog-save-font-no-change-functions (&rest body)
+ "Execute BODY forms, disabling all change hooks in BODY.
Includes temporary disabling of `font-lock' to restore the buffer
to full text form for parsing. Additional actions may be specified with
-`verilog-before-save-font-hook' and `verilog-after-save-font-hook'."
- ;; Before version 20, match-string with font-lock returns a
- ;; vector that is not equal to the string. IE if on "input"
- ;; nil==(equal "input" (progn (looking-at "input") (match-string 0)))
- `(let* ((hooked (unless verilog-save-font-mod-hooked
- (verilog-run-hooks 'verilog-before-save-font-hook)
- t))
- (verilog-save-font-mod-hooked t)
- (fontlocked (when (and (boundp 'font-lock-mode) font-lock-mode)
- (font-lock-mode 0)
- t)))
- (unwind-protect
- (progn ,@body)
- ;; Unwind forms
- (when fontlocked (font-lock-mode t))
- (when hooked (verilog-run-hooks 'verilog-after-save-font-hook)))))
+`verilog-before-save-font-hook' and `verilog-after-save-font-hook'.
+For insignificant changes, see instead `verilog-save-buffer-state'."
+ `(if verilog-save-font-mod-hooked ; Short-circuit a recursive call
+ (progn ,@body)
+ ;; Before version 20, match-string with font-lock returns a
+ ;; vector that is not equal to the string. IE if on "input"
+ ;; nil==(equal "input" (progn (looking-at "input") (match-string 0)))
+ ;; Therefore we must remove and restore font-lock mode
+ (verilog-run-hooks 'verilog-before-save-font-hook)
+ (let* ((verilog-save-font-mod-hooked (- (point-max) (point-min)))
+ ;; Significant speed savings with no font-lock properties
+ (fontlocked (when (and (boundp 'font-lock-mode) font-lock-mode)
+ (font-lock-mode 0)
+ t)))
+ (run-hook-with-args 'before-change-functions (point-min) (point-max))
+ (unwind-protect
+ ;; Must inhibit and restore hooks before restoring font-lock
+ (let* ((inhibit-point-motion-hooks t)
+ (inhibit-modification-hooks t)
+ (verilog-no-change-functions t)
+ ;; XEmacs and pre-Emacs 21 ignore inhibit-modification-hooks.
+ before-change-functions after-change-functions)
+ (progn ,@body))
+ ;; Unwind forms
+ (run-hook-with-args 'after-change-functions (point-min) (point-max)
+ verilog-save-font-mod-hooked) ; old length
+ (when fontlocked (font-lock-mode t))
+ (verilog-run-hooks 'verilog-after-save-font-hook)))))
;;
;; Comment detection and caching
(found nil)
(st (point)))
(if (not (looking-at "\\<"))
- (forward-word-strictly -1))
+ (forward-word -1))
(cond
((verilog-skip-backward-comment-or-string))
((looking-at "\\<else\\>")
(st (point))
(nest 'yes))
(if (not (looking-at "\\<"))
- (forward-word-strictly -1))
+ (forward-word -1))
(cond
((verilog-skip-forward-comment-or-string)
(verilog-forward-syntactic-ws))
(and (looking-at "fork")
(progn
(setq here (point)) ; sometimes a fork is just a fork
- (forward-word-strictly -1)
+ (forward-word -1)
(looking-at verilog-disable-fork-re))))
(progn ; it is a disable fork; ignore it
(goto-char (match-end 0))
- (forward-word-strictly 1)
+ (forward-word 1)
(setq reg nil))
(progn ; it is a nice simple fork
(goto-char here) ; return from looking for "disable fork"
;; Search forward for matching endclocking
(setq reg "\\(\\<clocking\\>\\)\\|\\(\\<endclocking\\>\\)" )))
(if (and reg
- (forward-word-strictly 1))
+ (forward-word 1))
(catch 'skip
(if (eq nest 'yes)
(let ((depth 1)
(looking-at verilog-disable-fork-re)
(and (looking-at "fork")
(progn
- (forward-word-strictly -1)
+ (forward-word -1)
(looking-at verilog-disable-fork-re))))
(progn ; it is a disable fork; another false alarm
(goto-char (match-end 0)))
;; stop if we see a named coverpoint
(looking-at "\\w+\\W*:\\W*\\(coverpoint\\|cross\\|constraint\\)")
;; keep going if we are in the middle of a word
- (not (or (looking-at "\\<") (forward-word-strictly -1)))
+ (not (or (looking-at "\\<") (forward-word -1)))
;; stop if we see an assertion (perhaps labeled)
(and
(looking-at "\\(\\w+\\W*:\\W*\\)?\\(\\<\\(assert\\|assume\\|cover\\)\\>\\s-+\\<property\\>\\)\\|\\(\\<assert\\>\\)")
((looking-at "\\<end\\>")
;; HERE
- (forward-word-strictly 1)
+ (forward-word 1)
(verilog-forward-syntactic-ws)
(setq err nil)
(setq str (verilog-get-expr))
(verilog-backward-up-list 1)
(verilog-backward-syntactic-ws)
(let ((back (point)))
- (forward-word-strictly -1)
+ (forward-word -1)
(cond
;;XX
((looking-at "\\<\\(always\\(_latch\\|_ff\\|_comb\\)?\\|case\\(\\|[xz]\\)\\|for\\(\\|each\\|ever\\)\\|i\\(f\\|nitial\\)\\|repeat\\|while\\)\\>")
(;-- any of begin|initial|while are complete statements; 'begin : foo' is also complete
t
- (forward-word-strictly -1)
+ (forward-word -1)
(while (or (= (preceding-char) ?\_)
(= (preceding-char) ?\@)
(= (preceding-char) ?\.))
- (forward-word-strictly -1))
+ (forward-word -1))
(cond
((looking-at "\\<else\\>")
t)
(= (following-char) ?\`))
(progn
(forward-char 1)
- (forward-word-strictly 1)
+ (forward-word 1)
(skip-chars-forward " \t")))
((= (following-char) ?\[)
(progn
(when (and sv-busstring
(not (equal sv-busstring (verilog-sig-bits sig))))
(when nil ; Debugging
- (message (concat "Warning, can't merge into single bus %s%s"
+ (message (concat "Warning, can't merge into single bus `%s%s'"
", the AUTOs may be wrong")
sv-name bus))
(setq buswarn ", Couldn't Merge"))
(setcar (cdr (cdr (cdr newsig)))
(if (verilog-sig-memory newsig)
(concat (verilog-sig-memory newsig) (match-string 1))
- (match-string 1))))
+ (match-string-no-properties 1))))
(vec ; Multidimensional
(setq multidim (cons vec multidim))
(setq vec (verilog-string-replace-matches
- "\\s-+" "" nil nil (match-string 1))))
+ "\\s-+" "" nil nil (match-string-no-properties 1))))
(t ; Bit width
(setq vec (verilog-string-replace-matches
- "\\s-+" "" nil nil (match-string 1))))))
+ "\\s-+" "" nil nil (match-string-no-properties 1))))))
;; Normal or escaped identifier -- note we remember the \ if escaped
((looking-at "\\s-*\\([a-zA-Z0-9`_$]+\\|\\\\[^ \t\n\f]+\\)")
(goto-char (match-end 0))
- (setq keywd (match-string 1))
+ (setq keywd (match-string-no-properties 1))
(when (string-match "^\\\\" (match-string 1))
(setq keywd (concat keywd " "))) ; Escaped ID needs space at end
;; Add any :: package names to same identifier
(defvar sigs-out-unk)
(defvar sigs-temp)
;; These are known to be from other packages and may not be defined
- (defvar diff-command nil)
+ (defvar diff-command)
;; There are known to be from newer versions of Emacs
- (defvar create-lockfiles))
+ (defvar create-lockfiles)
+ (defvar which-func-modes))
-(defun verilog-read-sub-decls-sig (submoddecls comment port sig vec multidim)
+(defun verilog-read-sub-decls-sig (submoddecls comment port sig vec multidim mem)
"For `verilog-read-sub-decls-line', add a signal."
;; sig eq t to indicate .name syntax
;;(message "vrsds: %s(%S)" port sig)
(setq sig (if dotname port (verilog-symbol-detick-denumber sig)))
(if vec (setq vec (verilog-symbol-detick-denumber vec)))
(if multidim (setq multidim (mapcar `verilog-symbol-detick-denumber multidim)))
+ (if mem (setq mem (verilog-symbol-detick-denumber mem)))
(unless (or (not sig)
(equal sig "")) ; Ignore .foo(1'b1) assignments
(cond ((or (setq portdata (assoc port (verilog-decls-get-inouts submoddecls)))
sig
(if dotname (verilog-sig-bits portdata) vec)
(concat "To/From " comment)
- (verilog-sig-memory portdata)
+ mem
nil
(verilog-sig-signed portdata)
(unless (member (verilog-sig-type portdata) '("wire" "reg"))
sig
(if dotname (verilog-sig-bits portdata) vec)
(concat "From " comment)
- (verilog-sig-memory portdata)
+ mem
nil
(verilog-sig-signed portdata)
;; Though ok in SV, in V2K code, propagating the
sig
(if dotname (verilog-sig-bits portdata) vec)
(concat "To " comment)
- (verilog-sig-memory portdata)
+ mem
nil
(verilog-sig-signed portdata)
(unless (member (verilog-sig-type portdata) '("wire" "reg"))
sig
(if dotname (verilog-sig-bits portdata) vec)
(concat "To/From " comment)
- (verilog-sig-memory portdata)
+ mem
nil
(verilog-sig-signed portdata)
(verilog-sig-type portdata)
sig
(if dotname (verilog-sig-bits portdata) vec)
(concat "To/From " comment)
- (verilog-sig-memory portdata)
+ mem
nil
(verilog-sig-signed portdata)
(verilog-sig-type portdata)
"For `verilog-read-sub-decls-line', parse a subexpression and add signals."
;;(message "vrsde: `%s'" expr)
;; Replace special /*[....]*/ comments inserted by verilog-auto-inst-port
- (setq expr (verilog-string-replace-matches "/\\*\\(\\[[^*]+\\]\\)\\*/" "\\1" nil nil expr))
+ (setq expr (verilog-string-replace-matches "/\\*\\(\\.?\\[[^*]+\\]\\)\\*/" "\\1" nil nil expr))
;; Remove front operators
(setq expr (verilog-string-replace-matches "^\\s-*[---+~!|&]+\\s-*" "" nil nil expr))
;;
(while (setq mstr (pop mlst))
(verilog-read-sub-decls-expr submoddecls comment port mstr)))))
(t
- (let (sig vec multidim)
+ (let (sig vec multidim mem)
;; Remove leading reduction operators, etc
(setq expr (verilog-string-replace-matches "^\\s-*[---+~!|&]+\\s-*" "" nil nil expr))
;;(message "vrsde-ptop: `%s'" expr)
(when vec (setq multidim (cons vec multidim)))
(setq vec (match-string 1 expr)
expr (substring expr (match-end 0))))
+ ;; Find .[unpacked_memory] or .[unpacked][unpacked]...
+ (while (string-match "^\\s-*\\.\\(\\[[^]]+\\]\\)" expr)
+ ;;(message "vrsde-m: `%s'" (match-string 1 expr))
+ (setq mem (match-string 1 expr)
+ expr (substring expr (match-end 0))))
;; If found signal, and nothing unrecognized, add the signal
;;(message "vrsde-rem: `%s'" expr)
(when (and sig (string-match "^\\s-*$" expr))
- (verilog-read-sub-decls-sig submoddecls comment port sig vec multidim))))))
+ (verilog-read-sub-decls-sig submoddecls comment port sig vec multidim mem))))))
(defun verilog-read-sub-decls-line (submoddecls comment)
"For `verilog-read-sub-decls', read lines of port defs until none match.
(while (not done)
;; Get port name
(cond ((looking-at "\\s-*\\.\\s-*\\([a-zA-Z0-9`_$]*\\)\\s-*(\\s-*")
- (setq port (match-string 1))
+ (setq port (match-string-no-properties 1))
(goto-char (match-end 0)))
;; .\escaped (
((looking-at "\\s-*\\.\\s-*\\(\\\\[^ \t\n\f]*\\)\\s-*(\\s-*")
- (setq port (concat (match-string 1) " ")) ; escaped id's need trailing space
+ (setq port (concat (match-string-no-properties 1) " ")) ; escaped id's need trailing space
(goto-char (match-end 0)))
;; .name
((looking-at "\\s-*\\.\\s-*\\([a-zA-Z0-9`_$]*\\)\\s-*[,)/]")
(verilog-read-sub-decls-sig
- submoddecls comment (match-string 1) t ; sig==t for .name
- nil nil) ; vec multidim
+ submoddecls comment (match-string-no-properties 1) t ; sig==t for .name
+ nil nil nil) ; vec multidim mem
(setq port nil))
;; .\escaped_name
((looking-at "\\s-*\\.\\s-*\\(\\\\[^ \t\n\f]*\\)\\s-*[,)/]")
(verilog-read-sub-decls-sig
- submoddecls comment (concat (match-string 1) " ") t ; sig==t for .name
- nil nil) ; vec multidim
+ submoddecls comment (concat (match-string-no-properties 1) " ") t ; sig==t for .name
+ nil nil nil) ; vec multidim mem
(setq port nil))
;; random
((looking-at "\\s-*\\.[^(]*(")
(cond ((looking-at "\\([a-zA-Z_][a-zA-Z_0-9]*\\)\\s-*)")
(verilog-read-sub-decls-sig
submoddecls comment port
- (verilog-string-remove-spaces (match-string 1)) ; sig
- nil nil)) ; vec multidim
+ (verilog-string-remove-spaces (match-string-no-properties 1)) ; sig
+ nil nil nil)) ; vec multidim mem
;;
((looking-at "\\([a-zA-Z_][a-zA-Z_0-9]*\\)\\s-*\\(\\[[^]]+\\]\\)\\s-*)")
(verilog-read-sub-decls-sig
submoddecls comment port
- (verilog-string-remove-spaces (match-string 1)) ; sig
- (match-string 2) nil)) ; vec multidim
+ (verilog-string-remove-spaces (match-string-no-properties 1)) ; sig
+ (match-string-no-properties 2) nil nil)) ; vec multidim mem
;; Fastpath was above looking-at's.
;; For something more complicated invoke a parser
((looking-at "[^)]+")
(verilog-read-sub-decls-expr
submoddecls comment port
- (buffer-substring
+ (buffer-substring-no-properties
(point) (1- (progn (search-backward "(") ; start at (
(verilog-forward-sexp-ign-cmt 1)
(point)))))))) ; expr
(or mif ignore-error
(error
(concat
- "%s: Can't locate %s module definition%s"
+ "%s: Can't locate `%s' module definition%s"
"\n Check the verilog-library-directories variable."
"\n I looked in (if not listed, doesn't exist):\n\t%s")
(verilog-point-text) module
(t
;; Read from file
;; Clear then restore any highlighting to make emacs19 happy
- (let (func-returns)
- (verilog-save-font-mods
- (setq func-returns (funcall function)))
+ (let ((func-returns
+ (verilog-save-font-no-change-functions
+ (funcall function))))
;; Cache for next time
(setq verilog-modi-cache-list
(cons (list (list modi function)
(let* ((realname (verilog-symbol-detick name t))
(modport (assoc name (verilog-decls-get-modports (verilog-modi-get-decls modi)))))
(or modport ignore-error
- (error "%s: Can't locate %s modport definition%s"
+ (error "%s: Can't locate `%s' modport definition%s"
(verilog-point-text) name
(if (not (equal name realname))
(concat " (Expanded macro to " realname ")")
((equal direction "parameter")
(verilog-modi-cache-add-gparams modi sigs))
(t
- (error "Unsupported verilog-insert-definition direction: %s" direction))))
+ (error "Unsupported verilog-insert-definition direction: `%s'" direction))))
(or dont-sort
(setq sigs (sort (copy-alist sigs) `verilog-signals-sort-compare)))
(while sigs
(eval-when-compile
(if (not (boundp 'indent-pt))
- (defvar indent-pt nil "Local used by insert-indent")))
+ (defvar indent-pt nil "Local used by `verilog-insert-indent'.")))
(defun verilog-insert-indent (&rest stuff)
"Indent to position stored in local `indent-pt' variable, then insert STUFF.
(re-search-backward ",")
(delete-char 1))))))
+(defun verilog-delete-auto-buffer ()
+ "Perform `verilog-delete-auto' on the current buffer.
+Intended for internal use inside a `verilog-save-font-no-change-functions' block."
+ ;; Allow user to customize
+ (verilog-run-hooks 'verilog-before-delete-auto-hook)
+
+ ;; Remove those that have multi-line insertions, possibly with parameters
+ ;; We allow anything beginning with AUTO, so that users can add their own
+ ;; patterns
+ (verilog-auto-re-search-do
+ (concat "/\\*AUTO[A-Za-z0-9_]+"
+ ;; Optional parens or quoted parameter or .* for (((...)))
+ "\\(\\|([^)]*)\\|(\"[^\"]*\")\\).*?"
+ "\\*/")
+ 'verilog-delete-autos-lined)
+ ;; Remove those that are in parenthesis
+ (verilog-auto-re-search-do
+ (concat "/\\*"
+ (eval-when-compile
+ (verilog-regexp-words
+ `("AS" "AUTOARG" "AUTOCONCATWIDTH" "AUTOINST" "AUTOINSTPARAM"
+ "AUTOSENSE")))
+ "\\*/")
+ 'verilog-delete-to-paren)
+ ;; Do .* instantiations, but avoid removing any user pins by looking for our magic comments
+ (verilog-auto-re-search-do "\\.\\*"
+ 'verilog-delete-auto-star-all)
+ ;; Remove template comments ... anywhere in case was pasted after AUTOINST removed
+ (goto-char (point-min))
+ (while (re-search-forward "\\s-*// \\(Templated\\|Implicit \\.\\*\\)\\([ \tLT0-9]*\\| LHS: .*\\)?$" nil t)
+ (replace-match ""))
+
+ ;; Final customize
+ (verilog-run-hooks 'verilog-delete-auto-hook))
+
(defun verilog-delete-auto ()
"Delete the automatic outputs, regs, and wires created by \\[verilog-auto].
Use \\[verilog-auto] to re-insert the updated AUTOs.
(save-excursion
(if (buffer-file-name)
(find-file-noselect (buffer-file-name))) ; To check we have latest version
- (verilog-save-no-change-functions
+ (verilog-save-font-no-change-functions
(verilog-save-scan-cache
- ;; Allow user to customize
- (verilog-run-hooks 'verilog-before-delete-auto-hook)
-
- ;; Remove those that have multi-line insertions, possibly with parameters
- ;; We allow anything beginning with AUTO, so that users can add their own
- ;; patterns
- (verilog-auto-re-search-do
- (concat "/\\*AUTO[A-Za-z0-9_]+"
- ;; Optional parens or quoted parameter or .* for (((...)))
- "\\(\\|([^)]*)\\|(\"[^\"]*\")\\).*?"
- "\\*/")
- 'verilog-delete-autos-lined)
- ;; Remove those that are in parenthesis
- (verilog-auto-re-search-do
- (concat "/\\*"
- (eval-when-compile
- (verilog-regexp-words
- `("AS" "AUTOARG" "AUTOCONCATWIDTH" "AUTOINST" "AUTOINSTPARAM"
- "AUTOSENSE")))
- "\\*/")
- 'verilog-delete-to-paren)
- ;; Do .* instantiations, but avoid removing any user pins by looking for our magic comments
- (verilog-auto-re-search-do "\\.\\*"
- 'verilog-delete-auto-star-all)
- ;; Remove template comments ... anywhere in case was pasted after AUTOINST removed
- (goto-char (point-min))
- (while (re-search-forward "\\s-*// \\(Templated\\|Implicit \\.\\*\\)\\([ \tLT0-9]*\\| LHS: .*\\)?$" nil t)
- (replace-match ""))
+ (verilog-delete-auto-buffer)))))
- ;; Final customize
- (verilog-run-hooks 'verilog-delete-auto-hook)))))
\f
;;; Auto inject:
;;
;; Auto diff:
;;
-(defun verilog-diff-buffers-p (b1 b2 &optional whitespace)
+(defun verilog-diff-buffers-p (b1 b2 &optional whitespace regexp)
"Return nil if buffers B1 and B2 have same contents.
Else, return point in B1 that first mismatches.
-If optional WHITESPACE true, ignore whitespace."
+If optional WHITESPACE true, ignore whitespace.
+If optional REGEXP, ignore differences matching it."
(save-excursion
(let* ((case-fold-search nil) ; compare-buffer-substrings cares
(p1 (with-current-buffer b1 (goto-char (point-min))))
(goto-char p2)
(skip-chars-forward " \t\n\r\f\v")
(setq p2 (point))))
+ (when regexp
+ (with-current-buffer b1
+ (goto-char p1)
+ (when (looking-at regexp)
+ (setq p1 (match-end 0))))
+ (with-current-buffer b2
+ (goto-char p2)
+ (when (looking-at regexp)
+ (setq p2 (match-end 0)))))
(setq size (min (- maxp1 p1) (- maxp2 p2)))
(setq progress (compare-buffer-substrings b2 p2 (+ size p2)
b1 p1 (+ size p1)))
;; call `diff' as `diff' has different calling semantics on different
;; versions of Emacs.
(if (not (file-exists-p f1))
- (message "Buffer %s has no associated file on disc" (buffer-name b2))
+ (message "Buffer `%s' has no associated file on disk" (buffer-name b2))
(with-temp-buffer "*Verilog-Diff*"
(let ((outbuf (current-buffer))
(f2 (make-temp-file "vm-diff-auto-")))
;; Restore name if unwind
(with-current-buffer b1 (setq buffer-file-name name1)))))
;;
- (setq diffpt (verilog-diff-buffers-p b1 b2 t))
+ (setq diffpt (verilog-diff-buffers-p b1 b2 t verilog-diff-ignore-regexp))
(cond ((not diffpt)
(unless noninteractive (message "AUTO expansion identical"))
(kill-buffer newname)) ; Nice to cleanup after oneself
(vl-name (verilog-sig-name port-st))
(vl-width (verilog-sig-width port-st))
(vl-modport (verilog-sig-modport port-st))
+ (vl-memory (verilog-sig-memory port-st))
(vl-mbits (if (verilog-sig-multidim port-st)
(verilog-sig-multidim-string port-st) ""))
(vl-bits (if (or verilog-auto-inst-vector
(concat "\\<" (nth 0 (car check-values)) "\\>")
(concat "(" (nth 1 (car check-values)) ")")
t t vl-mbits)
+ vl-memory (when vl-memory
+ (verilog-string-replace-matches
+ (concat "\\<" (nth 0 (car check-values)) "\\>")
+ (concat "(" (nth 1 (car check-values)) ")")
+ t t vl-memory))
check-values (cdr check-values)))
(setq vl-bits (verilog-simplify-range-expression vl-bits)
vl-mbits (verilog-simplify-range-expression vl-mbits)
+ vl-memory (when vl-memory (verilog-simplify-range-expression vl-memory))
vl-width (verilog-make-width-expression vl-bits))) ; Not in the loop for speed
;; Default net value if not found
- (setq dflt-bits (if (and (verilog-sig-bits port-st)
- (or (verilog-sig-multidim port-st)
- (verilog-sig-memory port-st)))
- (concat "/*" vl-mbits vl-bits "*/")
+ (setq dflt-bits (if (or (and (verilog-sig-bits port-st)
+ (verilog-sig-multidim port-st))
+ (verilog-sig-memory port-st))
+ (concat "/*" vl-mbits vl-bits
+ ;; .[ used to separate packed from unpacked
+ (if vl-memory "." "")
+ (if vl-memory vl-memory "")
+ "*/")
(concat vl-bits))
tpl-net (concat port
(if (and vl-modport
(for-star
(indent-to (+ (if (< verilog-auto-inst-column 48) 24 16)
verilog-auto-inst-column))
- (verilog-insert " // Implicit .\*\n")) ;For some reason the . or * must be escaped...
+ (verilog-insert " // Implicit .*\n"))
(t
(insert "\n")))))
;;(verilog-auto-inst-port (list "foo" "[5:0]") 10 (list (list "foo" "a@\"(% (+ @ 1) 4)\"a")) "3")
(sig-list-all (verilog-decls-get-iovars moddecls))
;;
(undecode-sig (or (assoc undecode-name sig-list-all)
- (error "%s: Signal %s not found in design" (verilog-point-text) undecode-name)))
+ (error "%s: Signal `%s' not found in design"
+ (verilog-point-text) undecode-name)))
(undecode-enum (or (verilog-sig-enum undecode-sig)
- (error "%s: Signal %s does not have an enum tag" (verilog-point-text) undecode-name)))
+ (error "%s: Signal `%s' does not have an enum tag"
+ (verilog-point-text) undecode-name)))
;;
(enum-sigs (verilog-signals-not-in
(or (verilog-signals-matching-enum sig-list-consts undecode-enum)
- (error "%s: No state definitions for %s" (verilog-point-text) undecode-enum))
+ (error "%s: No state definitions for `%s'"
+ (verilog-point-text) undecode-enum))
nil))
;;
(one-hot (or
(unless noninteractive (message "Updating AUTOs..."))
(if (fboundp 'dinotrace-unannotate-all)
(dinotrace-unannotate-all))
- (verilog-save-font-mods
+ ;; Disable change hooks for speed
+ ;; This let can't be part of above let; must restore
+ ;; after-change-functions before font-lock resumes
+ (verilog-save-font-no-change-functions
(let ((oldbuf (if (not (buffer-modified-p))
- (buffer-string)))
- (case-fold-search verilog-case-fold)
- ;; Cache directories; we don't write new files, so can't change
- (verilog-dir-cache-preserving t)
- ;; Cache current module
- (verilog-modi-cache-current-enable t)
- (verilog-modi-cache-current-max (point-min)) ; IE it's invalid
- verilog-modi-cache-current)
- (unwind-protect
- ;; Disable change hooks for speed
- ;; This let can't be part of above let; must restore
- ;; after-change-functions before font-lock resumes
- (verilog-save-no-change-functions
- (verilog-save-scan-cache
- (save-excursion
- ;; Wipe cache; otherwise if we AUTOed a block above this one,
- ;; we'll misremember we have generated IOs, confusing AUTOOUTPUT
- (setq verilog-modi-cache-list nil)
- ;; Local state
- (verilog-read-auto-template-init)
- ;; If we're not in verilog-mode, change syntax table so parsing works right
- (unless (eq major-mode `verilog-mode) (verilog-mode))
- ;; Allow user to customize
- (verilog-run-hooks 'verilog-before-auto-hook)
- ;; Try to save the user from needing to revert-file to reread file local-variables
- (verilog-auto-reeval-locals)
- (verilog-read-auto-lisp-present)
- (verilog-read-auto-lisp (point-min) (point-max))
- (verilog-getopt-flags)
- ;; From here on out, we can cache anything we read from disk
- (verilog-preserve-dir-cache
- ;; These two may seem obvious to do always, but on large includes it can be way too slow
- (when verilog-auto-read-includes
- (verilog-read-includes)
- (verilog-read-defines nil nil t))
- ;; Setup variables due to SystemVerilog expansion
- (verilog-auto-re-search-do "/\\*AUTOLOGIC\\*/" 'verilog-auto-logic-setup)
- ;; This particular ordering is important
- ;; INST: Lower modules correct, no internal dependencies, FIRST
- (verilog-preserve-modi-cache
- ;; Clear existing autos else we'll be screwed by existing ones
- (verilog-delete-auto)
- ;; Injection if appropriate
- (when inject
- (verilog-inject-inst)
- (verilog-inject-sense)
- (verilog-inject-arg))
- ;;
- ;; Do user inserts first, so their code can insert AUTOs
- (verilog-auto-re-search-do "/\\*AUTOINSERTLISP(.*?)\\*/"
- 'verilog-auto-insert-lisp)
- ;; Expand instances before need the signals the instances input/output
- (verilog-auto-re-search-do "/\\*AUTOINSTPARAM\\*/" 'verilog-auto-inst-param)
- (verilog-auto-re-search-do "/\\*AUTOINST\\*/" 'verilog-auto-inst)
- (verilog-auto-re-search-do "\\.\\*" 'verilog-auto-star)
- ;; Doesn't matter when done, but combine it with a common changer
- (verilog-auto-re-search-do "/\\*\\(AUTOSENSE\\|AS\\)\\*/" 'verilog-auto-sense)
- (verilog-auto-re-search-do "/\\*AUTORESET\\*/" 'verilog-auto-reset)
- ;; Must be done before autoin/out as creates a reg
- (verilog-auto-re-search-do "/\\*AUTOASCIIENUM(.*?)\\*/" 'verilog-auto-ascii-enum)
- ;;
- ;; first in/outs from other files
- (verilog-auto-re-search-do "/\\*AUTOINOUTMODPORT(.*?)\\*/" 'verilog-auto-inout-modport)
- (verilog-auto-re-search-do "/\\*AUTOINOUTMODULE(.*?)\\*/" 'verilog-auto-inout-module)
- (verilog-auto-re-search-do "/\\*AUTOINOUTCOMP(.*?)\\*/" 'verilog-auto-inout-comp)
- (verilog-auto-re-search-do "/\\*AUTOINOUTIN(.*?)\\*/" 'verilog-auto-inout-in)
- (verilog-auto-re-search-do "/\\*AUTOINOUTPARAM(.*?)\\*/" 'verilog-auto-inout-param)
- ;; next in/outs which need previous sucked inputs first
- (verilog-auto-re-search-do "/\\*AUTOOUTPUT\\((.*?)\\)?\\*/" 'verilog-auto-output)
- (verilog-auto-re-search-do "/\\*AUTOINPUT\\((.*?)\\)?\\*/" 'verilog-auto-input)
- (verilog-auto-re-search-do "/\\*AUTOINOUT\\((.*?)\\)?\\*/" 'verilog-auto-inout)
- ;; Then tie off those in/outs
- (verilog-auto-re-search-do "/\\*AUTOTIEOFF\\*/" 'verilog-auto-tieoff)
- ;; These can be anywhere after AUTOINSERTLISP
- (verilog-auto-re-search-do "/\\*AUTOUNDEF\\((.*?)\\)?\\*/" 'verilog-auto-undef)
- ;; Wires/regs must be after inputs/outputs
- (verilog-auto-re-search-do "/\\*AUTOASSIGNMODPORT(.*?)\\*/" 'verilog-auto-assign-modport)
- (verilog-auto-re-search-do "/\\*AUTOLOGIC\\*/" 'verilog-auto-logic)
- (verilog-auto-re-search-do "/\\*AUTOWIRE\\*/" 'verilog-auto-wire)
- (verilog-auto-re-search-do "/\\*AUTOREG\\*/" 'verilog-auto-reg)
- (verilog-auto-re-search-do "/\\*AUTOREGINPUT\\*/" 'verilog-auto-reg-input)
- ;; outputevery needs AUTOOUTPUTs done first
- (verilog-auto-re-search-do "/\\*AUTOOUTPUTEVERY\\((.*?)\\)?\\*/" 'verilog-auto-output-every)
- ;; After we've created all new variables
- (verilog-auto-re-search-do "/\\*AUTOUNUSED\\*/" 'verilog-auto-unused)
- ;; Must be after all inputs outputs are generated
- (verilog-auto-re-search-do "/\\*AUTOARG\\*/" 'verilog-auto-arg)
- ;; User inserts
- (verilog-auto-re-search-do "/\\*AUTOINSERTLAST(.*?)\\*/" 'verilog-auto-insert-last)
- ;; Fix line numbers (comments only)
- (when verilog-auto-inst-template-numbers
- (verilog-auto-templated-rel))
- (when verilog-auto-template-warn-unused
- (verilog-auto-template-lint))))
- ;;
- (verilog-run-hooks 'verilog-auto-hook)
- ;;
- (when verilog-auto-delete-trailing-whitespace
- (verilog-delete-trailing-whitespace))
- ;;
- (set (make-local-variable 'verilog-auto-update-tick) (buffer-chars-modified-tick))
- ;;
- ;; If end result is same as when started, clear modified flag
- (cond ((and oldbuf (equal oldbuf (buffer-string)))
- (set-buffer-modified-p nil)
- (unless noninteractive (message "Updating AUTOs...done (no changes)")))
- (t (unless noninteractive (message "Updating AUTOs...done"))))
- ;; End of after-change protection
- )))
- ;; Unwind forms
- ;; Currently handled in verilog-save-font-mods
- ))))
+ (buffer-string)))
+ (case-fold-search verilog-case-fold)
+ ;; Cache directories; we don't write new files, so can't change
+ (verilog-dir-cache-preserving t)
+ ;; Cache current module
+ (verilog-modi-cache-current-enable t)
+ (verilog-modi-cache-current-max (point-min)) ; IE it's invalid
+ verilog-modi-cache-current)
+ (verilog-save-scan-cache
+ (save-excursion
+ ;; Wipe cache; otherwise if we AUTOed a block above this one,
+ ;; we'll misremember we have generated IOs, confusing AUTOOUTPUT
+ (setq verilog-modi-cache-list nil)
+ ;; Local state
+ (verilog-read-auto-template-init)
+ ;; If we're not in verilog-mode, change syntax table so parsing works right
+ (unless (eq major-mode `verilog-mode) (verilog-mode))
+ ;; Allow user to customize
+ (verilog-run-hooks 'verilog-before-auto-hook)
+ ;; Try to save the user from needing to revert-file to reread file local-variables
+ (verilog-auto-reeval-locals)
+ (verilog-read-auto-lisp-present)
+ (verilog-read-auto-lisp (point-min) (point-max))
+ (verilog-getopt-flags)
+ ;; From here on out, we can cache anything we read from disk
+ (verilog-preserve-dir-cache
+ ;; These two may seem obvious to do always, but on large includes it can be way too slow
+ (when verilog-auto-read-includes
+ (verilog-read-includes)
+ (verilog-read-defines nil nil t))
+ ;; Setup variables due to SystemVerilog expansion
+ (verilog-auto-re-search-do "/\\*AUTOLOGIC\\*/" 'verilog-auto-logic-setup)
+ ;; This particular ordering is important
+ ;; INST: Lower modules correct, no internal dependencies, FIRST
+ (verilog-preserve-modi-cache
+ ;; Clear existing autos else we'll be screwed by existing ones
+ (verilog-delete-auto-buffer)
+ ;; Injection if appropriate
+ (when inject
+ (verilog-inject-inst)
+ (verilog-inject-sense)
+ (verilog-inject-arg))
+ ;;
+ ;; Do user inserts first, so their code can insert AUTOs
+ (verilog-auto-re-search-do "/\\*AUTOINSERTLISP(.*?)\\*/"
+ 'verilog-auto-insert-lisp)
+ ;; Expand instances before need the signals the instances input/output
+ (verilog-auto-re-search-do "/\\*AUTOINSTPARAM\\*/" 'verilog-auto-inst-param)
+ (verilog-auto-re-search-do "/\\*AUTOINST\\*/" 'verilog-auto-inst)
+ (verilog-auto-re-search-do "\\.\\*" 'verilog-auto-star)
+ ;; Doesn't matter when done, but combine it with a common changer
+ (verilog-auto-re-search-do "/\\*\\(AUTOSENSE\\|AS\\)\\*/" 'verilog-auto-sense)
+ (verilog-auto-re-search-do "/\\*AUTORESET\\*/" 'verilog-auto-reset)
+ ;; Must be done before autoin/out as creates a reg
+ (verilog-auto-re-search-do "/\\*AUTOASCIIENUM(.*?)\\*/" 'verilog-auto-ascii-enum)
+ ;;
+ ;; first in/outs from other files
+ (verilog-auto-re-search-do "/\\*AUTOINOUTMODPORT(.*?)\\*/" 'verilog-auto-inout-modport)
+ (verilog-auto-re-search-do "/\\*AUTOINOUTMODULE(.*?)\\*/" 'verilog-auto-inout-module)
+ (verilog-auto-re-search-do "/\\*AUTOINOUTCOMP(.*?)\\*/" 'verilog-auto-inout-comp)
+ (verilog-auto-re-search-do "/\\*AUTOINOUTIN(.*?)\\*/" 'verilog-auto-inout-in)
+ (verilog-auto-re-search-do "/\\*AUTOINOUTPARAM(.*?)\\*/" 'verilog-auto-inout-param)
+ ;; next in/outs which need previous sucked inputs first
+ (verilog-auto-re-search-do "/\\*AUTOOUTPUT\\((.*?)\\)?\\*/" 'verilog-auto-output)
+ (verilog-auto-re-search-do "/\\*AUTOINPUT\\((.*?)\\)?\\*/" 'verilog-auto-input)
+ (verilog-auto-re-search-do "/\\*AUTOINOUT\\((.*?)\\)?\\*/" 'verilog-auto-inout)
+ ;; Then tie off those in/outs
+ (verilog-auto-re-search-do "/\\*AUTOTIEOFF\\*/" 'verilog-auto-tieoff)
+ ;; These can be anywhere after AUTOINSERTLISP
+ (verilog-auto-re-search-do "/\\*AUTOUNDEF\\((.*?)\\)?\\*/" 'verilog-auto-undef)
+ ;; Wires/regs must be after inputs/outputs
+ (verilog-auto-re-search-do "/\\*AUTOASSIGNMODPORT(.*?)\\*/" 'verilog-auto-assign-modport)
+ (verilog-auto-re-search-do "/\\*AUTOLOGIC\\*/" 'verilog-auto-logic)
+ (verilog-auto-re-search-do "/\\*AUTOWIRE\\*/" 'verilog-auto-wire)
+ (verilog-auto-re-search-do "/\\*AUTOREG\\*/" 'verilog-auto-reg)
+ (verilog-auto-re-search-do "/\\*AUTOREGINPUT\\*/" 'verilog-auto-reg-input)
+ ;; outputevery needs AUTOOUTPUTs done first
+ (verilog-auto-re-search-do "/\\*AUTOOUTPUTEVERY\\((.*?)\\)?\\*/" 'verilog-auto-output-every)
+ ;; After we've created all new variables
+ (verilog-auto-re-search-do "/\\*AUTOUNUSED\\*/" 'verilog-auto-unused)
+ ;; Must be after all inputs outputs are generated
+ (verilog-auto-re-search-do "/\\*AUTOARG\\*/" 'verilog-auto-arg)
+ ;; User inserts
+ (verilog-auto-re-search-do "/\\*AUTOINSERTLAST(.*?)\\*/" 'verilog-auto-insert-last)
+ ;; Fix line numbers (comments only)
+ (when verilog-auto-inst-template-numbers
+ (verilog-auto-templated-rel))
+ (when verilog-auto-template-warn-unused
+ (verilog-auto-template-lint))))
+ ;;
+ (verilog-run-hooks 'verilog-auto-hook)
+ ;;
+ (when verilog-auto-delete-trailing-whitespace
+ (verilog-delete-trailing-whitespace))
+ ;;
+ (set (make-local-variable 'verilog-auto-update-tick) (buffer-chars-modified-tick))
+ ;;
+ ;; If end result is same as when started, clear modified flag
+ (cond ((and oldbuf (equal oldbuf (buffer-string)))
+ (verilog-restore-buffer-modified-p nil)
+ (unless noninteractive (message "Updating AUTOs...done (no changes)")))
+ (t (unless noninteractive (message "Updating AUTOs...done"))))
+ ;; End of save-cache
+ )))))
\f
;;; Skeletons:
;;
;; keyword, allow for the keyword and an extra character,
;; as this will be used when looking forward for the
;; "begin" keyword.
- (save-excursion (forward-word-strictly 1) (1+ (point))))
+ (save-excursion (forward-word 1) (1+ (point))))
foundp literal placeholder)
;; Find the "libunit" keyword.
(while (and (not foundp)
;; keyword, allow for the keyword and an extra character,
;; as this will be used when looking forward for the
;; "begin" keyword.
- (save-excursion (forward-word-strictly 1) (1+ (point))))
+ (save-excursion (forward-word 1) (1+ (point))))
begin-string literal)
(while (and (not foundp)
(re-search-backward vhdl-defun-re nil 'move))
;; start point was not inside leader area
;; set stop point at word after leader
(setq pos (point))))
- (forward-word-strictly 1)
+ (forward-word 1)
(vhdl-forward-syntactic-ws here)
(setq pos (point)))
(goto-char pos)
(setq end (vhdl-re-search-forward "\\<then\\>" proc-end t))
(when (vhdl-re-search-backward "\\('event\\|\\<\\(falling\\|rising\\)_edge\\)\\>" beg t)
(goto-char end)
- (backward-word-strictly 1)
+ (backward-word 1)
(vhdl-forward-sexp)
(push (cons end (point)) seq-region-list)
(beginning-of-line)))
(vhdl-insert-keyword ": BLOCK ")
(goto-char start)
(when (setq label (vhdl-template-field "label" nil t start (+ (point) 8)))
- (forward-word-strictly 1)
+ (forward-word 1)
(forward-char 1)
(insert "(")
(if (vhdl-template-field "[guard expression]" nil t)
(if (vhdl-template-field "[quantity name]" " USE " t)
(progn (vhdl-template-field "quantity name" " => ") t)
(delete-region (point)
- (progn (forward-word-strictly -1) (point)))
+ (progn (forward-word -1) (point)))
nil))
(vhdl-template-field "[quantity name]" " => " t))
(vhdl-template-field "expression")
(goto-char start)
(setq label (vhdl-template-field "[label]" nil t))
(unless label (delete-char 2))
- (forward-word-strictly 1)
+ (forward-word 1)
(forward-char 1))
(when (vhdl-template-field "expression" nil t start (point))
(vhdl-insert-keyword (concat " " (if (eq kind 'is) "IS" "USE") "\n\n"))
(interactive)
(insert " ")
(unexpand-abbrev)
- (backward-word-strictly 1)
+ (backward-word 1)
(vhdl-case-word 1)
(forward-char 1))
(interactive)
(insert " ")
(unexpand-abbrev)
- (backward-word-strictly 1)
+ (backward-word 1)
(vhdl-case-word 1)
(forward-char 1)
(indent-according-to-mode))
(goto-char start)
(setq label (vhdl-template-field "[label]" nil t))
(unless label (delete-char 2))
- (forward-word-strictly 1)
+ (forward-word 1)
(forward-char 1))
(when (setq index (vhdl-template-field "loop variable"
nil t start (point)))
(goto-char start)
(setq label (vhdl-template-field "[label]" nil t))
(unless label (delete-char 2))
- (forward-word-strictly 1)
+ (forward-word 1)
(forward-char 1))
(when vhdl-conditions-in-parenthesis (insert "("))
(when (vhdl-template-field "condition" nil t start (point))
(goto-char start)
(setq label (vhdl-template-field "[label]" nil t))
(unless label (delete-char 2))
- (forward-word-strictly 1)
+ (forward-word 1)
(delete-char 1))
(insert "\n\n")
(indent-to margin)
(cond ((equal definition "")
(insert ";"))
((equal definition "ARRAY")
- (delete-region (point) (progn (forward-word-strictly -1)
- (point)))
+ (delete-region (point) (progn (forward-word -1) (point)))
(vhdl-template-array 'nature t))
((equal definition "RECORD")
(setq mid-pos (point-marker))
- (delete-region (point) (progn (forward-word-strictly -1)
- (point)))
+ (delete-region (point) (progn (forward-word -1) (point)))
(vhdl-template-record 'nature name t))
(t
(vhdl-insert-keyword " ACROSS ")
(goto-char start)
(setq label (vhdl-template-field "[label]" nil t))
(unless label (delete-char 2))
- (forward-word-strictly 1)
+ (forward-word 1)
(forward-char 1))
(unless (vhdl-standard-p '87) (vhdl-insert-keyword "IS"))
(insert "\n")
(goto-char start)
(setq label (vhdl-template-field "[label]" nil t))
(unless label (delete-char 2))
- (forward-word-strictly 1)
+ (forward-word 1)
(forward-char 1))
(insert "(")
(if (not seq)
(vhdl-insert-keyword "WITH ")
(when (vhdl-template-field "selector expression"
nil t start (+ (point) 7))
- (forward-word-strictly 1)
+ (forward-word 1)
(delete-char 1)
(insert "\n")
(indent-to (+ margin vhdl-basic-offset))
(delete-char -4)
(insert ";"))
((equal definition "ARRAY")
- (delete-region (point) (progn (forward-word-strictly -1)
- (point)))
+ (delete-region (point) (progn (forward-word -1) (point)))
(vhdl-template-array 'type t))
((equal definition "RECORD")
(setq mid-pos (point-marker))
- (delete-region (point) (progn (forward-word-strictly -1)
- (point)))
+ (delete-region (point) (progn (forward-word -1) (point)))
(vhdl-template-record 'type name t))
((equal definition "ACCESS")
(insert " ")
(if (or (save-excursion
(progn (vhdl-beginning-of-block)
(looking-at "\\s-*\\(\\w+\\s-*:\\s-*\\)?\\<\\(\\<function\\|procedure\\|process\\|procedural\\)\\>")))
- (save-excursion (backward-word-strictly 1)
- (looking-at "\\<shared\\>")))
+ (save-excursion (backward-word 1) (looking-at "\\<shared\\>")))
(vhdl-insert-keyword "VARIABLE ")
(if (vhdl-standard-p '87)
(error "ERROR: Not within sequential block")
(goto-char start)
(setq label (vhdl-template-field "[label]" nil t))
(unless label (delete-char 2))
- (forward-word-strictly 1)
+ (forward-word 1)
(forward-char 1))
(when vhdl-conditions-in-parenthesis (insert "("))
(when (vhdl-template-field "condition" nil t start (point))
(save-match-data
(save-excursion
(goto-char (match-end 5))
- (forward-word-strictly 1)
+ (forward-word 1)
(vhdl-forward-syntactic-ws)
(when (looking-at "(")
(forward-sexp))
but not if inside a comment or quote."
(if (or (vhdl-in-literal)
(save-excursion
- (forward-word-strictly -1)
+ (forward-word -1)
(and (looking-at "\\<end\\>") (not (looking-at "\\<end;")))))
(progn
(insert " ")
(unexpand-abbrev)
- (backward-word-strictly 1)
+ (backward-word 1)
(vhdl-case-word 1)
(delete-char 1))
(if (not vhdl-electric-mode)
(progn
(insert " ")
(unexpand-abbrev)
- (backward-word-strictly 1)
+ (backward-word 1)
(vhdl-case-word 1)
(delete-char 1))
(let ((invoke-char vhdl-last-input-event)
(equal "END" (upcase (match-string 1))))
(throw 'parse "ERROR: Not within an entity or component declaration"))
(setq decl-type (downcase (match-string-no-properties 1)))
- (forward-word-strictly 1)
+ (forward-word 1)
(vhdl-parse-string "\\s-+\\(\\w+\\)\\(\\s-+is\\>\\)?")
(setq name (match-string-no-properties 1))
(message "Reading port of %s \"%s\"..." decl-type name)
;; subprogram body
(when (match-string 2)
(re-search-forward "^\\s-*\\<begin\\>" nil t)
- (backward-word-strictly 1)
+ (backward-word 1)
(vhdl-forward-sexp)))
;; block (recursive)
((looking-at "^\\s-*\\w+\\s-*:\\s-*block\\>")
(re-search-forward "^\\s-*end\\s-+process\\>" nil t))
;; configuration declaration
((looking-at "^\\s-*configuration\\>")
- (forward-word-strictly 4)
+ (forward-word 4)
(vhdl-forward-sexp))
(t (goto-char pos))))))
-;;; which-func.el --- print current function in mode line
+;;; which-func.el --- print current function in mode line -*- lexical-binding:t -*-
;; Copyright (C) 1994, 1997-1998, 2001-2016 Free Software Foundation,
;; Inc.
"List of major modes for which Which Function mode should be used.
For other modes it is disabled. If this is equal to t,
then Which Function mode is enabled in any major mode that supports it."
- :group 'which-func
:version "24.3" ; explicit list -> t
:type '(choice (const :tag "All modes" t)
(repeat (symbol :tag "Major mode"))))
until you use Imenu, in these modes. Note that files
larger than `which-func-maxout' behave in this way too;
Which Function mode doesn't do anything until you use Imenu."
- :group 'which-func
:type '(repeat (symbol :tag "Major mode")))
(defcustom which-func-maxout 500000
"Don't automatically compute the Imenu menu if buffer is this big or bigger.
Zero means compute the Imenu menu regardless of size."
- :group 'which-func
:type 'integer)
(defvar which-func-keymap
:foreground "Blue1")
(t
:foreground "LightSkyBlue"))
- "Face used to highlight mode line function names."
- :group 'which-func)
+ "Face used to highlight mode line function names.")
(defcustom which-func-format
`("["
"]")
"Format for displaying the function in the mode line."
:version "24.2" ; added mouse-face; 24point2 is correct
- :group 'which-func
:type 'sexp)
;;;###autoload (put 'which-func-format 'risky-local-variable t)
(add-hook 'find-file-hook 'which-func-ff-hook t)
+(defun which-func-try-to-enable ()
+ (unless (or (not which-function-mode)
+ (local-variable-p 'which-func-mode))
+ (setq which-func-mode (or (eq which-func-modes t)
+ (member major-mode which-func-modes)))))
+
(defun which-func-ff-hook ()
"File find hook for Which Function mode.
It creates the Imenu index for the buffer, if necessary."
- (unless (local-variable-p 'which-func-mode)
- (setq which-func-mode
- (and which-function-mode
- (or (eq which-func-modes t)
- (member major-mode which-func-modes)))))
+ (which-func-try-to-enable)
(condition-case err
(if (and which-func-mode
(defvar which-func-update-timer nil)
+(unless (or (assq 'which-func-mode mode-line-misc-info)
+ (assq 'which-function-mode mode-line-misc-info))
+ (add-to-list 'mode-line-misc-info
+ '(which-function-mode ;Only display if mode is enabled.
+ (which-func-mode ;Only display if buffer supports it.
+ ("" which-func-format " ")))))
+
;; This is the name people would normally expect.
;;;###autoload
(define-minor-mode which-function-mode
(when (timerp which-func-update-timer)
(cancel-timer which-func-update-timer))
(setq which-func-update-timer nil)
- (if which-function-mode
- ;;Turn it on
- (progn
- (setq which-func-update-timer
- (run-with-idle-timer idle-update-delay t #'which-func-update))
- (dolist (buf (buffer-list))
- (with-current-buffer buf
- (unless (local-variable-p 'which-func-mode)
- (setq which-func-mode
- (or (eq which-func-modes t)
- (member major-mode which-func-modes)))))))))
+ (when which-function-mode
+ ;;Turn it on.
+ (setq which-func-update-timer
+ (run-with-idle-timer idle-update-delay t #'which-func-update))
+ (dolist (buf (buffer-list))
+ (with-current-buffer buf (which-func-try-to-enable)))))
(defvar which-function-imenu-failed nil
"Locally t in a buffer if `imenu--make-index-alist' found nothing there.")
(provide 'ps-mule)
;; Local Variables:
-;; generated-autoload-file: "ps-print.el"
+;; generated-autoload-file: "ps-print-loaddefs.el"
;; End:
;;; ps-mule.el ends here
;; Load XEmacs/Emacs definitions
(require 'ps-def)
+;; autoloads for secondary file
+(require 'ps-print-loaddefs)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; User Variables:
(unless noninteractive
(add-hook 'kill-emacs-hook #'ps-kill-emacs-check))
-\f
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; To make this file smaller, some commands go in a separate file.
-;; But autoload them here to make the separation invisible.
-\f
-;;;### (autoloads nil "ps-mule" "ps-mule.el" "4a263b7a727e853f2e6672922c4e5755")
-;;; Generated autoloads from ps-mule.el
-
-(defvar ps-multibyte-buffer nil "\
-Specifies the multi-byte buffer handling.
-
-Valid values are:
-
- nil This is the value to use the default settings;
- by default, this only works to print buffers with
- only ASCII and Latin characters. But this default
- setting can be changed by setting the variable
- `ps-mule-font-info-database-default' differently.
- The initial value of this variable is
- `ps-mule-font-info-database-latin' (see
- documentation).
-
- `non-latin-printer' This is the value to use when you have a Japanese
- or Korean PostScript printer and want to print
- buffer with ASCII, Latin-1, Japanese (JISX0208 and
- JISX0201-Kana) and Korean characters. At present,
- it was not tested with the Korean characters
- printing. If you have a korean PostScript printer,
- please, test it.
-
- `bdf-font' This is the value to use when you want to print
- buffer with BDF fonts. BDF fonts include both latin
- and non-latin fonts. BDF (Bitmap Distribution
- Format) is a format used for distributing X's font
- source file. BDF fonts are included in
- `intlfonts-1.2' which is a collection of X11 fonts
- for all characters supported by Emacs. In order to
- use this value, be sure to have installed
- `intlfonts-1.2' and set the variable
- `bdf-directory-list' appropriately (see ps-bdf.el for
- documentation of this variable).
-
- `bdf-font-except-latin' This is like `bdf-font' except that it uses
- PostScript default fonts to print ASCII and Latin-1
- characters. This is convenient when you want or
- need to use both latin and non-latin characters on
- the same buffer. See `ps-font-family',
- `ps-header-font-family' and `ps-font-info-database'.
-
-Any other value is treated as nil.")
-
-(custom-autoload 'ps-multibyte-buffer "ps-mule" t)
-
-(autoload 'ps-mule-initialize "ps-mule" "\
-Initialize global data for printing multi-byte characters.
-
-\(fn)" nil nil)
-
-(autoload 'ps-mule-begin-job "ps-mule" "\
-Start printing job for multi-byte chars between FROM and TO.
-It checks if all multi-byte characters in the region are printable or not.
-
-\(fn FROM TO)" nil nil)
-
-(autoload 'ps-mule-end-job "ps-mule" "\
-Finish printing job for multi-byte chars.
-
-\(fn)" nil nil)
-
-;;;***
-\f
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
(provide 'ps-print)
;;; ps-print.el ends here
(and locprn
(ses--locprn-compiled locprn))))
printer)
- (or value "")))
+ value))
(if (stringp value)
value
(or (stringp (car-safe value))
(if (setq rowcol (ses-sym-rowcol formula))
(ses-relocate-symbol formula rowcol
startrow startcol rowincr colincr)
- formula) ; Pass through as-is.
+ ;; Constants pass through as-is.
+ formula)
(dolist (cur formula)
(setq rowcol (ses-sym-rowcol cur))
(cond
(save-restriction
(narrow-to-region start end)
(goto-char (point-min))
- (while (forward-word-strictly 1)
+ (while (forward-word 1)
(setq words (1+ words)))))
words))
((use-region-p)
(setq skeleton-regions
(if (> skeleton-regions 0)
(list (copy-marker (point) t)
- (save-excursion (forward-word-strictly
- skeleton-regions)
+ (save-excursion (forward-word skeleton-regions)
(point-marker)))
(setq skeleton-regions (- skeleton-regions))
;; copy skeleton-regions - 1 elements from `mark-ring'
(message "%s%s" prompt (char-to-string char))
char))
+(defun read-multiple-choice (prompt choices)
+ "Ask user a multiple choice question.
+PROMPT should be a string that will be displayed as the prompt.
+
+CHOICES is an alist where the first element in each entry is a
+character to be entered, the second element is a short name for
+the entry to be displayed while prompting (if there's room, it
+might be shortened), and the third, optional entry is a longer
+explanation that will be displayed in a help buffer if the user
+requests more help.
+
+The return value is the matching entry from the CHOICES list.
+
+Usage example:
+
+\(read-multiple-choice \"Continue connecting?\"
+ '((?a \"always\")
+ (?s \"session only\")
+ (?n \"no\")))"
+ (let* ((altered-names nil)
+ (full-prompt
+ (format
+ "%s (%s): "
+ prompt
+ (mapconcat
+ (lambda (elem)
+ (let* ((name (cadr elem))
+ (pos (seq-position name (car elem)))
+ (altered-name
+ (cond
+ ;; Not in the name string.
+ ((not pos)
+ (format "[%c] %s" (car elem) name))
+ ;; The prompt character is in the name, so highlight
+ ;; it on graphical terminals...
+ ((display-supports-face-attributes-p
+ '(:underline t) (window-frame))
+ (setq name (copy-sequence name))
+ (put-text-property pos (1+ pos)
+ 'face 'read-multiple-choice-face
+ name)
+ name)
+ ;; And put it in [bracket] on non-graphical terminals.
+ (t
+ (concat
+ (substring name 0 pos)
+ "["
+ (upcase (substring name pos (1+ pos)))
+ "]"
+ (substring name (1+ pos)))))))
+ (push (cons (car elem) altered-name)
+ altered-names)
+ altered-name))
+ (append choices '((?? "?")))
+ ", ")))
+ tchar buf wrong-char)
+ (save-window-excursion
+ (save-excursion
+ (while (not tchar)
+ (message "%s%s"
+ (if wrong-char
+ "Invalid choice. "
+ "")
+ full-prompt)
+ (setq tchar
+ (if (and (display-popup-menus-p)
+ last-input-event ; not during startup
+ (listp last-nonmenu-event)
+ use-dialog-box)
+ (x-popup-dialog
+ t
+ (cons prompt
+ (mapcar
+ (lambda (elem)
+ (cons (capitalize (cadr elem))
+ (car elem)))
+ choices)))
+ (condition-case nil
+ (let ((cursor-in-echo-area t))
+ (read-char))
+ (error nil))))
+ ;; The user has entered an invalid choice, so display the
+ ;; help messages.
+ (when (not (assq tchar choices))
+ (setq wrong-char (not (memq tchar '(?? ?\C-h)))
+ tchar nil)
+ (when wrong-char
+ (ding))
+ (with-help-window (setq buf (get-buffer-create
+ "*Multiple Choice Help*"))
+ (with-current-buffer buf
+ (erase-buffer)
+ (pop-to-buffer buf)
+ (insert prompt "\n\n")
+ (let* ((columns (/ (window-width) 25))
+ (fill-column 21)
+ (times 0)
+ (start (point)))
+ (dolist (elem choices)
+ (goto-char start)
+ (unless (zerop times)
+ (if (zerop (mod times columns))
+ ;; Go to the next "line".
+ (goto-char (setq start (point-max)))
+ ;; Add padding.
+ (while (not (eobp))
+ (end-of-line)
+ (insert (make-string (- (* (mod times columns)
+ (+ fill-column 4))
+ (current-column))
+ ?\s))
+ (forward-line 1))))
+ (setq times (1+ times))
+ (let ((text
+ (with-temp-buffer
+ (insert (format
+ "%c: %s\n"
+ (car elem)
+ (cdr (assq (car elem) altered-names))))
+ (fill-region (point-min) (point-max))
+ (when (nth 2 elem)
+ (insert (nth 2 elem))
+ (unless (bolp)
+ (insert "\n"))
+ (fill-region start (point-max)))
+ (buffer-string))))
+ (goto-char start)
+ (dolist (line (split-string text "\n"))
+ (end-of-line)
+ (if (bolp)
+ (insert line "\n")
+ (insert line))
+ (forward-line 1)))))))))))
+ (when (buffer-live-p buf)
+ (kill-buffer buf))
+ (assq tchar choices)))
+
(defun sit-for (seconds &optional nodisp obsolete)
"Redisplay, then wait for SECONDS seconds. Stop when input is available.
SECONDS may be a floating-point value.
\f
;; Utility motion commands
-(defvar word-move-empty-char-table nil
- "Used in `forward-word-strictly' and `backward-word-strictly'
-to countermand the effect of `find-word-boundary-function-table'.")
-
-(defun forward-word-strictly (&optional arg)
- "Move point forward ARG words (backward if ARG is negative).
-If ARG is omitted or nil, move point forward one word.
-Normally returns t.
-If an edge of the buffer or a field boundary is reached, point is left there
-and the function returns nil. Field boundaries are not noticed if
-`inhibit-field-text-motion' is non-nil.
-
-This function is like `forward-word', but it is not affected
-by `find-word-boundary-function-table'. It is also not interactive."
- (let ((find-word-boundary-function-table
- (if (char-table-p word-move-empty-char-table)
- word-move-empty-char-table
- (setq word-move-empty-char-table (make-char-table nil)))))
- (forward-word (or arg 1))))
-
-(defun backward-word-strictly (&optional arg)
- "Move backward until encountering the beginning of a word.
-With argument ARG, do this that many times.
-If ARG is omitted or nil, move point backward one word.
-
-This function is like `forward-word', but it is not affected
-by `find-word-boundary-function-table'. It is also not interactive."
- (let ((find-word-boundary-function-table
- (if (char-table-p word-move-empty-char-table)
- word-move-empty-char-table
- (setq word-move-empty-char-table (make-char-table nil)))))
- (forward-word (- (or arg 1)))))
-
;; Whitespace
(defun forward-whitespace (arg)
(defun texinfo-mode-flyspell-verify ()
"Function used for `flyspell-generic-check-word-predicate' in Texinfo mode."
(save-excursion
- (forward-word-strictly -1)
+ (forward-word -1)
(not (looking-at "@"))))
;;*--- tex mode --------------------------------------------------------*/
(or (eolp)
(let ((pos (point)))
(move-to-column col t)
- (let ((old-width (string-width (buffer-substring pos (point)))))
- (delete-region pos (point))
- (when (> old-width width)
- (insert-char ? (- old-width width))
- (goto-char pos))))))
+ (delete-region pos (point)))))
(insert ch)
(forward-char -1)
(picture-move))))
;;; reftex-auc.el ends here
;; Local Variables:
-;; generated-autoload-file: "reftex.el"
+;; generated-autoload-file: "reftex-loaddefs.el"
;; End:
;;; reftex-cite.el ends here
;; Local Variables:
-;; generated-autoload-file: "reftex.el"
+;; generated-autoload-file: "reftex-loaddefs.el"
;; End:
;;; reftex-dcr.el ends here
;; Local Variables:
-;; generated-autoload-file: "reftex.el"
+;; generated-autoload-file: "reftex-loaddefs.el"
;; End:
;;; reftex-global.el ends here
;; Local Variables:
-;; generated-autoload-file: "reftex.el"
+;; generated-autoload-file: "reftex-loaddefs.el"
;; End:
;;; reftex-index.el ends here
;; Local Variables:
-;; generated-autoload-file: "reftex.el"
+;; generated-autoload-file: "reftex-loaddefs.el"
;; End:
;;; reftex-parse.el ends here
;; Local Variables:
-;; generated-autoload-file: "reftex.el"
+;; generated-autoload-file: "reftex-loaddefs.el"
;; End:
;;; reftex-ref.el ends here
;; Local Variables:
-;; generated-autoload-file: "reftex.el"
+;; generated-autoload-file: "reftex-loaddefs.el"
;; End:
;;; reftex-sel.el ends here
;; Local Variables:
-;; generated-autoload-file: "reftex.el"
+;; generated-autoload-file: "reftex-loaddefs.el"
;; End:
;;; reftex-toc.el ends here
;; Local Variables:
-;; generated-autoload-file: "reftex.el"
+;; generated-autoload-file: "reftex-loaddefs.el"
;; End:
(require 'reftex-vars)
-;;; Autoloads - see end for automatic autoloads
+;;; Autoloads to ensure loading of support files when necessary
+(require 'reftex-loaddefs)
;; We autoload tons of functions from these files, but some have
;; a single function that needs to be globally autoloaded.
(setq reftex-tables-dirty t) ; in case this file is evaluated by hand
-\f
-;;; Start of automatically extracted autoloads.
-\f
-;;;### (autoloads nil "reftex-auc" "reftex-auc.el" "32dc44348a7eaf247f63c81b3ead2ba4")
-;;; Generated autoloads from reftex-auc.el
-
-(autoload 'reftex-arg-label "reftex-auc" "\
-Use `reftex-label', `reftex-reference' or AUCTeX's code to insert label arg.
-What is being used depends upon `reftex-plug-into-AUCTeX'.
-
-\(fn OPTIONAL &optional PROMPT DEFINITION)" nil nil)
-
-(autoload 'reftex-arg-cite "reftex-auc" "\
-Use `reftex-citation' or AUCTeX's code to insert a cite-key macro argument.
-What is being used depends upon `reftex-plug-into-AUCTeX'.
-
-\(fn OPTIONAL &optional PROMPT DEFINITION)" nil nil)
-
-(autoload 'reftex-arg-index-tag "reftex-auc" "\
-Prompt for an index tag with completion.
-This is the name of an index, not the entry.
-
-\(fn OPTIONAL &optional PROMPT &rest ARGS)" nil nil)
-
-(autoload 'reftex-arg-index "reftex-auc" "\
-Prompt for an index entry completing with known entries.
-Completion is specific for just one index, if the macro or a tag
-argument identify one of multiple indices.
-
-\(fn OPTIONAL &optional PROMPT &rest ARGS)" nil nil)
-
-(autoload 'reftex-plug-into-AUCTeX "reftex-auc" "\
-
-
-\(fn)" nil nil)
-
-(autoload 'reftex-toggle-plug-into-AUCTeX "reftex-auc" "\
-Toggle Interface between AUCTeX and RefTeX on and off.
-
-\(fn)" t nil)
-
-(autoload 'reftex-add-label-environments "reftex-auc" "\
-Add label environment descriptions to `reftex-label-alist-style'.
-The format of ENTRY-LIST is exactly like `reftex-label-alist'. See there
-for details.
-This function makes it possible to support RefTeX from AUCTeX style files.
-The entries in ENTRY-LIST will be processed after the user settings in
-`reftex-label-alist', and before the defaults (specified in
-`reftex-default-label-alist-entries'). Any changes made to
-`reftex-label-alist-style' will raise a flag to the effect that
-the label information is recompiled on next use.
-
-\(fn ENTRY-LIST)" nil nil)
-
-(defalias 'reftex-add-to-label-alist 'reftex-add-label-environments)
-
-(autoload 'reftex-add-section-levels "reftex-auc" "\
-Add entries to the value of `reftex-section-levels'.
-The added values are kept local to the current document. The format
-of ENTRY-LIST is a list of cons cells (\"MACRONAME\" . LEVEL). See
-`reftex-section-levels' for an example.
-
-\(fn ENTRY-LIST)" nil nil)
-
-(autoload 'reftex-notice-new-section "reftex-auc" "\
-
-
-\(fn)" nil nil)
-
-;;;***
-\f
-;;;### (autoloads nil "reftex-cite" "reftex-cite.el" "7ee48dcf194ffd3cce3b7a2eb990e300")
-;;; Generated autoloads from reftex-cite.el
-
-(autoload 'reftex-default-bibliography "reftex-cite" "\
-Return the expanded value of variable `reftex-default-bibliography'.
-The expanded value is cached.
-
-\(fn)" nil nil)
-
-(autoload 'reftex-bib-or-thebib "reftex-cite" "\
-Test if BibTeX or \begin{thebibliography} should be used for the citation.
-Find the bof of the current file
-
-\(fn)" nil nil)
-
-(autoload 'reftex-get-bibfile-list "reftex-cite" "\
-Return list of bibfiles for current document.
-When using the chapterbib or bibunits package you should either
-use the same database files everywhere, or separate parts using
-different databases into different files (included into the mater file).
-Then this function will return the applicable database files.
-
-\(fn)" nil nil)
-
-(autoload 'reftex-pop-to-bibtex-entry "reftex-cite" "\
-Find BibTeX KEY in any file in FILE-LIST in another window.
-If MARK-TO-KILL is non-nil, mark new buffer to kill.
-If HIGHLIGHT is non-nil, highlight the match.
-If ITEM in non-nil, search for bibitem instead of database entry.
-If RETURN is non-nil, just return the entry and restore point.
-
-\(fn KEY FILE-LIST &optional MARK-TO-KILL HIGHLIGHT ITEM RETURN)" nil nil)
-
-(autoload 'reftex-end-of-bib-entry "reftex-cite" "\
-
-
-\(fn ITEM)" nil nil)
-
-(autoload 'reftex-parse-bibtex-entry "reftex-cite" "\
-Parse BibTeX ENTRY.
-If ENTRY is nil then parse the entry in current buffer between FROM and TO.
-If RAW is non-nil, keep double quotes/curly braces delimiting fields.
-
-\(fn ENTRY &optional FROM TO RAW)" nil nil)
-
-(autoload 'reftex-citation "reftex-cite" "\
-Make a citation using BibTeX database files.
-After prompting for a regular expression, scans the buffers with
-bibtex entries (taken from the \\bibliography command) and offers the
-matching entries for selection. The selected entry is formatted according
-to `reftex-cite-format' and inserted into the buffer.
-
-If NO-INSERT is non-nil, nothing is inserted, only the selected key returned.
-
-FORMAT-KEY can be used to pre-select a citation format.
-
-When called with a `C-u' prefix, prompt for optional arguments in
-cite macros. When called with a numeric prefix, make that many
-citations. When called with point inside the braces of a `\\cite'
-command, it will add another key, ignoring the value of
-`reftex-cite-format'.
-
-The regular expression uses an expanded syntax: && is interpreted as `and'.
-Thus, `aaaa&&bbb' matches entries which contain both `aaaa' and `bbb'.
-While entering the regexp, completion on knows citation keys is possible.
-`=' is a good regular expression to match all entries in all files.
-
-\(fn &optional NO-INSERT FORMAT-KEY)" t nil)
-
-(autoload 'reftex-citep "reftex-cite" "\
-Call `reftex-citation' with a format selector `?p'.
-
-\(fn)" t nil)
-
-(autoload 'reftex-citet "reftex-cite" "\
-Call `reftex-citation' with a format selector `?t'.
-
-\(fn)" t nil)
-
-(autoload 'reftex-make-cite-echo-string "reftex-cite" "\
-Format a bibtex ENTRY for the echo area and cache the result.
-
-\(fn ENTRY DOCSTRUCT-SYMBOL)" nil nil)
-
-(autoload 'reftex-create-bibtex-file "reftex-cite" "\
-Create a new BibTeX database BIBFILE with all entries referenced in document.
-The command prompts for a filename and writes the collected
-entries to that file. Only entries referenced in the current
-document with any \\cite-like macros are used. The sequence in
-the new file is the same as it was in the old database.
-
-Entries referenced from other entries must appear after all
-referencing entries.
-
-You can define strings to be used as header or footer for the
-created files in the variables `reftex-create-bibtex-header' or
-`reftex-create-bibtex-footer' respectively.
-
-\(fn BIBFILE)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "reftex-dcr" "reftex-dcr.el" "8a1cb9d9c9190eefd4e22ab89d278e03")
-;;; Generated autoloads from reftex-dcr.el
-
-(autoload 'reftex-view-crossref "reftex-dcr" "\
-View cross reference of macro at point. Point must be on the KEY
-argument. When at a `\\ref' macro, show corresponding `\\label'
-definition, also in external documents (`xr'). When on a label, show
-a locations where KEY is referenced. Subsequent calls find additional
-locations. When on a `\\cite', show the associated `\\bibitem' macro or
-the BibTeX database entry. When on a `\\bibitem', show a `\\cite' macro
-which uses this KEY. When on an `\\index', show other locations marked
-by the same index entry.
-To define additional cross referencing items, use the option
-`reftex-view-crossref-extra'. See also `reftex-view-crossref-from-bibtex'.
-With one or two C-u prefixes, enforce rescanning of the document.
-With argument 2, select the window showing the cross reference.
-AUTO-HOW is only for the automatic crossref display and is handed through
-to the functions `reftex-view-cr-cite' and `reftex-view-cr-ref'.
-
-\(fn &optional ARG AUTO-HOW FAIL-QUIETLY)" t nil)
-
-(autoload 'reftex-mouse-view-crossref "reftex-dcr" "\
-View cross reference of \\ref or \\cite macro where you click.
-If the macro at point is a \\ref, show the corresponding label definition.
-If it is a \\cite, show the BibTeX database entry.
-If there is no such macro at point, search forward to find one.
-With argument, actually select the window showing the cross reference.
-
-\(fn EV)" t nil)
-
-(autoload 'reftex-toggle-auto-view-crossref "reftex-dcr" "\
-Toggle the automatic display of crossref information in the echo area.
-When active, leaving point idle in the argument of a \\ref or \\cite macro
-will display info in the echo area.
-
-\(fn)" t nil)
-
-(autoload 'reftex-view-crossref-from-bibtex "reftex-dcr" "\
-View location in a LaTeX document which cites the BibTeX entry at point.
-Since BibTeX files can be used by many LaTeX documents, this function
-prompts upon first use for a buffer in RefTeX mode. To reset this
-link to a document, call the function with a prefix arg.
-Calling this function several times find successive citation locations.
-
-\(fn &optional ARG)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "reftex-global" "reftex-global.el" "a7a6a1872e4509da5b211972c2a588ad")
-;;; Generated autoloads from reftex-global.el
-
-(autoload 'reftex-create-tags-file "reftex-global" "\
-Create TAGS file by running `etags' on the current document.
-The TAGS file is also immediately visited with `visit-tags-table'.
-
-\(fn)" t nil)
-
-(autoload 'reftex-grep-document "reftex-global" "\
-Run grep query through all files related to this document.
-With prefix arg, force to rescan document.
-No active TAGS table is required.
-
-\(fn GREP-CMD)" t nil)
-
-(autoload 'reftex-search-document "reftex-global" "\
-Regexp search through all files of the current document.
-Starts always in the master file. Stops when a match is found.
-To continue searching for next match, use command \\[tags-loop-continue].
-No active TAGS table is required.
-
-\(fn &optional REGEXP)" t nil)
-
-(autoload 'reftex-query-replace-document "reftex-global" "\
-Do `query-replace-regexp' of FROM with TO over the entire document.
-Third arg DELIMITED (prefix arg) means replace only word-delimited matches.
-If you exit (\\[keyboard-quit], RET or q), you can resume the query replace
-with the command \\[tags-loop-continue].
-No active TAGS table is required.
-
-\(fn &optional FROM TO DELIMITED)" t nil)
-
-(autoload 'reftex-find-duplicate-labels "reftex-global" "\
-Produce a list of all duplicate labels in the document.
-
-\(fn)" t nil)
-
-(autoload 'reftex-change-label "reftex-global" "\
-Run `query-replace-regexp' of FROM with TO in all macro arguments.
-Works on the entire multifile document.
-If you exit (\\[keyboard-quit], RET or q), you can resume the query replace
-with the command \\[tags-loop-continue].
-No active TAGS table is required.
-
-\(fn &optional FROM TO)" t nil)
-
-(autoload 'reftex-renumber-simple-labels "reftex-global" "\
-Renumber all simple labels in the document to make them sequentially.
-Simple labels are the ones created by RefTeX, consisting only of the
-prefix and a number. After the command completes, all these labels will
-have sequential numbers throughout the document. Any references to
-the labels will be changed as well. For this, RefTeX looks at the
-arguments of any macros which either start or end in the string `ref'.
-This command should be used with care, in particular in multifile
-documents. You should not use it if another document refers to this
-one with the `xr' package.
-
-\(fn)" t nil)
-
-(autoload 'reftex-save-all-document-buffers "reftex-global" "\
-Save all documents associated with the current document.
-The function is useful after a global action like replacing or renumbering
-labels.
-
-\(fn)" t nil)
-
-(autoload 'reftex-isearch-minor-mode "reftex-global" "\
-When on, isearch searches the whole document, not only the current file.
-This minor mode allows isearch to search through all the files of
-the current TeX document.
-
-With no argument, this command toggles
-`reftex-isearch-minor-mode'. With a prefix argument ARG, turn
-`reftex-isearch-minor-mode' on if ARG is positive, otherwise turn it off.
-
-\(fn &optional ARG)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "reftex-index" "reftex-index.el" "0e0eef2a199fb9de6f13b5eef601843f")
-;;; Generated autoloads from reftex-index.el
-
-(autoload 'reftex-index-selection-or-word "reftex-index" "\
-Put selection or the word near point into the default index macro.
-This uses the information in `reftex-index-default-macro' to make an index
-entry. The phrase indexed is the current selection or the word near point.
-When called with one `C-u' prefix, let the user have a chance to edit the
-index entry. When called with 2 `C-u' as prefix, also ask for the index
-macro and other stuff.
-When called inside TeX math mode as determined by the `texmathp.el' library
-which is part of AUCTeX, the string is first processed with the
-`reftex-index-math-format', which see.
-
-\(fn &optional ARG PHRASE)" t nil)
-
-(autoload 'reftex-index "reftex-index" "\
-Query for an index macro and insert it along with its arguments.
-The index macros available are those defined in `reftex-index-macro' or
-by a call to `reftex-add-index-macros', typically from an AUCTeX style file.
-RefteX provides completion for the index tag and the index key, and
-will prompt for other arguments.
-
-\(fn &optional CHAR KEY TAG SEL NO-INSERT)" t nil)
-
-(autoload 'reftex-index-complete-tag "reftex-index" "\
-
-
-\(fn &optional ITAG OPT-ARGS)" nil nil)
-
-(autoload 'reftex-index-select-tag "reftex-index" "\
-
-
-\(fn)" nil nil)
-
-(autoload 'reftex-index-complete-key "reftex-index" "\
-
-
-\(fn &optional TAG OPTIONAL INITIAL)" nil nil)
-
-(autoload 'reftex-index-show-entry "reftex-index" "\
-
-
-\(fn DATA &optional NO-REVISIT)" nil nil)
-
-(autoload 'reftex-display-index "reftex-index" "\
-Display a buffer with an index compiled from the current document.
-When the document has multiple indices, first prompts for the correct one.
-When index support is turned off, offer to turn it on.
-With one or two `C-u' prefixes, rescan document first.
-With prefix 2, restrict index to current document section.
-With prefix 3, restrict index to region.
-
-\(fn &optional TAG OVERRIDING-RESTRICTION REDO &rest LOCATIONS)" t nil)
-
-(autoload 'reftex-index-phrase-selection-or-word "reftex-index" "\
-Add current selection or word at point to the phrases buffer.
-When you are in transient-mark-mode and the region is active, the
-selection will be used - otherwise the word at point.
-You get a chance to edit the entry in the phrases buffer - finish with
-`C-c C-c'.
-
-\(fn ARG)" t nil)
-
-(autoload 'reftex-index-visit-phrases-buffer "reftex-index" "\
-Switch to the phrases buffer, initialize if empty.
-
-\(fn)" t nil)
-
-(autoload 'reftex-index-phrases-mode "reftex-index" "\
-Major mode for managing the Index phrases of a LaTeX document.
-This buffer was created with RefTeX.
-
-To insert new phrases, use
- - `C-c \\' in the LaTeX document to copy selection or word
- - `\\[reftex-index-new-phrase]' in the phrases buffer.
-
-To index phrases use one of:
-
-\\[reftex-index-this-phrase] index current phrase
-\\[reftex-index-next-phrase] index next phrase (or N with prefix arg)
-\\[reftex-index-all-phrases] index all phrases
-\\[reftex-index-remaining-phrases] index current and following phrases
-\\[reftex-index-region-phrases] index the phrases in the region
-
-You can sort the phrases in this buffer with \\[reftex-index-sort-phrases].
-To display information about the phrase at point, use \\[reftex-index-phrases-info].
-
-For more information see the RefTeX User Manual.
-
-Here are all local bindings.
-
-\\{reftex-index-phrases-mode-map}
-
-\(fn)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "reftex-parse" "reftex-parse.el" "9015d91c86a135c850f92b828eca6b62")
-;;; Generated autoloads from reftex-parse.el
-
-(autoload 'reftex-parse-one "reftex-parse" "\
-Re-parse this file.
-
-\(fn)" t nil)
-
-(autoload 'reftex-parse-all "reftex-parse" "\
-Re-parse entire document.
-
-\(fn)" t nil)
-
-(autoload 'reftex-do-parse "reftex-parse" "\
-Do a document rescan.
-When allowed, do only a partial scan from FILE.
-
-\(fn RESCAN &optional FILE)" nil nil)
-
-(autoload 'reftex-everything-regexp "reftex-parse" "\
-
-
-\(fn)" nil nil)
-
-(autoload 'reftex-all-document-files "reftex-parse" "\
-Return a list of all files belonging to the current document.
-When RELATIVE is non-nil, give file names relative to directory
-of master file.
-
-\(fn &optional RELATIVE)" nil nil)
-
-(autoload 'reftex-locate-bibliography-files "reftex-parse" "\
-Scan buffer for bibliography macros and return file list.
-
-\(fn MASTER-DIR &optional FILES)" nil nil)
-
-(autoload 'reftex-section-info "reftex-parse" "\
-Return a section entry for the current match.
-Careful: This function expects the match-data to be still in place!
-
-\(fn FILE)" nil nil)
-
-(autoload 'reftex-ensure-index-support "reftex-parse" "\
-When index support is turned off, ask to turn it on and
-set the current prefix argument so that `reftex-access-scan-info'
-will rescan the entire document.
-
-\(fn &optional ABORT)" nil nil)
-
-(autoload 'reftex-index-info-safe "reftex-parse" "\
-
-
-\(fn FILE)" nil nil)
-
-(autoload 'reftex-index-info "reftex-parse" "\
-Return an index entry for the current match.
-Careful: This function expects the match-data to be still in place!
-
-\(fn FILE)" nil nil)
-
-(autoload 'reftex-short-context "reftex-parse" "\
-Get about one line of useful context for the label definition at point.
-
-\(fn ENV PARSE &optional BOUND DERIVE)" nil nil)
-
-(autoload 'reftex-where-am-I "reftex-parse" "\
-Return the docstruct entry above point.
-Actually returns a cons cell in which the cdr is a flag indicating
-if the information is exact (t) or approximate (nil).
-
-\(fn)" nil nil)
-
-(autoload 'reftex-notice-new "reftex-parse" "\
-Hook to handshake with RefTeX after something new has been inserted.
-
-\(fn &optional N FORCE)" nil nil)
-
-(autoload 'reftex-what-macro-safe "reftex-parse" "\
-Call `reftex-what-macro' with special syntax table.
-
-\(fn WHICH &optional BOUND)" nil nil)
-
-(autoload 'reftex-what-macro "reftex-parse" "\
-Find out if point is within the arguments of any TeX-macro.
-The return value is either (\"\\macro\" . (point)) or a list of them.
-
-If WHICH is nil, immediately return nil.
-If WHICH is 1, return innermost enclosing macro.
-If WHICH is t, return list of all macros enclosing point.
-If WHICH is a list of macros, look only for those macros and return the
- name of the first macro in this list found to enclose point.
-If the optional BOUND is an integer, bound backwards directed
- searches to this point. If it is nil, limit to nearest \\section -
- like statement.
-
-This function is pretty stable, but can be fooled if the text contains
-things like \\macro{aa}{bb} where \\macro is defined to take only one
-argument. As RefTeX cannot know this, the string \"bb\" would still be
-considered an argument of macro \\macro.
-
-\(fn WHICH &optional BOUND)" nil nil)
-
-(autoload 'reftex-what-environment "reftex-parse" "\
-Find out if point is inside a LaTeX environment.
-The return value is (e.g.) either (\"equation\" . (point)) or a list of
-them.
-
-If WHICH is nil, immediately return nil.
-If WHICH is 1, return innermost enclosing environment.
-If WHICH is t, return list of all environments enclosing point.
-If WHICH is a list of environments, look only for those environments and
- return the name of the first environment in this list found to enclose
- point.
-
-If the optional BOUND is an integer, bound backwards directed searches to
-this point. If it is nil, limit to nearest \\section - like statement.
-
-\(fn WHICH &optional BOUND)" nil nil)
-
-(autoload 'reftex-what-special-env "reftex-parse" "\
-Run the special environment parsers and return the matches.
-
-The return value is (e.g.) either (\"my-parser-function\" . (point))
-or a list of them.
-
-If WHICH is nil, immediately return nil.
-If WHICH is 1, return innermost enclosing environment.
-If WHICH is t, return list of all environments enclosing point.
-If WHICH is a list of environments, look only for those environments and
- return the name of the first environment in this list found to enclose
- point.
-
-\(fn WHICH &optional BOUND)" nil nil)
-
-(autoload 'reftex-nth-arg "reftex-parse" "\
-Return the Nth following {} or [] parentheses content.
-OPT-ARGS is a list of argument numbers which are optional.
-
-\(fn N &optional OPT-ARGS)" nil nil)
-
-(autoload 'reftex-move-over-touching-args "reftex-parse" "\
-
-
-\(fn)" nil nil)
-
-(autoload 'reftex-init-section-numbers "reftex-parse" "\
-Initialize the section numbers with zeros or with what is found in the TOC-ENTRY.
-
-\(fn &optional TOC-ENTRY APPENDIX)" nil nil)
-
-(autoload 'reftex-section-number "reftex-parse" "\
-Return a string with the current section number.
-When LEVEL is non-nil, increase section numbers on that level.
-
-\(fn &optional LEVEL STAR)" nil nil)
-
-;;;***
-\f
-;;;### (autoloads nil "reftex-ref" "reftex-ref.el" "b2ce366d12050904d89cc38b96b8058a")
-;;; Generated autoloads from reftex-ref.el
-
-(autoload 'reftex-label-location "reftex-ref" "\
-Return the environment or macro which determines the label type at point.
-If optional BOUND is an integer, limit backward searches to that point.
-
-\(fn &optional BOUND)" nil nil)
-
-(autoload 'reftex-label-info-update "reftex-ref" "\
-
-
-\(fn CELL)" nil nil)
-
-(autoload 'reftex-label-info "reftex-ref" "\
-
-
-\(fn LABEL &optional FILE BOUND DERIVE ENV-OR-MAC)" nil nil)
-
-(autoload 'reftex-label "reftex-ref" "\
-Insert a unique label. Return the label.
-If ENVIRONMENT is given, don't bother to find out yourself.
-If NO-INSERT is non-nil, do not insert label into buffer.
-With prefix arg, force to rescan document first.
-When you are prompted to enter or confirm a label, and you reply with
-just the prefix or an empty string, no label at all will be inserted.
-A new label is also recorded into the label list.
-This function is controlled by the settings of reftex-insert-label-flags.
-
-\(fn &optional ENVIRONMENT NO-INSERT)" t nil)
-
-(autoload 'reftex-reference "reftex-ref" "\
-Make a LaTeX reference. Look only for labels of a certain TYPE.
-With prefix arg, force to rescan buffer for labels. This should only be
-necessary if you have recently entered labels yourself without using
-reftex-label. Rescanning of the buffer can also be requested from the
-label selection menu.
-The function returns the selected label or nil.
-If NO-INSERT is non-nil, do not insert \\ref command, just return label.
-When called with 2 C-u prefix args, disable magic word recognition.
-
-\(fn &optional TYPE NO-INSERT CUT)" t nil)
-
-(autoload 'reftex-query-label-type "reftex-ref" "\
-
-
-\(fn)" nil nil)
-
-(autoload 'reftex-show-label-location "reftex-ref" "\
-
-
-\(fn DATA FORWARD NO-REVISIT &optional STAY ERROR)" nil nil)
-
-(autoload 'reftex-goto-label "reftex-ref" "\
-Prompt for a label (with completion) and jump to the location of this label.
-Optional prefix argument OTHER-WINDOW goes to the label in another window.
-
-\(fn &optional OTHER-WINDOW)" t nil)
-
-;;;***
-\f
-;;;### (autoloads nil "reftex-sel" "reftex-sel.el" "b5e68431056b461d8a0562e9e685a5f1")
-;;; Generated autoloads from reftex-sel.el
-
-(autoload 'reftex-select-label-mode "reftex-sel" "\
-Major mode for selecting a label in a LaTeX document.
-This buffer was created with RefTeX.
-It only has a meaningful keymap when you are in the middle of a
-selection process.
-To select a label, move the cursor to it and press RET.
-Press `?' for a summary of important key bindings.
-
-During a selection process, these are the local bindings.
-
-\\{reftex-select-label-mode-map}
-
-\(fn)" t nil)
-
-(autoload 'reftex-select-bib-mode "reftex-sel" "\
-Major mode for selecting a citation key in a LaTeX document.
-This buffer was created with RefTeX.
-It only has a meaningful keymap when you are in the middle of a
-selection process.
-In order to select a citation, move the cursor to it and press RET.
-Press `?' for a summary of important key bindings.
-
-During a selection process, these are the local bindings.
-
-\\{reftex-select-label-mode-map}
-
-\(fn)" t nil)
-
-(autoload 'reftex-get-offset "reftex-sel" "\
-
-
-\(fn BUF HERE-AM-I &optional TYPEKEY TOC INDEX FILE)" nil nil)
-
-(autoload 'reftex-insert-docstruct "reftex-sel" "\
-
-
-\(fn BUF TOC LABELS INDEX-ENTRIES FILES CONTEXT COUNTER SHOW-COMMENTED HERE-I-AM XR-PREFIX TOC-BUFFER)" nil nil)
-
-(autoload 'reftex-find-start-point "reftex-sel" "\
-
-
-\(fn FALLBACK &rest LOCATIONS)" nil nil)
-
-(autoload 'reftex-select-item "reftex-sel" "\
-
-
-\(fn REFTEX-SELECT-PROMPT HELP-STRING KEYMAP &optional OFFSET CALL-BACK CB-FLAG)" nil nil)
-
-;;;***
-\f
-;;;### (autoloads nil "reftex-toc" "reftex-toc.el" "af8f426ef3a0607322ca4c9742e177a8")
-;;; Generated autoloads from reftex-toc.el
-
-(autoload 'reftex-toc "reftex-toc" "\
-Show the table of contents for the current document.
-When called with a raw C-u prefix, rescan the document first.
-
-\(fn &optional REBUILD REUSE)" t nil)
-
-(autoload 'reftex-toc-recenter "reftex-toc" "\
-Display the TOC window and highlight line corresponding to current position.
-
-\(fn &optional ARG)" t nil)
-
-(autoload 'reftex-toggle-auto-toc-recenter "reftex-toc" "\
-Toggle the automatic recentering of the TOC window.
-When active, leaving point idle will make the TOC window jump to the correct
-section.
-
-\(fn)" t nil)
-
-;;;***
-\f
-;;; End of automatically extracted autoloads.
-
(provide 'reftex)
;;; reftex.el ends here
(setq arg (1- arg)))
return))
+(defun sgml-forward-sexp (n)
+ ;; This function is needed in major-modes such as nxml-mode where
+ ;; forward-sexp-function is used to give a more dwimish behavior to
+ ;; the `forward-sexp' command.
+ ;; Without it, we can end up with backtraces like:
+ ;; "get-text-property" (0xffffc0f0)
+ ;; "nxml-token-after" (0xffffc2ac)
+ ;; "nxml-forward-single-balanced-item" (0xffffc46c)
+ ;; "nxml-forward-balanced-item" (0xffffc61c)
+ ;; "forward-sexp" (0xffffc7f8)
+ ;; "sgml-parse-tag-backward" (0xffffc9c8)
+ ;; "sgml-lexical-context" (0xffffcba8)
+ ;; "sgml-mode-flyspell-verify" (0xffffcd74)
+ ;; "flyspell-word" (0xffffcf3c)
+ ;; "flyspell-post-command-hook" (0xffffd108)
+ ;; FIXME: should we also set the sgml-tag-syntax-table?
+ (let ((forward-sexp-function nil))
+ (forward-sexp n)))
+
(defvar sgml-electric-tag-pair-overlays nil)
(defvar sgml-electric-tag-pair-timer nil)
(if endp
(when (sgml-skip-tag-backward 1) (forward-char 1) t)
(with-syntax-table sgml-tag-syntax-table
- (up-list -1)
- (when (sgml-skip-tag-forward 1)
- (backward-sexp 1)
- (forward-char 2)
- t))))
+ (let ((forward-sexp-function nil))
+ (up-list -1)
+ (when (sgml-skip-tag-forward 1)
+ (backward-sexp 1)
+ (forward-char 2)
+ t)))))
(clones (get-char-property (point) 'text-clones)))
(when (and match
(/= cl-end cl-start)
((and (eq (char-before) ?>)
(or (not (eq (char-after) ?<))
(> x y)))
- (backward-sexp))
+ (sgml-forward-sexp -1))
((eq (char-after y) ?<)
- (forward-sexp)))
+ (sgml-forward-sexp 1)))
(point))))
(message "Invisible tag: %s"
;; Strip properties, otherwise, the text is invisible.
(unless (or ;;(looking-at "</")
(progn (skip-chars-backward " \t") (bolp)))
(reindent-then-newline-and-indent))
- (forward-sexp 1)))
+ (sgml-forward-sexp 1)))
;; (indent-region beg end)
))
(let ((pos (point)))
(condition-case nil
;; FIXME: This does not correctly skip over PI an CDATA tags.
- (forward-sexp)
+ (sgml-forward-sexp 1)
(scan-error
;; This < seems to be just a spurious one, let's ignore it.
(goto-char pos)
(with-syntax-table sgml-tag-syntax-table
(goto-char tag-end)
(condition-case nil
- (backward-sexp)
+ (sgml-forward-sexp -1)
(scan-error
;; This > isn't really the end of a tag. Skip it.
(goto-char (1- tag-end))
(`text
(while (looking-at "</")
- (forward-sexp 1)
+ (sgml-forward-sexp 1)
(skip-chars-forward " \t"))
(let* ((here (point))
(unclosed (and ;; (not sgml-xml-mode)
(let ((arg-end (match-end 0)))
(if (null type) ;\end
(progn (goto-char arg-end)
- (latex-forward-sexp -1)
- (forward-word-strictly 1))
+ (latex-forward-sexp -1) (forward-word 1))
(goto-char cmd-start)
(latex-forward-sexp 1)
(let (forward-sexp-function) (backward-sexp)))
;; @ is followed by a command-word; find the end of the word.
(setq texinfo-command-start (1- (point)))
(if (= (char-syntax (following-char)) ?w)
- (forward-word-strictly 1)
+ (forward-word 1)
(forward-char 1))
(setq texinfo-command-end (point))
;; Detect the case of two @-commands in a row;
(forward-paragraph)
(let ((end (point)))
(if (save-excursion
- (backward-word-strictly 1)
+ (backward-word 1)
(search-forward "@refill" end t))
(setq anchor-string "@anchor-yes-refill")
(setq anchor-string "@anchor-no-refill")))
(error "In @multitable, @columnfractions misspelled"))
;; Case 1: @columnfractions .25 .3 .45
((looking-at "@columnfractions")
- (forward-word-strictly 1)
+ (forward-word 1)
(while (not (eolp))
(push (truncate
(1-
;; Delete the @tab command, including the @-sign
(delete-region
(point)
- (progn (forward-word-strictly -1) (1- (point)))))
+ (progn (forward-word -1) (1- (point)))))
(point)))
;; Set fill-column *wider* than needed to produce inter-column space
(setq fill-column (+ 1
(unless (get-char-property start 'text-clones)
(if endp
(texinfo-last-unended-begin)
- (forward-word-strictly 1)
+ (forward-word 1)
(texinfo-next-unmatched-end))
(skip-syntax-forward "^w")
(when (looking-at
"Insert the matching `@end' for the last Texinfo command that needs one."
(ignore-errors
(save-excursion
- (backward-word-strictly 1)
+ (backward-word 1)
(texinfo-last-unended-begin)
(or (match-string 1) '-)))
\n "@end " str \n \n)
(save-excursion
(buffer-substring
- (progn (forward-word-strictly 1) ; skip over node command
+ (progn (forward-word 1) ; skip over node command
(skip-chars-forward " \t") ; and over spaces
(point))
(if (search-forward "," (line-end-position) t) ; bound search
(goto-char (match-beginning 7)) ; match section name
(buffer-substring
- (progn (forward-word-strictly 1) ; skip over section type
+ (progn (forward-word 1) ; skip over section type
(skip-chars-forward " \t") ; and over spaces
(point))
(progn (end-of-line) (point))))
(setq title
(buffer-substring
;; skip over section type
- (progn (forward-word-strictly 1)
+ (progn (forward-word 1)
;; and over spaces
(skip-chars-forward " \t")
(point))
t)
(progn
(beginning-of-line)
- (forward-word-strictly 1) ; skip over section type
+ (forward-word 1) ; skip over section type
(skip-chars-forward " \t") ; and over spaces
(buffer-substring
(point)
(setq sec-name (buffer-substring-no-properties
(progn (beginning-of-line) ; copy its name
(1+ (point)))
- (progn (forward-word-strictly 1)
+ (progn (forward-word 1)
(point))))))
(cond
((or sec-pos top-pos)
(save-excursion
(let ((initial (texinfo-copy-next-section-title)))
;; This is not clean. Use `interactive' to read the arg.
- (forward-word-strictly 1) ; skip over node command
+ (forward-word 1) ; skip over node command
(skip-chars-forward " \t") ; and over spaces
(if (not (looking-at "[^,\t\n ]+")) ; regexp based on what Info looks for
; alternatively, use "[a-zA-Z]+"
(if title-p
(progn
(beginning-of-line)
- (forward-word-strictly 1)
+ (forward-word 1)
(skip-chars-forward " \t")
(setq title (buffer-substring
(point)
(line-beginning-position -1))
t)
;; @node is present, and point at beginning of that line
- (forward-word-strictly 1) ; Leave point just after @node.
+ (forward-word 1) ; Leave point just after @node.
;; Else @node missing; insert one.
(beginning-of-line) ; Beginning of `@section' line.
(insert "@node\n")
(if (not (looking-at "[^,\t\n ]+"))
(progn
(beginning-of-line)
- (forward-word-strictly 1)
+ (forward-word 1)
(insert " " title)
(message "Inserted title %s ... " title)))))
;; Go forward beyond current section title.
;; copy title
(let ((title
(buffer-substring
- (progn (forward-word-strictly 1) ; skip over section type
+ (progn (forward-word 1) ; skip over section type
(skip-chars-forward " \t") ; and over spaces
(point))
(progn (end-of-line) (point)))))
(defcustom time-stamp-format "%:y-%02m-%02d %02H:%02M:%02S %u"
"Format of the string inserted by \\[time-stamp].
-The value may be a string or a list. Lists are supported only for
-backward compatibility; see variable `time-stamp-old-format-warn'.
-
-A string is used verbatim except for character sequences beginning
+This is a string, used verbatim except for character sequences beginning
with %, as follows. The values of non-numeric formatted items depend
on the locale setting recorded in `system-time-locale' and
`locale-coding-system'. The examples here are for the default
:group 'time-stamp
:version "19.29")
-(defcustom time-stamp-old-format-warn 'ask
- "Action if `time-stamp-format' is an old-style list.
-If `error', the format is not used. If `ask', the user is queried about
-using the time-stamp-format. If `warn', a warning is displayed.
-If nil, no notification is given."
- :type '(choice (const :tag "Don't use the format" error)
- (const ask)
- (const warn)
- (const :tag "No notification" nil))
- :group 'time-stamp)
-
(defcustom time-stamp-time-zone nil
"The time zone to be used by \\[time-stamp].
Its format is that of the ZONE argument of the `format-time-string' function,"
"Generate the new string to be inserted by \\[time-stamp].
Optionally use format TS-FORMAT instead of `time-stamp-format' to
format the string."
- (or ts-format
- (setq ts-format time-stamp-format))
- (if (stringp ts-format)
- (time-stamp--format (time-stamp-string-preprocess ts-format) nil)
- ;; handle version 1 compatibility
- (cond ((or (eq time-stamp-old-format-warn 'error)
- (and (eq time-stamp-old-format-warn 'ask)
- (not (y-or-n-p "Use non-string time-stamp-format? "))))
- (message "Warning: no time-stamp: time-stamp-format not a string")
- (sit-for 1)
- nil)
- (t
- (cond ((eq time-stamp-old-format-warn 'warn)
- (message "Obsolescent time-stamp-format type; should be string")
- (sit-for 1)))
- (time-stamp-fconcat ts-format " ")))))
+ (if (stringp (or ts-format (setq ts-format time-stamp-format)))
+ (time-stamp--format (time-stamp-string-preprocess ts-format) nil)))
+
(defconst time-stamp-no-file "(no file)"
"String to use when the buffer is not associated with a file.")
+;;; FIXME This comment was written in 1996!
;;; time-stamp is transitioning to using the new, expanded capabilities
;;; of format-time-string. During the process, this function implements
;;; intermediate, compatible formats and complains about old, soon to
mail-host-address)
(system-name)))
-;;; the rest of this file is for version 1 compatibility
-
-(defun time-stamp-fconcat (list sep)
- "Similar to (mapconcat \\='funcall LIST SEP) but LIST allows literals.
-If an element of LIST is a symbol, it is funcalled to get the string to use;
-the separator SEP is used between two strings obtained by funcalling a
-symbol. Otherwise the element itself is inserted; no separator is used
-around literals."
- (let ((return-string "")
- (insert-sep-p nil))
- (while list
- (cond ((symbolp (car list))
- (if insert-sep-p
- (setq return-string (concat return-string sep)))
- (setq return-string (concat return-string (funcall (car list))))
- (setq insert-sep-p t))
- (t
- (setq return-string (concat return-string (car list)))
- (setq insert-sep-p nil)))
- (setq list (cdr list)))
- return-string))
-
(provide 'time-stamp)
;;; time-stamp.el ends here
(error "Opening input file: No such file or directory, %s" url))
(with-current-buffer buffer
(setq handle (mm-dissect-buffer t)))
- (mm-save-part-to-file handle newname)
+ (let ((mm-attachment-file-modes (default-file-modes)))
+ (mm-save-part-to-file handle newname))
(kill-buffer buffer)
(mm-destroy-parts handle)))
(put 'copy-file 'url-file-handlers 'url-copy-file)
;;; Code:
(require 'cl-lib)
+(require 'puny)
(eval-when-compile
(require 'subr-x))
(url-scheme-get-property
(url-type url-http-target-url) 'default-port))
(format
- "Host: %s:%d\r\n" host (url-port url-http-target-url))
- (format "Host: %s\r\n" host))
+ "Host: %s:%d\r\n" (puny-encode-domain host)
+ (url-port url-http-target-url))
+ (format "Host: %s\r\n" (puny-encode-domain host)))
;; Who its from
(if url-personal-mail-address
(concat
;; We do not support agent-driven negotiation, so we just
;; redirect to the preferred URI if one is provided.
nil)
- ((or `moved-permanently `found `temporary-redirect) ; 301 302 307
- ;; If the 301|302 status code is received in response to a
- ;; request other than GET or HEAD, the user agent MUST NOT
- ;; automatically redirect the request unless it can be
- ;; confirmed by the user, since this might change the
- ;; conditions under which the request was issued.
- (unless (member url-http-method '("HEAD" "GET"))
- (setq redirect-uri nil)))
- (`see-other ; 303
+ (`see-other ; 303
;; The response to the request can be found under a different
;; URI and SHOULD be retrieved using a GET method on that
;; resource.
"Retrieve URL via HTTP asynchronously.
URL must be a parsed URL. See `url-generic-parse-url' for details.
-When retrieval is completed, execute the function CALLBACK, passing it
-an updated value of CBARGS as arguments. The first element in CBARGS
-should be a plist describing what has happened so far during the
-request, as described in the docstring of `url-retrieve' (if in
-doubt, specify nil).
+When retrieval is completed, execute the function CALLBACK,
+passing it an updated value of CBARGS as arguments. The first
+element in CBARGS should be a plist describing what has happened
+so far during the request, as described in the docstring of
+`url-retrieve' (if in doubt, specify nil). The current buffer
+then CALLBACK is executed is the retrieval buffer.
Optional arg RETRY-BUFFER, if non-nil, specifies the buffer of a
previous `url-http' call, which is being re-attempted.
Optional arg GATEWAY-METHOD specifies the gateway to be used,
-overriding the value of `url-gateway-method'."
+overriding the value of `url-gateway-method'.
+
+The return value of this function is the retrieval buffer."
(cl-check-type url vector "Need a pre-parsed URL.")
(let* ((host (url-host (or url-using-proxy url)))
(port (url-port (or url-using-proxy url)))
-;;; url-queue.el --- Fetching web pages in parallel
+;;; url-queue.el --- Fetching web pages in parallel -*- lexical-binding: t -*-
;; Copyright (C) 2011-2016 Free Software Foundation, Inc.
;;; Internal variables.
(defvar url-queue nil)
+(defvar url-queue-progress-timer nil)
(cl-defstruct url-queue
url callback cbargs silentp
(when (and waiting
(< running url-queue-parallel-processes))
(setf (url-queue-pre-triggered waiting) t)
- (run-with-idle-timer 0.01 nil 'url-queue-run-queue))))
+ ;; We start fetching from this idle timer...
+ (run-with-idle-timer 0.01 nil #'url-queue-run-queue)
+ ;; And then we set up a separate timer to ensure progress when a
+ ;; web server is unresponsive.
+ (unless url-queue-progress-timer
+ (setq url-queue-progress-timer
+ (run-with-idle-timer 1 1 #'url-queue-check-progress))))))
(defun url-queue-run-queue ()
(url-queue-prune-old-entries)
(setf (url-queue-start-time waiting) (float-time))
(url-queue-start-retrieve waiting))))
+(defun url-queue-check-progress ()
+ (when url-queue-progress-timer
+ (if url-queue
+ (url-queue-run-queue)
+ (cancel-timer url-queue-progress-timer)
+ (setq url-queue-progress-timer nil))))
+
(defun url-queue-callback-function (status job)
(setq url-queue (delq job url-queue))
(when (and (eq (car status) :error)
(and host
(not (string-match "\\`\\[.*\\]\\'" host))
(setf (url-host obj)
- (url-hexify-string host url-host-allowed-chars)))
+ (decode-coding-string (url-host obj) 'utf-8)))
(if path
(setq path (url-hexify-string path url-path-allowed-chars)))
:type '(repeat regexp)
:group 'change-log)
+(defcustom change-log-directory-files '(".bzr" ".git" ".hg" ".svn")
+ "List of files that cause `find-change-log' to stop in containing directory.
+This applies if no pre-existing ChangeLog is found. If nil, then in such
+a case simply use the directory containing the changed file."
+ :version "25.2"
+ :type '(repeat file)
+ :group 'change-log)
+
(defface change-log-date
'((t (:inherit font-lock-string-face)))
"Face used to highlight dates in date lines."
If `change-log-default-name' contains a leading directory component, then
simply find it in the current directory. Otherwise, search in the current
-directory and its successive parents for a file so named.
+directory and its successive parents for a file so named. Stop at the first
+such file that exists (or has a buffer visiting it), or the first directory
+that contains any of `change-log-directory-files'. If no match is found,
+use the current directory. To override the choice of this function,
+simply create an empty ChangeLog file first by hand in the desired place.
Once a file is found, `change-log-default-name' is set locally in the
current buffer to the complete file name.
;; for several related directories.
(setq file-name (file-chase-links file-name))
(setq file-name (expand-file-name file-name))
- ;; Move up in the dir hierarchy till we find a change log file.
- (let ((file1 file-name)
- parent-dir)
- (while (and (not (or (get-file-buffer file1) (file-exists-p file1)))
- (progn (setq parent-dir
- (file-name-directory
- (directory-file-name
- (file-name-directory file1))))
- ;; Give up if we are already at the root dir.
- (not (string= (file-name-directory file1)
- parent-dir))))
- ;; Move up to the parent dir and try again.
- (setq file1 (expand-file-name
- (file-name-nondirectory (change-log-name))
- parent-dir)))
- ;; If we found a change log in a parent, use that.
- (if (or (get-file-buffer file1) (file-exists-p file1))
- (setq file-name file1)))))
+ (let* ((cbase (file-name-nondirectory (change-log-name)))
+ (root
+ (locate-dominating-file
+ file-name
+ (lambda (dir)
+ (or
+ (let ((clog (expand-file-name cbase dir)))
+ (or (get-file-buffer clog) (file-exists-p clog)))
+ ;; Stop at VCS root?
+ (and change-log-directory-files
+ (let ((files change-log-directory-files)
+ found)
+ (while
+ (and
+ (not
+ (setq found
+ (file-exists-p
+ (expand-file-name (car files) dir))))
+ (setq files (cdr files))))
+ found)))))))
+ (if root (setq file-name (expand-file-name cbase root))))))
;; Make a local variable in this buffer so we needn't search again.
(set (make-local-variable 'change-log-default-name) file-name))
file-name)
(append '("-d" "-b")
(if (listp diff-switches) diff-switches (list diff-switches)))
"A list of strings specifying switches to be passed to diff.
-Used in `smerge-diff-base-mine' and related functions."
+Used in `smerge-diff-base-upper' and related functions."
:type '(repeat string))
(defcustom smerge-auto-leave t
"Non-nil means to leave `smerge-mode' when the last conflict is resolved."
:type 'boolean)
-(defface smerge-mine
+(defface smerge-upper
'((((class color) (min-colors 88) (background light))
:background "#ffdddd")
(((class color) (min-colors 88) (background dark))
:background "#553333")
(((class color))
:foreground "red"))
- "Face for your code.")
-(define-obsolete-face-alias 'smerge-mine-face 'smerge-mine "22.1")
-(defvar smerge-mine-face 'smerge-mine)
+ "Face for the `upper' version of a conflict.")
+(define-obsolete-face-alias 'smerge-mine 'smerge-upper "25.2")
+(defvar smerge-upper-face 'smerge-upper)
-(defface smerge-other
+(defface smerge-lower
'((((class color) (min-colors 88) (background light))
:background "#ddffdd")
(((class color) (min-colors 88) (background dark))
:background "#335533")
(((class color))
:foreground "green"))
- "Face for the other code.")
-(define-obsolete-face-alias 'smerge-other-face 'smerge-other "22.1")
-(defvar smerge-other-face 'smerge-other)
+ "Face for the `lower' version of a conflict.")
+(define-obsolete-face-alias 'smerge-other 'smerge-lower "25.2")
+(defvar smerge-lower-face 'smerge-lower)
(defface smerge-base
'((((class color) (min-colors 88) (background light))
("r" . smerge-resolve)
("a" . smerge-keep-all)
("b" . smerge-keep-base)
- ("o" . smerge-keep-other)
- ("m" . smerge-keep-mine)
+ ("o" . smerge-keep-lower) ; for the obsolete keep-other
+ ("l" . smerge-keep-lower)
+ ("m" . smerge-keep-upper) ; for the obsolete keep-mine
+ ("u" . smerge-keep-upper)
("E" . smerge-ediff)
("C" . smerge-combine-with-next)
("R" . smerge-refine)
("\C-m" . smerge-keep-current)
("=" . ,(make-sparse-keymap "Diff"))
- ("=<" "base-mine" . smerge-diff-base-mine)
- ("=>" "base-other" . smerge-diff-base-other)
- ("==" "mine-other" . smerge-diff-mine-other))
+ ("=<" "base-upper" . smerge-diff-base-upper)
+ ("=>" "base-lower" . smerge-diff-base-lower)
+ ("==" "upper-lower" . smerge-diff-upper-lower))
"The base keymap for `smerge-mode'.")
(defcustom smerge-command-prefix "\C-c^"
"--"
["Revert to Base" smerge-keep-base :help "Revert to base version"
:active (smerge-check 2)]
- ["Keep Other" smerge-keep-other :help "Keep `other' version"
- :active (smerge-check 3)]
- ["Keep Yours" smerge-keep-mine :help "Keep your version"
+ ["Keep Upper" smerge-keep-upper :help "Keep `upper' version"
:active (smerge-check 1)]
+ ["Keep Lower" smerge-keep-lower :help "Keep `lower' version"
+ :active (smerge-check 3)]
"--"
- ["Diff Base/Mine" smerge-diff-base-mine
- :help "Diff `base' and `mine' for current conflict"
+ ["Diff Base/Upper" smerge-diff-base-upper
+ :help "Diff `base' and `upper' for current conflict"
:active (smerge-check 2)]
- ["Diff Base/Other" smerge-diff-base-other
- :help "Diff `base' and `other' for current conflict"
+ ["Diff Base/Lower" smerge-diff-base-lower
+ :help "Diff `base' and `lower' for current conflict"
:active (smerge-check 2)]
- ["Diff Mine/Other" smerge-diff-mine-other
- :help "Diff `mine' and `other' for current conflict"
+ ["Diff Upper/Lower" smerge-diff-upper-lower
+ :help "Diff `upper' and `lower' for current conflict"
:active (smerge-check 1)]
"--"
["Invoke Ediff" smerge-ediff
))
(easy-menu-define smerge-context-menu nil
- "Context menu for mine area in `smerge-mode'."
+ "Context menu for upper area in `smerge-mode'."
'(nil
["Keep Current" smerge-keep-current :help "Use current (at point) version"]
["Kill Current" smerge-kill-current :help "Remove current (at point) version"]
(defconst smerge-font-lock-keywords
'((smerge-find-conflict
- (1 smerge-mine-face prepend t)
+ (1 smerge-upper-face prepend t)
(2 smerge-base-face prepend t)
- (3 smerge-other-face prepend t)
+ (3 smerge-lower-face prepend t)
;; FIXME: `keep' doesn't work right with syntactic fontification.
(0 smerge-markers-face keep)
(4 nil t t)
(defconst smerge-begin-re "^<<<<<<< \\(.*\\)\n")
(defconst smerge-end-re "^>>>>>>> \\(.*\\)\n")
(defconst smerge-base-re "^||||||| \\(.*\\)\n")
-(defconst smerge-other-re "^=======\n")
+(defconst smerge-lower-re "^=======\n")
(defvar smerge-conflict-style nil
"Keep track of which style of conflict is in use.
(if diff-auto-refine-mode
(condition-case nil (smerge-refine) (error nil))))
-(defconst smerge-match-names ["conflict" "mine" "base" "other"])
+(defconst smerge-match-names ["conflict" "upper" "base" "lower"])
(defun smerge-ensure-match (n)
(unless (match-end n)
(zerop (call-process diff-command nil buf nil "-bc" b m)))
(set-match-data md)
(smerge-keep-n 3))
- ;; Try "diff -b BASE MINE | patch OTHER".
+ ;; Try "diff -b BASE UPPER | patch LOWER".
((when (and (not safe) m2e b
;; If the BASE is empty, this would just concatenate
;; the two, which is rarely right.
(narrow-to-region m0b m0e)
(smerge-remove-props m0b m0e)
(insert-file-contents o nil nil nil t)))
- ;; Try "diff -b BASE OTHER | patch MINE".
+ ;; Try "diff -b BASE LOWER | patch UPPER".
((when (and (not safe) m2e b
;; If the BASE is empty, this would just concatenate
;; the two, which is rarely right.
(smerge-keep-n 2)
(smerge-auto-leave))
-(defun smerge-keep-other ()
- "Use \"other\" version."
+(defun smerge-keep-lower ()
+ "Keep the \"lower\" version of a merge conflict.
+In a conflict that looks like:
+ <<<<<<<
+ UUU
+ =======
+ LLL
+ >>>>>>>
+this keeps \"LLL\"."
(interactive)
(smerge-match-conflict)
;;(smerge-ensure-match 3)
(smerge-keep-n 3)
(smerge-auto-leave))
-(defun smerge-keep-mine ()
- "Keep your version."
+(define-obsolete-function-alias 'smerge-keep-other 'smerge-keep-lower "25.2")
+
+(defun smerge-keep-upper ()
+ "Keep the \"upper\" version of a merge conflict.
+In a conflict that looks like:
+ <<<<<<<
+ UUU
+ =======
+ LLL
+ >>>>>>>
+this keeps \"UUU\"."
(interactive)
(smerge-match-conflict)
;;(smerge-ensure-match 1)
(smerge-keep-n 1)
(smerge-auto-leave))
+(define-obsolete-function-alias 'smerge-keep-mine 'smerge-keep-upper "25.2")
+
(defun smerge-get-current ()
(let ((i 3))
(while (or (not (match-end i))
(smerge-keep-n (car left))
(smerge-auto-leave))))))
-(defun smerge-diff-base-mine ()
- "Diff `base' and `mine' version in current conflict region."
+(defun smerge-diff-base-upper ()
+ "Diff `base' and `upper' version in current conflict region."
(interactive)
(smerge-diff 2 1))
-(defun smerge-diff-base-other ()
- "Diff `base' and `other' version in current conflict region."
+(define-obsolete-function-alias 'smerge-diff-base-mine
+ 'smerge-diff-base-upper "25.2")
+
+(defun smerge-diff-base-lower ()
+ "Diff `base' and `lower' version in current conflict region."
(interactive)
(smerge-diff 2 3))
-(defun smerge-diff-mine-other ()
- "Diff `mine' and `other' version in current conflict region."
+(define-obsolete-function-alias 'smerge-diff-base-other
+ 'smerge-diff-base-lower "25.2")
+
+(defun smerge-diff-upper-lower ()
+ "Diff `upper' and `lower' version in current conflict region."
(interactive)
(smerge-diff 1 3))
+(define-obsolete-function-alias 'smerge-diff-mine-other
+ 'smerge-diff-upper-lower "25.2")
+
(defun smerge-match-conflict ()
"Get info about the conflict. Puts the info in the `match-data'.
The submatches contain:
0: the whole conflict.
- 1: your code.
- 2: the base code.
- 3: other code.
+ 1: upper version of the code.
+ 2: base version of the code.
+ 3: lower version of the code.
An error is raised if not inside a conflict."
(save-excursion
(condition-case nil
(_ (re-search-backward smerge-begin-re))
(start (match-beginning 0))
- (mine-start (match-end 0))
+ (upper-start (match-end 0))
(filename (or (match-string 1) ""))
(_ (re-search-forward smerge-end-re))
(_ (cl-assert (< orig-point (match-end 0))))
- (other-end (match-beginning 0))
+ (lower-end (match-beginning 0))
(end (match-end 0))
- (_ (re-search-backward smerge-other-re start))
+ (_ (re-search-backward smerge-lower-re start))
- (mine-end (match-beginning 0))
- (other-start (match-end 0))
+ (upper-end (match-beginning 0))
+ (lower-start (match-end 0))
base-start base-end)
;; handle the various conflict styles
(cond
((save-excursion
- (goto-char mine-start)
+ (goto-char upper-start)
(re-search-forward smerge-begin-re end t))
;; There's a nested conflict and we're after the beginning
;; of the outer one but before the beginning of the inner one.
((re-search-backward smerge-base-re start t)
;; a 3-parts conflict
(set (make-local-variable 'smerge-conflict-style) 'diff3-A)
- (setq base-end mine-end)
- (setq mine-end (match-beginning 0))
+ (setq base-end upper-end)
+ (setq upper-end (match-beginning 0))
(setq base-start (match-end 0)))
((string= filename (file-name-nondirectory
(equal filename "ANCESTOR")
(string-match "\\`[.0-9]+\\'" filename)))
;; a same-diff conflict
- (setq base-start mine-start)
- (setq base-end mine-end)
- (setq mine-start other-start)
- (setq mine-end other-end)))
+ (setq base-start upper-start)
+ (setq base-end upper-end)
+ (setq upper-start lower-start)
+ (setq upper-end lower-end)))
(store-match-data (list start end
- mine-start mine-end
+ upper-start upper-end
base-start base-end
- other-start other-end
+ lower-start lower-end
(when base-start (1- base-start)) base-start
- (1- other-start) other-start))
+ (1- lower-start) lower-start))
t)
(search-failed (user-error "Point not in conflict region")))))
'((smerge . refine) (face . smerge-refined-added))))))
(defun smerge-swap ()
- "Swap the \"Mine\" and the \"Other\" chunks.
+ "Swap the \"Upper\" and the \"Lower\" chunks.
Can be used before things like `smerge-keep-all' or `smerge-resolve' where the
ordering can have some subtle influence on the result, such as preferring the
-spacing of the \"Other\" chunk."
+spacing of the \"Lower\" chunk."
(interactive)
(smerge-match-conflict)
(goto-char (match-beginning 3))
default)))
;;;###autoload
-(defun smerge-ediff (&optional name-mine name-other name-base)
+(defun smerge-ediff (&optional name-upper name-lower name-base)
"Invoke ediff to resolve the conflicts.
-NAME-MINE, NAME-OTHER, and NAME-BASE, if non-nil, are used for the
+NAME-UPPER, NAME-LOWER, and NAME-BASE, if non-nil, are used for the
buffer names."
(interactive)
(let* ((buf (current-buffer))
;;(ediff-default-variant 'default-B)
(config (current-window-configuration))
(filename (file-name-nondirectory (or buffer-file-name "-")))
- (mine (generate-new-buffer
- (or name-mine
+ (upper (generate-new-buffer
+ (or name-upper
(concat "*" filename " "
- (smerge--get-marker smerge-begin-re "MINE")
+ (smerge--get-marker smerge-begin-re "UPPER")
"*"))))
- (other (generate-new-buffer
- (or name-other
+ (lower (generate-new-buffer
+ (or name-lower
(concat "*" filename " "
- (smerge--get-marker smerge-end-re "OTHER")
+ (smerge--get-marker smerge-end-re "LOWER")
"*"))))
base)
- (with-current-buffer mine
+ (with-current-buffer upper
(buffer-disable-undo)
(insert-buffer-substring buf)
(goto-char (point-min))
(set-buffer-modified-p nil)
(funcall mode))
- (with-current-buffer other
+ (with-current-buffer lower
(buffer-disable-undo)
(insert-buffer-substring buf)
(goto-char (point-min))
;; Fire up ediff.
(set-buffer
(if base
- (ediff-merge-buffers-with-ancestor mine other base)
+ (ediff-merge-buffers-with-ancestor upper lower base)
;; nil 'ediff-merge-revisions-with-ancestor buffer-file-name)
- (ediff-merge-buffers mine other)))
+ (ediff-merge-buffers upper lower)))
;; nil 'ediff-merge-revisions buffer-file-name)))
;; Ediff is now set up, and we are in the control buffer.
(pcase-let ((`(,pt1 ,pt2 ,pt3 ,pt4)
(sort `(,pt1 ,pt2 ,pt3 ,@(if pt4 (list pt4))) '>=)))
(goto-char pt1) (beginning-of-line)
- (insert ">>>>>>> OTHER\n")
+ (insert ">>>>>>> LOWER\n")
(goto-char pt2) (beginning-of-line)
(insert "=======\n")
(goto-char pt3) (beginning-of-line)
(when pt4
(insert "||||||| BASE\n")
(goto-char pt4) (beginning-of-line))
- (insert "<<<<<<< MINE\n"))
+ (insert "<<<<<<< UPPER\n"))
(if smerge-mode nil (smerge-mode 1))
(smerge-refine))
(defconst smerge-parsep-re
(concat smerge-begin-re "\\|" smerge-end-re "\\|"
- smerge-base-re "\\|" smerge-other-re "\\|"))
+ smerge-base-re "\\|" smerge-lower-re "\\|"))
;;;###autoload
(define-minor-mode smerge-mode
;; - dir-printer (fileinfo) OK
;; * working-revision (file) OK
;; * checkout-model (files) OK
-;; - mode-line-string (file) NOT NEEDED
+;; - mode-line-string (file) OK
;; STATE-CHANGING FUNCTIONS
;; * register (files &optional rev comment) OK
;; * create-repo () OK
(defun vc-hg-state (file)
"Hg-specific version of `vc-state'."
+ (let ((state (vc-hg-state-fast file)))
+ (if (eq state 'unsupported) (vc-hg-state-slow file) state)))
+
+(defun vc-hg-state-slow (file)
+ "Determine status of FILE by running hg."
(setq file (expand-file-name file))
(let*
((status nil)
"parent" "--template" "{rev}")))
"0"))
+(defcustom vc-hg-symbolic-revision-styles
+ '(builtin-active-bookmark
+ "{if(bookmarks,sub(' ',',',bookmarks),if(phabdiff,phabdiff,shortest(node,6)))}")
+ "List of ways to present versions symbolically. The version
+that we use is the first one that successfully produces a
+non-empty string.
+
+Each entry in the list can be either:
+
+- The symbol `builtin-active-bookmark', which indicates that we
+should use the active bookmark if one exists. A template can
+supply this information as well, but `builtin-active-bookmark' is
+handled entirely inside Emacs and so is more efficient than using
+the generic Mercurial mechanism.
+
+- A string giving the Mercurial template to supply to \"hg
+parent\". \"hg help template\" may be useful reading.
+
+- A function to call; it should accept two arguments (a revision
+and an optional path to which to limit history) and produce a
+string. The function is called with `default-directory' set to
+within the repository.
+
+If no list entry produces a useful revision, return `nil'."
+ :type '(repeat (choice
+ (const :tag "Active bookmark" 'bookmark)
+ (string :tag "Hg template")
+ (function :tag "Custom")))
+ :version "25.2"
+ :group 'vc-hg)
+
+(defcustom vc-hg-use-file-version-for-mode-line-version nil
+ "When enabled, the modeline will contain revision informtion for the visited file.
+When not, the revision in the modeline is for the repository
+working copy. `nil' is the much faster setting for
+large repositories."
+ :type 'boolean
+ :version "25.2"
+ :group 'vc-hg)
+
+(defun vc-hg--active-bookmark-internal (rev)
+ (when (equal rev ".")
+ (let* ((current-bookmarks-file ".hg/bookmarks.current"))
+ (when (file-exists-p current-bookmarks-file)
+ (ignore-errors
+ (with-temp-buffer
+ (insert-file-contents current-bookmarks-file)
+ (buffer-substring-no-properties
+ (point-min) (point-max))))))))
+
+(defun vc-hg--run-log (template rev path)
+ (ignore-errors
+ (with-output-to-string
+ (if path
+ (vc-hg-command
+ standard-output 0 nil
+ "log" "-f" "-l1" "--template" template path)
+ (vc-hg-command
+ standard-output 0 nil
+ "log" "-r" rev "-l1" "--template" template)))))
+
+(defun vc-hg--symbolic-revision (rev &optional path)
+ "Make a Mercurial revision human-readable.
+REV is a Mercurial revision. `default-directory' is assumed to
+be in the repository root of interest. PATH, if set, is a
+specific file to query."
+ (let ((symbolic-revision nil)
+ (styles vc-hg-symbolic-revision-styles))
+ (while (and (not symbolic-revision) styles)
+ (let ((style (pop styles)))
+ (setf symbolic-revision
+ (cond ((and (null path) (eq style 'builtin-active-bookmark))
+ (vc-hg--active-bookmark-internal rev))
+ ((stringp style)
+ (vc-hg--run-log style rev path))
+ ((functionp style)
+ (funcall style rev path))))))
+ symbolic-revision))
+
+(defun vc-hg-mode-line-string (file)
+ "Hg-specific version of `vc-mode-line-string'."
+ (let* ((backend-name "Hg")
+ (truename (file-truename file))
+ (state (vc-state truename))
+ (state-echo nil)
+ (face nil)
+ (rev (and state
+ (let ((default-directory
+ (expand-file-name (vc-hg-root truename))))
+ (vc-hg--symbolic-revision
+ "."
+ (and vc-hg-use-file-version-for-mode-line-version
+ truename)))))
+ (rev (or rev "???")))
+ (propertize
+ (cond ((or (eq state 'up-to-date)
+ (eq state 'needs-update))
+ (setq state-echo "Up to date file")
+ (setq face 'vc-up-to-date-state)
+ (concat backend-name "-" rev))
+ ((eq state 'added)
+ (setq state-echo "Locally added file")
+ (setq face 'vc-locally-added-state)
+ (concat backend-name "@" rev))
+ ((eq state 'conflict)
+ (setq state-echo "File contains conflicts after the last merge")
+ (setq face 'vc-conflict-state)
+ (concat backend-name "!" rev))
+ ((eq state 'removed)
+ (setq state-echo "File removed from the VC system")
+ (setq face 'vc-removed-state)
+ (concat backend-name "!" rev))
+ ((eq state 'missing)
+ (setq state-echo "File tracked by the VC system, but missing from the file system")
+ (setq face 'vc-missing-state)
+ (concat backend-name "?" rev))
+ (t
+ (setq state-echo "Locally modified file")
+ (setq face 'vc-edited-state)
+ (concat backend-name ":" rev)))
+ 'face face
+ 'help-echo (concat state-echo " under the " backend-name
+ " version control system"))))
+
;;; History functions
(defcustom vc-hg-log-switches nil
;; TODO: update *vc-change-log* buffer so can see @ if --graph
))
+;;; Native data structure reading
+
+(defcustom vc-hg-parse-hg-data-structures t
+ "If true, try directly parsing Mercurial data structures
+directly instead of always running Mercurial. We try to be safe
+against Mercurial data structure format changes and always fall
+back to running Mercurial directly."
+ :type 'boolean
+ :version "25.2"
+ :group 'vc-hg)
+
+(defsubst vc-hg--read-u8 ()
+ "Read and advance over an unsigned byte.
+Return a fixnum."
+ (prog1 (char-after)
+ (forward-char)))
+
+(defsubst vc-hg--read-u32-be ()
+ "Read and advance over a big-endian unsigned 32-bit integer.
+Return a fixnum; on overflow, result is undefined."
+ ;; Because elisp bytecode has an instruction for multiply and
+ ;; doesn't have one for lsh, it's somewhat counter-intuitively
+ ;; faster to multiply than to shift.
+ (+ (* (vc-hg--read-u8) (* 256 256 256))
+ (* (vc-hg--read-u8) (* 256 256))
+ (* (vc-hg--read-u8) 256)
+ (identity (vc-hg--read-u8))))
+
+(defun vc-hg--raw-dirstate-search (dirstate fname)
+ (with-temp-buffer
+ (set-buffer-multibyte nil)
+ (insert-file-contents-literally dirstate)
+ (let* ((result nil)
+ (flen (length fname))
+ (case-fold-search nil)
+ (inhibit-changing-match-data t)
+ ;; Find a conservative bound for the loop below by using
+ ;; Boyer-Moore on the raw dirstate without parsing it; we
+ ;; know we can't possibly find fname _after_ the last place
+ ;; it appears, so we can bail out early if we try to parse
+ ;; past it, which especially helps when the file we're
+ ;; trying to find isn't in dirstate at all. There's no way
+ ;; to similarly bound the starting search position, since
+ ;; the file format is such that we need to parse it from
+ ;; the beginning to find record boundaries.
+ (search-limit
+ (progn
+ (goto-char (point-max))
+ (or (search-backward fname (+ (point-min) 40) t)
+ (point-min)))))
+ ;; 40 is just after the header, which contains the working
+ ;; directory parents
+ (goto-char (+ (point-min) 40))
+ ;; Iterate over all dirstate entries; we might run this loop
+ ;; hundreds of thousands of times, so performance is important
+ ;; here
+ (while (< (point) search-limit)
+ ;; 1+4*4 is the length of the dirstate item header, which we
+ ;; spell as a literal for performance, since the elisp
+ ;; compiler lacks constant propagation
+ (forward-char (1+ (* 3 4)))
+ (let ((this-flen (vc-hg--read-u32-be)))
+ (if (and (or (eq this-flen flen)
+ (and (> this-flen flen)
+ (eq (char-after (+ (point) flen)) 0)))
+ (search-forward fname (+ (point) flen) t))
+ (progn
+ (backward-char (+ flen (1+ (* 4 4))))
+ (setf result
+ (list (vc-hg--read-u8) ; status
+ (vc-hg--read-u32-be) ; mode
+ (vc-hg--read-u32-be) ; size (of file)
+ (vc-hg--read-u32-be) ; mtime
+ ))
+ (goto-char (point-max)))
+ (forward-char this-flen))))
+ result)))
+
+(define-error 'vc-hg-unsupported-syntax "unsupported hgignore syntax")
+
+(defconst vc-hg--pcre-c-escapes
+ '((?a . ?\a)
+ (?b . ?\b)
+ (?f . ?\f)
+ (?n . ?\n)
+ (?r . ?\r)
+ (?t . ?\t)
+ (?n . ?\n)
+ (?r . ?\r)
+ (?t . ?\t)
+ (?v . ?\v)))
+
+(defconst vc-hg--pcre-metacharacters
+ '(?. ?^ ?$ ?* ?+ ?? ?{ ?\\ ?\[ ?\| ?\())
+
+(defconst vc-hg--elisp-metacharacters
+ '(?. ?* ?+ ?? ?\[ ?$ ?\\))
+
+(defun vc-hg--escape-for-pcre (c)
+ (if (memq c vc-hg--pcre-metacharacters)
+ (string ?\\ c)
+ c))
+
+(defun vc-hg--parts-to-string (parts)
+ "Build a string from list PARTS. Each element is a character or string."
+ (let ((parts2 nil))
+ (while parts
+ (let* ((partcell (prog1 parts (setf parts (cdr parts))))
+ (part (car partcell)))
+ (if (stringp part)
+ (setf parts2 (nconc (append part nil) parts2))
+ (setcdr partcell parts2)
+ (setf parts2 partcell))))
+ (apply #'string parts2)))
+
+(defun vc-hg--pcre-to-elisp-re (pcre prefix)
+ "Transform PCRE, a Mercurial file PCRE, into an elisp RE against PREFIX.
+PREFIX is the directory name of the directory against which these
+patterns are rooted. We understand only a subset of PCRE syntax;
+if we don't understand a construct, we signal
+`vc-hg-unsupported-syntax'."
+ (cl-assert (string-match "^/\\(.*/\\)?$" prefix))
+ (let ((parts nil)
+ (i 0)
+ (anchored nil)
+ (state 'normal)
+ (pcrelen (length pcre)))
+ (while (< i pcrelen)
+ (let ((c (aref pcre i)))
+ (cond ((eq state 'normal)
+ (cond ((string-match
+ (rx (| "}\\?" (: "(?" (not (any ":")))))
+ pcre i)
+ (signal 'vc-hg-unsupported-syntax (list pcre)))
+ ((eq c ?\\)
+ (setf state 'backslash))
+ ((eq c ?\[)
+ (setf state 'charclass-enter)
+ (push c parts))
+ ((eq c ?^)
+ (if (eq i 0) (setf anchored t)
+ (signal 'vc-hg-unsupported-syntax (list pcre))))
+ ((eq c ?$)
+ ;; Patterns can also match directories exactly,
+ ;; ignoring everything under a matched directory
+ (push "\\(?:$\\|/\\)" parts))
+ ((memq c '(?| ?\( ?\)))
+ (push ?\\ parts)
+ (push c parts))
+ (t (push c parts))))
+ ((eq state 'backslash)
+ (cond ((memq c '(?0 ?1 ?2 ?3 ?4 ?5 ?6 ?7 ?8 ?9
+ ?A ?b ?B ?d ?D ?s ?S ?w ?W ?Z ?x))
+ (signal 'vc-hg-unsupported-syntax (list pcre)))
+ ((memq c vc-hg--elisp-metacharacters)
+ (push ?\\ parts)
+ (push c parts))
+ (t (push (or (cdr (assq c vc-hg--pcre-c-escapes)) c) parts)))
+ (setf state 'normal))
+ ((eq state 'charclass-enter)
+ (push c parts)
+ (setf state
+ (if (eq c ?\\)
+ 'charclass
+ 'charclass-backslash)))
+ ((eq state 'charclass-backslash)
+ (if (memq c '(?0 ?x))
+ (signal 'vc-hg-unsupported-syntax (list pcre)))
+ (push (or (cdr (assq c vc-hg--pcre-c-escapes)) c) parts)
+ (setf state 'charclass))
+ ((eq state 'charclass)
+ (push c parts)
+ (cond ((eq c ?\\) (setf state 'charclass-backslash))
+ ((eq c ?\]) (setf state 'normal))))
+ (t (error "invalid state")))
+ (setf i (1+ i))))
+ (unless (eq state 'normal)
+ (signal 'vc-hg-unsupported-syntax (list pcre)))
+ (concat
+ "^"
+ prefix
+ (if anchored "" "\\(?:.*/\\)?")
+ (vc-hg--parts-to-string parts))))
+
+(defun vc-hg--glob-to-pcre (glob)
+ "Transform a glob pattern into a Mercurial file pattern regex."
+ (let ((parts nil) (i 0) (n (length glob)) (group 0) c)
+ (cl-macrolet ((peek () '(and (< i n) (aref glob i))))
+ (while (< i n)
+ (setf c (aref glob i))
+ (cl-incf i)
+ (cond ((not (memq c '(?* ?? ?\[ ?\{ ?\} ?, ?\\)))
+ (push (vc-hg--escape-for-pcre c) parts))
+ ((eq c ?*)
+ (cond ((eq (peek) ?*)
+ (cl-incf i)
+ (cond ((eq (peek) ?/)
+ (cl-incf i)
+ (push "(?:.*/)?" parts))
+ (t
+ (push ".*" parts))))
+ (t (push "[^/]*" parts))))
+ ((eq c ??)
+ (push ?. parts))
+ ((eq c ?\[)
+ (let ((j i))
+ (when (and (< j n) (memq (aref glob j) '(?! ?\])))
+ (cl-incf j))
+ (while (and (< j n) (not (eq (aref glob j) ?\])))
+ (cl-incf j))
+ (cond ((>= j n)
+ (push "\\[" parts))
+ (t
+ (let ((x (substring glob i j)))
+ (setf x (replace-regexp-in-string
+ "\\\\" "\\\\" x t t))
+ (setf i (1+ j))
+ (cond ((eq (aref x 0) ?!)
+ (setf (aref x 0) ?^))
+ ((eq (aref x 0) ?^)
+ (setf x (concat "\\" x))))
+ (push ?\[ parts)
+ (push x parts)
+ (push ?\] parts))))))
+ ((eq c ?\{)
+ (cl-incf group)
+ (push "(?:" parts))
+ ((eq c ?\})
+ (push ?\) parts)
+ (cl-decf group))
+ ((and (eq c ?,) (> group 0))
+ (push ?| parts))
+ ((eq c ?\\)
+ (if (eq i n)
+ (push "\\\\" parts)
+ (cl-incf i)
+ (push ?\\ parts)
+ (push c parts)))
+ (t
+ (push (vc-hg--escape-for-pcre c) parts)))))
+ (concat (vc-hg--parts-to-string parts) "$")))
+
+(defvar vc-hg--hgignore-patterns)
+(defvar vc-hg--hgignore-filenames)
+
+(defun vc-hg--hgignore-add-pcre (pcre prefix)
+ (push (vc-hg--pcre-to-elisp-re pcre prefix) vc-hg--hgignore-patterns))
+
+(defun vc-hg--hgignore-add-glob (glob prefix)
+ (push (vc-hg--pcre-to-elisp-re (vc-hg--glob-to-pcre glob) prefix)
+ vc-hg--hgignore-patterns))
+
+(defun vc-hg--hgignore-add-path (path prefix)
+ (let ((parts nil))
+ (dotimes (i (length path))
+ (push (vc-hg--escape-for-pcre (aref path i)) parts))
+ (vc-hg--hgignore-add-pcre
+ (concat "^" (vc-hg--parts-to-string parts) "$")
+ prefix)))
+
+(defun vc-hg--slurp-hgignore-1 (hgignore prefix)
+ (let ((default-syntax 'vc-hg--hgignore-add-glob))
+ (with-temp-buffer
+ (let ((attr (file-attributes hgignore)))
+ (when attr (insert-file-contents hgignore))
+ (push (list hgignore (nth 5 attr) (nth 7 attr))
+ vc-hg--hgignore-filenames))
+ (while (not (eobp))
+ ;; This list of pattern-file commands isn't complete, but it
+ ;; should cover the common cases. Remember that we fall back
+ ;; to regular hg commands if we see something we don't like.
+ (save-restriction
+ (narrow-to-region (point) (point-at-eol))
+ (cond ((looking-at "[ \t]*\\(?:#.*\\)?$"))
+ ((looking-at "syntax:[ \t]*re[ \t]*$")
+ (setf default-syntax 'vc-hg--hgignore-add-pcre))
+ ((looking-at "syntax:[ \t]*glob[ \t]*$")
+ (setf default-syntax 'vc-hg--hgignore-add-glob))
+ ((looking-at "path:\\(.+?\\)[ \t]*$")
+ (vc-hg--hgignore-add-path (match-string 1) prefix))
+ ((looking-at "glob:\\(.+?\\)[ \t]*$")
+ (vc-hg--hgignore-add-glob (match-string 1) prefix))
+ ((looking-at "re:\\(.+?\\)[ \t]*$")
+ (vc-hg--hgignore-add-pcre (match-string 1) prefix))
+ ((looking-at "\\(sub\\)?include:\\(.+?\\)[ \t]*$")
+ (let* ((sub (equal (match-string 1) "sub"))
+ (arg (match-string 2))
+ (included-file
+ (if (string-match "^/" arg) arg
+ (concat (file-name-directory hgignore) arg))))
+ (vc-hg--slurp-hgignore-1
+ included-file
+ (if sub (file-name-directory included-file) prefix))))
+ ((looking-at "[a-zA-Z0-9_]*:")
+ (signal 'vc-hg-unsupported-syntax (list (match-string 0))))
+ ((looking-at ".*$")
+ (funcall default-syntax (match-string 0) prefix))))
+ (forward-line 1)))))
+
+(cl-defstruct (vc-hg--ignore-patterns
+ (:copier nil)
+ (:constructor vc-hg--ignore-patterns-make))
+ repo
+ ignore-patterns
+ file-sources)
+
+(defun vc-hg--slurp-hgignore (repo)
+ "Read hg ignore patterns from REPO.
+REPO must be the directory name of an hg repository."
+ (cl-assert (string-match "^/\\(.*/\\)?$" repo))
+ (let* ((hgignore (concat repo ".hgignore"))
+ (vc-hg--hgignore-patterns nil)
+ (vc-hg--hgignore-filenames nil))
+ (vc-hg--slurp-hgignore-1 hgignore repo)
+ (vc-hg--ignore-patterns-make
+ :repo repo
+ :ignore-patterns (nreverse vc-hg--hgignore-patterns)
+ :file-sources (nreverse vc-hg--hgignore-filenames))))
+
+(defun vc-hg--ignore-patterns-valid-p (hgip)
+ "Return whether the cached ignore patterns in HGIP are still valid"
+ (let ((valid t)
+ (file-sources (vc-hg--ignore-patterns-file-sources hgip)))
+ (while (and file-sources valid)
+ (let* ((fs (pop file-sources))
+ (saved-mtime (nth 1 fs))
+ (saved-size (nth 2 fs))
+ (attr (file-attributes (nth 0 fs)))
+ (current-mtime (nth 5 attr))
+ (current-size (nth 7 attr)))
+ (unless (and (equal saved-mtime current-mtime)
+ (equal saved-size current-size))
+ (setf valid nil))))
+ valid))
+
+(defun vc-hg--ignore-patterns-ignored-p (hgip filename)
+ "Test whether the ignore pattern set HGIP says to ignore FILENAME.
+FILENAME must be the file's true absolute name."
+ (let ((patterns (vc-hg--ignore-patterns-ignore-patterns hgip))
+ (inhibit-changing-match-data t)
+ (ignored nil))
+ (while (and patterns (not ignored))
+ (setf ignored (string-match (pop patterns) filename)))
+ ignored))
+
+(defun vc-hg--time-to-fixnum (ts)
+ (+ (* 65536 (car ts)) (cadr ts)))
+
+(defvar vc-hg--cached-ignore-patterns nil
+ "Cached pre-parsed hg ignore patterns.")
+
+(defun vc-hg--file-ignored-p (repo repo-relative-filename)
+ (let ((hgip vc-hg--cached-ignore-patterns))
+ (unless (and hgip
+ (equal repo (vc-hg--ignore-patterns-repo hgip))
+ (vc-hg--ignore-patterns-valid-p hgip))
+ (setf vc-hg--cached-ignore-patterns nil)
+ (setf hgip (vc-hg--slurp-hgignore repo))
+ (setf vc-hg--cached-ignore-patterns hgip))
+ (vc-hg--ignore-patterns-ignored-p
+ hgip
+ (concat repo repo-relative-filename))))
+
+(defun vc-hg--read-repo-requirements (repo)
+ (cl-assert (string-match "^/\\(.*/\\)?$" repo))
+ (let* ((requires-filename (concat repo ".hg/requires")))
+ (and (file-exists-p requires-filename)
+ (with-temp-buffer
+ (set-buffer-multibyte nil)
+ (insert-file-contents-literally requires-filename)
+ (split-string (buffer-substring-no-properties
+ (point-min) (point-max)))))))
+
+(defconst vc-hg-supported-requirements
+ '("dotencode"
+ "fncache"
+ "generaldelta"
+ "lz4revlog"
+ "remotefilelog"
+ "revlogv1"
+ "store")
+ "List of Mercurial repository requirements we understand; if a
+repository requires features not present in this list, we avoid
+attempting to parse Mercurial data structures.")
+
+(defun vc-hg--requirements-understood-p (repo)
+ "Check that we understand the format of the given repository.
+REPO is the directory name of a Mercurial repository."
+ (null (cl-set-difference (vc-hg--read-repo-requirements repo)
+ vc-hg-supported-requirements
+ :test #'equal)))
+
+(defvar vc-hg--dirstate-scan-cache nil
+ "Cache of the last result of `vc-hg--raw-dirstate-search'.
+Avoids the need to repeatedly scan dirstate on repeated calls to
+`vc-hg-state', as we see during registration queries.")
+
+(defun vc-hg--cached-dirstate-search (dirstate dirstate-attr ascii-fname)
+ (let* ((mtime (nth 5 dirstate-attr))
+ (size (nth 7 dirstate-attr))
+ (cache vc-hg--dirstate-scan-cache)
+ )
+ (if (and cache
+ (equal dirstate (pop cache))
+ (equal mtime (pop cache))
+ (equal size (pop cache))
+ (equal ascii-fname (pop cache)))
+ (pop cache)
+ (let ((result (vc-hg--raw-dirstate-search dirstate ascii-fname)))
+ (setf vc-hg--dirstate-scan-cache
+ (list dirstate mtime size ascii-fname result))
+ result))))
+
+(defun vc-hg-state-fast (filename)
+ "Like `vc-hg-state', but parse internal data structures directly.
+Returns one of the usual `vc-state' enumeration values or
+`unsupported' if we need to take the slow path and run the
+hg binary."
+ (let* (truename
+ repo
+ dirstate
+ dirstate-attr
+ repo-relative-filename
+ ascii-fname)
+ (if (or
+ ;; Explicit user disable
+ (not vc-hg-parse-hg-data-structures)
+ ;; It'll probably be faster to run hg remotely
+ (file-remote-p filename)
+ (progn
+ (setf truename (file-truename filename))
+ (file-remote-p truename))
+ (not (setf repo (vc-hg-root truename)))
+ ;; dirstate must exist
+ (not (progn
+ (setf repo (expand-file-name repo))
+ (cl-assert (string-match "^/\\(.*/\\)?$" repo))
+ (setf dirstate (concat repo ".hg/dirstate"))
+ (setf dirstate-attr (file-attributes dirstate))))
+ ;; Repository must be in an understood format
+ (not (vc-hg--requirements-understood-p repo))
+ ;; Dirstate too small to be valid
+ (< (nth 7 dirstate-attr) 40)
+ ;; We want to store 32-bit unsigned values in fixnums
+ (< most-positive-fixnum 4294967295)
+ (progn
+ (setf repo-relative-filename
+ (file-relative-name truename repo))
+ (setf ascii-fname
+ (string-as-unibyte
+ (let (last-coding-system-used)
+ (encode-coding-string
+ repo-relative-filename
+ 'us-ascii t))))
+ ;; We only try dealing with ASCII filenames
+ (not (equal ascii-fname repo-relative-filename))))
+ 'unsupported
+ (let* ((dirstate-entry
+ (vc-hg--cached-dirstate-search
+ dirstate dirstate-attr ascii-fname))
+ (state (car dirstate-entry))
+ (stat (file-attributes
+ (concat repo repo-relative-filename))))
+ (cond ((eq state ?r) 'removed)
+ ((and (not state) stat)
+ (condition-case nil
+ (if (vc-hg--file-ignored-p repo repo-relative-filename)
+ 'ignored
+ 'unregistered)
+ (vc-hg-unsupported-syntax 'unsupported)))
+ ((and state (not stat)) 'missing)
+ ((eq state ?n)
+ (let ((vc-hg-size (nth 2 dirstate-entry))
+ (vc-hg-mtime (nth 3 dirstate-entry))
+ (fs-size (nth 7 stat))
+ (fs-mtime (vc-hg--time-to-fixnum (nth 5 stat))))
+ (if (and (eql vc-hg-size fs-size) (eql vc-hg-mtime fs-mtime))
+ 'up-to-date
+ 'edited)))
+ ((eq state ?a) 'added)
+ (state 'unsupported))))))
+
;;; Miscellaneous
(defun vc-hg-previous-revision (_file rev)
(add-hook 'vc-mode-line-hook 'vc-mode-line nil t)
(let (backend)
(cond
- ((setq backend (with-demoted-errors (vc-backend buffer-file-name)))
+ ((setq backend (with-demoted-errors (vc-backend buffer-file-name)))
+ ;; Let the backend setup any buffer-local things he needs.
+ (vc-call-backend backend 'find-file-hook)
;; Compute the state and put it in the mode line.
(vc-mode-line buffer-file-name backend)
(unless vc-make-backup-files
;; Use this variable, not make-backup-files,
;; because this is for things that depend on the file name.
- (set (make-local-variable 'backup-inhibited) t))
- ;; Let the backend setup any buffer-local things he needs.
- (vc-call-backend backend 'find-file-hook))
+ (set (make-local-variable 'backup-inhibited) t)))
((let* ((truename (and buffer-file-truename
(expand-file-name buffer-file-truename)))
(link-type (and truename
(funcall command 1)
(setq arg (1- arg)))
(error
- (if (forward-word-strictly)
+ (if (forward-word)
;; Skip any non-word characters to avoid triggering a read-only
;; error which would cause skipping the next word characters too.
(skip-syntax-forward "^w")
AR = @AR@
ARFLAGS = @ARFLAGS@
MKDIR_P = @MKDIR_P@
+EXEEXT = @EXEEXT@
LUCID_OBJS = lwlib-Xlw.o xlwmenu.o lwlib-Xaw.o
MOTIF_OBJS = lwlib-Xm.o
bootstrap-clean maintainer-clean: distclean
rm -f TAGS
+ETAGS = ../lib-src/etags${EXEEXT}
-ETAGS = ../lib-src/etags
+${ETAGS}: FORCE
+ ${MAKE} -C ../lib-src $(notdir $@)
-ctagsfiles= $(srcdir)/*.[ch]
+ctagsfiles= $(wildcard ${srcdir}/*.[ch])
-TAGS: $(ctagsfiles)
- "$(ETAGS)" $(ctagsfiles)
+FORCE:
+.PHONY: tags FORCE
tags: TAGS
-.PHONY: tags
-
+TAGS: ${ETAGS} $(ctagsfiles)
+ ${ETAGS} $(ctagsfiles)
### Makefile.in ends here
# Code from module ssize_t:
# Code from module stat:
# Code from module stat-time:
+ # Code from module std-gnu11:
# Code from module stdalign:
# Code from module stddef:
# Code from module stdint:
m4/st_dm_mode.m4
m4/stat-time.m4
m4/stat.m4
+ m4/std-gnu11.m4
m4/stdalign.m4
m4/stddef_h.m4
m4/stdint.m4
--- /dev/null
+# Prefer GNU C11 and C++11 to earlier versions. -*- coding: utf-8 -*-
+
+# This implementation is taken from GNU Autoconf lib/autoconf/c.m4
+# commit 5ad3567c3cbd90b4faa6539c35bc4a8c6500f535
+# dated 2015-10-08 10:12:41 2015 +0200.
+# This implementation will be obsolete once we can assume Autoconf 2.70
+# or later is installed everywhere a Gnulib program might be developed.
+
+
+# Copyright (C) 2001-2016 Free Software Foundation, Inc.
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+# Written by David MacKenzie, with help from
+# Akim Demaille, Paul Eggert,
+# François Pinard, Karl Berry, Richard Pixley, Ian Lance Taylor,
+# Roland McGrath, Noah Friedman, david d zuhn, and many others.
+
+
+# AC_PROG_CC([COMPILER ...])
+# --------------------------
+# COMPILER ... is a space separated list of C compilers to search for.
+# This just gives the user an opportunity to specify an alternative
+# search list for the C compiler.
+AC_DEFUN_ONCE([AC_PROG_CC],
+[AC_LANG_PUSH(C)dnl
+AC_ARG_VAR([CC], [C compiler command])dnl
+AC_ARG_VAR([CFLAGS], [C compiler flags])dnl
+_AC_ARG_VAR_LDFLAGS()dnl
+_AC_ARG_VAR_LIBS()dnl
+_AC_ARG_VAR_CPPFLAGS()dnl
+m4_ifval([$1],
+ [AC_CHECK_TOOLS(CC, [$1])],
+[AC_CHECK_TOOL(CC, gcc)
+if test -z "$CC"; then
+ dnl Here we want:
+ dnl AC_CHECK_TOOL(CC, cc)
+ dnl but without the check for a tool without the prefix.
+ dnl Until the check is removed from there, copy the code:
+ if test -n "$ac_tool_prefix"; then
+ AC_CHECK_PROG(CC, [${ac_tool_prefix}cc], [${ac_tool_prefix}cc])
+ fi
+fi
+if test -z "$CC"; then
+ AC_CHECK_PROG(CC, cc, cc, , , /usr/ucb/cc)
+fi
+if test -z "$CC"; then
+ AC_CHECK_TOOLS(CC, cl.exe)
+fi
+])
+
+test -z "$CC" && AC_MSG_FAILURE([no acceptable C compiler found in \$PATH])
+
+# Provide some information about the compiler.
+_AS_ECHO_LOG([checking for _AC_LANG compiler version])
+set X $ac_compile
+ac_compiler=$[2]
+for ac_option in --version -v -V -qversion -version; do
+ _AC_DO_LIMIT([$ac_compiler $ac_option >&AS_MESSAGE_LOG_FD])
+done
+
+m4_expand_once([_AC_COMPILER_EXEEXT])[]dnl
+m4_expand_once([_AC_COMPILER_OBJEXT])[]dnl
+_AC_LANG_COMPILER_GNU
+if test $ac_compiler_gnu = yes; then
+ GCC=yes
+else
+ GCC=
+fi
+_AC_PROG_CC_G
+dnl
+dnl Set ac_prog_cc_stdc to the supported C version.
+dnl Also set the documented variable ac_cv_prog_cc_stdc;
+dnl its name was chosen when it was cached, but it is no longer cached.
+_AC_PROG_CC_C11([ac_prog_cc_stdc=c11
+ ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c11],
+ [_AC_PROG_CC_C99([ac_prog_cc_stdc=c99
+ ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c99],
+ [_AC_PROG_CC_C89([ac_prog_cc_stdc=c89
+ ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c89],
+ [ac_prog_cc_stdc=no
+ ac_cv_prog_cc_stdc=no])])])
+dnl
+AC_LANG_POP(C)dnl
+])# AC_PROG_CC
+
+
+
+# AC_PROG_CXX([LIST-OF-COMPILERS])
+# --------------------------------
+# LIST-OF-COMPILERS is a space separated list of C++ compilers to search
+# for (if not specified, a default list is used). This just gives the
+# user an opportunity to specify an alternative search list for the C++
+# compiler.
+# aCC HP-UX C++ compiler much better than `CC', so test before.
+# FCC Fujitsu C++ compiler
+# KCC KAI C++ compiler
+# RCC Rational C++
+# xlC_r AIX C Set++ (with support for reentrant code)
+# xlC AIX C Set++
+AC_DEFUN([AC_PROG_CXX],
+[AC_LANG_PUSH(C++)dnl
+AC_ARG_VAR([CXX], [C++ compiler command])dnl
+AC_ARG_VAR([CXXFLAGS], [C++ compiler flags])dnl
+_AC_ARG_VAR_LDFLAGS()dnl
+_AC_ARG_VAR_LIBS()dnl
+_AC_ARG_VAR_CPPFLAGS()dnl
+_AC_ARG_VAR_PRECIOUS([CCC])dnl
+if test -z "$CXX"; then
+ if test -n "$CCC"; then
+ CXX=$CCC
+ else
+ AC_CHECK_TOOLS(CXX,
+ [m4_default([$1],
+ [g++ c++ gpp aCC CC cxx cc++ cl.exe FCC KCC RCC xlC_r xlC])],
+ g++)
+ fi
+fi
+# Provide some information about the compiler.
+_AS_ECHO_LOG([checking for _AC_LANG compiler version])
+set X $ac_compile
+ac_compiler=$[2]
+for ac_option in --version -v -V -qversion; do
+ _AC_DO_LIMIT([$ac_compiler $ac_option >&AS_MESSAGE_LOG_FD])
+done
+
+m4_expand_once([_AC_COMPILER_EXEEXT])[]dnl
+m4_expand_once([_AC_COMPILER_OBJEXT])[]dnl
+_AC_LANG_COMPILER_GNU
+if test $ac_compiler_gnu = yes; then
+ GXX=yes
+else
+ GXX=
+fi
+_AC_PROG_CXX_G
+_AC_PROG_CXX_CXX11([ac_prog_cxx_stdcxx=cxx11
+ ac_cv_prog_cxx_stdcxx=$ac_cv_prog_cxx_cxx11
+ ac_cv_prog_cxx_cxx98=$ac_cv_prog_cxx_cxx11],
+ [_AC_PROG_CXX_CXX98([ac_prog_cxx_stdcxx=cxx98
+ ac_cv_prog_cxx_stdcxx=$ac_cv_prog_cxx_cxx98],
+ [ac_prog_cxx_stdcxx=no
+ ac_cv_prog_cxx_stdcxx=no])])
+AC_LANG_POP(C++)dnl
+])# AC_PROG_CXX
+
+
+# _AC_C_STD_TRY(STANDARD, TEST-PROLOGUE, TEST-BODY, OPTION-LIST,
+# ACTION-IF-AVAILABLE, ACTION-IF-UNAVAILABLE)
+# --------------------------------------------------------------
+# Check whether the C compiler accepts features of STANDARD (e.g `c89', `c99')
+# by trying to compile a program of TEST-PROLOGUE and TEST-BODY. If this fails,
+# try again with each compiler option in the space-separated OPTION-LIST; if one
+# helps, append it to CC. If eventually successful, run ACTION-IF-AVAILABLE,
+# else ACTION-IF-UNAVAILABLE.
+AC_DEFUN([_AC_C_STD_TRY],
+[AC_MSG_CHECKING([for $CC option to enable ]m4_translit($1, [c], [C])[ features])
+AC_CACHE_VAL(ac_cv_prog_cc_$1,
+[ac_cv_prog_cc_$1=no
+ac_save_CC=$CC
+AC_LANG_CONFTEST([AC_LANG_PROGRAM([$2], [$3])])
+for ac_arg in '' $4
+do
+ CC="$ac_save_CC $ac_arg"
+ _AC_COMPILE_IFELSE([], [ac_cv_prog_cc_$1=$ac_arg])
+ test "x$ac_cv_prog_cc_$1" != "xno" && break
+done
+rm -f conftest.$ac_ext
+CC=$ac_save_CC
+])# AC_CACHE_VAL
+ac_prog_cc_stdc_options=
+case "x$ac_cv_prog_cc_$1" in
+ x)
+ AC_MSG_RESULT([none needed]) ;;
+ xno)
+ AC_MSG_RESULT([unsupported]) ;;
+ *)
+ ac_prog_cc_stdc_options=" $ac_cv_prog_cc_$1"
+ CC=$CC$ac_prog_cc_stdc_options
+ AC_MSG_RESULT([$ac_cv_prog_cc_$1]) ;;
+esac
+AS_IF([test "x$ac_cv_prog_cc_$1" != xno], [$5], [$6])
+])# _AC_C_STD_TRY
+
+# _AC_C_C99_TEST_HEADER
+# ---------------------
+# A C header suitable for testing for C99.
+AC_DEFUN([_AC_C_C99_TEST_HEADER],
+[[#include <stdarg.h>
+#include <stdbool.h>
+#include <stdlib.h>
+#include <wchar.h>
+#include <stdio.h>
+
+// Check varargs macros. These examples are taken from C99 6.10.3.5.
+#define debug(...) fprintf (stderr, __VA_ARGS__)
+#define showlist(...) puts (#__VA_ARGS__)
+#define report(test,...) ((test) ? puts (#test) : printf (__VA_ARGS__))
+static void
+test_varargs_macros (void)
+{
+ int x = 1234;
+ int y = 5678;
+ debug ("Flag");
+ debug ("X = %d\n", x);
+ showlist (The first, second, and third items.);
+ report (x>y, "x is %d but y is %d", x, y);
+}
+
+// Check long long types.
+#define BIG64 18446744073709551615ull
+#define BIG32 4294967295ul
+#define BIG_OK (BIG64 / BIG32 == 4294967297ull && BIG64 % BIG32 == 0)
+#if !BIG_OK
+ your preprocessor is broken;
+#endif
+#if BIG_OK
+#else
+ your preprocessor is broken;
+#endif
+static long long int bignum = -9223372036854775807LL;
+static unsigned long long int ubignum = BIG64;
+
+struct incomplete_array
+{
+ int datasize;
+ double data[];
+};
+
+struct named_init {
+ int number;
+ const wchar_t *name;
+ double average;
+};
+
+typedef const char *ccp;
+
+static inline int
+test_restrict (ccp restrict text)
+{
+ // See if C++-style comments work.
+ // Iterate through items via the restricted pointer.
+ // Also check for declarations in for loops.
+ for (unsigned int i = 0; *(text+i) != '\0'; ++i)
+ continue;
+ return 0;
+}
+
+// Check varargs and va_copy.
+static bool
+test_varargs (const char *format, ...)
+{
+ va_list args;
+ va_start (args, format);
+ va_list args_copy;
+ va_copy (args_copy, args);
+
+ const char *str = "";
+ int number = 0;
+ float fnumber = 0;
+
+ while (*format)
+ {
+ switch (*format++)
+ {
+ case 's': // string
+ str = va_arg (args_copy, const char *);
+ break;
+ case 'd': // int
+ number = va_arg (args_copy, int);
+ break;
+ case 'f': // float
+ fnumber = va_arg (args_copy, double);
+ break;
+ default:
+ break;
+ }
+ }
+ va_end (args_copy);
+ va_end (args);
+
+ return *str && number && fnumber;
+}]])# _AC_C_C99_TEST_HEADER
+
+# _AC_C_C99_TEST_BODY
+# -------------------
+# A C body suitable for testing for C99, assuming the corresponding header.
+AC_DEFUN([_AC_C_C99_TEST_BODY],
+[[
+ // Check bool.
+ _Bool success = false;
+
+ // Check restrict.
+ if (test_restrict ("String literal") == 0)
+ success = true;
+ char *restrict newvar = "Another string";
+
+ // Check varargs.
+ success &= test_varargs ("s, d' f .", "string", 65, 34.234);
+ test_varargs_macros ();
+
+ // Check flexible array members.
+ struct incomplete_array *ia =
+ malloc (sizeof (struct incomplete_array) + (sizeof (double) * 10));
+ ia->datasize = 10;
+ for (int i = 0; i < ia->datasize; ++i)
+ ia->data[i] = i * 1.234;
+
+ // Check named initializers.
+ struct named_init ni = {
+ .number = 34,
+ .name = L"Test wide string",
+ .average = 543.34343,
+ };
+
+ ni.number = 58;
+
+ int dynamic_array[ni.number];
+ dynamic_array[ni.number - 1] = 543;
+
+ // work around unused variable warnings
+ return (!success || bignum == 0LL || ubignum == 0uLL || newvar[0] == 'x'
+ || dynamic_array[ni.number - 1] != 543);
+]])
+
+# _AC_PROG_CC_C99 ([ACTION-IF-AVAILABLE], [ACTION-IF-UNAVAILABLE])
+# ----------------------------------------------------------------
+# If the C compiler is not in ISO C99 mode by default, try to add an
+# option to output variable CC to make it so. This macro tries
+# various options that select ISO C99 on some system or another. It
+# considers the compiler to be in ISO C99 mode if it handles _Bool,
+# // comments, flexible array members, inline, long long int, mixed
+# code and declarations, named initialization of structs, restrict,
+# va_copy, varargs macros, variable declarations in for loops and
+# variable length arrays.
+AC_DEFUN([_AC_PROG_CC_C99],
+[_AC_C_STD_TRY([c99],
+[_AC_C_C99_TEST_HEADER],
+[_AC_C_C99_TEST_BODY],
+dnl Try
+dnl GCC -std=gnu99 (unused restrictive modes: -std=c99 -std=iso9899:1999)
+dnl IBM XL C -qlanglvl=extc1x (V12.1; does not pass C11 test)
+dnl IBM XL C -qlanglvl=extc99
+dnl (pre-V12.1; unused restrictive mode: -qlanglvl=stdc99)
+dnl HP cc -AC99
+dnl Intel ICC -std=c99, -c99 (deprecated)
+dnl IRIX -c99
+dnl Solaris -D_STDC_C99=
+dnl cc's -xc99 option uses linker magic to define the external
+dnl symbol __xpg4 as if by "int __xpg4 = 1;", which enables C99
+dnl behavior for C library functions. This is not wanted here,
+dnl because it means that a single module compiled with -xc99
+dnl alters C runtime behavior for the entire program, not for
+dnl just the module. Instead, define the (private) symbol
+dnl _STDC_C99, which suppresses a bogus failure in <stdbool.h>.
+dnl The resulting compiler passes the test case here, and that's
+dnl good enough. For more, please see the thread starting at:
+dnl http://lists.gnu.org/archive/html/autoconf/2010-12/msg00059.html
+dnl Tru64 -c99
+dnl with extended modes being tried first.
+[[-std=gnu99 -std=c99 -c99 -AC99 -D_STDC_C99= -qlanglvl=extc1x -qlanglvl=extc99]], [$1], [$2])[]dnl
+])# _AC_PROG_CC_C99
+
+
+# _AC_PROG_CC_C11 ([ACTION-IF-AVAILABLE], [ACTION-IF-UNAVAILABLE])
+# ----------------------------------------------------------------
+# If the C compiler is not in ISO C11 mode by default, try to add an
+# option to output variable CC to make it so. This macro tries
+# various options that select ISO C11 on some system or another. It
+# considers the compiler to be in ISO C11 mode if it handles _Alignas,
+# _Alignof, _Noreturn, _Static_assert, UTF-8 string literals,
+# duplicate typedefs, and anonymous structures and unions.
+AC_DEFUN([_AC_PROG_CC_C11],
+[_AC_C_STD_TRY([c11],
+[_AC_C_C99_TEST_HEADER[
+// Check _Alignas.
+char _Alignas (double) aligned_as_double;
+char _Alignas (0) no_special_alignment;
+extern char aligned_as_int;
+char _Alignas (0) _Alignas (int) aligned_as_int;
+
+// Check _Alignof.
+enum
+{
+ int_alignment = _Alignof (int),
+ int_array_alignment = _Alignof (int[100]),
+ char_alignment = _Alignof (char)
+};
+_Static_assert (0 < -_Alignof (int), "_Alignof is signed");
+
+// Check _Noreturn.
+int _Noreturn does_not_return (void) { for (;;) continue; }
+
+// Check _Static_assert.
+struct test_static_assert
+{
+ int x;
+ _Static_assert (sizeof (int) <= sizeof (long int),
+ "_Static_assert does not work in struct");
+ long int y;
+};
+
+// Check UTF-8 literals.
+#define u8 syntax error!
+char const utf8_literal[] = u8"happens to be ASCII" "another string";
+
+// Check duplicate typedefs.
+typedef long *long_ptr;
+typedef long int *long_ptr;
+typedef long_ptr long_ptr;
+
+// Anonymous structures and unions -- taken from C11 6.7.2.1 Example 1.
+struct anonymous
+{
+ union {
+ struct { int i; int j; };
+ struct { int k; long int l; } w;
+ };
+ int m;
+} v1;
+]],
+[_AC_C_C99_TEST_BODY[
+ v1.i = 2;
+ v1.w.k = 5;
+ _Static_assert (&v1.i == &v1.w.k, "Anonymous union alignment botch");
+]],
+dnl Try
+dnl GCC -std=gnu11 (unused restrictive mode: -std=c11)
+dnl with extended modes being tried first.
+dnl
+dnl Do not try -qlanglvl=extc1x, because IBM XL C V12.1 (the latest version as
+dnl of September 2012) does not pass the C11 test. For now, try extc1x when
+dnl compiling the C99 test instead, since it enables _Static_assert and
+dnl _Noreturn, which is a win. If -qlanglvl=extc11 or -qlanglvl=extc1x passes
+dnl the C11 test in some future version of IBM XL C, we'll add it here,
+dnl preferably extc11.
+[[-std=gnu11]], [$1], [$2])[]dnl
+])# _AC_PROG_CC_C11
+
+
+# AC_PROG_CC_C89
+# --------------
+# Do not use AU_ALIAS here and in AC_PROG_CC_C99 and AC_PROG_CC_STDC,
+# as that'd be incompatible with how Automake redefines AC_PROG_CC. See
+# <http://lists.gnu.org/archive/html/autoconf/2012-10/msg00048.html>.
+AU_DEFUN([AC_PROG_CC_C89],
+ [AC_REQUIRE([AC_PROG_CC])],
+ [$0 is obsolete; use AC_PROG_CC]
+)
+
+# AC_PROG_CC_C99
+# --------------
+AU_DEFUN([AC_PROG_CC_C99],
+ [AC_REQUIRE([AC_PROG_CC])],
+ [$0 is obsolete; use AC_PROG_CC]
+)
+
+# AC_PROG_CC_STDC
+# ---------------
+AU_DEFUN([AC_PROG_CC_STDC],
+ [AC_REQUIRE([AC_PROG_CC])],
+ [$0 is obsolete; use AC_PROG_CC]
+)
+
+
+# AC_C_PROTOTYPES
+# ---------------
+# Check if the C compiler supports prototypes, included if it needs
+# options.
+AC_DEFUN([AC_C_PROTOTYPES],
+[AC_REQUIRE([AC_PROG_CC])dnl
+if test "$ac_prog_cc_stdc" != no; then
+ AC_DEFINE(PROTOTYPES, 1,
+ [Define to 1 if the C compiler supports function prototypes.])
+ AC_DEFINE(__PROTOTYPES, 1,
+ [Define like PROTOTYPES; this can be used by system headers.])
+fi
+])# AC_C_PROTOTYPES
+
+
+# _AC_CXX_STD_TRY(STANDARD, TEST-PROLOGUE, TEST-BODY, OPTION-LIST,
+# ACTION-IF-AVAILABLE, ACTION-IF-UNAVAILABLE)
+# ----------------------------------------------------------------
+# Check whether the C++ compiler accepts features of STANDARD (e.g
+# `cxx98', `cxx11') by trying to compile a program of TEST-PROLOGUE
+# and TEST-BODY. If this fails, try again with each compiler option
+# in the space-separated OPTION-LIST; if one helps, append it to CXX.
+# If eventually successful, run ACTION-IF-AVAILABLE, else
+# ACTION-IF-UNAVAILABLE.
+AC_DEFUN([_AC_CXX_STD_TRY],
+[AC_MSG_CHECKING([for $CXX option to enable ]m4_translit(m4_translit($1, [x], [+]), [a-z], [A-Z])[ features])
+AC_LANG_PUSH(C++)dnl
+AC_CACHE_VAL(ac_cv_prog_cxx_$1,
+[ac_cv_prog_cxx_$1=no
+ac_save_CXX=$CXX
+AC_LANG_CONFTEST([AC_LANG_PROGRAM([$2], [$3])])
+for ac_arg in '' $4
+do
+ CXX="$ac_save_CXX $ac_arg"
+ _AC_COMPILE_IFELSE([], [ac_cv_prog_cxx_$1=$ac_arg])
+ test "x$ac_cv_prog_cxx_$1" != "xno" && break
+done
+rm -f conftest.$ac_ext
+CXX=$ac_save_CXX
+])# AC_CACHE_VAL
+ac_prog_cxx_stdcxx_options=
+case "x$ac_cv_prog_cxx_$1" in
+ x)
+ AC_MSG_RESULT([none needed]) ;;
+ xno)
+ AC_MSG_RESULT([unsupported]) ;;
+ *)
+ ac_prog_cxx_stdcxx_options=" $ac_cv_prog_cxx_$1"
+ CXX=$CXX$ac_prog_cxx_stdcxx_options
+ AC_MSG_RESULT([$ac_cv_prog_cxx_$1]) ;;
+esac
+AC_LANG_POP(C++)dnl
+AS_IF([test "x$ac_cv_prog_cxx_$1" != xno], [$5], [$6])
+])# _AC_CXX_STD_TRY
+
+# _AC_CXX_CXX98_TEST_HEADER
+# -------------------------
+# A C++ header suitable for testing for CXX98.
+AC_DEFUN([_AC_CXX_CXX98_TEST_HEADER],
+[[
+#include <algorithm>
+#include <cstdlib>
+#include <fstream>
+#include <iomanip>
+#include <iostream>
+#include <list>
+#include <map>
+#include <set>
+#include <sstream>
+#include <stdexcept>
+#include <string>
+#include <utility>
+#include <vector>
+
+namespace test {
+ typedef std::vector<std::string> string_vec;
+ typedef std::pair<int,bool> map_value;
+ typedef std::map<std::string,map_value> map_type;
+ typedef std::set<int> set_type;
+
+ template<typename T>
+ class printer {
+ public:
+ printer(std::ostringstream& os): os(os) {}
+ void operator() (T elem) { os << elem << std::endl; }
+ private:
+ std::ostringstream& os;
+ };
+}
+]])# _AC_CXX_CXX98_TEST_HEADER
+
+# _AC_CXX_CXX98_TEST_BODY
+# -----------------------
+# A C++ body suitable for testing for CXX98, assuming the corresponding header.
+AC_DEFUN([_AC_CXX_CXX98_TEST_BODY],
+[[
+
+try {
+ // Basic string.
+ std::string teststr("ASCII text");
+ teststr += " string";
+
+ // Simple vector.
+ test::string_vec testvec;
+ testvec.push_back(teststr);
+ testvec.push_back("foo");
+ testvec.push_back("bar");
+ if (testvec.size() != 3) {
+ throw std::runtime_error("vector size is not 1");
+ }
+
+ // Dump vector into stringstream and obtain string.
+ std::ostringstream os;
+ for (test::string_vec::const_iterator i = testvec.begin();
+ i != testvec.end(); ++i) {
+ if (i + 1 != testvec.end()) {
+ os << teststr << '\n';
+ }
+ }
+ // Check algorithms work.
+ std::for_each(testvec.begin(), testvec.end(), test::printer<std::string>(os));
+ std::string os_out = os.str();
+
+ // Test pair and map.
+ test::map_type testmap;
+ testmap.insert(std::make_pair(std::string("key"),
+ std::make_pair(53,false)));
+
+ // Test set.
+ int values[] = {9, 7, 13, 15, 4, 18, 12, 10, 5, 3, 14, 19, 17, 8, 6, 20, 16, 2, 11, 1};
+ test::set_type testset(values, values + sizeof(values)/sizeof(values[0]));
+ std::list<int> testlist(testset.begin(), testset.end());
+ std::copy(testset.begin(), testset.end(), std::back_inserter(testlist));
+} catch (const std::exception& e) {
+ std::cerr << "Caught exception: " << e.what() << std::endl;
+
+ // Test fstream
+ std::ofstream of("test.txt");
+ of << "Test ASCII text\n" << std::flush;
+ of << "N= " << std::hex << std::setw(8) << std::left << 534 << std::endl;
+ of.close();
+}
+std::exit(0);
+]])
+
+# _AC_CXX_CXX11_TEST_HEADER
+# -------------------------
+# A C++ header suitable for testing for CXX11.
+AC_DEFUN([_AC_CXX_CXX11_TEST_HEADER],
+[[
+#include <deque>
+#include <functional>
+#include <memory>
+#include <tuple>
+#include <array>
+#include <regex>
+#include <iostream>
+
+namespace cxx11test
+{
+ typedef std::shared_ptr<std::string> sptr;
+ typedef std::weak_ptr<std::string> wptr;
+
+ typedef std::tuple<std::string,int,double> tp;
+ typedef std::array<int, 20> int_array;
+
+ constexpr int get_val() { return 20; }
+
+ struct testinit
+ {
+ int i;
+ double d;
+ };
+
+ class delegate {
+ public:
+ delegate(int n) : n(n) {}
+ delegate(): delegate(2354) {}
+
+ virtual int getval() { return this->n; };
+ protected:
+ int n;
+ };
+
+ class overridden : public delegate {
+ public:
+ overridden(int n): delegate(n) {}
+ virtual int getval() override final { return this->n * 2; }
+ };
+
+ class nocopy {
+ public:
+ nocopy(int i): i(i) {}
+ nocopy() = default;
+ nocopy(const nocopy&) = delete;
+ nocopy & operator=(const nocopy&) = delete;
+ private:
+ int i;
+ };
+}
+]])# _AC_CXX_CXX11_TEST_HEADER
+
+# _AC_CXX_CXX11_TEST_BODY
+# -----------------------
+# A C++ body suitable for testing for CXX11, assuming the corresponding header.
+AC_DEFUN([_AC_CXX_CXX11_TEST_BODY],
+[[
+{
+ // Test auto and decltype
+ std::deque<int> d;
+ d.push_front(43);
+ d.push_front(484);
+ d.push_front(3);
+ d.push_front(844);
+ int total = 0;
+ for (auto i = d.begin(); i != d.end(); ++i) { total += *i; }
+
+ auto a1 = 6538;
+ auto a2 = 48573953.4;
+ auto a3 = "String literal";
+
+ decltype(a2) a4 = 34895.034;
+}
+{
+ // Test constexpr
+ short sa[cxx11test::get_val()] = { 0 };
+}
+{
+ // Test initialiser lists
+ cxx11test::testinit il = { 4323, 435234.23544 };
+}
+{
+ // Test range-based for and lambda
+ cxx11test::int_array array = {9, 7, 13, 15, 4, 18, 12, 10, 5, 3, 14, 19, 17, 8, 6, 20, 16, 2, 11, 1};
+ for (int &x : array) { x += 23; }
+ std::for_each(array.begin(), array.end(), [](int v1){ std::cout << v1; });
+}
+{
+ using cxx11test::sptr;
+ using cxx11test::wptr;
+
+ sptr sp(new std::string("ASCII string"));
+ wptr wp(sp);
+ sptr sp2(wp);
+}
+{
+ cxx11test::tp tuple("test", 54, 45.53434);
+ double d = std::get<2>(tuple);
+ std::string s;
+ int i;
+ std::tie(s,i,d) = tuple;
+}
+{
+ static std::regex filename_regex("^_?([a-z0-9_.]+-)+[a-z0-9]+$");
+ std::string testmatch("Test if this string matches");
+ bool match = std::regex_search(testmatch, filename_regex);
+}
+{
+ cxx11test::int_array array = {9, 7, 13, 15, 4, 18, 12, 10, 5, 3, 14, 19, 17, 8, 6, 20, 16, 2, 11, 1};
+ cxx11test::int_array::size_type size = array.size();
+}
+{
+ // Test constructor delegation
+ cxx11test::delegate d1;
+ cxx11test::delegate d2();
+ cxx11test::delegate d3(45);
+}
+{
+ // Test override and final
+ cxx11test::overridden o1(55464);
+}
+{
+ // Test nullptr
+ char *c = nullptr;
+}
+{
+ // Test template brackets
+ std::vector<std::pair<int,char*>> v1;
+}
+{
+ // Unicode literals
+ char *utf8 = u8"UTF-8 string \u2500";
+ char16_t *utf16 = u"UTF-8 string \u2500";
+ char32_t *utf32 = U"UTF-32 string \u2500";
+}
+]])
+
+# _AC_PROG_CXX_CXX98 ([ACTION-IF-AVAILABLE], [ACTION-IF-UNAVAILABLE])
+# -------------------------------------------------------------------
+
+# If the C++ compiler is not in ISO C++98 mode by default, try to add
+# an option to output variable CXX to make it so. This macro tries
+# various options that select ISO C++98 on some system or another. It
+# considers the compiler to be in ISO C++98 mode if it handles basic
+# features of the std namespace including: string, containers (list,
+# map, set, vector), streams (fstreams, iostreams, stringstreams,
+# iomanip), pair, exceptions and algorithms.
+
+
+AC_DEFUN([_AC_PROG_CXX_CXX98],
+[_AC_CXX_STD_TRY([cxx98],
+[_AC_CXX_CXX98_TEST_HEADER],
+[_AC_CXX_CXX98_TEST_BODY],
+dnl Try
+dnl GCC -std=gnu++98 (unused restrictive mode: -std=c++98)
+dnl IBM XL C -qlanglvl=extended
+dnl HP aC++ -AA
+dnl Intel ICC -std=gnu++98
+dnl Solaris N/A (default)
+dnl Tru64 N/A (default, but -std gnu could be used)
+dnl with extended modes being tried first.
+[[-std=gnu++98 -std=c++98 -qlanglvl=extended -AA]], [$1], [$2])[]dnl
+])# _AC_PROG_CXX_CXX98
+
+# _AC_PROG_CXX_CXX11 ([ACTION-IF-AVAILABLE], [ACTION-IF-UNAVAILABLE])
+# -------------------------------------------------------------------
+# If the C++ compiler is not in ISO CXX11 mode by default, try to add
+# an option to output variable CXX to make it so. This macro tries
+# various options that select ISO C++11 on some system or another. It
+# considers the compiler to be in ISO C++11 mode if it handles all the
+# tests from the C++98 checks, plus the following: Language features
+# (auto, constexpr, decltype, default/deleted constructors, delegate
+# constructors, final, initialiser lists, lambda functions, nullptr,
+# override, range-based for loops, template brackets without spaces,
+# unicode literals) and library features (array, memory (shared_ptr,
+# weak_ptr), regex and tuple types).
+AC_DEFUN([_AC_PROG_CXX_CXX11],
+[_AC_CXX_STD_TRY([cxx11],
+[_AC_CXX_CXX11_TEST_HEADER
+_AC_CXX_CXX98_TEST_HEADER],
+[_AC_CXX_CXX11_TEST_BODY
+_AC_CXX_CXX98_TEST_BODY],
+dnl Try
+dnl GCC -std=gnu++11 (unused restrictive mode: -std=c++11) [and 0x variants]
+dnl IBM XL C -qlanglvl=extended0x
+dnl (pre-V12.1; unused restrictive mode: -qlanglvl=stdcxx11)
+dnl HP aC++ -AA
+dnl Intel ICC -std=c++11 -std=c++0x
+dnl Solaris N/A (no support)
+dnl Tru64 N/A (no support)
+dnl with extended modes being tried first.
+[[-std=gnu++11 -std=c++11 -std=gnu++0x -std=c++0x -qlanglvl=extended0x -AA]], [$1], [$2])[]dnl
+])# _AC_PROG_CXX_CXX11
/^#undef PACKAGE_TARNAME/s/^.*$/#define PACKAGE_TARNAME ""/
/^#undef PACKAGE_VERSION/s/^.*$/#define PACKAGE_VERSION ""/
/^#undef PENDING_OUTPUT_COUNT/s/^.*$/#define PENDING_OUTPUT_COUNT(FILE) ((FILE)->_ptr - (FILE)->_base)/
-/^#undef VERSION/s/^.*$/#define VERSION "25.0.90"/
+/^#undef VERSION/s/^.*$/#define VERSION "25.1.50"/
/^#undef SYSTEM_TYPE/s/^.*$/#define SYSTEM_TYPE "ms-dos"/
/^#undef HAVE_DECL_GETENV/s/^.*$/#define HAVE_DECL_GETENV 1/
/^#undef SYS_SIGLIST_DECLARED/s/^.*$/#define SYS_SIGLIST_DECLARED 1/
check:
@echo "We don't have any tests for the nt/ directory yet."
+ETAGS = ../lib-src/etags${EXEEXT}
+
+${ETAGS}: FORCE
+ ${MAKE} -C ../lib-src $(notdir $@)
+
+tagsfiles= $(wildcard ${srcdir}/*.[ch])
+
+FORCE:
+.PHONY: tags FORCE
tags: TAGS
-TAGS: ${EXE_FILES:${EXEEXT}=.c}
- ../lib-src/etags *.[ch]
+TAGS: ${ETAGS} ${tagsfiles}
+ ${ETAGS} ${tagsfiles}
## Build the programs
addpm${EXEEXT}: ${srcdir}/addpm.c ../src/epaths.h
CFLAGS=@CFLAGS@
CPPFLAGS = @CPPFLAGS@
-TAGS = etags
RM = rm -f
RANLIB = @RANLIB@
AR = @AR@
ARFLAGS = @ARFLAGS@
MKDIR_P = @MKDIR_P@
+EXEEXT = @EXEEXT@
OBJS = Activate.o \
AddPane.o \
bootstrap-clean maintainer-clean distclean: clean
rm -f Makefile
-.PHONY: tags
-tags:
- $(TAGS) -t *.[ch]
+ETAGS = ../lib-src/etags${EXEEXT}
+
+${ETAGS}: FORCE
+ ${MAKE} -C ../lib-src $(notdir $@)
+
+tagsfiles = $(wildcard ${srcdir}/*.[ch])
+
+FORCE:
+.PHONY: tags FORCE
+tags: TAGS
+TAGS: ${ETAGS} ${tagsfiles}
+ ${ETAGS} ${tagsfiles}
### Makefile.in ends here
## widget.o if USE_X_TOOLKIT, otherwise empty.
WIDGET_OBJ=@WIDGET_OBJ@
-## sheap.o if CYGWIN, otherwise empty.
+HYBRID_MALLOC = @HYBRID_MALLOC@
+
+## cygw32.o if CYGWIN, otherwise empty.
CYGWIN_OBJ=@CYGWIN_OBJ@
## fontset.o fringe.o image.o if we have any window system
doprnt.o intervals.o textprop.o composite.o xml.o $(NOTIFY_OBJ) \
$(XWIDGETS_OBJ) \
profiler.o decompress.o \
+ $(if $(HYBRID_MALLOC),sheap.o) \
+ $(SHEAP_OBJ) \
$(MSDOS_OBJ) $(MSDOS_X_OBJ) $(NS_OBJ) $(CYGWIN_OBJ) $(FONT_OBJ) \
$(W32_OBJ) $(WINDOW_SYSTEM_OBJ) $(XGSELOBJ)
obj = $(base_obj) $(NS_OBJC_OBJ)
$(ALLOBJS): globals.h
-$(lib)/libgnu.a: $(config_h)
+LIBEGNU_ARCHIVE = $(lib)/lib$(if $(HYBRID_MALLOC),e)gnu.a
+
+$(LIBEGNU_ARCHIVE): $(config_h)
$(MAKE) -C $(lib) all
## We have to create $(etc) here because init_cmdargs tests its
## This goes on to affect various things, and the emacs binary fails
## to start if Vinstallation_directory has the wrong value.
temacs$(EXEEXT): $(LIBXMENU) $(ALLOBJS) \
- $(lib)/libgnu.a $(EMACSRES) ${charsets} ${charscript}
+ $(LIBEGNU_ARCHIVE) $(EMACSRES) ${charsets} ${charscript}
$(AM_V_CCLD)$(CC) $(ALL_CFLAGS) $(TEMACS_LDFLAGS) $(LDFLAGS) \
- -o temacs $(ALLOBJS) $(lib)/libgnu.a $(W32_RES_LINK) $(LIBES)
+ -o temacs $(ALLOBJS) $(LIBEGNU_ARCHIVE) $(W32_RES_LINK) $(LIBES)
$(MKDIR_P) $(etc)
ifneq ($(CANNOT_DUMP),yes)
$(PAXCTL_if_present) -r $@
-rm -f *~ \#*
-ETAGS = ../lib-src/etags
+ETAGS = ../lib-src/etags${EXEEXT}
+
+${ETAGS}: FORCE
+ ${MAKE} -C ../lib-src $(notdir $@)
-ctagsfiles1 = [xyzXYZ]*.[hc]
-ctagsfiles2 = [a-wA-W]*.[hc]
-ctagsfiles3 = [a-zA-Z]*.m
+ctagsfiles1 = $(wildcard ${srcdir}/*.[hc])
+ctagsfiles2 = $(wildcard ${srcdir}/*.m)
## FIXME? In out-of-tree builds, should TAGS be generated in srcdir?
## This does not need to depend on ../lisp and ../lwlib TAGS files,
## because etags "--include" only includes a pointer to the file,
## rather than the file contents.
-TAGS: $(srcdir)/$(ctagsfiles1) $(srcdir)/$(ctagsfiles2) $(srcdir)/$(ctagsfiles3)
- "$(ETAGS)" --include=../lisp/TAGS --include=$(lwlibdir)/TAGS \
+TAGS: ${ETAGS} $(ctagsfiles1) $(ctagsfiles2)
+ ${ETAGS} --include=../lisp/TAGS --include=$(lwlibdir)/TAGS \
--regex='{c}/[ ]*DEFVAR_[A-Z_ (]+"\([^"]+\)"/\1/' \
--regex='{c}/[ ]*DEFVAR_[A-Z_ (]+"[^"]+",[ ]\([A-Za-z0-9_]+\)/\1/' \
- $(srcdir)/$(ctagsfiles1) $(srcdir)/$(ctagsfiles2) \
+ $(ctagsfiles1) \
--regex='{objc}/[ ]*DEFVAR_[A-Z_ (]+"\([^"]+\)"/\1/' \
--regex='{objc}/[ ]*DEFVAR_[A-Z_ (]+"[^"]+",[ ]\([A-Za-z0-9_]+\)/\1/' \
- $(srcdir)/$(ctagsfiles3)
+ $(ctagsfiles2)
## Arrange to make tags tables for ../lisp and ../lwlib,
## which the above TAGS file for the C files includes by reference.
-../lisp/TAGS:
+../lisp/TAGS: FORCE
$(MAKE) -C ../lisp TAGS ETAGS="$(ETAGS)"
-$(lwlibdir)/TAGS:
+$(lwlibdir)/TAGS: FORCE
$(MAKE) -C $(lwlibdir) TAGS ETAGS="$(ETAGS)"
tags: TAGS ../lisp/TAGS $(lwlibdir)/TAGS
#include <stdio.h>
#include <limits.h> /* For CHAR_BIT. */
-
-#ifdef ENABLE_CHECKING
-#include <signal.h> /* For SIGABRT. */
-#endif
+#include <signal.h> /* For SIGABRT, SIGDANGER. */
#ifdef HAVE_PTHREAD
#include <pthread.h>
#include "dispextern.h"
#include "intervals.h"
#include "puresize.h"
+#include "sheap.h"
#include "systime.h"
#include "character.h"
#include "buffer.h"
#include "dosfns.h" /* For dos_memory_info. */
#endif
+#ifdef HAVE_MALLOC_H
+# include <malloc.h>
+#endif
+
#if (defined ENABLE_CHECKING \
&& defined HAVE_VALGRIND_VALGRIND_H \
&& !defined USE_VALGRIND)
#ifdef DOUG_LEA_MALLOC
-#include <malloc.h>
-
/* Specify maximum number of areas to mmap. It would be nice to use a
value that explicitly means "no limit". */
inside glibc's malloc. */
static void *malloc_state_ptr;
-/* Get and free this pointer; useful around unexec. */
-void
-alloc_unexec_pre (void)
-{
- malloc_state_ptr = malloc_get_state ();
-}
-void
-alloc_unexec_post (void)
-{
- free (malloc_state_ptr);
-}
-
/* Restore the dumped malloc state. Because malloc can be invoked
even before main (e.g. by the dynamic linker), the dumped malloc
state must be restored as early as possible using this special hook. */
}
}
+/* Declare the malloc initialization hook, which runs before 'main' starts.
+ EXTERNALLY_VISIBLE works around Bug#22522. */
# ifndef __MALLOC_HOOK_VOLATILE
# define __MALLOC_HOOK_VOLATILE
# endif
-voidfuncptr __MALLOC_HOOK_VOLATILE __malloc_initialize_hook
+voidfuncptr __MALLOC_HOOK_VOLATILE __malloc_initialize_hook EXTERNALLY_VISIBLE
= malloc_initialize_hook;
#endif
+/* Allocator-related actions to do just before and after unexec. */
+
+void
+alloc_unexec_pre (void)
+{
+#ifdef DOUG_LEA_MALLOC
+ malloc_state_ptr = malloc_get_state ();
+#endif
+#ifdef HYBRID_MALLOC
+ bss_sbrk_did_unexec = true;
+#endif
+}
+
+void
+alloc_unexec_post (void)
+{
+#ifdef DOUG_LEA_MALLOC
+ free (malloc_state_ptr);
+#endif
+#ifdef HYBRID_MALLOC
+ bss_sbrk_did_unexec = false;
+#endif
+}
+
/* Mark, unmark, query mark bit of a Lisp string. S must be a pointer
to a struct Lisp_String. */
Malloc
************************************************************************/
+#if defined SIGDANGER || (!defined SYSTEM_MALLOC && !defined HYBRID_MALLOC)
+
/* Function malloc calls this if it finds we are near exhausting storage. */
void
pending_malloc_warning = str;
}
+#endif
/* Display an already-pending malloc warning. */
unexmacosx.c, so don't use it on Darwin. */
#if ! ADDRESS_SANITIZER && !defined DARWIN_OS
-# if !defined SYSTEM_MALLOC && !defined DOUG_LEA_MALLOC && !defined HYBRID_MALLOC
-# define USE_ALIGNED_ALLOC 1
-# ifndef HAVE_ALIGNED_ALLOC
-/* Defined in gmalloc.c. */
-void *aligned_alloc (size_t, size_t);
-# endif
-# elif defined HYBRID_MALLOC
-# if defined HAVE_ALIGNED_ALLOC || defined HAVE_POSIX_MEMALIGN
-# define USE_ALIGNED_ALLOC 1
-# define aligned_alloc hybrid_aligned_alloc
-/* Defined in gmalloc.c. */
-void *aligned_alloc (size_t, size_t);
-# endif
-# elif defined HAVE_ALIGNED_ALLOC
+# if (defined HAVE_ALIGNED_ALLOC \
+ || (defined HYBRID_MALLOC \
+ ? defined HAVE_POSIX_MEMALIGN \
+ : !defined SYSTEM_MALLOC && !defined DOUG_LEA_MALLOC))
# define USE_ALIGNED_ALLOC 1
-# elif defined HAVE_POSIX_MEMALIGN
+# elif !defined HYBRID_MALLOC && defined HAVE_POSIX_MEMALIGN
# define USE_ALIGNED_ALLOC 1
+# define aligned_alloc my_aligned_alloc /* Avoid collision with lisp.h. */
static void *
aligned_alloc (size_t alignment, size_t size)
{
DEFUN ("make-vector", Fmake_vector, Smake_vector, 2, 2, 0,
doc: /* Return a newly created vector of length LENGTH, with each element being INIT.
See also the function `vector'. */)
- (register Lisp_Object length, Lisp_Object init)
+ (Lisp_Object length, Lisp_Object init)
{
- Lisp_Object vector;
- register ptrdiff_t sizei;
- register ptrdiff_t i;
- register struct Lisp_Vector *p;
-
CHECK_NATNUM (length);
-
- p = allocate_vector (XFASTINT (length));
- sizei = XFASTINT (length);
- for (i = 0; i < sizei; i++)
+ struct Lisp_Vector *p = allocate_vector (XFASTINT (length));
+ for (ptrdiff_t i = 0; i < XFASTINT (length); i++)
p->contents[i] = init;
-
- XSETVECTOR (vector, p);
- return vector;
+ return make_lisp_ptr (p, Lisp_Vectorlike);
}
DEFUN ("vector", Fvector, Svector, 0, MANY, 0,
usage: (vector &rest OBJECTS) */)
(ptrdiff_t nargs, Lisp_Object *args)
{
- ptrdiff_t i;
- register Lisp_Object val = make_uninit_vector (nargs);
- register struct Lisp_Vector *p = XVECTOR (val);
-
- for (i = 0; i < nargs; i++)
- p->contents[i] = args[i];
+ Lisp_Object val = make_uninit_vector (nargs);
+ struct Lisp_Vector *p = XVECTOR (val);
+ memcpy (p->contents, args, nargs * sizeof *args);
return val;
}
usage: (make-byte-code ARGLIST BYTE-CODE CONSTANTS DEPTH &optional DOCSTRING INTERACTIVE-SPEC &rest ELEMENTS) */)
(ptrdiff_t nargs, Lisp_Object *args)
{
- ptrdiff_t i;
- register Lisp_Object val = make_uninit_vector (nargs);
- register struct Lisp_Vector *p = XVECTOR (val);
+ Lisp_Object val = make_uninit_vector (nargs);
+ struct Lisp_Vector *p = XVECTOR (val);
/* We used to purecopy everything here, if purify-flag was set. This worked
OK for Emacs-23, but with Emacs-24's lexical binding code, it can be
just wasteful and other times plainly wrong (e.g. those free vars may want
to be setcar'd). */
- for (i = 0; i < nargs; i++)
- p->contents[i] = args[i];
+ memcpy (p->contents, args, nargs * sizeof *args);
make_byte_code (p);
XSETCOMPILED (val, p);
return val;
/* To select a nonfundamental mode,
select the buffer temporarily and then call the mode function. */
- record_unwind_protect (save_excursion_restore, save_excursion_save ());
+ record_unwind_current_buffer ();
Fset_buffer (buffer);
call0 (function);
if (NILP (BVAR (&buffer_defaults, enable_multibyte_characters)))
Fset_buffer_multibyte (Qnil);
- pwd = get_current_dir_name ();
+ pwd = emacs_get_current_dir_name ();
if (!pwd)
{
bool
setup_ccl_program (struct ccl_program *ccl, Lisp_Object ccl_prog)
{
- int i;
-
if (! NILP (ccl_prog))
{
struct Lisp_Vector *vp;
}
}
ccl->ic = CCL_HEADER_MAIN;
- for (i = 0; i < 8; i++)
- ccl->reg[i] = 0;
+ memset (ccl->reg, 0, sizeof ccl->reg);
ccl->last_block = false;
ccl->status = 0;
ccl->stack_idx = 0;
/* Here, we just copy the parent's fast_map. It's not accurate,
but at least it works for quickly detecting which character
DOESN'T belong to this charset. */
- for (i = 0; i < 190; i++)
- charset.fast_map[i] = parent_charset->fast_map[i];
+ memcpy (charset.fast_map, parent_charset->fast_map,
+ sizeof charset.fast_map);
/* We also copy these for parents. */
charset.min_char = parent_charset->min_char;
#ifdef emacs
#define malloc hybrid_malloc
#define realloc hybrid_realloc
-#define calloc hybrid_calloc
+#define aligned_alloc hybrid_aligned_alloc
#define free hybrid_free
-#if defined HAVE_GET_CURRENT_DIR_NAME && !defined BROKEN_GET_CURRENT_DIR_NAME
-#define HYBRID_GET_CURRENT_DIR_NAME 1
-#define get_current_dir_name hybrid_get_current_dir_name
-#endif
#endif
#endif /* HYBRID_MALLOC */
int width = w->total_cols;
double d = max (0, margin);
d = min (width / 2 - 1, d);
- /* Since MARGIN is positive, we cannot possibly have less than
- one glyph for the marginal area. */
- return max (1, (int) ((double) total_glyphs / width * d));
+ return (int) ((double) total_glyphs / width * d);
}
return 0;
}
#include "composite.h"
#include "dispextern.h"
#include "regex.h"
+#include "sheap.h"
#include "syntax.h"
#include "sysselect.h"
#include "systime.h"
bool initialized;
/* Set to true if this instance of Emacs might dump. */
+#ifndef DOUG_LEA_MALLOC
+static
+#endif
bool might_dump;
#ifdef DARWIN_OS
extern void unexec_init_emacs_zone (void);
#endif
-extern void malloc_enable_thread (void);
-
/* If true, Emacs should not attempt to use a window-specific code,
but instead should use the virtual terminal under which it was started. */
bool inhibit_window_system;
{
signal (sig, SIG_DFL);
- /* If fatal error occurs in code below, avoid infinite recursion. */
- if (! fatal_error_in_progress)
+ if (attempt_orderly_shutdown_on_fatal_signal)
{
- fatal_error_in_progress = 1;
+ /* If fatal error occurs in code below, avoid infinite recursion. */
+ if (! fatal_error_in_progress)
+ {
+ fatal_error_in_progress = 1;
- totally_unblock_input ();
- if (sig == SIGTERM || sig == SIGHUP || sig == SIGINT)
- Fkill_emacs (make_number (sig));
+ totally_unblock_input ();
+ if (sig == SIGTERM || sig == SIGHUP || sig == SIGINT)
+ Fkill_emacs (make_number (sig));
- shut_down_emacs (sig, Qnil);
- emacs_backtrace (backtrace_limit);
+ shut_down_emacs (sig, Qnil);
+ emacs_backtrace (backtrace_limit);
+ }
}
/* Signal the same code; this time it will really be fatal.
filename_from_ansi (ch_to_dir, newdir);
ch_to_dir = newdir;
#endif
- original_pwd = get_current_dir_name ();
+ original_pwd = emacs_get_current_dir_name ();
if (chdir (ch_to_dir) != 0)
{
fprintf (stderr, "%s: Can't chdir to %s: %s\n",
tem = Vpurify_flag;
Vpurify_flag = Qnil;
+#ifdef HYBRID_MALLOC
+ {
+ static char const fmt[] = "%d of %d static heap bytes used";
+ char buf[sizeof fmt + 2 * (INT_STRLEN_BOUND (int) - 2)];
+ int max_usage = max_bss_sbrk_ptr - bss_sbrk_buffer;
+ sprintf (buf, fmt, max_usage, STATIC_HEAP_SIZE);
+ /* Don't log messages, because at this point buffers cannot be created. */
+ message1_nolog (buf);
+ }
+#endif
+
fflush (stdout);
/* Tell malloc where start of impure now is. */
/* Also arrange for warnings when nearly out of space. */
(register Lisp_Object elt, Lisp_Object list)
{
register Lisp_Object tail;
- for (tail = list; CONSP (tail); tail = XCDR (tail))
+ for (tail = list; !NILP (tail); tail = XCDR (tail))
{
register Lisp_Object tem;
CHECK_LIST_CONS (tail, list);
if (!FLOATP (elt))
return Fmemq (elt, list);
- for (tail = list; CONSP (tail); tail = XCDR (tail))
+ for (tail = list; !NILP (tail); tail = XCDR (tail))
{
register Lisp_Object tem;
CHECK_LIST_CONS (tail, list);
{
Lisp_Object tail, prev;
- for (tail = seq, prev = Qnil; CONSP (tail); tail = XCDR (tail))
+ for (tail = seq, prev = Qnil; !NILP (tail); tail = XCDR (tail))
{
CHECK_LIST_CONS (tail, seq);
An element of a base fontset is a vector of FONT-DEFs which themselves
are vectors of the form [ FONT-SPEC ENCODING REPERTORY ].
- An element of a realized fontset is nil, t, 0, or a vector of this
- form:
+ An element of a realized fontset is nil, t, 0, or a cons that has
+ this from:
- [ PREFERRED-RFONT-DEF RFONT-DEF0 RFONT-DEF1 ... ]
+ (CHARSET-ORDERED-LIST-TICK . FONT-GROUP)
+
+ CHARSET_ORDERED_LIST_TICK is the same as charset_ordered_list_tick or -1.
+
+ FONT-GROUP is a vector of elements that have this form:
+
+ [ RFONT-DEF0 RFONT-DEF1 ... ]
Each RFONT-DEFn (i.e. Realized FONT-DEF) has this form:
[ FACE-ID FONT-DEF FONT-OBJECT SORTING-SCORE ]
- RFONT-DEFn are automatically reordered by the current charset
- priority list.
+ RFONT-DEFn are automatically reordered considering the current
+ charset priority list, the current language environment, and
+ priorities determined by font-backends.
+
+ RFONT-DEFn may not be a vector in the following cases.
The value nil means that we have not yet generated the above vector
from the base of the fontset.
The value 0 means that no font is available for the corresponding
range of characters in this fontset, but may be available in the
- default fontset.
+ fallback font-group or in the default fontset.
A fontset has 8 extra slots.
if (! NILP (encoding))
{
+ /* This spec specifies an encoding by a charset set
+ name. Reflect the preference order of that charset
+ in the upper bits of SCORE. */
Lisp_Object tail;
for (tail = Vcharset_ordered_list;
}
else
{
+ /* This spec does not specify an encoding. If the spec
+ specifies a language, and the language is not for the
+ current language environment, make the score
+ larger. */
Lisp_Object lang = Ffont_get (font_spec, QClang);
if (! NILP (lang)
XSETCAR (font_group, make_number (low_tick_bits));
}
-/* Return a font-group (actually a cons (-1 . FONT-GROUP-VECTOR)) for
- character C in FONTSET. If C is -1, return a fallback font-group.
- If C is not -1, the value may be Qt (FONTSET doesn't have a font
- for C even in the fallback group), or 0 (a font for C may be found
- only in the fallback group). */
+/* Return a font-group (actually a cons (CHARSET_ORDERED_LIST_TICK
+ . FONT-GROUP)) for character C or a fallback font-group in the
+ realized fontset FONTSET. The elements of FONT-GROUP are
+ RFONT-DEFs. The value may not be a cons. See the comment at the
+ head of this file for the detail of the return value. */
static Lisp_Object
fontset_get_font_group (Lisp_Object fontset, int c)
else
font_group = FONTSET_FALLBACK (fontset);
if (! NILP (font_group))
+ /* We have already realized FONT-DEFs of this font group for C or
+ for fallback (FONT_GROUP is a cons), or we have already found
+ that no appropriate font was found (FONT_GROUP is t or 0). */
return font_group;
base_fontset = FONTSET_BASE (fontset);
if (NILP (base_fontset))
+ /* Actually we never come here because FONTSET is a realized one,
+ and thus it should have a base. */
font_group = Qnil;
else if (c >= 0)
font_group = char_table_ref_and_range (base_fontset, c, &from, &to);
else
font_group = FONTSET_FALLBACK (base_fontset);
+
+ /* FONT_GROUP not being a vector means that no fonts are specified
+ for C, or the fontset does not have fallback fonts. */
if (NILP (font_group))
{
font_group = make_number (0);
if (c >= 0)
+ /* Record that FONTSET does not specify fonts for C. As
+ there's a possibility that a font is found in a fallback
+ font group, we set 0 at the moment. */
char_table_set_range (fontset, from, to, font_group);
return font_group;
}
if (!VECTORP (font_group))
return font_group;
+
+ /* Now realize FONT-DEFs of this font group, and update the realized
+ fontset FONTSET. */
font_group = Fcopy_sequence (font_group);
for (i = 0; i < ASIZE (font_group); i++)
if (! NILP (AREF (font_group, i)))
}
/* Return RFONT-DEF (vector) in the realized fontset FONTSET for the
- character C. If no font is found, return Qnil if there's a
+ character C. If no font is found, return Qnil or 0 if there's a
possibility that the default fontset or the fallback font groups
have a proper font, and return Qt if not.
If a font is found but is not yet opened, open it (if FACE is not
NULL) or return Qnil (if FACE is NULL).
- ID is a charset-id that must be preferred, or -1 meaning no
+ CHARSET_ID is a charset-id that must be preferred, or -1 meaning no
preference.
If FALLBACK, search only fallback fonts. */
static Lisp_Object
-fontset_find_font (Lisp_Object fontset, int c, struct face *face, int id,
- bool fallback)
+fontset_find_font (Lisp_Object fontset, int c, struct face *face,
+ int charset_id, bool fallback)
{
Lisp_Object vec, font_group;
int i, charset_matched = 0, found_index;
/* We have just created the font-group,
or the charset priorities were changed. */
reorder_font_vector (font_group, face->ascii_face->font);
- if (id >= 0)
- /* Find a spec matching with the charset ID to try at
+ if (charset_id >= 0)
+ /* Find a spec matching with CHARSET_ID to try it at
first. */
for (i = 0; i < ASIZE (vec); i++)
{
break;
repertory = FONT_DEF_REPERTORY (RFONT_DEF_FONT_DEF (rfont_def));
- if (XINT (repertory) == id)
+ if (XINT (repertory) == charset_id)
{
charset_matched = i;
break;
}
}
- /* Find the first available font in the vector of RFONT-DEF. */
+ /* Find the first available font in the vector of RFONT-DEF. If
+ CHARSET_MATCHED > 0, try the corresponding RFONT-DEF first, then
+ try the rest. */
for (i = 0; i < ASIZE (vec); i++)
{
Lisp_Object font_def;
{
if (charset_matched > 0)
{
- /* Try the element matching with the charset ID at first. */
+ /* Try the element matching with CHARSET_ID at first. */
found_index = charset_matched;
/* Make this negative so that we don't come here in the
next loop. */
charset_matched = - charset_matched;
/* We must try the first element in the next loop. */
- i--;
+ i = -1;
}
}
else if (i == - charset_matched)
if (NILP (font_object))
{
/* Something strange happened, perhaps because of a
- Font-backend problem. Too avoid crashing, record
+ Font-backend problem. To avoid crashing, record
that this spec is unusable. It may be better to find
another font of the same spec, but currently we don't
- have such an API. */
+ have such an API in font-backend. */
RFONT_DEF_SET_FACE (rfont_def, -1);
continue;
}
i = found_index;
}
+ /* Record that no font in this font group supports C. */
FONTSET_SET (fontset, make_number (c), make_number (0));
return Qnil;
}
+/* Return RFONT-DEF (vector) corresponding to the font for character
+ C. The value is not a vector if no font is found for C. */
+
static Lisp_Object
fontset_font (Lisp_Object fontset, int c, struct face *face, int id)
{
#define USE_PTHREAD
#endif
+#include <stddef.h>
#include <string.h>
#include <limits.h>
#include <stdint.h>
-
-#ifdef HYBRID_GET_CURRENT_DIR_NAME
-#undef get_current_dir_name
-#endif
-
#include <unistd.h>
#ifdef USE_PTHREAD
#endif
#ifdef emacs
-extern void emacs_abort (void);
+# include "lisp.h"
+#endif
+
+#ifdef HAVE_MALLOC_H
+# if 4 < __GNUC__ + (2 <= __GNUC_MINOR__)
+# pragma GCC diagnostic ignored "-Wdeprecated-declarations"
+# endif
+# include <malloc.h>
+#endif
+#ifndef __MALLOC_HOOK_VOLATILE
+# define __MALLOC_HOOK_VOLATILE volatile
+#endif
+#ifndef HAVE_MALLOC_H
+extern void (*__MALLOC_HOOK_VOLATILE __after_morecore_hook) (void);
+extern void (*__MALLOC_HOOK_VOLATILE __malloc_initialize_hook) (void);
+extern void *(*__morecore) (ptrdiff_t);
#endif
/* If HYBRID_MALLOC is defined, then temacs will use malloc,
however, will use the system malloc, realloc.... In other source
files, malloc, realloc... are renamed hybrid_malloc,
hybrid_realloc... via macros in conf_post.h. hybrid_malloc and
- friends are wrapper functions defined later in this file.
- aligned_alloc is defined as a macro only in alloc.c.
-
- As of this writing (August 2014), Cygwin is the only platform on
- which HYBRID_MACRO is defined. Any other platform that wants to
- define it will have to define the macros DUMPED and
- ALLOCATED_BEFORE_DUMPING, defined below for Cygwin. */
+ friends are wrapper functions defined later in this file. */
#undef malloc
#undef realloc
#undef calloc
+#undef aligned_alloc
#undef free
#define malloc gmalloc
#define realloc grealloc
-#define calloc gcalloc
+#define calloc do_not_call_me /* Emacs never calls calloc. */
#define aligned_alloc galigned_alloc
#define free gfree
+#define malloc_info gmalloc_info
-#ifdef CYGWIN
-extern void *bss_sbrk (ptrdiff_t size);
-extern int bss_sbrk_did_unexec;
-extern char bss_sbrk_buffer[];
-extern void *bss_sbrk_buffer_end;
-#define DUMPED bss_sbrk_did_unexec
-#define ALLOCATED_BEFORE_DUMPING(P) \
- ((P) < bss_sbrk_buffer_end && (P) >= (void *) bss_sbrk_buffer)
+#ifdef HYBRID_MALLOC
+# include "sheap.h"
+# define DUMPED bss_sbrk_did_unexec
+static bool
+ALLOCATED_BEFORE_DUMPING (char *p)
+{
+ return bss_sbrk_buffer <= p && p < bss_sbrk_buffer + STATIC_HEAP_SIZE;
+}
#endif
#ifdef __cplusplus
{
#endif
-#include <stddef.h>
-
+#ifdef HYBRID_MALLOC
+#define extern static
+#endif
/* Allocate SIZE bytes of memory. */
extern void *malloc (size_t size) ATTRIBUTE_MALLOC_SIZE ((1));
/* Re-allocate the previously allocated block
in ptr, making the new block SIZE bytes long. */
extern void *realloc (void *ptr, size_t size) ATTRIBUTE_ALLOC_SIZE ((2));
-/* Allocate NMEMB elements of SIZE bytes each, all initialized to 0. */
-extern void *calloc (size_t nmemb, size_t size) ATTRIBUTE_MALLOC_SIZE ((1,2));
-/* Free a block allocated by `malloc', `realloc' or `calloc'. */
+/* Free a block. */
extern void free (void *ptr);
/* Allocate SIZE bytes allocated to ALIGNMENT bytes. */
-#ifdef MSDOS
extern void *aligned_alloc (size_t, size_t);
+#ifdef MSDOS
extern void *memalign (size_t, size_t);
extern int posix_memalign (void **, size_t, size_t);
#endif
-#ifdef USE_PTHREAD
-/* Set up mutexes and make malloc etc. thread-safe. */
-extern void malloc_enable_thread (void);
-#endif
-
-#ifdef emacs
-extern void emacs_abort (void);
-#endif
-
/* The allocator divides the heap into blocks of fixed size; large
requests receive one or more whole blocks, and small requests
receive a fragment of a block. Fragment sizes are powers of two,
#define UNLOCK_ALIGNED_BLOCKS()
#endif
-/* Given an address in the middle of a malloc'd object,
- return the address of the beginning of the object. */
-extern void *malloc_find_object_address (void *ptr);
-
-/* Underlying allocation function; successive calls should
- return contiguous pieces of memory. */
-extern void *(*__morecore) (ptrdiff_t size);
-
-/* Default value of `__morecore'. */
-extern void *__default_morecore (ptrdiff_t size);
-
-/* If not NULL, this function is called after each time
- `__morecore' is called to increase the data size. */
-extern void (*__after_morecore_hook) (void);
-
-/* Number of extra blocks to get each time we ask for more core.
- This reduces the frequency of calling `(*__morecore)'. */
-extern size_t __malloc_extra_blocks;
-
/* Nonzero if `malloc' has been called and done its initialization. */
extern int __malloc_initialized;
/* Function called to initialize malloc data structures. */
extern int __malloc_initialize (void);
-/* Hooks for debugging versions. */
-extern void (*__malloc_initialize_hook) (void);
-extern void (*__free_hook) (void *ptr);
-extern void *(*__malloc_hook) (size_t size);
-extern void *(*__realloc_hook) (void *ptr, size_t size);
-extern void *(*__memalign_hook) (size_t size, size_t alignment);
+#ifdef GC_MCHECK
/* Return values for `mprobe': these are the kinds of inconsistencies that
`mcheck' enables detection of. */
/* Pick up the current statistics. */
extern struct mstats mstats (void);
-/* Call WARNFUN with a warning message when memory usage is high. */
-extern void memory_warnings (void *start, void (*warnfun) (const char *));
+#endif
+
+#undef extern
#ifdef __cplusplus
}
#include <errno.h>
-void *(*__morecore) (ptrdiff_t size) = __default_morecore;
+/* Debugging hook for 'malloc'. */
+static void *(*__MALLOC_HOOK_VOLATILE gmalloc_hook) (size_t);
+
+/* Replacements for traditional glibc malloc hooks, for platforms that
+ do not already have these hooks. Platforms with these hooks all
+ used relaxed ref/def, so it is OK to define them here too. */
+void (*__MALLOC_HOOK_VOLATILE __malloc_initialize_hook) (void);
+void (*__MALLOC_HOOK_VOLATILE __after_morecore_hook) (void);
+void *(*__morecore) (ptrdiff_t);
-/* Debugging hook for `malloc'. */
-void *(*__malloc_hook) (size_t size);
+#ifndef HYBRID_MALLOC
/* Pointer to the base of the first block. */
char *_heapbase;
/* Block information table. Allocated with align/__free (not malloc/free). */
malloc_info *_heapinfo;
-/* Number of info entries. */
-static size_t heapsize;
-
/* Search index in the info table. */
size_t _heapindex;
/* Are you experienced? */
int __malloc_initialized;
+#else
+
+static struct list _fraghead[BLOCKLOG];
+
+#endif /* HYBRID_MALLOC */
+
+/* Number of extra blocks to get each time we ask for more core.
+ This reduces the frequency of calling `(*__morecore)'. */
+#if defined DOUG_LEA_MALLOC || defined HYBRID_MALLOC || defined SYSTEM_MALLOC
+static
+#endif
size_t __malloc_extra_blocks;
-void (*__malloc_initialize_hook) (void);
-void (*__after_morecore_hook) (void);
+/* Number of info entries. */
+static size_t heapsize;
#if defined GC_MALLOC_CHECK && defined GC_PROTECT_MALLOC_STATE
if (!__malloc_initialized && !__malloc_initialize ())
return NULL;
- /* Copy the value of __malloc_hook to an automatic variable in case
- __malloc_hook is modified in another thread between its
+ /* Copy the value of gmalloc_hook to an automatic variable in case
+ gmalloc_hook is modified in another thread between its
NULL-check and the use.
Note: Strictly speaking, this is not a right solution. We should
use mutexes to access non-read-only variables that are shared
among multiple threads. We just leave it for compatibility with
- glibc malloc (i.e., assignments to __malloc_hook) for now. */
- hook = __malloc_hook;
+ glibc malloc (i.e., assignments to gmalloc_hook) for now. */
+ hook = gmalloc_hook;
return (hook != NULL ? *hook : _malloc_internal) (size);
}
\f
-#ifndef _LIBC
+#if !(defined (_LIBC) || defined (HYBRID_MALLOC))
/* On some ANSI C systems, some libc functions call _malloc, _free
and _realloc. Make them use the GNU functions. */
The author may be reached (Email) at the address mike@ai.mit.edu,
or (US mail) as Mike Haertel c/o Free Software Foundation. */
-
/* Debugging hook for free. */
-void (*__free_hook) (void *__ptr);
+static void (*__MALLOC_HOOK_VOLATILE gfree_hook) (void *);
+
+#ifndef HYBRID_MALLOC
/* List of blocks allocated by aligned_alloc. */
struct alignlist *_aligned_blocks = NULL;
+#endif
/* Return memory to the heap.
Like `_free_internal' but don't lock mutex. */
}
/* Return memory to the heap.
- Like `free' but don't call a __free_hook if there is one. */
+ Like 'free' but don't call a hook if there is one. */
void
_free_internal (void *ptr)
{
void
free (void *ptr)
{
- void (*hook) (void *) = __free_hook;
+ void (*hook) (void *) = gfree_hook;
if (hook != NULL)
(*hook) (ptr);
_free_internal (ptr);
}
+#ifndef HYBRID_MALLOC
/* Define the `cfree' alias for `free'. */
#ifdef weak_alias
weak_alias (free, cfree)
free (ptr);
}
#endif
+#endif
/* Change the size of a block allocated by `malloc'.
Copyright 1990, 1991, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
Written May 1989 by Mike Haertel.
#endif
/* Debugging hook for realloc. */
-void *(*__realloc_hook) (void *ptr, size_t size);
+static void *(*grealloc_hook) (void *, size_t);
/* Resize the given region to the new size, returning a pointer
to the (possibly moved) region. This is optimized for speed;
if (!__malloc_initialized && !__malloc_initialize ())
return NULL;
- hook = __realloc_hook;
+ hook = grealloc_hook;
return (hook != NULL ? *hook : _realloc_internal) (ptr, size);
}
/* Copyright (C) 1991, 1992, 1994 Free Software Foundation, Inc.
/* Allocate an array of NMEMB elements each SIZE bytes long.
The entire array is initialized to zeros. */
+#ifndef calloc
void *
calloc (size_t nmemb, size_t size)
{
return memset (result, 0, bytes);
return result;
}
+#endif
/* Copyright (C) 1991, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
This file is part of the GNU C Library.
/* Allocate INCREMENT more bytes of data space,
and return the start of data space, or NULL on errors.
If INCREMENT is negative, shrink data space. */
-void *
-__default_morecore (ptrdiff_t increment)
+static void *
+gdefault_morecore (ptrdiff_t increment)
{
void *result;
-#if defined (CYGWIN)
+#ifdef HYBRID_MALLOC
if (!DUMPED)
{
return bss_sbrk (increment);
return NULL;
return result;
}
+
+void *(*__morecore) (ptrdiff_t) = gdefault_morecore;
+
/* Copyright (C) 1991, 92, 93, 94, 95, 96 Free Software Foundation, Inc.
This library is free software; you can redistribute it and/or
You should have received a copy of the GNU General Public
License along with this library. If not, see <http://www.gnu.org/licenses/>. */
-void *(*__memalign_hook) (size_t size, size_t alignment);
-
void *
aligned_alloc (size_t alignment, size_t size)
{
void *result;
size_t adj, lastadj;
- void *(*hook) (size_t, size_t) = __memalign_hook;
-
- if (hook)
- return (*hook) (alignment, size);
/* Allocate a block with enough extra space to pad the block with up to
(ALIGNMENT - 1) bytes if necessary. */
return result;
}
+/* Note that memalign and posix_memalign are not used in Emacs. */
+#ifndef HYBRID_MALLOC
/* An obsolete alias for aligned_alloc, for any old libraries that use
this alias. */
/* If HYBRID_MALLOC is defined, we may want to use the system
posix_memalign below. */
-#ifndef HYBRID_MALLOC
int
posix_memalign (void **memptr, size_t alignment, size_t size)
{
The author may be reached (Email) at the address mike@ai.mit.edu,
or (US mail) as Mike Haertel c/o Free Software Foundation. */
+#ifndef HYBRID_MALLOC
/* Allocate SIZE bytes on a page boundary. */
extern void *valloc (size_t);
return aligned_alloc (pagesize, size);
}
+#endif /* HYBRID_MALLOC */
#undef malloc
#undef realloc
/* Declare system malloc and friends. */
extern void *malloc (size_t size);
extern void *realloc (void *ptr, size_t size);
-extern void *calloc (size_t nmemb, size_t size);
extern void free (void *ptr);
#ifdef HAVE_ALIGNED_ALLOC
extern void *aligned_alloc (size_t alignment, size_t size);
return gmalloc (size);
}
-void *
-hybrid_calloc (size_t nmemb, size_t size)
-{
- if (DUMPED)
- return calloc (nmemb, size);
- return gcalloc (nmemb, size);
-}
-
void
hybrid_free (void *ptr)
{
#endif
}
#endif
-
+
void *
hybrid_realloc (void *ptr, size_t size)
{
return result;
}
-#ifdef HYBRID_GET_CURRENT_DIR_NAME
-/* Defined in sysdep.c. */
-char *gget_current_dir_name (void);
-
-char *
-hybrid_get_current_dir_name (void)
-{
- if (DUMPED)
- return get_current_dir_name ();
- return gget_current_dir_name ();
-}
-#endif
-
#else /* ! HYBRID_MALLOC */
void *
else
hdr = NULL;
- __free_hook = old_free_hook;
+ gfree_hook = old_free_hook;
free (hdr);
- __free_hook = freehook;
+ gfree_hook = freehook;
}
static void *
{
struct hdr *hdr;
- __malloc_hook = old_malloc_hook;
+ gmalloc_hook = old_malloc_hook;
hdr = malloc (sizeof *hdr + size + 1);
- __malloc_hook = mallochook;
+ gmalloc_hook = mallochook;
if (hdr == NULL)
return NULL;
memset ((char *) ptr + size, FREEFLOOD, osize - size);
}
- __free_hook = old_free_hook;
- __malloc_hook = old_malloc_hook;
- __realloc_hook = old_realloc_hook;
+ gfree_hook = old_free_hook;
+ gmalloc_hook = old_malloc_hook;
+ grealloc_hook = old_realloc_hook;
hdr = realloc (hdr, sizeof *hdr + size + 1);
- __free_hook = freehook;
- __malloc_hook = mallochook;
- __realloc_hook = reallochook;
+ gfree_hook = freehook;
+ gmalloc_hook = mallochook;
+ grealloc_hook = reallochook;
if (hdr == NULL)
return NULL;
/* These hooks may not be safely inserted if malloc is already in use. */
if (!__malloc_initialized && !mcheck_used)
{
- old_free_hook = __free_hook;
- __free_hook = freehook;
- old_malloc_hook = __malloc_hook;
- __malloc_hook = mallochook;
- old_realloc_hook = __realloc_hook;
- __realloc_hook = reallochook;
+ old_free_hook = gfree_hook;
+ gfree_hook = freehook;
+ old_malloc_hook = gmalloc_hook;
+ gmalloc_hook = mallochook;
+ old_realloc_hook = grealloc_hook;
+ grealloc_hook = reallochook;
mcheck_used = 1;
}
{
Lisp_Object value;
int desired_width, desired_height;
+ double scale = 1;
/* If width and/or height is set in the display spec assume we want
to scale to those values. If either h or w is unspecified, the
value = image_spec_value (spec, QCheight, NULL);
desired_height = NATNUMP (value) ? min (XFASTINT (value), INT_MAX) : -1;
+ value = image_spec_value (spec, QCscale, NULL);
+ if (NUMBERP (value))
+ scale = extract_float (value);
+ width = width * scale;
+ height = height * scale;
+
if (desired_width == -1)
{
value = image_spec_value (spec, QCmax_width, NULL);
/* h known, calculate w. */
desired_width = scale_image_size (desired_height, height, width);
+ /* We have no width/height settings, so just apply the scale. */
+ if (desired_width == -1 && desired_height == -1)
+ {
+ desired_width = width;
+ desired_height = height;
+ }
+
*d_width = desired_width;
*d_height = desired_height;
}
DEFSYM (QCcrop, ":crop");
DEFSYM (QCrotation, ":rotation");
DEFSYM (QCmatrix, ":matrix");
+ DEFSYM (QCscale, ":scale");
DEFSYM (QCcolor_adjustment, ":color-adjustment");
DEFSYM (QCmask, ":mask");
}
#endif
-
#if defined HAVE_INOTIFY || defined HAVE_KQUEUE || defined HAVE_GFILENOTIFY
case FILE_NOTIFY_EVENT:
{
is used. Note that [Enter] is not echoed by dos. */
cursor_to (SELECTED_FRAME (), 0, 0);
#endif
+
+ write_stdout ("Emacs is resuming after an emergency escape.\n");
+
/* It doesn't work to autosave while GC is in progress;
the code used for auto-saving doesn't cope with the mark bit. */
if (!gc_in_progress)
variable are `sigusr1' and `sigusr2'. */);
Vdebug_on_event = intern_c_string ("sigusr2");
+ DEFVAR_BOOL ("attempt-stack-overflow-recovery",
+ attempt_stack_overflow_recovery,
+ doc: /* If non-nil, attempt to recover from C stack
+overflow. This recovery is unsafe and may lead to deadlocks or data
+corruption, but it usually works and may preserve modified buffers
+that would otherwise be lost. If nil, treat stack overflow like any
+other kind of crash. */);
+ attempt_stack_overflow_recovery = true;
+
+ DEFVAR_BOOL ("attempt-orderly-shutdown-on-fatal-signal",
+ attempt_orderly_shutdown_on_fatal_signal,
+ doc: /* If non-nil, attempt to perform an orderly
+shutdown when Emacs receives a fatal signal (e.g., a crash).
+This cleanup is unsafe and may lead to deadlocks or data corruption,
+but it usually works and may preserve modified buffers that would
+otherwise be lost. If nil, crash immediately in response to fatal
+signals. */);
+ attempt_orderly_shutdown_on_fatal_signal = true;
+
/* Create the initial keyboard. Qt means 'unset'. */
initial_kboard = allocate_kboard (Qt);
}
#include "lisp.h"
+#if ((!defined SYSTEM_MALLOC && !defined HYBRID_MALLOC) \
+ || defined WINDOWSNT || defined CYGWIN || defined DARWIN_OS)
char my_edata[] = "End of Emacs initialized data";
+#endif
/* Help unexec locate the end of the .bss area used by Emacs (which
isn't always a separate section in NT executables). */
2. We know malloc returns a multiple of 8. */
#if (defined alignas \
&& (defined GNU_MALLOC || defined DOUG_LEA_MALLOC || defined __GLIBC__ \
- || defined DARWIN_OS || defined __sun || defined __MINGW32__ \
- || defined CYGWIN))
+ || defined CYGWIN || defined __MINGW32__ \
+ || defined DARWIN_OS || defined __FreeBSD__ \
+ || defined __sun))
# define NONPOINTER_BITS 0
#else
# define NONPOINTER_BITS GCTYPEBITS
extern _Noreturn void wrong_choice (Lisp_Object, Lisp_Object);
/* Defined in emacs.c. */
+#ifdef DOUG_LEA_MALLOC
extern bool might_dump;
+#endif
/* True means Emacs has already been initialized.
Used during startup to detect startup of dumped Emacs. */
extern bool initialized;
#if defined REL_ALLOC && !defined SYSTEM_MALLOC && !defined HYBRID_MALLOC
extern void refill_memory_reserve (void);
#endif
-#ifdef DOUG_LEA_MALLOC
extern void alloc_unexec_pre (void);
extern void alloc_unexec_post (void);
-#else
-INLINE void alloc_unexec_pre (void) {}
-INLINE void alloc_unexec_post (void) {}
-#endif
extern const char *pending_malloc_warning;
extern Lisp_Object zero_vector;
extern Lisp_Object *stack_base;
INLINE void (check_cons_list) (void) { lisp_h_check_cons_list (); }
#endif
+/* Defined in gmalloc.c. */
+#if !defined DOUG_LEA_MALLOC && !defined HYBRID_MALLOC && !defined SYSTEM_MALLOC
+extern size_t __malloc_extra_blocks;
+#endif
+#if !HAVE_DECL_ALIGNED_ALLOC
+extern void *aligned_alloc (size_t, size_t) ATTRIBUTE_MALLOC_SIZE ((2));
+#endif
+extern void malloc_enable_thread (void);
+
#ifdef REL_ALLOC
/* Defined in ralloc.c. */
extern void *r_alloc (void **, size_t) ATTRIBUTE_ALLOC_SIZE ((2));
struct terminal;
/* Defined in sysdep.c. */
-#ifndef HAVE_GET_CURRENT_DIR_NAME
-extern char *get_current_dir_name (void);
-#endif
+extern char *emacs_get_current_dir_name (void);
extern void stuff_char (char c);
extern void init_foreground_group (void);
extern void sys_subshell (void);
rather than all of them. This means allowing for a possible
hole between the first bloc and the end of malloc storage. */
-#ifdef emacs
-
#include <config.h>
-#include "lisp.h" /* Needed for VALBITS. */
-#include "blockinput.h"
-
-#include <unistd.h>
-
-#ifdef DOUG_LEA_MALLOC
-#define M_TOP_PAD -2
-extern int mallopt (int, int);
-#else /* not DOUG_LEA_MALLOC */
-#if !defined SYSTEM_MALLOC && !defined HYBRID_MALLOC
-extern size_t __malloc_extra_blocks;
-#endif /* not SYSTEM_MALLOC and not HYBRID_MALLOC */
-#endif /* not DOUG_LEA_MALLOC */
-
-#else /* not emacs */
-
#include <stddef.h>
-#include <malloc.h>
-
-#endif /* not emacs */
+#ifdef emacs
+# include "lisp.h"
+# include "blockinput.h"
+# include <unistd.h>
+#endif
#include "getpagesize.h"
/* The hook `malloc' uses for the function which gets more space
from the system. */
-#if !defined SYSTEM_MALLOC && !defined HYBRID_MALLOC
+#ifdef HAVE_MALLOC_H
+# include <malloc.h>
+#else
extern void *(*__morecore) (ptrdiff_t);
#endif
along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
#include <config.h>
+
+#include "sheap.h"
+
#include <stdio.h>
#include "lisp.h"
#include <unistd.h>
#include <stdlib.h> /* for exit */
-#ifdef ENABLE_CHECKING
-#define STATIC_HEAP_SIZE (28 * 1024 * 1024)
-#else
-#define STATIC_HEAP_SIZE (19 * 1024 * 1024)
-#endif
-
-int debug_sheap = 0;
-
-#define BLOCKSIZE 4096
+static int debug_sheap;
char bss_sbrk_buffer[STATIC_HEAP_SIZE];
-/* The following is needed in gmalloc.c */
-void *bss_sbrk_buffer_end = bss_sbrk_buffer + STATIC_HEAP_SIZE;
-char *bss_sbrk_ptr;
char *max_bss_sbrk_ptr;
-int bss_sbrk_did_unexec;
+bool bss_sbrk_did_unexec;
void *
bss_sbrk (ptrdiff_t request_size)
{
+ static char *bss_sbrk_ptr;
+
if (!bss_sbrk_ptr)
{
max_bss_sbrk_ptr = bss_sbrk_ptr = bss_sbrk_buffer;
#ifdef CYGWIN
- sbrk (BLOCKSIZE); /* force space for fork to work */
+ /* Force space for fork to work. */
+ sbrk (4096);
#endif
}
- if (!(int) request_size)
- {
- return (bss_sbrk_ptr);
- }
- else if (bss_sbrk_ptr + (int) request_size < bss_sbrk_buffer)
+ int used = bss_sbrk_ptr - bss_sbrk_buffer;
+
+ if (request_size < -used)
{
- printf
- ("attempt to free too much: avail %d used %d failed request %d\n",
- STATIC_HEAP_SIZE, bss_sbrk_ptr - bss_sbrk_buffer,
- (int) request_size);
+ printf (("attempt to free too much: "
+ "avail %d used %d failed request %"pD"d\n"),
+ STATIC_HEAP_SIZE, used, request_size);
exit (-1);
return 0;
}
- else if (bss_sbrk_ptr + (int) request_size >
- bss_sbrk_buffer + STATIC_HEAP_SIZE)
+ else if (STATIC_HEAP_SIZE - used < request_size)
{
- printf ("static heap exhausted: avail %d used %d failed request %d\n",
- STATIC_HEAP_SIZE,
- bss_sbrk_ptr - bss_sbrk_buffer, (int) request_size);
+ printf ("static heap exhausted: avail %d used %d failed request %"pD"d\n",
+ STATIC_HEAP_SIZE, used, request_size);
exit (-1);
return 0;
}
- else if ((int) request_size < 0)
- {
- bss_sbrk_ptr += (int) request_size;
- if (debug_sheap)
- printf ("freed size %d\n", request_size);
- return bss_sbrk_ptr;
- }
- else
+
+ void *ret = bss_sbrk_ptr;
+ bss_sbrk_ptr += request_size;
+ if (max_bss_sbrk_ptr < bss_sbrk_ptr)
+ max_bss_sbrk_ptr = bss_sbrk_ptr;
+ if (debug_sheap)
{
- char *ret = bss_sbrk_ptr;
- if (debug_sheap)
- printf ("allocated 0x%08x size %d\n", ret, request_size);
- bss_sbrk_ptr += (int) request_size;
- if (bss_sbrk_ptr > max_bss_sbrk_ptr)
- max_bss_sbrk_ptr = bss_sbrk_ptr;
- return ret;
+ if (request_size < 0)
+ printf ("freed size %"pD"d\n", request_size);
+ else
+ printf ("allocated %p size %"pD"d\n", ret, request_size);
}
-}
-
-void
-report_sheap_usage (int die_if_pure_storage_exceeded)
-{
- char buf[200];
- sprintf (buf, "Maximum static heap usage: %d of %d bytes",
- max_bss_sbrk_ptr - bss_sbrk_buffer, STATIC_HEAP_SIZE);
- /* Don't log messages, cause at this point, we're not allowed to create
- buffers. */
- message1_nolog (buf);
+ return ret;
}
--- /dev/null
+/* Static heap allocation for GNU Emacs.
+
+Copyright 2016 Free Software Foundation, Inc.
+
+This file is part of GNU Emacs.
+
+GNU Emacs is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+GNU Emacs is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
+
+#include <stddef.h>
+#include "lisp.h"
+
+/* Size of the static heap. Guess a value that is probably too large,
+ by up to a factor of four or so. Typically the unused part is not
+ paged in and so does not cost much. */
+enum { STATIC_HEAP_SIZE = sizeof (Lisp_Object) << 22 };
+
+extern char bss_sbrk_buffer[STATIC_HEAP_SIZE];
+extern char *max_bss_sbrk_ptr;
+extern bool bss_sbrk_did_unexec;
+extern void *bss_sbrk (ptrdiff_t);
POS and LIMIT are character positions in the current buffer.
If POS is less than LIMIT, POS is at the first character of a word,
-and the return value of a function should be a position after the
-last character of that word.
+and the return value of a function is a position after the last
+character of that word.
If POS is not less than LIMIT, POS is at the last character of a word,
-and the return value of a function should be a position at the first
+and the return value of a function is a position at the first
character of that word.
In both cases, LIMIT bounds the search. */);
#include <config.h>
-/* If HYBRID_GET_CURRENT_DIR_NAME is defined in conf_post.h, then we
- need the following before including unistd.h, in order to pick up
- the right prototype for gget_current_dir_name. */
-#ifdef HYBRID_GET_CURRENT_DIR_NAME
-#undef get_current_dir_name
-#define get_current_dir_name gget_current_dir_name
-#endif
-
#include <execinfo.h>
#include "sysstdio.h"
#ifdef HAVE_PWD_H
#include <utimens.h>
#include "lisp.h"
+#include "sheap.h"
#include "sysselect.h"
#include "blockinput.h"
1800, 2400, 4800, 9600, 19200, 38400
};
-#if !defined HAVE_GET_CURRENT_DIR_NAME || defined BROKEN_GET_CURRENT_DIR_NAME \
- || (defined HYBRID_GET_CURRENT_DIR_NAME)
-/* Return the current working directory. Returns NULL on errors.
- Any other returned value must be freed with free. This is used
- only when get_current_dir_name is not defined on the system. */
+/* Return the current working directory. The result should be freed
+ with 'free'. Return NULL on errors. */
char *
-get_current_dir_name (void)
+emacs_get_current_dir_name (void)
{
+# if HAVE_GET_CURRENT_DIR_NAME && !BROKEN_GET_CURRENT_DIR_NAME
+# ifdef HYBRID_MALLOC
+ bool use_libc = bss_sbrk_did_unexec;
+# else
+ bool use_libc = true;
+# endif
+ if (use_libc)
+ return get_current_dir_name ();
+# endif
+
char *buf;
char *pwd = getenv ("PWD");
struct stat dotstat, pwdstat;
}
return buf;
}
-#endif
\f
/* Discard pending input on all input descriptors. */
static bool
stack_overflow (siginfo_t *siginfo)
{
+ if (!attempt_stack_overflow_recovery)
+ return false;
+
/* In theory, a more-accurate heuristic can be obtained by using
GNU/Linux pthread_getattr_np along with POSIX pthread_attr_getstack
and pthread_attr_getguardsize to find the location and size of the
#define DOTEXE ".exe"
-extern void report_sheap_usage (int);
-
-extern int bss_sbrk_did_unexec;
-
/*
** header for Windows executable files
*/
int ret;
int ret2;
- report_sheap_usage (1);
-
infile = add_exe_suffix_if_necessary (infile, infile_buffer);
outfile = add_exe_suffix_if_necessary (outfile, outfile_buffer);
ret = emacs_close (fd_in);
assert (ret == 0);
- bss_sbrk_did_unexec = 1;
fixup_executable (fd_out);
- bss_sbrk_did_unexec = 0;
ret = emacs_close (fd_out);
assert (ret == 0);
# endif
#endif
-/* From gmalloc.c. */
-extern void (* __after_morecore_hook) (void);
+#ifdef HAVE_MALLOC_H
+# include <malloc.h>
+#endif
+#ifndef __MALLOC_HOOK_VOLATILE
+# define __MALLOC_HOOK_VOLATILE volatile
+#endif
+#ifndef HAVE_MALLOC_H
extern void *(*__morecore) (ptrdiff_t);
+extern void (*__MALLOC_HOOK_VOLATILE __after_morecore_hook) (void);
+#endif
/* From ralloc.c. */
#ifdef REL_ALLOC
}
-/* Resize frame F's windows when F's width or height is set to SIZE.
- If HORFLAG is zero, F's width was set to SIZE, otherwise its height
- was set. SIZE is interpreted in F's canonical character units
- (a.k.a. "columns" or "lines"), unless PIXELWISE is non-zero, which
- means to interpret SIZE in pixel units. */
+/* Resize frame F's windows when number of lines of F is set to SIZE.
+ HORFLAG means resize windows when number of columns of F is set to
+ SIZE. PIXELWISE means to interpret SIZE as pixels. */
void
resize_frame_windows (struct frame *f, int size, bool horflag, bool pixelwise)
{
m = XWINDOW (mini);
if (horflag)
{
- m->total_cols = new_size;
+ m->total_cols = size;
m->pixel_width = new_pixel_size;
}
else
props[props_idx]->vals[0].value = SDATA (user_login_name);
++props_idx;
- char *cwd = get_current_dir_name ();
+ char *cwd = emacs_get_current_dir_name ();
if (cwd)
{
props[props_idx] = &prop_ptr[props_idx];
ptrdiff_t name_len = 0;
/* libSM seems to crash if pwd is missing - see bug#18851. */
- if (! get_current_dir_name ())
+ if (! emacs_get_current_dir_name ())
{
fprintf (stderr, "Disabling session management due to pwd error: %s\n",
emacs_strerror (errno));
# We never change directory before running Emacs, so a relative file
# name is fine, and makes life easier. If we need to change
# directory, we can use emacs --chdir.
-EMACS = ../../src/emacs
+EMACS = ../src/emacs
EMACS_EXTRAOPT=
endif
-%.log: ${srcdir}/%.el
+%.log: %.el
@if grep '^;.*no-byte-compile: t' $< > /dev/null; then \
loadfile=$<; \
else \
fi; \
echo Testing $$loadfile; \
stat=OK ; \
+ mkdir --parents $(dir $@) ; \
$(emacs) -l ert -l $$loadfile \
--eval "(ert-run-tests-batch-and-exit ${SELECTOR_ACTUAL})" ${WRITE_LOG}
-ELFILES = $(sort $(wildcard ${srcdir}/*.el))
-LOGFILES = $(patsubst %.el,%.log,$(notdir ${ELFILES}))
-TESTS = ${LOGFILES:.log=}
+ELFILES = $(shell find ${srcdir} -path "${srcdir}/manual" -prune -o \
+ -path "*resources" -prune -o -name "*el" -print)
+## .elc files may be in a different directory for out of source builds
+ELCFILES = $(patsubst %.el,%.elc, \
+ $(patsubst $(srcdir)%,.%,$(ELFILES)))
+LOGFILES = $(patsubst %.elc,%.log,${ELCFILES})
+LOGSAVEFILES = $(patsubst %.elc,%.log~,${ELCFILES})
+TESTS = $(subst ${srcdir}/,,$(LOGFILES:.log=))
## If we have to interrupt a hanging test, preserve the log so we can
## see what the problem was.
.PHONY: ${TESTS}
## The short aliases that always re-run the tests, with no logging.
+## Define an alias both with and without the directory name for ease
+## of use.
define test_template
$(1):
- @test ! -f $(1).log || mv $(1).log $(1).log~
- @${MAKE} $(1).log WRITE_LOG=
+ @test ! -f ./$(1).log || mv ./$(1).log ./$(1).log~
+ @${MAKE} ./$(1).log WRITE_LOG=
+
+$(notdir $(1)): $(1)
endef
$(foreach test,${TESTS},$(eval $(call test_template,${test})))
+## Include dependencies between test files and the files they test.
+## We do this without the file and eval directly, but then we would
+## have to run Emacs for every make invocation, and it might not be
+## available during clean.
+-include make-test-deps.mk
## Rerun all default tests.
check: mostlyclean
@${MAKE} check-doit SELECTOR="${SELECTOR_ACTUAL}"
.PHONY: mostlyclean clean bootstrap-clean distclean maintainer-clean
mostlyclean:
- -@for f in *.log; do test ! -f $$f || mv $$f $$f~; done
+ -@for f in ${LOGFILES}; do test ! -f $$f || mv $$f $$f~; done
clean:
- -rm -f *.log *.log~
+ -rm -f ${LOGFILES} ${LOGSAVEFILES}
+ -rm make-test-deps.mk
bootstrap-clean: clean
- -rm -f ${srcdir}/*.elc
+ -rm -f ${ELCFILES}
distclean: clean
rm -f Makefile
maintainer-clean: distclean bootstrap-clean
+make-test-deps.mk: $(ELFILES) make-test-deps.emacs-lisp
+ $(EMACS) --batch -l $(srcdir)/make-test-deps.emacs-lisp \
+ --eval "(make-test-deps \"$(srcdir)\")" \
+ 2> $@
# Makefile ends here.
--- /dev/null
+#+TITLE: The Location of Emacs-Lisp Tests
+
+
+
+* The Main Emacs Repository
+
+The Emacs repository contains a very large number of Emacs-Lisp files, many of
+which pre-date both formal package support for Emacs and automated unit
+testing.
+
+All paths are relative to the Emacs root directory.
+
+** Source
+
+Lisp files are stored in the ~lisp~ directory or its sub-directories.
+Sub-directories are in many cases themed after packages (~gnus~, ~org~,
+~calc~), related functionality (~net~, ~emacs-lisp~, ~progmodes~) or status
+(~obsolete~).
+
+C source is stored in the ~src~ directory, which is flat.
+
+** Test Files
+
+Automated tests should be stored in the ~test/automated/lisp~ directory. Tests
+should reflect the directory structure of the source tree; so tests for files
+in the ~emacs-lisp~ source directory should reside in the
+~test/lisp/emacs-lisp~ directory.
+
+Tests should normally reside in a file with ~-tests~ added to the name of
+the tested source file; hence ~ert.el~ is tested in ~ert-tests.el~, or
+~pcase.el~ is tested in ~pcase-tests.el~. Exceptionally, tests for a
+single feature may be placed into multiple files of any name which are
+themselves placed in a directory named after the feature with ~-tests~
+appended, such as ~/test/lisp/emacs-lisp/eieio-tests~
+
+Where features of the C source are tested using Emacs-Lisp test files, these
+should reside in ~/test/src~ and be named after the C file.
+
+A few test suites which predate this scheme and do not fit cleanly
+into it are placed in ~/test/lisp/legacy~.
+
+There are also some test materials that cannot be run automatically
+(i.e. via ert). These should be placed in ~/test/manual~
+
+** Resource Files
+
+Resource files for tests (containing test data) should reside in a directory
+named after the feature with a ~-resources~ suffix, and located in the same
+directory as the feature. Hence, the lisp file ~flymake.el~ should have test
+files in ~/test/automated/lisp/progmodes/flymake-tests.el~ should reside in a
+directory called ~/test/automated/lisp/progmodes/flymake-resources~.
+
+No guidance is given for the organization of resource files inside the
+~-resource~ directory; files can be organized at the author's discretion.
-;;; abbrev-tests.el --- Test suite for abbrevs.
+;;; abbrev-tests.el --- Test suite for abbrevs -*- lexical-binding: t; -*-
;; Copyright (C) 2015-2016 Free Software Foundation, Inc.
(abbrev-table-put ert-test-abbrevs :ert-test "ert-test-value")
ert-test-abbrevs)
+(ert-deftest abbrev-table-p-test ()
+ (should-not (abbrev-table-p 42))
+ (should-not (abbrev-table-p "aoeu"))
+ (should-not (abbrev-table-p '()))
+ (should-not (abbrev-table-p []))
+ ;; Missing :abbrev-table-modiff counter:
+ (should-not (abbrev-table-p (obarray-make)))
+ (let* ((table (obarray-make)))
+ (abbrev-table-put table :abbrev-table-modiff 42)
+ (should (abbrev-table-p table))))
+
+(ert-deftest abbrev-make-abbrev-table-test ()
+ ;; Table without properties:
+ (let ((table (make-abbrev-table)))
+ (should (abbrev-table-p table))
+ (should (= (length table) obarray-default-size)))
+ ;; Table with one property 'foo with value 'bar:
+ (let ((table (make-abbrev-table '(foo bar))))
+ (should (abbrev-table-p table))
+ (should (= (length table) obarray-default-size))
+ (should (eq (abbrev-table-get table 'foo) 'bar))))
+
+(ert-deftest abbrev-table-get-put-test ()
+ (let ((table (make-abbrev-table)))
+ (should-not (abbrev-table-get table 'foo))
+ (should (= (abbrev-table-put table 'foo 42) 42))
+ (should (= (abbrev-table-get table 'foo) 42))
+ (should (eq (abbrev-table-put table 'foo 'bar) 'bar))
+ (should (eq (abbrev-table-get table 'foo) 'bar))))
+
(ert-deftest copy-abbrev-table-test ()
(defvar foo-abbrev-table nil) ; Avoid compiler warning
(define-abbrev-table 'foo-abbrev-table
(should (equal t (abbrev-table-empty-p ert-test-abbrevs)))))
(provide 'abbrev-tests)
-
;;; abbrev-tests.el ends here
--- /dev/null
+;;; dired-tests.el --- Test suite. -*- lexical-binding: t -*-
+
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc.
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+(require 'ert)
+(require 'dired)
+
+
+(ert-deftest dired-autoload ()
+ "Tests to see whether dired-x has been autoloaded"
+ (should
+ (fboundp 'dired-jump))
+ (should
+ (autoloadp
+ (symbol-function
+ 'dired-jump))))
+
+(provide 'dired-tests)
+;; dired-tests.el ends here
(ert-deftest eieio-test-37-obsolete-name-in-constructor ()
(should (equal (eieio--testing "toto") '("toto" 2))))
+(ert-deftest eieio-autoload ()
+ "Tests to see whether reftex-auc has been autoloaded"
+ (should
+ (fboundp 'eieio--defalias)))
+
+
(provide 'eieio-tests)
;;; eieio-tests.el ends here
(multi-file (0 1))))
"`package-desc' used for testing dependencies.")
-(defvar package-test-data-dir (expand-file-name "data/package" package-test-file-dir)
+(defvar package-test-data-dir (expand-file-name "package-resources" package-test-file-dir)
"Base directory of package test files.")
(defvar package-test-fake-contents-file
(ert-deftest package-test-desc-from-buffer ()
"Parse an elisp buffer to get a `package-desc' object."
- (with-package-test (:basedir "data/package" :file "simple-single-1.3.el")
+ (with-package-test (:basedir "package-resources" :file "simple-single-1.3.el")
(should (equal (package-buffer-info) simple-single-desc)))
- (with-package-test (:basedir "data/package" :file "simple-depend-1.0.el")
+ (with-package-test (:basedir "package-resources" :file "simple-depend-1.0.el")
(should (equal (package-buffer-info) simple-depend-desc)))
- (with-package-test (:basedir "data/package"
+ (with-package-test (:basedir "package-resources"
:file "multi-file-0.2.3.tar")
(tar-mode)
(should (equal (package-tar-file-info) multi-file-desc))))
(ert-deftest package-test-install-single ()
"Install a single file without using an archive."
- (with-package-test (:basedir "data/package" :file "simple-single-1.3.el")
+ (with-package-test (:basedir "package-resources" :file "simple-single-1.3.el")
(should (package-install-from-buffer))
(package-initialize)
(should (package-installed-p 'simple-single))
(ert-deftest package-test-macro-compilation ()
"Install a package which includes a dependency."
- (with-package-test (:basedir "data/package")
+ (with-package-test (:basedir "package-resources")
(package-install-file (expand-file-name "macro-problem-package-1.0/"))
(require 'macro-problem)
;; `macro-problem-func' uses a macro from `macro-aux'.
(ert-deftest package-test-install-prioritized ()
"Install a lower version from a higher-prioritized archive."
(with-package-test ()
- (let* ((newer-version (expand-file-name "data/package/newer-versions"
+ (let* ((newer-version (expand-file-name "package-resources/newer-versions"
package-test-file-dir))
(package-archives `(("older" . ,package-test-data-dir)
("newer" . ,newer-version)))
(ert-deftest package-test-install-multifile ()
"Check properties of the installed multi-file package."
- (with-package-test (:basedir "data/package" :install '(multi-file))
+ (with-package-test (:basedir "package-resources" :install '(multi-file))
(let ((autoload-file
(expand-file-name "multi-file-autoloads.el"
(expand-file-name
(package-menu-execute)
(should (package-installed-p 'simple-single))
(let ((package-test-data-dir
- (expand-file-name "data/package/newer-versions" package-test-file-dir)))
+ (expand-file-name "package-resources/newer-versions" package-test-file-dir)))
(setq package-archives `(("gnu" . ,package-test-data-dir)))
(package-menu-refresh)
(delete-directory homedir t)))))
(let* ((keyring (expand-file-name "key.pub" package-test-data-dir))
(package-test-data-dir
- (expand-file-name "data/package/signed" package-test-file-dir)))
+ (expand-file-name "package-resources/signed" package-test-file-dir)))
(with-package-test ()
(package-initialize)
(package-import-keyring keyring)
(ert-deftest package-x-test-upload-buffer ()
"Test creating an \"archive-contents\" file"
- (with-package-test (:basedir "data/package"
+ (with-package-test (:basedir "package-resources"
:file "simple-single-1.3.el"
:upload-base t)
(package-upload-buffer)
(ert-deftest package-x-test-upload-new-version ()
"Test uploading a new version of a package"
- (with-package-test (:basedir "data/package"
+ (with-package-test (:basedir "package-resources"
:file "simple-single-1.3.el"
:upload-base t)
(package-upload-buffer)
simple-depend-desc-2)))
(should
(equal (package--sort-by-dependence delete-list)
+
(list simple-depend-desc-2 simple-depend-desc-1 new-pkg-desc
multi-file-desc simple-depend-desc simple-single-desc)))
(should
--- /dev/null
+;;; htmlfontify-tests.el --- Test suite. -*- lexical-binding: t -*-
+
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc.
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+(require 'ert)
+(require 'htmlfontify)
+
+(ert-deftest htmlfontify-autoload ()
+ "Tests to see whether reftex-auc has been autoloaded"
+ (should
+ (fboundp 'htmlfontify-load-rgb-file))
+ (should
+ (autoloadp
+ (symbol-function
+ 'htmlfontify-load-rgb-file))))
+
+(provide 'htmlfontify-tests)
+;; htmlfontify-tests.el ends here
--- /dev/null
+;;; ibuffer-tests.el --- Test suite. -*- lexical-binding: t -*-
+
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc.
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+(require 'ert)
+(require 'ibuffer)
+
+(ert-deftest ibuffer-autoload ()
+ "Tests to see whether reftex-auc has been autoloaded"
+ (should
+ (fboundp 'ibuffer-mark-unsaved-buffers))
+ (should
+ (autoloadp
+ (symbol-function
+ 'ibuffer-mark-unsaved-buffers))))
+
+(provide 'ibuffer-tests)
+;; ibuffer-tests.el ends here
--- /dev/null
+;;; rmail-tests.el --- Test suite. -*- lexical-binding: t -*-
+
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc.
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+(require 'ert)
+(require 'rmail)
+
+
+(ert-deftest rmail-autoload ()
+ "Tests to see whether reftex-auc has been autoloaded"
+ (should
+ (fboundp 'rmail-edit-current-message))
+ (should
+ (autoloadp
+ (symbol-function
+ 'rmail-edit-current-message))))
+
+(provide 'rmail-tests)
+;; rmail-tests.el ends here
--- /dev/null
+-----BEGIN CERTIFICATE-----
+MIIELTCCAxWgAwIBAgIJAI6LqlFyaPRkMA0GCSqGSIb3DQEBCwUAMIGsMQswCQYD
+VQQGEwJBVTEYMBYGA1UECAwPTmV3IFNvdXRoIFdhbGVzMQ8wDQYDVQQHDAZTeWRu
+ZXkxITAfBgNVBAoMGEVtYWNzIFRlc3QgU2VydmljZXNzIExMQzESMBAGA1UECwwJ
+QXV0b21hdGVkMRcwFQYDVQQDDA50ZXN0LmVtYWNzLnpvdDEiMCAGCSqGSIb3DQEJ
+ARYTZW1hY3MtZGV2ZWxAZnNmLm9yZzAeFw0xNjAyMDgwNDA0MzJaFw0xNjAzMDkw
+NDA0MzJaMIGsMQswCQYDVQQGEwJBVTEYMBYGA1UECAwPTmV3IFNvdXRoIFdhbGVz
+MQ8wDQYDVQQHDAZTeWRuZXkxITAfBgNVBAoMGEVtYWNzIFRlc3QgU2VydmljZXNz
+IExMQzESMBAGA1UECwwJQXV0b21hdGVkMRcwFQYDVQQDDA50ZXN0LmVtYWNzLnpv
+dDEiMCAGCSqGSIb3DQEJARYTZW1hY3MtZGV2ZWxAZnNmLm9yZzCCASIwDQYJKoZI
+hvcNAQEBBQADggEPADCCAQoCggEBAM52lP7k1rBpctBX1irRVgDerxqlFSTkvg8L
+WmRCfwm3XY8EZWqM/8Eex5soH7myRlWfUH/cKxbqScZqXotj0hlPxdRkM6gWgHS9
+Mml7wnz2LZGvD5PfMfs+yBHKAMrqortFXCKksHsYIJ66l9gJMm1G5XjWha6CaEr/
+k2bE5Ovw0fB2B4vH0OqhJzGyenJOspXZz1ttn3h3UC5fbDXS8fUM9k/FbgJKypWr
+zB3P12GcMR939FsR5sqa8nNoCMw+WBzs4XuM5Ad+s/UtEaZvmtwvLwmdB7cgCEyM
+x5gaM969SlpOmuy7dDTCCK3lBl6B5dgFKvVcChYwSW+xJz5tfL0CAwEAAaNQME4w
+HQYDVR0OBBYEFG3YhH7ZzEdOGstkT67uUh1RylNjMB8GA1UdIwQYMBaAFG3YhH7Z
+zEdOGstkT67uUh1RylNjMAwGA1UdEwQFMAMBAf8wDQYJKoZIhvcNAQELBQADggEB
+ADnJL2tBMnPepywA57yDfJz54FvrqRd+UAjSiB7/QySDpHnTM3b3sXWfwAkXPTjM
+c+jRW2kfdnL6OQW2tpcpPZANGnwK8MJrtGcbHhtPXjgDRhVZp64hsB7ayS+l0Dm7
+2ZBbi2SF8FgZVcQy0WD01ir2raSODo124dMrq+3aHP77YLbiNEKj+wFoDbndQ1FQ
+gtIJBE80FADoqc7LnBrpA20aVlfqhKZqe+leYDSZ+CE1iwlPdvD+RTUxVDs5EfpB
+qVOHDlzEfVmcMnddKTV8pNYuo93AG4s0KdrGG9RwSvtLaOoHd2i6RmIs+Yiumbau
+mXodMxxAEW/cM7Ita/2QVmk=
+-----END CERTIFICATE-----
--- /dev/null
+-----BEGIN PRIVATE KEY-----
+MIIEvgIBADANBgkqhkiG9w0BAQEFAASCBKgwggSkAgEAAoIBAQDOdpT+5NawaXLQ
+V9Yq0VYA3q8apRUk5L4PC1pkQn8Jt12PBGVqjP/BHsebKB+5skZVn1B/3CsW6knG
+al6LY9IZT8XUZDOoFoB0vTJpe8J89i2Rrw+T3zH7PsgRygDK6qK7RVwipLB7GCCe
+upfYCTJtRuV41oWugmhK/5NmxOTr8NHwdgeLx9DqoScxsnpyTrKV2c9bbZ94d1Au
+X2w10vH1DPZPxW4CSsqVq8wdz9dhnDEfd/RbEebKmvJzaAjMPlgc7OF7jOQHfrP1
+LRGmb5rcLy8JnQe3IAhMjMeYGjPevUpaTprsu3Q0wgit5QZegeXYBSr1XAoWMElv
+sSc+bXy9AgMBAAECggEAaqHkIiGeoE5V9jTncAXeHWTlmyVX3k4luy9p6A5P/nyt
+3YevuXBJRzzWatQ2Tno8yUwXD3Ju7s7ie4/EdMmBYYFJ84AtDctRXPm6Z7B7qn6a
+2ntH2F+WOOUb/9QMxMCae44/H8VfQLQdZN2KPxHA8Z+ENPzW3mKL6vBE+PcIJLK2
+kTXQdCEIuUb1v4kxKYfjyyHAQ9yHvocUvZdodGHrpmWOr/2QCrqCjwiKnXyvdJMi
+JQ4a3dU+JG5Zwr2hScyeLgS4p+M3A2NY+oIACn2rCcsIKC6uvBK3wAbhssaY8z9c
+5kap862oMBNmPCxPuQTIIO7ptla0EWHktpFxnu7GIQKBgQDvKyXt82zGHiOZ9acx
+4fV7t3NF2MNd9fOn59NYWYRSs2gaEjit6BnsCgiKZOJJ2YFsggBiQMiWuEzwqIdW
+bOH8W5AubTxnE2OjeIpH5r8AXI6I/pKdOedM86oeElbL0p53OZqSqBK6vA5SnE76
+fZwC505h/mqH2E6AdKpcyL7sJwKBgQDc/jc4MkVnqF7xcYoJrYEbnkhwqRxIM+0Y
+HY2qXszWQPgjae3NK1rw/PEOATzWrHLvRS/utQ8yeLUAZIGsFY8+c1kjvkvl4ZK2
+OnsEOVLmEwjDqqnq3JFYCVSkXfLBGRD3wGldzkCQljOiGuJ/Co1rGHk7CfBmxX2p
+kxdts5OKewKBgQDTRsSc7Zs7cMh2a0GlmTyoa6iTHSeIy4rQ2sQimgGApSfjUBFt
+30l28G4XA4O7RT9FwZnhMeWA75JYTigwOsNvkNtPiAQB8mjksclGNxqnkRwA/RI7
+fjlMCzxOkFjIeWivXd2kjIDvIM1uQNKsCWZWUks12e/1zSmb5HPSvyuZpQKBgQDQ
+qVgKP604ysmav9HOgXy+Tx2nAoYpxp2/f2gbzZcrVfz1szdN2fnsQWh6CMEhEYMU
+WQeBJIRM65w72qp1iYXPOaqZDT0suWiFl4I/4sBbbO2BkssNb2Xs8iJxcCOeH8Td
+qVfTssNTwf7OuQPTYGtXC6ysCh5ra13Tl4cvlbdhsQKBgFHXP+919wSncLS+2ySD
+waBzG6GyVOgV+FE3DrM3Xp4S6fldWYAndKHQ1HjJVDY8SkC2Tk1D7QSQnmS+ZzYs
+YqzcnkPCTHLb6wCErs4ZiW0gn9xJnfxyv6wPujsayL4TMsmsqkj/IAB61UjwaA/a
+Z+rUw/WkcNPD59AD1J0eeSZu
+-----END PRIVATE KEY-----
--- /dev/null
+;;; network-stream-tests.el --- tests for network processes -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2016 Free Software Foundation, Inc.
+
+;; Author: Lars Ingebrigtsen <larsi@gnus.org>
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+
+;;; Code:
+
+(require 'gnutls)
+
+(ert-deftest make-local-unix-server ()
+ (skip-unless (featurep 'make-network-process '(:family local)))
+ (let* ((file (make-temp-name "/tmp/server-test"))
+ (server
+ (make-network-process
+ :name "server"
+ :server t
+ :buffer (get-buffer-create "*server*")
+ :noquery t
+ :family 'local
+ :service file)))
+ (should (equal (process-contact server :local) file))
+ (delete-file (process-contact server :local))))
+
+(ert-deftest make-local-tcp-server-with-unspecified-port ()
+ (let ((server
+ (make-network-process
+ :name "server"
+ :server t
+ :noquery t
+ :family 'ipv4
+ :service t
+ :host 'local)))
+ (should (and (arrayp (process-contact server :local))
+ (numberp (aref (process-contact server :local) 4))
+ (> (aref (process-contact server :local) 4) 0)))
+ (delete-process server)))
+
+(ert-deftest make-local-tcp-server-with-specified-port ()
+ (let ((server
+ (make-network-process
+ :name "server"
+ :server t
+ :noquery t
+ :family 'ipv4
+ :service 57869
+ :host 'local)))
+ (should (and (arrayp (process-contact server :local))
+ (= (aref (process-contact server :local) 4) 57869)))
+ (delete-process server)))
+
+(defun make-server (host)
+ (make-network-process
+ :name "server"
+ :server t
+ :noquery t
+ :family 'ipv4
+ :coding 'raw-text-unix
+ :buffer (get-buffer-create "*server*")
+ :service t
+ :sentinel 'server-sentinel
+ :filter 'server-process-filter
+ :host host))
+
+(defun server-sentinel (_proc _msg)
+ )
+
+(defun server-process-filter (proc string)
+ (message "Received %s" string)
+ (let ((prev (process-get proc 'previous-string)))
+ (when prev
+ (setq string (concat prev string))
+ (process-put proc 'previous-string nil)))
+ (if (and (not (string-match "\n" string))
+ (> (length string) 0))
+ (process-put proc 'previous-string string))
+ (let ((command (split-string string)))
+ (cond
+ ((equal (car command) "echo")
+ (process-send-string proc (concat (cadr command) "\n")))
+ (t
+ ))))
+
+(ert-deftest echo-server-with-dns ()
+ (let* ((server (make-server (system-name)))
+ (port (aref (process-contact server :local) 4))
+ (proc (make-network-process :name "foo"
+ :buffer (generate-new-buffer "*foo*")
+ :host (system-name)
+ :service port)))
+ (with-current-buffer (process-buffer proc)
+ (process-send-string proc "echo foo")
+ (sleep-for 0.1)
+ (should (equal (buffer-string) "foo\n")))
+ (delete-process server)))
+
+(ert-deftest echo-server-with-localhost ()
+ (let* ((server (make-server 'local))
+ (port (aref (process-contact server :local) 4))
+ (proc (make-network-process :name "foo"
+ :buffer (generate-new-buffer "*foo*")
+ :host "localhost"
+ :service port)))
+ (with-current-buffer (process-buffer proc)
+ (process-send-string proc "echo foo")
+ (sleep-for 0.1)
+ (should (equal (buffer-string) "foo\n")))
+ (delete-process server)))
+
+(ert-deftest echo-server-with-ip ()
+ (let* ((server (make-server 'local))
+ (port (aref (process-contact server :local) 4))
+ (proc (make-network-process :name "foo"
+ :buffer (generate-new-buffer "*foo*")
+ :host "127.0.0.1"
+ :service port)))
+ (with-current-buffer (process-buffer proc)
+ (process-send-string proc "echo foo")
+ (sleep-for 0.1)
+ (should (equal (buffer-string) "foo\n")))
+ (delete-process server)))
+
+(ert-deftest echo-server-nowait ()
+ (let* ((server (make-server 'local))
+ (port (aref (process-contact server :local) 4))
+ (proc (make-network-process :name "foo"
+ :buffer (generate-new-buffer "*foo*")
+ :host "localhost"
+ :nowait t
+ :service port)))
+ (should (eq (process-status proc) 'connect))
+ (should (null (ignore-errors
+ (process-send-string proc "echo bar")
+ t)))
+ (while (eq (process-status proc) 'connect)
+ (sit-for 0.1))
+ (with-current-buffer (process-buffer proc)
+ (process-send-string proc "echo foo")
+ (sleep-for 0.1)
+ (should (equal (buffer-string) "foo\n")))
+ (delete-process server)))
+
+(defun make-tls-server ()
+ (start-process "gnutls" (generate-new-buffer "*tls*")
+ "gnutls-serv" "--http"
+ "--x509keyfile" "lisp/net/key.pem"
+ "--x509certfile" "lisp/net/cert.pem"
+ "--port" "44330"))
+
+(ert-deftest connect-to-tls-ipv4-wait ()
+ (skip-unless (executable-find "gnutls-serv"))
+ (skip-unless (gnutls-available-p))
+ (let ((server (make-tls-server))
+ (times 0)
+ proc status)
+ (sleep-for 1)
+ (with-current-buffer (process-buffer server)
+ (message "gnutls-serv: %s" (buffer-string)))
+
+ ;; It takes a while for gnutls-serv to start.
+ (while (and (null (ignore-errors
+ (setq proc (make-network-process
+ :name "bar"
+ :buffer (generate-new-buffer "*foo*")
+ :host "localhost"
+ :service 44330))))
+ (< (setq times (1+ times)) 10))
+ (sit-for 0.1))
+ (should proc)
+ (gnutls-negotiate :process proc
+ :type 'gnutls-x509pki
+ :hostname "localhost")
+ (delete-process server)
+ (setq status (gnutls-peer-status proc))
+ (should (consp status))
+ (delete-process proc)
+ (let ((issuer (plist-get (plist-get status :certificate) :issuer)))
+ (should (stringp issuer))
+ (setq issuer (split-string issuer ","))
+ (should (equal (nth 3 issuer) "O=Emacs Test Servicess LLC")))))
+
+(ert-deftest connect-to-tls-ipv6-nowait ()
+ (skip-unless (executable-find "gnutls-serv"))
+ (skip-unless (gnutls-available-p))
+ (let ((server (make-tls-server))
+ (times 0)
+ proc status)
+ (sleep-for 1)
+ (with-current-buffer (process-buffer server)
+ (message "gnutls-serv: %s" (buffer-string)))
+
+ ;; It takes a while for gnutls-serv to start.
+ (while (and (null (ignore-errors
+ (setq proc (make-network-process
+ :name "bar"
+ :buffer (generate-new-buffer "*foo*")
+ :family 'ipv6
+ :nowait t
+ :host "::1"
+ :service 44330))))
+ (< (setq times (1+ times)) 10))
+ (sit-for 0.1))
+ (should proc)
+ (gnutls-negotiate :process proc
+ :type 'gnutls-x509pki
+ :hostname "localhost")
+ (delete-process server)
+ (setq status (gnutls-peer-status proc))
+ (should (consp status))
+ (delete-process proc)
+ (let ((issuer (plist-get (plist-get status :certificate) :issuer)))
+ (should (stringp issuer))
+ (setq issuer (split-string issuer ","))
+ (should (equal (nth 3 issuer) "O=Emacs Test Servicess LLC")))))
+
+;;; network-stream-tests.el ends here
(xref-make "(cl-defstruct (xref-elisp-location (:constructor xref-make-elisp-location)))"
(xref-make-elisp-location
'xref-elisp-location 'define-type
- (expand-file-name "../../lisp/progmodes/elisp-mode.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/progmodes/elisp-mode.el" emacs-test-dir)))
;; It's not worth adding another special case to `xref-elisp-test-descr-to-target' for this
"(cl-defstruct (xref-elisp-location")
))
(xref-make "(defalias Buffer-menu-sort)"
(xref-make-elisp-location
'Buffer-menu-sort 'defalias
- (expand-file-name "../../lisp/buff-menu.elc" emacs-test-dir)))
+ (expand-file-name "../../../lisp/buff-menu.elc" emacs-test-dir)))
(xref-make "(defun tabulated-list-sort)"
(xref-make-elisp-location
'tabulated-list-sort nil
- (expand-file-name "../../lisp/emacs-lisp/tabulated-list.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/emacs-lisp/tabulated-list.el" emacs-test-dir)))
))
;; FIXME: defconst
(xref-make "(cl-defgeneric xref-location-marker)"
(xref-make-elisp-location
'xref-location-marker 'cl-defgeneric
- (expand-file-name "../../lisp/progmodes/xref.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/progmodes/xref.el" emacs-test-dir)))
(xref-make "(cl-defmethod xref-location-marker ((l xref-elisp-location)))"
(xref-make-elisp-location
'(xref-location-marker xref-elisp-location) 'cl-defmethod
- (expand-file-name "../../lisp/progmodes/elisp-mode.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/progmodes/elisp-mode.el" emacs-test-dir)))
(xref-make "(cl-defmethod xref-location-marker ((l xref-file-location)))"
(xref-make-elisp-location
'(xref-location-marker xref-file-location) 'cl-defmethod
- (expand-file-name "../../lisp/progmodes/xref.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/progmodes/xref.el" emacs-test-dir)))
(xref-make "(cl-defmethod xref-location-marker ((l xref-buffer-location)))"
(xref-make-elisp-location
'(xref-location-marker xref-buffer-location) 'cl-defmethod
- (expand-file-name "../../lisp/progmodes/xref.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/progmodes/xref.el" emacs-test-dir)))
(xref-make "(cl-defmethod xref-location-marker ((l xref-bogus-location)))"
(xref-make-elisp-location
'(xref-location-marker xref-bogus-location) 'cl-defmethod
- (expand-file-name "../../lisp/progmodes/xref.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/progmodes/xref.el" emacs-test-dir)))
(xref-make "(cl-defmethod xref-location-marker ((l xref-etags-location)))"
(xref-make-elisp-location
'(xref-location-marker xref-etags-location) 'cl-defmethod
- (expand-file-name "../../lisp/progmodes/etags.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/progmodes/etags.el" emacs-test-dir)))
))
(xref-elisp-deftest find-defs-defgeneric-eval
(xref-make "(defun xref-find-definitions)"
(xref-make-elisp-location
'xref-find-definitions nil
- (expand-file-name "../../lisp/progmodes/xref.el" emacs-test-dir)))))
+ (expand-file-name "../../../lisp/progmodes/xref.el" emacs-test-dir)))))
(xref-elisp-deftest find-defs-defun-eval
(elisp--xref-find-definitions (eval '(defun stephe-leake-defun ())))
(xref-make "(defun abbrev-mode)"
(xref-make-elisp-location
'abbrev-mode nil
- (expand-file-name "../../lisp/abbrev.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/abbrev.el" emacs-test-dir)))
"(define-minor-mode abbrev-mode"))
)
(xref-make "(defun compilation-minor-mode)"
(xref-make-elisp-location
'compilation-minor-mode nil
- (expand-file-name "../../lisp/progmodes/compile.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/progmodes/compile.el" emacs-test-dir)))
"(define-minor-mode compilation-minor-mode")
))
(xref-make "(defvar xref--marker-ring)"
(xref-make-elisp-location
'xref--marker-ring 'defvar
- (expand-file-name "../../lisp/progmodes/xref.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/progmodes/xref.el" emacs-test-dir)))
))
(xref-elisp-deftest find-defs-defvar-c
(xref-make "(defvar font-lock-keyword-face)"
(xref-make-elisp-location
'font-lock-keyword-face 'defvar
- (expand-file-name "../../lisp/font-lock.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/font-lock.el" emacs-test-dir)))
(xref-make "(defface font-lock-keyword-face)"
(xref-make-elisp-location
'font-lock-keyword-face 'defface
- (expand-file-name "../../lisp/font-lock.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/font-lock.el" emacs-test-dir)))
))
(xref-elisp-deftest find-defs-face-eval
(xref-make "(feature xref)"
(xref-make-elisp-location
'xref 'feature
- (expand-file-name "../../lisp/progmodes/xref.el" emacs-test-dir)))
+ (expand-file-name "../../../lisp/progmodes/xref.el" emacs-test-dir)))
";;; Code:")
))
(require 'flymake)
(defvar flymake-tests-data-directory
- (expand-file-name "data/flymake" (getenv "EMACS_TEST_DIRECTORY"))
+ (expand-file-name "lisp/progmodes/flymake-resources" (getenv "EMACS_TEST_DIRECTORY"))
"Directory containing flymake test data.")
\f
-;;; keyswap.el --- swap BS and DEL keys
+;;; ps-print-tests.el --- Test suite for ps-print.el -*- lexical-binding: t; -*-
-;; Copyright (C) 1992, 2001-2016 Free Software Foundation, Inc.
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc.
-;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
-;; Keywords: terminals
-;; Obsolete-since: 22.1
+;; Author: Phillip Lord <phillip.lord@russet.org.uk>
;; This file is part of GNU Emacs.
;;; Commentary:
-;; This package is meant to be called by other terminal packages.
-
;;; Code:
-
-(let ((the-table (make-string 128 0)))
- (let ((i 0))
- (while (< i 128)
- (aset the-table i i)
- (setq i (1+ i))))
- ;; Swap ^H and DEL
- (aset the-table ?\177 ?\^h)
- (aset the-table ?\^h ?\177)
- (setq keyboard-translate-table the-table))
-
-;;; keyswap.el ends here
+(require 'ps-print)
+(require 'ert)
+
+;;; Autoload tests
+(ert-deftest ps-mule-autoload ()
+ "Tests to see whether ps-mule has been autoloaded"
+ (should
+ (fboundp 'ps-mule-initialize))
+ (should
+ (autoloadp
+ (symbol-function
+ 'ps-mule-initialize))))
(should (string= (reftex-format-citation entry "%l:%A:%y:%t %j %P %a")
"Foo13:Jane Roe:2013:Some Article Some Journal 1 Jane Roe, John Doe \\& Jane Taxpayer"))))
+
+;;; Autoload tests
+
+;; Test to check whether reftex autoloading mechanisms are working
+;; correctly.
+(ert-deftest reftex-autoload-auc ()
+ "Tests to see whether reftex-auc has been autoloaded"
+ (should
+ (fboundp 'reftex-arg-label))
+ (should
+ (autoloadp
+ (symbol-function
+ 'reftex-arg-label))))
+
+
(provide 'reftex-tests)
;;; reftex-tests.el ends here.
--- /dev/null
+;;; url-auth-tests.el --- Test suite for url-auth.
+
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc.
+
+;; Author: Jarno Malmari <jarno@malmari.fi>
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Test HTTP authentication methods.
+
+;;; Code:
+
+(require 'ert)
+(require 'url-auth)
+
+(defvar url-auth-test-challenges nil
+ "List of challenges for testing.
+Each challenge is a plist. Values are as presented by the
+server's WWW-Authenticate header field.")
+
+;; Set explicitly for easier modification for re-runs.
+(setq url-auth-test-challenges
+ (list
+ (list :qop "auth"
+ :nonce "uBr3+qkQBybTr/dKWkmpUqVO7SaEwWYzyTKO7g==$"
+ :uri "/random/path"
+ :method "GET"
+ :realm "Some test realm"
+ :cnonce "YWU4NDcxYWMxMDAxMjlkMjAwMDE4MjI5MDAwMGY4NGQ="
+ :nc "00000001"
+ :username "jytky"
+ :password "xi5Ac2HEfKt1lKKO05DCSqsK0u7hqqtsT"
+ :expected-ha1 "af521db3a83abd91262fead04fa31892"
+ :expected-ha2 "e490a6a147c79404b365d1f6059ddda5"
+ :expected-response "ecb6396e93b9e09e31f19264cfd8f854")
+ (list :nonce "a1be8a3065e00c5bf190ad499299aea5"
+ :opaque "d7c2a27230fc8c74bb6e06be8c9cd189"
+ :realm "The Test Realm"
+ :username "user"
+ :password "passwd"
+ :uri "/digest-auth/auth/user/passwd"
+ :method "GET"
+ :expected-ha1 "19c41161a8720edaeb7922ef8531137d"
+ :expected-ha2 "b44272ea65ee4af7fb26c5dba58f6863"
+ :expected-response "46c47a6d8e1fa95a3efcf49724af3fe7")
+ (list :nonce "servernonce"
+ :username "user"
+ :password "passwd"
+ :realm "The Test Realm 1"
+ :uri "/digest-auth/auth/user/passwd"
+ :method "GET"
+ :expected-ha1 "00f848f943c9a05dd06c932a7334f120"
+ :expected-ha2 "b44272ea65ee4af7fb26c5dba58f6863"
+ :expected-response "b8a48cdc9aa9e514509a5a5c53d4e8cf")
+ (list :nonce "servernonce"
+ :username "user"
+ :password "passwd"
+ :realm "The Test Realm 2"
+ :uri "/digest-auth/auth/user/passwd"
+ :method "GET"
+ :expected-ha1 "74d6abd3651d6b8260733d8a4c37ec1a"
+ :expected-ha2 "b44272ea65ee4af7fb26c5dba58f6863"
+ :expected-response "0d84884d967e04440efc77e9e2b5b561")))
+
+(ert-deftest url-auth-test-digest-create-key ()
+ "Check user credentials in their hashed form."
+ (dolist (challenge url-auth-test-challenges)
+ (let ((key (url-digest-auth-create-key (plist-get challenge :username)
+ (plist-get challenge :password)
+ (plist-get challenge :realm)
+ (plist-get challenge :method)
+ (plist-get challenge :uri))))
+ (should (= (length key) 2))
+ (should (string= (nth 0 key) (plist-get challenge :expected-ha1)))
+ (should (string= (nth 1 key) (plist-get challenge :expected-ha2)))
+ )))
+
+(ert-deftest url-auth-test-digest-auth-retrieve-cache ()
+ "Check how the entry point retrieves cached authentication.
+Essential is how realms and paths are matched."
+
+ (let* ((url-digest-auth-storage
+ '(("example.org:80"
+ ("/path/auth1" "auth1user" "key")
+ ("/path" "pathuser" "key")
+ ("/" "rootuser" "key")
+ ("realm1" "realm1user" "key")
+ ("realm2" "realm2user" "key")
+ ("/path/auth2" "auth2user" "key"))
+ ("example.org:443"
+ ("realm" "secure_user" "key"))
+ ("rootless.org:80" ; no "/" entry for this on purpose
+ ("/path" "pathuser" "key")
+ ("realm" "realmuser" "key"))))
+ (attrs (list (cons "nonce" "servernonce")))
+ auth)
+
+ (dolist (row (list
+ ;; If :expected-user is `nil' it indicates
+ ;; authentication information shouldn't be found.
+
+ ;; non-existent server
+ (list :url "http://other.com/path" :realm nil :expected-user nil)
+
+ ;; unmatched port
+ (list :url "http://example.org:444/path" :realm nil :expected-user
+il)
+
+ ;; root, no realm
+ (list :url "http://example.org/"
+ :realm nil :expected-user "rootuser")
+
+ ;; root, no realm, explicit port
+ (list :url "http://example.org:80/"
+ :realm nil :expected-user "rootuser")
+
+ (list :url "http://example.org/unknown"
+ :realm nil :expected-user "rootuser")
+
+ ;; realm specified, overrides any path
+ (list :url "http://example.org/"
+ :realm "realm1" :expected-user "realm1user")
+
+ ;; realm specified, overrides any path
+ (list :url "http://example.org/"
+ :realm "realm2" :expected-user "realm2user")
+
+ ;; authentication determined by path
+ (list :url "http://example.org/path/auth1/query"
+ :realm nil :expected-user "auth1user")
+
+ ;; /path shadows /path/auth2, hence pathuser is expected
+ (list :url "http://example.org/path/auth2/query"
+ :realm nil :expected-user "pathuser")
+
+ (list :url "https://example.org/path"
+ :realm nil :expected-user "secure_user")
+
+ ;; not really secure user but using the same port
+ (list :url "http://example.org:443/path"
+ :realm nil :expected-user "secure_user")
+
+ ;; preferring realm user over path, even though no
+ ;; realm specified (not sure why)
+ (list :url "http://rootless.org/"
+ :realm nil :expected-user "realmuser")
+ ;; second variant for the same case
+ (list :url "http://rootless.org/unknown/path"
+ :realm nil :expected-user "realmuser")
+
+ ;; path match
+ (list :url "http://rootless.org/path/query?q=a"
+ :realm nil :expected-user "pathuser")
+
+ ;; path match, realm match, prefer realm
+ (list :url "http://rootless.org/path/query?q=a"
+ :realm "realm" :expected-user "realmuser")
+ ))
+ (setq auth (url-digest-auth (plist-get row :url)
+ nil nil
+ (plist-get row :realm) attrs))
+ (if (plist-get row :expected-user)
+ (progn (should auth)
+ (should (string-match ".*username=\"\\(.*?\\)\".*" auth))
+ (should (string= (match-string 1 auth)
+ (plist-get row :expected-user))))
+ (should-not auth)))))
+
+(ert-deftest url-auth-test-digest-auth ()
+ "Check common authorization string contents.
+Challenges with qop are not checked for response since a unique
+cnonce is used for generating them which is not mocked by the
+test and cannot be passed by arguments to `url-digest-auth'."
+ (dolist (challenge url-auth-test-challenges)
+ (let* ((attrs (append
+ (list (cons "nonce" (plist-get challenge :nonce)))
+ (if (plist-get challenge :qop)
+ (list (cons "qop" (plist-get challenge :qop))))))
+ (url (concat "http://example.org" (plist-get challenge :uri)))
+ url-digest-auth-storage
+ auth)
+ ;; Add authentication info to cache so `url-digest-auth' can
+ ;; complete without prompting minibuffer input.
+ (setq url-digest-auth-storage
+ (list
+ (list "example.org:80"
+ (cons (or (plist-get challenge :realm) "/")
+ (cons (plist-get challenge :username)
+ (url-digest-auth-create-key (plist-get challenge :username)
+ (plist-get challenge :password)
+ (plist-get challenge :realm)
+ (plist-get challenge :method)
+ (plist-get challenge :uri)))))))
+ (setq auth (url-digest-auth (url-generic-parse-url url) nil nil
+ (plist-get challenge :realm) attrs))
+ (should auth)
+ (should (string-prefix-p "Digest " auth))
+ (should (string-match ".*username=\"\\(.*?\\)\".*" auth))
+ (should (string= (match-string 1 auth)
+ (plist-get challenge :username)))
+ (should (string-match ".*realm=\"\\(.*?\\)\".*" auth))
+ (should (string= (match-string 1 auth)
+ (plist-get challenge :realm)))
+
+ (if (plist-member challenge :qop)
+ (progn
+ ;; We don't know these, just check that they exists.
+ (should (string-match-p ".*response=\".*?\".*" auth))
+ (should (string-match-p ".*nc=\".*?\".*" auth))
+ (should (string-match-p ".*cnonce=\".*?\".*" auth)))
+ (should (string-match ".*response=\"\\(.*?\\)\".*" auth))
+ (should (string= (match-string 1 auth)
+ (plist-get challenge :expected-response))))
+ )))
+
+(ert-deftest url-auth-test-digest-auth-opaque ()
+ "Check that `opaque' value is added to result when presented by
+the server."
+ (let* ((url-digest-auth-storage
+ '(("example.org:80" ("/" "user" "key"))))
+ (attrs (list (cons "nonce" "anynonce")))
+ auth)
+ ;; Get authentication info from cache without `opaque'.
+ (setq auth (url-digest-auth "http://example.org/path" nil nil nil attrs))
+ (should auth)
+ (should-not (string-match-p "opaque=" auth))
+
+ ;; Add `opaque' to attributes.
+ (push (cons "opaque" "opaque-value") attrs)
+ (setq auth (url-digest-auth "http://example.org/path" nil nil nil attrs))
+ (should auth)
+ (should (string-match ".*opaque=\"\\(.*?\\)\".*" auth))
+ (should (string= (match-string 1 auth) "opaque-value"))))
+
+(provide 'url-auth-tests)
+;;; url-auth-tests.el ends here
--- /dev/null
+;; -*- emacs-lisp -*-
+
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc.
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This file generates dependencies between test files and the files
+;; that they test.
+
+;; It has an .emacs-lisp extension because it makes the Makefile easier!
+
+(require 'seq)
+
+(defun make-test-deps (src-dir)
+ (let ((src-dir (file-truename src-dir)))
+ (message
+ "%s"
+ (concat
+ (make-test-deps-lisp src-dir)
+ (make-test-deps-src src-dir)))))
+
+(defun make-test-deps-lisp (src-dir)
+ (mapconcat
+ (lambda (file-without-suffix)
+ (format "./%s-tests.log: %s/../%s.el\n"
+ file-without-suffix
+ src-dir
+ file-without-suffix))
+ (make-test-test-files src-dir "lisp") ""))
+
+(defun make-test-deps-src (src-dir)
+ (mapconcat
+ (lambda (file-without-suffix)
+ (format "./%s-tests.log: %s/../%s.c\n"
+ file-without-suffix
+ src-dir
+ file-without-suffix))
+ (make-test-test-files src-dir "src") ""))
+
+(defun make-test-test-files (src-dir sub-src-dir)
+ (make-test-munge-files
+ src-dir
+ (directory-files-recursively
+ (concat src-dir "/" sub-src-dir)
+ ".*-tests.el$")))
+
+(defun make-test-munge-files (src-dir files)
+ (make-test-sans-suffix
+ (make-test-de-stem
+ src-dir
+ (make-test-no-legacy
+ (make-test-no-test-dir
+ (make-test-no-resources
+ files))))))
+
+(defun make-test-sans-suffix (files)
+ (mapcar
+ (lambda (file)
+ (substring file 0 -9))
+ files))
+
+(defun make-test-de-stem (stem files)
+ (mapcar
+ (lambda (file)
+ (substring
+ file
+ (+ 1 (length stem))))
+ files))
+
+(defun make-test-no-legacy (list)
+ (make-test-remove list "legacy/"))
+
+(defun make-test-no-resources (list)
+ (make-test-remove list "-resources/"))
+
+(defun make-test-no-test-dir (list)
+ (make-test-remove list "-tests/"))
+
+(defun make-test-remove (list match)
+ (seq-remove
+ (lambda (file)
+ (string-match-p match file))
+ list))
${PROLSRC} ${PYTSRC} ${RBSRC} ${TEXSRC} ${YSRC}
NONSRCS=./f-src/entry.strange ./erl-src/lists.erl ./cp-src/clheir.hpp.gz
-ETAGS_PROG=../../lib-src/etags
-CTAGS_PROG=../../lib-src/ctags
+ETAGS_PROG=../../../lib-src/etags
+CTAGS_PROG=../../../lib-src/ctags
REGEX=/[ \t]*DEFVAR_[A-Z_ \t\n(]+"\([^"]+\)"/
xx="this line is here because of a fontlock bug
--- /dev/null
+class A
+ def a()
+ super(" do ")
+ end
+ def b()
+ end
+end
+
+module A
+ class B
+ ABC = 4
+
+ def foo!
+ end
+
+ def self._bar?(abc)
+ end
+
+ class << self
+ def qux=(tee)
+ end
+ end
+ end
+end
+
+A::Constant = 5
+
+# def foo_in_comment
+# end
-;;; finalizer-tests.el --- Finalizer tests -*- lexical-binding: t -*-
+;;; alloc-tests.el --- alloc tests -*- lexical-binding: t -*-
;; Copyright (C) 2015-2016 Free Software Foundation, Inc.
-;;; zlib-tests.el --- Test suite for zlib.
+;;; decompress-tests.el --- Test suite for decompress.
;; Copyright (C) 2013-2016 Free Software Foundation, Inc.
(buffer-string))
"foo\n"))))
-(provide 'zlib-tests)
+(provide 'decompress-tests)
-;;; zlib-tests.el ends here.
+;;; decompress-tests.el ends here.