Current File : //usr/local/share/emacs/27.2/lisp/vc/vc-dav.elc
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301!\210\300\302!\207" [require url url-dav] 2)
#@56 Return t if URL is registered with a DAV aware server.
(defalias 'vc-dav-registered #[(url) "\301!\207" [url url-dav-vc-registered] 2 (#$ . 473)])
#@97 Return the current version control state of URL.
For a list of possible values, see `vc-state'.
(defalias 'vc-dav-state #[(url) "\303!\211\204\f \304\202' \305 \"\205' \305 \"A\306\n \"\203$ \307\202' @A)\207" [url locks url-dav-lock-identifier url-dav-active-locks up-to-date assoc rassoc edited] 4 (#$ . 627)])
#@128 Indicate whether URL needs to be "checked out" before it can be edited.
See `vc-checkout-model' for a list of possible values.
(defalias 'vc-dav-checkout-model #[(url) "\300\207" [locking] 1 (#$ . 953)])
#@45 Return the current workfile version of URL.
(defalias 'vc-dav-workfile-version #[(url) "\300\207" ["Unknown"] 1 (#$ . 1163)])
#@34 Register URL in the DAV backend.
(defalias 'vc-dav-register #[(url &optional _comment) "\300\207" ["Register URL in the DAV backend."] 1 (#$ . 1295)])
#@73 Commit changes in URL to WebDAV. COMMENT is used as a check-in comment.
(defalias 'vc-dav-checkin #[(url comment &optional _rev) "\300\207" ["Commit changes in URL to WebDAV. COMMENT is used as a check-in comment."] 1 (#$ . 1452)])
#@394 Check out revision REV of URL into the working area.
If EDITABLE is non-nil URL should be writable by the user and if
locking is used for URL, a lock should also be set.
If REV is non-nil, that is the revision to check out. If REV is the
empty string, that means to check ou tht ehead of the trunk.
If optional arg DESTFILE is given, it is an alternate filename to
write the contents to.
(defalias 'vc-dav-checkout #[(url &optional rev destfile) "\300\207" ["Check out revision REV of URL into the working area.\n\nIf EDITABLE is non-nil URL should be writable by the user and if\nlocking is used for URL, a lock should also be set.\n\nIf REV is non-nil, that is the revision to check out. If REV is the\nempty string, that means to check ou tht ehead of the trunk.\n\nIf optional arg DESTFILE is given, it is an alternate filename to\nwrite the contents to.\n"] 1 (#$ . 1691)])
#@247 Revert URL back to the current workfile version.
If optional arg CONTENTS-DONE is non-nil, then the contents of FILE
have already been reverted from a version backup, and this function
only needs to update the status of URL within the backend.
(defalias 'vc-dav-revert #[(url &optional contents-done) "\300\207" ["Revert URL back to the current workfile version.\n\nIf optional arg CONTENTS-DONE is non-nil, then the contents of FILE\nhave already been reverted from a version backup, and this function\nonly needs to update the status of URL within the backend.\n"] 1 (#$ . 2583)])
#@54 Insert the revision log of URL into the *vc* buffer.
(defalias 'vc-dav-print-log #[(url) "\300\207" ["Insert the revision log of URL into the *vc* buffer."] 1 (#$ . 3174)])
#@389 Insert the diff for URL into the *vc-diff* buffer.
If REV1 and REV2 are non-nil report differences from REV1 to REV2.
If REV1 is nil, use the current workfile version as the older version.
If REV2 is nil, use the current workfile contents as the nwer version.
It should return a status of either 0 (no differences found), or
1 (either non-empty diff or the diff is run asynchronously).
(defalias 'vc-dav-diff #[(url &optional rev1 rev2 buffer async) "\300\207" ["Insert the diff for URL into the *vc-diff* buffer.\nIf REV1 and REV2 are non-nil report differences from REV1 to REV2.\nIf REV1 is nil, use the current workfile version as the older version.\nIf REV2 is nil, use the current workfile contents as the nwer version.\n\nIt should return a status of either 0 (no differences found), or\n1 (either non-empty diff or the diff is run asynchronously).\n"] 1 (#$ . 3354)])
#@67 find the version control state of all files in DIR in a fast way.
(defalias 'vc-dav-dir-state #[(url) "\300\207" ["find the version control state of all files in DIR in a fast way."] 1 (#$ . 4238)])
#@63 Return non-nil if DAV considers itself `responsible' for URL.
(defalias 'vc-dav-responsible-p #[(url) "\300\207" [t] 1 (#$ . 4443)])
(provide 'vc-dav)
Mini Shell