]> git.eshelyaron.com Git - emacs.git/commitdiff
Merge from origin/emacs-26
authorGlenn Morris <rgm@gnu.org>
Sun, 2 Dec 2018 18:32:23 +0000 (10:32 -0800)
committerGlenn Morris <rgm@gnu.org>
Sun, 2 Dec 2018 18:32:23 +0000 (10:32 -0800)
cc3ad9a ; * CONTRIBUTE: Clarify rules for committing to release branc...
a89dbe2 * doc/misc/dbus.texi (Type Conversion): Fix typo.  (Bug#33551)
03ee726 ; Add comment to `customize-package-emacs-version-alist'
bce1d1a Improve documentation of gdb-mi.el

1  2 
doc/emacs/building.texi
lisp/net/trampver.el
lisp/progmodes/gdb-mi.el

Simple merge
index ebd581b5f5a02d12d54e9583cc3f926f87d1cc58,9c1e9cfc2eb51203cda847cd66f1b29ceb4c3b92..b8684da8cf3766680aeadcb23ca4d97285ebce2a
  (defconst tramp-bug-report-address "tramp-devel@gnu.org"
    "Email address to send bug reports to.")
  
 -(defun tramp-repository-get-version ()
 -  "Try to return as a string the repository revision of the Tramp sources."
 -  (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))))))))
 +(defconst tramp-repository-branch
 +  (ignore-errors
 +    ;; Suppress message from `emacs-repository-get-branch'.  We must
 +    ;; also handle out-of-tree builds.
 +    (let ((inhibit-message t)
 +        (dir (or (locate-dominating-file (locate-library "tramp") ".git")
 +                 source-directory)))
 +      ;; `emacs-repository-get-branch' has been introduced with Emacs 27.1.
 +      (with-no-warnings
 +      (and (stringp dir) (file-directory-p dir)
 +           (emacs-repository-get-branch dir)))))
 +  "The repository branch of the Tramp sources.")
 +
 +(defconst tramp-repository-version
 +  (ignore-errors
 +    ;; Suppress message from `emacs-repository-get-version'.  We must
 +    ;; also handle out-of-tree builds.
 +    (let ((inhibit-message t)
 +        (dir (or (locate-dominating-file (locate-library "tramp") ".git")
 +                 source-directory)))
 +      (and (stringp dir) (file-directory-p dir)
 +         (emacs-repository-get-version dir))))
 +  "The repository revision of the Tramp sources.")
  
  ;; Check for Emacs version.
 -(let ((x (if (>= emacs-major-version 24)
 -    "ok"
 -  (format "Tramp 2.3.5.26.2 is not fit for %s"
 -        (when (string-match "^.*$" (emacs-version))
 -          (match-string 0 (emacs-version)))))))
 -  (unless (string-match "\\`ok\\'" x) (error "%s" x)))
 +(let ((x   (if (not (string-lessp emacs-version "24.1"))
 +      "ok"
 +    (format "Tramp 2.4.1-pre is not fit for %s"
 +            (replace-regexp-in-string "\n" "" (emacs-version))))))
 +  (unless (string-equal "ok" x) (error "%s" x)))
  
- ;; Tramp versions integrated into Emacs.
+ ;; Tramp versions integrated into Emacs.  If a user option declares a
+ ;; `:package-version' which doesn't belong to an integrated Tramp
+ ;; version, it must be added here as well (see `tramp-syntax', for
+ ;; example).  This can be checked by something like
+ ;; (customize-changed "26.1")
  (add-to-list
   'customize-package-emacs-version-alist
   '(Tramp ("2.0.55" . "22.1") ("2.0.57" . "22.2") ("2.0.58-pre" . "22.3")
Simple merge