69 |
|
|
70 |
;;; Code: |
;;; Code: |
71 |
|
|
72 |
(defconst tramp-version "2.0.3" |
(require 'tramp-version) |
|
"This version of tramp.") |
|
73 |
(defconst tramp-bug-report-address "tramp-devel@mail.freesoftware.fsf.org" |
(defconst tramp-bug-report-address "tramp-devel@mail.freesoftware.fsf.org" |
74 |
"Email address to send bug reports to.") |
"Email address to send bug reports to.") |
75 |
|
|
1536 |
"Alist of handler functions. |
"Alist of handler functions. |
1537 |
Operations not mentioned here will be handled by the normal Emacs functions.") |
Operations not mentioned here will be handled by the normal Emacs functions.") |
1538 |
|
|
|
;;; For better error reporting. |
|
|
|
|
|
(defun tramp-version (arg) |
|
|
"Print version number of tramp.el in minibuffer or current buffer." |
|
|
(interactive "P") |
|
|
(if arg (insert tramp-version) (message tramp-version))) |
|
|
|
|
1539 |
;;; Internal functions which must come first. |
;;; Internal functions which must come first. |
1540 |
|
|
1541 |
(defsubst tramp-message (level fmt-string &rest args) |
(defsubst tramp-message (level fmt-string &rest args) |