bug#11757: 24.1.50; vc-git calls `process-file' too many times

bug#11757: 24.1.50; vc-git calls `process-file' too many times

[Dmitry Gutov]

When I open a file under Git version control, `vc-find-file-hook' takes
~1 second to run, even on small repositories, whereas for
Mercurial, for example, it's ~0.3 seconds.

There two two reasons for that:
1) Calling git is ~ twice as expensive as hg.
2) It's called more often.

All this under MS Windows.

Test setup:

(defadvice process-file (around time-it (program &optional infile buffer 
display &rest args) activate)
   (message "process-file %s %s" program args)
   (let ((beg (current-time)))
     (prog1 ad-do-it
       (message "%s elapsed"
                (/ (truncate (* (- (float-time (current-time))
                                   (float-time beg))
                                10000))
                   10000.0)))))

Results:

Open file from Git repo, make small modification, and save it:

   process-file git (ls-files -c -z -- INSTALL)
   0.2639 elapsed
   process-file git (symbolic-ref HEAD)
   0.1849 elapsed
   process-file git (ls-files -c -z -- INSTALL)
   0.1929 elapsed
   process-file git (diff-index -p --raw -z HEAD -- INSTALL)
   0.203 elapsed
   process-file git (rev-parse --verify HEAD)
   0.203 elapsed
   process-file git (symbolic-ref HEAD)
   0.186 elapsed
   Saving file c:/Users/gutov/vc/emacs-master/INSTALL...
   Wrote c:/Users/gutov/vc/emacs-master/INSTALL
   process-file git (ls-files -c -z -- INSTALL)
   0.217 elapsed
   process-file git (diff-index -p --raw -z HEAD -- INSTALL)
   0.233 elapsed
   process-file git (add --refresh -- INSTALL)
   0.2039 elapsed
   process-file git (symbolic-ref HEAD)
   0.21 elapsed

Note that "ls-files -c -z -- INSTALL" and "symbolic-ref HEAD" are both
called twice when the file is opened.

Do the same with Mercurial repo:

   process-file hg (--config alias.status=status --config 
defaults.status= status -A README.txt)
   0.1069 elapsed
   process-file hg (--config alias.status=status --config 
defaults.status= status -A README.txt)
   0.1099 elapsed
   process-file hg (log -l 1 --template {rev} README.txt)
   0.1019 elapsed
   Saving file c:/Users/gutov/vc/jqplot/README.txt...
   Wrote c:/Users/gutov/vc/jqplot/README.txt
   process-file hg (--config alias.status=status --config 
defaults.status= status -A README.txt)
   0.164 elapsed

Note lesser amount of calls (3 vs 6 for opening, 1 vs 4 for writing). Of
the 3, one also seems to be redundant.

In GNU Emacs 24.1.50.1 (i386-mingw-nt6.1.7601)
  of 2012-06-20 on SOL
Windowing system distributor `Microsoft Corp.', version 6.1.7601
Configured using:
  `configure --with-gcc (3.4) --cflags -IH:/Apps/System/gnuwin32/include'

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

Update.

After setting vc-git-program explicitly to "C:/Program Files 
(x86)/Git/bin/git.exe" (by default, it was calling "C:/Program Files 
(x86)/Git/cmd/git.CMD"), the average time of git command calls went down 
from 0.2s to 0.03s, so the problem with Git is about 7 times less 
important now.

Still, the issue of redundant calls stands. With Mercurial, for example, 
it would bring the time taken by `vc-find-file-hook' from 0.3s to 0.2s.

And I'd love to see the thing with vc-git-program documented somewhere.
In http://www.gnu.org/software/emacs/windows/faq.html, maybe?

-- Dmitry

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Michael Albinus]

Dmitry Gutov <dgutov@yandex.ru> writes:

> After setting vc-git-program explicitly to "C:/Program Files
> (x86)/Git/bin/git.exe" (by default, it was calling "C:/Program Files
> (x86)/Git/cmd/git.CMD"), the average time of git command calls went
> down from 0.2s to 0.03s, so the problem with Git is about 7 times less
> important now.

If the git repository is remote (accessed via Tramp), this is still a
serious issue. I'm plagued by this every single day. Less `process-file'
invocations would be more than welcome. Maybe vc-git can cache some results?

> -- Dmitry

Best regards, Michael.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

[-- Attachment #1: Type: text/plain, Size: 1842 bytes --]

Hi Michael,

This little patch shaves 2 `process-file' invocations from both 
`vc-find-file-hook' and `vc-after-save'.

It's not fully backward-compatible (it breaks when a previously 
registered file became unregistered), but I think it's a good tradeoff.

VC doesn't handle all cases of "outside interference" anyway: for 
example, the cached return value of `vc-working-revision' is invalidated 
only after the file is checked in, moved, or deleted, not after each 
save, and switching to another branch in Git is a much more common 
occurrence.

A more complex solution, though also applicable to vc-hg, would be to 
move most of the code from `vc-git-registered' to `vc-git-state', then 
modify `vc-git-registered' and `vc-hg-registered' to call `vc-state' 
(for caching) and then interpret its return value (what 
`vc-hg-registered' already does). Since `vc-registered' calls 
`vc-xx-registered' functions when selecting the backend, we'd also need 
to clear the cached 'vc-state value after each call with negative result.

This would mean +1 `process-file' invocation with Git in 
`vc-after-save', compared to the attached patch, but -1 with Hg in 
`vc-find-file-hook'.

On 26.06.2012 16:14, Michael Albinus wrote:
> Dmitry Gutov <dgutov@yandex.ru> writes:
>
>> After setting vc-git-program explicitly to "C:/Program Files
>> (x86)/Git/bin/git.exe" (by default, it was calling "C:/Program Files
>> (x86)/Git/cmd/git.CMD"), the average time of git command calls went
>> down from 0.2s to 0.03s, so the problem with Git is about 7 times less
>> important now.
>
> If the git repository is remote (accessed via Tramp), this is still a
> serious issue. I'm plagued by this every single day. Less `process-file'
> invocations would be more than welcome. Maybe vc-git can cache some results?
>
>> -- Dmitry
>
> Best regards, Michael.
>
>



[-- Attachment #2: 0004-vc-git.el-vc-git-state-Don-t-call-vc-git-registered-.patch --]
[-- Type: text/plain, Size: 3610 bytes --]

From 8035692de90e463aa83576d68c6d008f77362fdc Mon Sep 17 00:00:00 2001
From: Dmitry Gutov <dgutov@yandex.ru>
Date: Thu, 28 Jun 2012 04:01:06 +0400
Subject: [PATCH 4/4] * vc-git.el (vc-git-state): Don't call
 `vc-git-registered', it's expensive.

It's possible that file's status had changed to 'unregistered' since it was
opened, but is checking this worth another process call?
Note that if this is the case, `vc-next-action' won't add the file now.

(vc-git-mode-line-string): Call `vc-working-revision' instead of
`vc-git-working-revision' because it caches the result.
---
 lisp/vc/vc-git.el |   38 ++++++++++++++++++++------------------
 1 file changed, 20 insertions(+), 18 deletions(-)

diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el
index 63243cd..329a950 100644
--- a/lisp/vc/vc-git.el
+++ b/lisp/vc/vc-git.el
@@ -215,23 +215,25 @@ matching the resulting Git log output, and KEYWORDS is a list of
   ;; is direct ancestor of corresponding upstream branch, and the file
   ;; was modified upstream.  But we can't check that without a network
   ;; operation.
-  (if (not (vc-git-registered file))
-      'unregistered
-    (let ((diff (vc-git--run-command-string
-                 file "diff-index" "-p" "--raw" "-z" "HEAD" "--")))
-      (if (and diff
-	       (string-match ":[0-7]\\{6\\} [0-7]\\{6\\} [0-9a-f]\\{40\\} [0-9a-f]\\{40\\} \\([ADMUT]\\)\0[^\0]+\0\\(.*\n.\\)?"
-			     diff))
-          (let ((diff-letter (match-string 1 diff)))
-            (if (not (match-beginning 2))
-                ;; Empty diff: file contents is the same as the HEAD
-                ;; revision, but timestamps are different (eg, file
-                ;; was "touch"ed).  Update timestamp in index:
-                (prog1 'up-to-date
-                  (vc-git--call nil "add" "--refresh" "--"
-                                (file-relative-name file)))
-              (vc-git--state-code diff-letter)))
-	(if (vc-git--empty-db-p) 'added 'up-to-date)))))
+  ;; This assumes that status is known to be not `unregistered' because
+  ;; we've been successfully dispatched here from `vc-state', that
+  ;; means `vc-git-registered' returned t earlier once.  Not 100% accurate,
+  ;; but close enough.
+  (let ((diff (vc-git--run-command-string
+               file "diff-index" "-p" "--raw" "-z" "HEAD" "--")))
+    (if (and diff
+             (string-match ":[0-7]\\{6\\} [0-7]\\{6\\} [0-9a-f]\\{40\\} [0-9a-f]\\{40\\} \\([ADMUT]\\)\0[^\0]+\0\\(.*\n.\\)?"
+                           diff))
+        (let ((diff-letter (match-string 1 diff)))
+          (if (not (match-beginning 2))
+              ;; Empty diff: file contents is the same as the HEAD
+              ;; revision, but timestamps are different (eg, file
+              ;; was "touch"ed).  Update timestamp in index:
+              (prog1 'up-to-date
+                (vc-git--call nil "add" "--refresh" "--"
+                              (file-relative-name file)))
+            (vc-git--state-code diff-letter)))
+      (if (vc-git--empty-db-p) 'added 'up-to-date))))
 
 (defun vc-git-working-revision (_file)
   "Git-specific version of `vc-working-revision'."
@@ -248,7 +250,7 @@ matching the resulting Git log output, and KEYWORDS is a list of
 
 (defun vc-git-mode-line-string (file)
   "Return a string for `vc-mode-line' to put in the mode line for FILE."
-  (let* ((branch (vc-git-working-revision file))
+  (let* ((branch (vc-working-revision file 'Git))
          (def-ml (vc-default-mode-line-string 'Git file))
          (help-echo (get-text-property 0 'help-echo def-ml)))
     (if (zerop (length branch))
-- 
1.7.10.msysgit.1

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Michael Albinus]

Dmitry Gutov <dgutov@yandex.ru> writes:

> Hi Michael,

Hi Dmitry,

> This little patch shaves 2 `process-file' invocations from both
> vc-find-file-hook' and `vc-after-save'.
>
> It's not fully backward-compatible (it breaks when a previously
> registered file became unregistered), but I think it's a good
> tradeoff.

I don't know whether we shall break the functionality. Instead of, I've
appended a small patch, which uses the cache for vc-git-registered and
vc-git-root (additionally to your patch, which uses the cache of
vc-working-revision). This reduces already the number of process-file
invocations from 6 to 4, when openening a new file. And there's room for
other caches.

> VC doesn't handle all cases of "outside interference" anyway: for
> example, the cached return value of `vc-working-revision' is
> invalidated only after the file is checked in, moved, or deleted, not
> after each save, and switching to another branch in Git is a much more
> common occurrence.

A stale cache is bad, of course. We must carefully check, where a cached
value has to be invalidated. But why should vc-working-revision being
invalidated after saving? It is still the same, I believe. Switching to
another branch shall be observed by Emacs, 'cause there is another
version of the file on the disk, and Emacs warns you before editing.

> A more complex solution, though also applicable to vc-hg, would be to
> move most of the code from `vc-git-registered' to `vc-git-state', then
> modify `vc-git-registered' and `vc-hg-registered' to call `vc-state'
> (for caching) and then interpret its return value (what
> vc-hg-registered' already does). Since `vc-registered' calls
> vc-xx-registered' functions when selecting the backend, we'd also need
> to clear the cached 'vc-state value after each call with negative
> result.

This I cannot answer (yet). We could apply this, when the other changes
work robustly.

> -- Dmitry

Best regards, Michael.

*** /usr/local/src/emacs/lisp/vc/vc-git.el.~108799~  2012-06-29 15:39:15.897374680 +0200
--- /usr/local/src/emacs/lisp/vc/vc-git.el	2012-06-29 15:24:04.389401221 +0200
***************
*** 173,200 ****

  (defun vc-git-registered (file)
    "Check whether FILE is registered with git."
!   (let ((dir (vc-git-root file)))
!     (when dir
!       (with-temp-buffer
! 	(let* (process-file-side-effects
! 	       ;; Do not use the `file-name-directory' here: git-ls-files
! 	       ;; sometimes fails to return the correct status for relative
! 	       ;; path specs.
! 	       ;; See also: http://marc.info/?l=git&m=125787684318129&w=2
! 	       (name (file-relative-name file dir))
! 	       (str (ignore-errors
! 		     (cd dir)
! 		     (vc-git--out-ok "ls-files" "-c" "-z" "--" name)
! 		     ;; If result is empty, use ls-tree to check for deleted
!                      ;; file.
! 		     (when (eq (point-min) (point-max))
! 		       (vc-git--out-ok "ls-tree" "--name-only" "-z" "HEAD"
!                                        "--" name))
! 		     (buffer-string))))
! 	  (and str
! 	       (> (length str) (length name))
! 	       (string= (substring str 0 (1+ (length name)))
! 			(concat name "\0"))))))))

  (defun vc-git--state-code (code)
    "Convert from a string to a added/deleted/modified state."
--- 173,203 ----

  (defun vc-git-registered (file)
    "Check whether FILE is registered with git."
!   (or (vc-file-getprop file 'git-registered)
!       (vc-file-setprop
!        file 'git-registered
!        (let ((dir (vc-git-root file)))
! 	 (when dir
! 	   (with-temp-buffer
! 	     (let* (process-file-side-effects
! 		    ;; Do not use the `file-name-directory' here: git-ls-files
! 		    ;; sometimes fails to return the correct status for relative
! 		    ;; path specs.
! 		    ;; See also: http://marc.info/?l=git&m=125787684318129&w=2
! 		    (name (file-relative-name file dir))
! 		    (str (ignore-errors
! 			   (cd dir)
! 			   (vc-git--out-ok "ls-files" "-c" "-z" "--" name)
! 			   ;; If result is empty, use ls-tree to check for deleted
! 			   ;; file.
! 			   (when (eq (point-min) (point-max))
! 			     (vc-git--out-ok "ls-tree" "--name-only" "-z" "HEAD"
! 					     "--" name))
! 			   (buffer-string))))
! 	       (and str
! 		    (> (length str) (length name))
! 		    (string= (substring str 0 (1+ (length name)))
! 			     (concat name "\0"))))))))))

  (defun vc-git--state-code (code)
    "Convert from a string to a added/deleted/modified state."
***************
*** 248,254 ****

  (defun vc-git-mode-line-string (file)
    "Return a string for `vc-mode-line' to put in the mode line for FILE."
!   (let* ((branch (vc-git-working-revision file))
           (def-ml (vc-default-mode-line-string 'Git file))
           (help-echo (get-text-property 0 'help-echo def-ml)))
      (if (zerop (length branch))
--- 251,257 ----

  (defun vc-git-mode-line-string (file)
    "Return a string for `vc-mode-line' to put in the mode line for FILE."
!   (let* ((branch (vc-working-revision file))
           (def-ml (vc-default-mode-line-string 'Git file))
           (help-echo (get-text-property 0 'help-echo def-ml)))
      (if (zerop (length branch))
***************
*** 959,965 ****
  (defun vc-git-extra-status-menu () vc-git-extra-menu-map)

  (defun vc-git-root (file)
!   (vc-find-root file ".git"))

  ;; Derived from `lgrep'.
  (defun vc-git-grep (regexp &optional files dir)
--- 962,969 ----
  (defun vc-git-extra-status-menu () vc-git-extra-menu-map)

  (defun vc-git-root (file)
!   (or (vc-file-getprop file 'git-root)
!       (vc-file-setprop file 'git-root (vc-find-root file ".git"))))

  ;; Derived from `lgrep'.
  (defun vc-git-grep (regexp &optional files dir)

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

On 29.06.2012 17:46, Michael Albinus wrote:
>> This little patch shaves 2 `process-file' invocations from both
>> vc-find-file-hook' and `vc-after-save'.
>>
>> It's not fully backward-compatible (it breaks when a previously
>> registered file became unregistered), but I think it's a good
>> tradeoff.
>
> I don't know whether we shall break the functionality. Instead of, I've
> appended a small patch, which uses the cache for vc-git-registered and
> vc-git-root (additionally to your patch, which uses the cache of
> vc-working-revision). This reduces already the number of process-file
> invocations from 6 to 4, when openening a new file. And there's room for
> other caches.

Looks like the win is the same here.

I'm not sure about caching vc-git-root, since at least in local scenario 
it's a fast operation. Is it that slow with Tramp?
Other backends don't cache it either.

>> VC doesn't handle all cases of "outside interference" anyway: for
>> example, the cached return value of `vc-working-revision' is
>> invalidated only after the file is checked in, moved, or deleted, not
>> after each save, and switching to another branch in Git is a much more
>> common occurrence.
>
> A stale cache is bad, of course. We must carefully check, where a cached
> value has to be invalidated. But why should vc-working-revision being
> invalidated after saving? It is still the same, I believe. Switching to
> another branch shall be observed by Emacs, 'cause there is another
> version of the file on the disk, and Emacs warns you before editing.

This won't happen in following cases:
1) We switch to revision when the opened file is the same.
2) It doesn't exist there.
3) We just delete it from disk from outside of Emacs.
So the file isn't changed, and you see no warning or update, even after 
you write it to disk from Emacs again.

And the latter two cases (the last one - with a small modification) are 
the only situations I can think of when an open buffer in which 
(vc-git-registered) returned t some time ago (so it has vc-backend 
property set to Git) now should return nil.
But the properties won't be reset, so the cached value will be outdated.

Can you describe a scenario in which 'git-registered cached value will 
be invalidated, and the function will then return nil?

P.S. I can't find a way to apply context diff with my current setup, so 
if it's not too hard, please send a unified one next time.

-- Dmitry

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Michael Albinus]

Dmitry Gutov <dgutov@yandex.ru> writes:

> Looks like the win is the same here.

Yes. And when there are several operations for the same file, the cache
pays even more.

> I'm not sure about caching vc-git-root, since at least in local
> scenario it's a fast operation. Is it that slow with Tramp?

Yes. Every remote operation is slow, compared with whatever lisp code.

> Other backends don't cache it either.

They should do also. It is very unlikely, that the root changes while
the cache is active.

>> A stale cache is bad, of course. We must carefully check, where a cached
>> value has to be invalidated. But why should vc-working-revision being
>> invalidated after saving? It is still the same, I believe. Switching to
>> another branch shall be observed by Emacs, 'cause there is another
>> version of the file on the disk, and Emacs warns you before editing.
>
> This won't happen in following cases:
> 1) We switch to revision when the opened file is the same.
> 2) It doesn't exist there.
> 3) We just delete it from disk from outside of Emacs.
> So the file isn't changed, and you see no warning or update, even
> after you write it to disk from Emacs again.

I see. Maybe we find a hook, where we could invalidate the vc cache when
a file is written which does not exist on the disk?

> And the latter two cases (the last one - with a small modification)
> are the only situations I can think of when an open buffer in which
> (vc-git-registered) returned t some time ago (so it has vc-backend
> property set to Git) now should return nil.
> But the properties won't be reset, so the cached value will be outdated.
>
> Can you describe a scenario in which 'git-registered cached value will
> be invalidated, and the function will then return nil?

When the file is removed from git outside Emacs. In this case,
git-registered must be nil.

> P.S. I can't find a way to apply context diff with my current setup,
> so if it's not too hard, please send a unified one next time.

I try to remember. The Emacs maintainers prefer context diffs, that's
why ediff-custom-diff-options is set to "-c" by default.

> -- Dmitry

Best regards, Michael.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

On 29.06.2012 20:40, Michael Albinus wrote:
>>> A stale cache is bad, of course. We must carefully check, where a cached
>>> value has to be invalidated. But why should vc-working-revision being
>>> invalidated after saving? It is still the same, I believe. Switching to
>>> another branch shall be observed by Emacs, 'cause there is another
>>> version of the file on the disk, and Emacs warns you before editing.
>>
>> This won't happen in following cases:
>> 1) We switch to revision when the opened file is the same.
>> 2) It doesn't exist there.
>> 3) We just delete it from disk from outside of Emacs.
>> So the file isn't changed, and you see no warning or update, even
>> after you write it to disk from Emacs again.
>
> I see. Maybe we find a hook, where we could invalidate the vc cache when
> a file is written which does not exist on the disk?

(vc-before-save) might be the place to do that.

>> And the latter two cases (the last one - with a small modification)
>> are the only situations I can think of when an open buffer in which
>> (vc-git-registered) returned t some time ago (so it has vc-backend
>> property set to Git) now should return nil.
>> But the properties won't be reset, so the cached value will be outdated.
>>
>> Can you describe a scenario in which 'git-registered cached value will
>> be invalidated, and the function will then return nil?
>
> When the file is removed from git outside Emacs. In this case,
> git-registered must be nil.

I meant, would that happen with your patch?
If vc-before-save would invalidate the cache, that should be ok.

>> P.S. I can't find a way to apply context diff with my current setup,
>> so if it's not too hard, please send a unified one next time.
>
> I try to remember. The Emacs maintainers prefer context diffs, that's
> why ediff-custom-diff-options is set to "-c" by default.

How important is that, I wonder? It's what CONTRIBUTE says, but I've 
seen many of the diffs posted in unified format, and no one ever asked 
me to convert a patch specifically into context format.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Michael Albinus]

Dmitry Gutov <dgutov@yandex.ru> writes:

> (vc-before-save) might be the place to do that.

Well. I'll check how to do.

>>> P.S. I can't find a way to apply context diff with my current setup,
>>> so if it's not too hard, please send a unified one next time.
>>
>> I try to remember. The Emacs maintainers prefer context diffs, that's
>> why ediff-custom-diff-options is set to "-c" by default.
>
> How important is that, I wonder? It's what CONTRIBUTE says, but I've
> seen many of the diffs posted in unified format, and no one ever asked
> me to convert a patch specifically into context format.

Years ago, I have been asked to do so. And as said, it is the default
value in vanilla Emacs; I simply don't think about.

But I try to remember when I prepare a patch for you.

Best regards, Michael.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Michael Albinus]

Dmitry Gutov <dgutov@yandex.ru> writes:

> On 29.06.2012 20:40, Michael Albinus wrote:
>>>> A stale cache is bad, of course. We must carefully check, where a cached
>>>> value has to be invalidated. But why should vc-working-revision being
>>>> invalidated after saving? It is still the same, I believe. Switching to
>>>> another branch shall be observed by Emacs, 'cause there is another
>>>> version of the file on the disk, and Emacs warns you before editing.
>>>
>>> This won't happen in following cases:
>>> 1) We switch to revision when the opened file is the same.
>>> 2) It doesn't exist there.
>>> 3) We just delete it from disk from outside of Emacs.
>>> So the file isn't changed, and you see no warning or update, even
>>> after you write it to disk from Emacs again.
>>
>> I see. Maybe we find a hook, where we could invalidate the vc cache when
>> a file is written which does not exist on the disk?
>
> (vc-before-save) might be the place to do that.

In vc-after-save, vc-git-state is called. Wouldn't it be sufficient to
invalidate the cache there, when it detects that the file is not up-to-date?

Best regards, Michael.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

On 30.06.2012 13:03, Michael Albinus wrote:
> Dmitry Gutov <dgutov@yandex.ru> writes:
>
>> On 29.06.2012 20:40, Michael Albinus wrote:
>>>>> A stale cache is bad, of course. We must carefully check, where a cached
>>>>> value has to be invalidated. But why should vc-working-revision being
>>>>> invalidated after saving? It is still the same, I believe. Switching to
>>>>> another branch shall be observed by Emacs, 'cause there is another
>>>>> version of the file on the disk, and Emacs warns you before editing.
>>>>
>>>> This won't happen in following cases:
>>>> 1) We switch to revision when the opened file is the same.
>>>> 2) It doesn't exist there.
>>>> 3) We just delete it from disk from outside of Emacs.
>>>> So the file isn't changed, and you see no warning or update, even
>>>> after you write it to disk from Emacs again.
>>>
>>> I see. Maybe we find a hook, where we could invalidate the vc cache when
>>> a file is written which does not exist on the disk?
>>
>> (vc-before-save) might be the place to do that.
>
> In vc-after-save, vc-git-state is called. Wouldn't it be sufficient to
> invalidate the cache there, when it detects that the file is not up-to-date?

Why there? Problem with working-revision is common for all backends, as 
far as I can see.

Also, how? After the file is written, we can't check if it didn't exist 
on disk anymore.

Here's what I had in mind:

diff --git a/lisp/vc/vc-hooks.el b/lisp/vc/vc-hooks.el
index bba7217..4bff5fc 100644
--- a/lisp/vc/vc-hooks.el
+++ b/lisp/vc/vc-hooks.el
@@ -703,7 +703,9 @@ Before doing that, check if there are any old 
backups and get rid of them."
    ;; another name.  This enables local diffs and local reverting.
    (let ((file buffer-file-name)
          backend)
-    (ignore-errors               ;Be careful not to prevent saving the 
file.
+    (ignore-errors      ;Be careful not to prevent saving the file.
+      (unless (file-exists-p file)
+        (vc-file-clearprops file))
        (and (setq backend (vc-backend file))
             (vc-up-to-date-p file)
             (eq (vc-checkout-model backend (list file)) 'implicit)

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Michael Albinus]

Dmitry Gutov <dgutov@yandex.ru> writes:

> Here's what I had in mind:

Well, I've committed both your and my patch. Can we close the ticket now?

Best regards, Michael.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

On 30.06.2012 17:19, Michael Albinus wrote:
> Dmitry Gutov <dgutov@yandex.ru> writes:
>
>> Here's what I had in mind:
>
> Well, I've committed both your and my patch. Can we close the ticket now?

Uh, probably not. This was not enough to fully fix the scenario of 
writing to a file that was removed from Git externally.

This way, `vc-before-save' clears 'vc-backend property too and 
(vc-backend file) retuns nil in `vc-after-save', and the mode-line isn't 
getting updated.

I'm not sure what we should do. Call (vc-mode-line) anyway? That would work.

Clearing only some properties in `vc-before-save' wouldn't be very sane, 
since 'git-registered is backend-specific.

There's a major inconsistency in `vc-backend' logic: we have a way to 
display mode-line, refresh state, etc, for a file that's been registered 
in VC but then was removed, as long as the buffer wasn't killed, but 
kill it and open the file again - now (vc-backend) returns nil.

-- Dmitry

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Michael Albinus]

Dmitry Gutov <dgutov@yandex.ru> writes:

> This way, `vc-before-save' clears 'vc-backend property too and
> (vc-backend file) retuns nil in `vc-after-save', and the mode-line
> isn't getting updated.

So we might let-bind the 'vc-backend property to a local variable, and
reset it after cleanup.

> I'm not sure what we should do. Call (vc-mode-line) anyway? That would work.

Nope. This is expansive, because it recomputes `vc-working-revision'. We
would loose all improvements from using the cache.

> -- Dmitry

Best regards, Michael.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

On 30.06.2012 22:46, Michael Albinus wrote:
> Dmitry Gutov <dgutov@yandex.ru> writes:
>
>> This way, `vc-before-save' clears 'vc-backend property too and
>> (vc-backend file) retuns nil in `vc-after-save', and the mode-line
>> isn't getting updated.
>
> So we might let-bind the 'vc-backend property to a local variable, and
> reset it after cleanup.

It would work, but this, yet again, complicates the logic.

>> I'm not sure what we should do. Call (vc-mode-line) anyway? That would work.
>
> Nope. This is expansive, because it recomputes `vc-working-revision'. We
> would loose all improvements from using the cache.

I don't think so.

If we hadn't reset all properties in vc-before-save (file existed), 
nothing changes.
If we did reset them, then yes, vc-working-revision will recompute 
'vc-working-revision property, but only once after the reset.
Which is what we want to do anyway, since the file's state has changed, 
and the working revision could have changed as well, so we need to know 
them to update mode-line.

By the way, this last patch I sent doesn't help if the user just removed 
the file from repository while leaving it on disk (git rm --cached ... 
&& git commit ..., for example), but whatever.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Stefan Monnier]

> This won't happen in following cases:
> 1) We switch to revision when the opened file is the same.
> 2) It doesn't exist there.
> 3) We just delete it from disk from outside of Emacs.
> So the file isn't changed, and you see no warning or update, even after you
> write it to disk from Emacs again.

While that is suboptimal, VC's state is often suboptimal like that.
The only cases where VC's state is (or at least really should)
up-to-date is:
- when it was changed by an explicit VC action.
- when we need to know the state in order to make an important decision.
Updating the state in other circumstances is good, but not necessary.
Improving VC so that the first case is more frequent would actually
be preferable.


        Stefan

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

On 01.07.2012 3:01, Stefan Monnier wrote:
>> This won't happen in following cases:
>> 1) We switch to revision when the opened file is the same.
>> 2) It doesn't exist there.
>> 3) We just delete it from disk from outside of Emacs.
>> So the file isn't changed, and you see no warning or update, even after you
>> write it to disk from Emacs again.
>
> While that is suboptimal, VC's state is often suboptimal like that.
> The only cases where VC's state is (or at least really should)
> up-to-date is:
> - when it was changed by an explicit VC action.
> - when we need to know the state in order to make an important decision.
> Updating the state in other circumstances is good, but not necessary.
> Improving VC so that the first case is more frequent would actually
> be preferable.

AFAIK, the second case with `vc-git-registered' only occurs in 
`vc-next-action', where it can call `vc-register' if appropriate.

For that to happen, in `vc-deduce-fileset' either (vc-backend 
buffer-file-name) should return nil, or (vc-state ...) - 'unregistered.

So, in all variations on the theme "file unchanged, but not in git index 
anymore" this won't be true, neither with my original patch, nor with 
the currently installed code.

Invalidating property 'git-registered in `vc-deduce-fileset' might fix 
that, but having it know about Git backend is probably not good at all, 
and AFAIK most other backends just detect all states with a single 
process call, including 'unregistered (so they don't call their 
-registered function from -state function).

-- Dmitry

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Michael Albinus]

Dmitry Gutov <dgutov@yandex.ru> writes:

>>> I'm not sure what we should do. Call (vc-mode-line) anyway? That would work.
>>
>> Nope. This is expansive, because it recomputes `vc-working-revision'. We
>> would loose all improvements from using the cache.
>
> I don't think so.
>
> If we hadn't reset all properties in vc-before-save (file existed),
> nothing changes.
> If we did reset them, then yes, vc-working-revision will recompute
> vc-working-revision property, but only once after the reset.
> Which is what we want to do anyway, since the file's state has
> changed, and the working revision could have changed as well, so we
> need to know them to update mode-line.

Likely, the best option is to call (vc-registered file) after clearing
the file cache. This recomputes the 'vc-backend property as well, what
we want.

Calling (vc-mode-line file) at this point would be for the side-effect
of that function, which is bad in my experience. It would harden
maintenance, 'cause nobody will know why we want to refresh the modeline
at this point.

> By the way, this last patch I sent doesn't help if the user just
> removed the file from repository while leaving it on disk (git rm
> --cached ... && git commit ..., for example), but whatever.

If we use the cache, there will always be a constellation that the cache
is stale due to external operations. As Stefan said, this is mostly
uncritical.

Best regards, Michael.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

Sorry, forgot to cc.

On 01.07.2012 13:58, Michael Albinus wrote:
> Dmitry Gutov <dgutov@yandex.ru> writes:
>
>>>> I'm not sure what we should do. Call (vc-mode-line) anyway? That would work.
>>>
>>> Nope. This is expansive, because it recomputes `vc-working-revision'. We
>>> would loose all improvements from using the cache.
>>
>> I don't think so.
>>
>> If we hadn't reset all properties in vc-before-save (file existed),
>> nothing changes.
>> If we did reset them, then yes, vc-working-revision will recompute
>> vc-working-revision property, but only once after the reset.
>> Which is what we want to do anyway, since the file's state has
>> changed, and the working revision could have changed as well, so we
>> need to know them to update mode-line.
>
> Likely, the best option is to call (vc-registered file) after clearing
> the file cache. This recomputes the 'vc-backend property as well, what
> we want.

Have you tried this? (vc-backend file) gets called just a bit later, in 
`vc-after-save`, and it calls `vc-registered' in turn, but since the 
file is no longer registered with Git, it returns nil, and the mode-line 
is not updated.

Also, I don't think we should call (vc-backend file) before the file is 
written to disk.

> Calling (vc-mode-line file) at this point would be for the side-effect
> of that function, which is bad in my experience. It would harden
> maintenance, 'cause nobody will know why we want to refresh the modeline
> at this point.

I meant, always calling (vc-mode-line file) in `vc-after-save', moving 
it outside of the (and backend ...) check.
This does have a performance downside with non-VC file buffers, of a 
couple additional function calls, 'vc-backend cache lookup, and 
unconditional mode-line update.

So from this standpoint, saving and restoring 'vc-backend value around 
clearing props in `vc-before-save' might indeed be the best solution.

>> By the way, this last patch I sent doesn't help if the user just
>> removed the file from repository while leaving it on disk (git rm
>> --cached ... && git commit ..., for example), but whatever.
>
> If we use the cache, there will always be a constellation that the cache
> is stale due to external operations. As Stefan said, this is mostly
> uncritical.

I'm bringing attention to these cases because they could be the actual 
benefit of your patch (caching 'git-registered) over my initial patch 
(not calling `vc-git-registered' from `vc-git-state' at all).
The original code supported these edge cases, at the cost of additional 
process call.

-- Dmitry

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

On 02.07.2012 13:08, Michael Albinus wrote:
> Dmitry Gutov <dgutov@yandex.ru> writes:
>
>>> Likely, the best option is to call (vc-registered file) after clearing
>>> the file cache. This recomputes the 'vc-backend property as well, what
>>> we want.
>>
>> Have you tried this? (vc-backend file) gets called just a bit later,
>> in `vc-after-save`, and it calls `vc-registered' in turn, but since
>> the file is no longer registered with Git, it returns nil, and the
>> mode-line is not updated.
>
> Well, I've played with it. Scenario:

I believe both scenarios below would work just as well with my original 
patch.

> - Have a git-controlled file on disk
> - Load it in Emacs.
> - Remove it on disk, outside Emacs.
> - Save it from Emacs
>
> In vc-before-save, the file cache is cleared 'cause the file doesn't
> exist any longer. As you said, vc-backend is called afterwards,
> recomputing some of the properties. The file shows the correct modeline,
> "Git:master".

If you just removed it on disk, without committing the change, doing 
(vc-state-refresh) would correctly recompute its status as 'removed even 
without calling (vc-registered).
That's not the status we have a problem with ('unregistered is).

> 2nd scenario:
>
> - Switch to another branch ("git checkout test")
> - Remove the file on disk, outside Emacs.
> - Save it from Emacs
>
> And now the modeline shows "Git:test", as expected.

Was the file absent in the branch test after checkout? If not, this case 
is no different from the first.
Basically, we need a scenario in which `vc-next-action' will need to 
call `vc-git-register' on a file that recently has been considered 
'up-to-date.

>> So from this standpoint, saving and restoring 'vc-backend value around
>> clearing props in `vc-before-save' might indeed be the best solution.
>
> I believe, we even don't need this. The current code DTRT, and clearing
> the properties happens only when the file has been removed.

I believe we can either not call 'vc-git-registered' from `vc-git-state' 
at all (caching 'vc-registered is not needed in this case), or we should 
fix some scenario which benefits from us doing that.

The logic is rather complicated there, so I might easily be missing some 
examples. If so, please tell.

-- Dmitry

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

On 02.07.2012 13:08, Michael Albinus wrote:
> Dmitry Gutov <dgutov@yandex.ru> writes:
>
>>> Likely, the best option is to call (vc-registered file) after clearing
>>> the file cache. This recomputes the 'vc-backend property as well, what
>>> we want.
>>
>> Have you tried this? (vc-backend file) gets called just a bit later,
>> in `vc-after-save`, and it calls `vc-registered' in turn, but since
>> the file is no longer registered with Git, it returns nil, and the
>> mode-line is not updated.
>
> Well, I've played with it. Scenario:

I believe both scenarios below would work just as well with my original 
patch.

> - Have a git-controlled file on disk
> - Load it in Emacs.
> - Remove it on disk, outside Emacs.
> - Save it from Emacs
>
> In vc-before-save, the file cache is cleared 'cause the file doesn't
> exist any longer. As you said, vc-backend is called afterwards,
> recomputing some of the properties. The file shows the correct modeline,
> "Git:master".

If you just removed it on disk, without committing the change, doing 
(vc-state-refresh) would correctly recompute its status as 'removed even 
without calling (vc-registered).
That's not the status we have a problem with ('unregistered is).

> 2nd scenario:
>
> - Switch to another branch ("git checkout test")
> - Remove the file on disk, outside Emacs.
> - Save it from Emacs
>
> And now the modeline shows "Git:test", as expected.

Was the file absent in the branch test after checkout? If not, this case 
is no different from the first.
Basically, we need a scenario in which `vc-next-action' will need to 
call `vc-git-register' on a file that recently has been considered 
'up-to-date.

>> So from this standpoint, saving and restoring 'vc-backend value around
>> clearing props in `vc-before-save' might indeed be the best solution.
>
> I believe, we even don't need this. The current code DTRT, and clearing
> the properties happens only when the file has been removed.

I believe we can either not call 'vc-git-registered' from `vc-git-state' 
at all (caching 'git-registered is not needed in this case), or we 
should fix some scenario which benefits from us doing that.

The logic is rather complicated there, so I might easily be missing some 
examples. If so, please tell.

-- Dmitry

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Michael Albinus]

Dmitry Gutov <dgutov@yandex.ru> writes:

> Was the file absent in the branch test after checkout? If not, this
> case is no different from the first.
> Basically, we need a scenario in which `vc-next-action' will need to
> call `vc-git-register' on a file that recently has been considered
> up-to-date.

If we assume, any command outside Emacs can happen which invalidates the
cached status of a file, we must clear all caches and recompute all
files state when vc-next-action is called. To the given cost.

In Tramp, I have similar problems with stale caches. Finally, I've added
timestamps to every cached value, and I use cheap tests to check whether
the cache is out of date. No idea, whether we want go this direction in
vc, too.

If we assume that there are no dangerous vc commands outside Emacs, we
wouldn't have a problem.

> The logic is rather complicated there, so I might easily be missing
> some examples.

Yes. I don't know, whether we will be able to handle any surprise when
using caches. There will always be a scenario which lets fail a given
algorithm. I fear.

> -- Dmitry

Best regards, Michael.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

On 04.07.2012 19:10, Michael Albinus wrote:
>> Was the file absent in the branch test after checkout? If not, this
>> case is no different from the first.
>> Basically, we need a scenario in which `vc-next-action' will need to
>> call `vc-git-register' on a file that recently has been considered
>> up-to-date.
>
> If we assume, any command outside Emacs can happen which invalidates the
> cached status of a file, we must clear all caches and recompute all
> files state when vc-next-action is called. To the given cost.

I'd have no problem with this, actually - this function is called 
considerably less often than `find-file' or `save-buffer'.

> In Tramp, I have similar problems with stale caches. Finally, I've added
> timestamps to every cached value, and I use cheap tests to check whether
> the cache is out of date. No idea, whether we want go this direction in
> vc, too.

Can't commend on that.

> If we assume that there are no dangerous vc commands outside Emacs, we
> wouldn't have a problem.

In this case, the behavior of the first patch I posted here should be 
acceptable, right? It's simpler, has pretty much the same effect, and 
should be a tiny bit faster.

>> The logic is rather complicated there, so I might easily be missing
>> some examples.
>
> Yes. I don't know, whether we will be able to handle any surprise when
> using caches. There will always be a scenario which lets fail a given
> algorithm. I fear.

Sure, but I'm just asking for one scenario that works better with 
explicitly caching 'git-registered, instead of not calling it in 
`vc-git-state'.
If `vc-git-state' doesn't call `vc-git-registered' (just assumes it's 
t), then `vc-registered' is the latter's only client, and so its return 
value is implicitly cached in 'vc-backend property.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Michael Albinus]

Dmitry Gutov <dgutov@yandex.ru> writes:

>> If we assume that there are no dangerous vc commands outside Emacs, we
>> wouldn't have a problem.
>
> In this case, the behavior of the first patch I posted here should be
> acceptable, right? It's simpler, has pretty much the same effect, and
> should be a tiny bit faster.

That I don't know. Both patches do almost what we expect, and having a
cached value for `vc-registered' sounds more performant when applied
often enough.

>> Yes. I don't know, whether we will be able to handle any surprise when
>> using caches. There will always be a scenario which lets fail a given
>> algorithm. I fear.
>
> Sure, but I'm just asking for one scenario that works better with
> explicitly caching 'git-registered, instead of not calling it in
> vc-git-state'.
> If `vc-git-state' doesn't call `vc-git-registered' (just assumes it's
> t), then `vc-registered' is the latter's only client, and so its
> return value is implicitly cached in 'vc-backend property.

Maybe. Could you show a patch? (Please with ChangeLog entry, I would
commit if it looks good).

Best regards, Michael.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

[-- Attachment #1: Type: text/plain, Size: 1611 bytes --]

On 06.07.2012 17:44, Michael Albinus wrote:
> Dmitry Gutov <dgutov@yandex.ru> writes:
>
>>> If we assume that there are no dangerous vc commands outside Emacs, we
>>> wouldn't have a problem.
>>
>> In this case, the behavior of the first patch I posted here should be
>> acceptable, right? It's simpler, has pretty much the same effect, and
>> should be a tiny bit faster.
>
> That I don't know. Both patches do almost what we expect, and having a
> cached value for `vc-registered' sounds more performant when applied
> often enough.

With the attached patch, `vc-git-registered' is usually called only once 
during the lifetime of a buffer.

For caching to be an improvement, 'git-registered value has to be 
invalidated separately from 'vc-backend, yet less often than 
`vc-git-state' is called.

>>> Yes. I don't know, whether we will be able to handle any surprise when
>>> using caches. There will always be a scenario which lets fail a given
>>> algorithm. I fear.
>>
>> Sure, but I'm just asking for one scenario that works better with
>> explicitly caching 'git-registered, instead of not calling it in
>> vc-git-state'.
>> If `vc-git-state' doesn't call `vc-git-registered' (just assumes it's
>> t), then `vc-registered' is the latter's only client, and so its
>> return value is implicitly cached in 'vc-backend property.
>
> Maybe. Could you show a patch? (Please with ChangeLog entry, I would
> commit if it looks good).

* vc-git.el (vc-git-state): Don't call `vc-git-registered', assume it's 
always t.
(vc-git-registered): Remove caching, the function is only called once.

Thank you,

--Dmitry

[-- Attachment #2: vc-git-registered.diff --]
[-- Type: text/plain, Size: 4717 bytes --]

diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el
index 8b48efb..f585f1b 100644
--- a/lisp/vc/vc-git.el
+++ b/lisp/vc/vc-git.el
@@ -173,31 +173,28 @@ matching the resulting Git log output, and KEYWORDS is a list of
 
 (defun vc-git-registered (file)
   "Check whether FILE is registered with git."
-  (or (vc-file-getprop file 'git-registered)
-      (vc-file-setprop
-       file 'git-registered
-       (let ((dir (vc-git-root file)))
-	 (when dir
-	   (with-temp-buffer
-	     (let* (process-file-side-effects
-		    ;; Do not use the `file-name-directory' here: git-ls-files
-		    ;; sometimes fails to return the correct status for relative
-		    ;; path specs.
-		    ;; See also: http://marc.info/?l=git&m=125787684318129&w=2
-		    (name (file-relative-name file dir))
-		    (str (ignore-errors
-			   (cd dir)
-			   (vc-git--out-ok "ls-files" "-c" "-z" "--" name)
-			   ;; If result is empty, use ls-tree to check for deleted
-			   ;; file.
-			   (when (eq (point-min) (point-max))
-			     (vc-git--out-ok "ls-tree" "--name-only" "-z" "HEAD"
-					     "--" name))
-			   (buffer-string))))
-	       (and str
-		    (> (length str) (length name))
-		    (string= (substring str 0 (1+ (length name)))
-			     (concat name "\0"))))))))))
+  (let ((dir (vc-git-root file)))
+    (when dir
+      (with-temp-buffer
+        (let* (process-file-side-effects
+               ;; Do not use the `file-name-directory' here: git-ls-files
+               ;; sometimes fails to return the correct status for relative
+               ;; path specs.
+               ;; See also: http://marc.info/?l=git&m=125787684318129&w=2
+               (name (file-relative-name file dir))
+               (str (ignore-errors
+                      (cd dir)
+                      (vc-git--out-ok "ls-files" "-c" "-z" "--" name)
+                      ;; If result is empty, use ls-tree to check for deleted
+                      ;; file.
+                      (when (eq (point-min) (point-max))
+                        (vc-git--out-ok "ls-tree" "--name-only" "-z" "HEAD"
+                                        "--" name))
+                      (buffer-string))))
+          (and str
+               (> (length str) (length name))
+               (string= (substring str 0 (1+ (length name)))
+                        (concat name "\0"))))))))
 
 (defun vc-git--state-code (code)
   "Convert from a string to a added/deleted/modified state."
@@ -218,23 +215,24 @@ matching the resulting Git log output, and KEYWORDS is a list of
   ;; is direct ancestor of corresponding upstream branch, and the file
   ;; was modified upstream.  But we can't check that without a network
   ;; operation.
-  (if (not (vc-git-registered file))
-      'unregistered
-    (let ((diff (vc-git--run-command-string
-                 file "diff-index" "-p" "--raw" "-z" "HEAD" "--")))
-      (if (and diff
-	       (string-match ":[0-7]\\{6\\} [0-7]\\{6\\} [0-9a-f]\\{40\\} [0-9a-f]\\{40\\} \\([ADMUT]\\)\0[^\0]+\0\\(.*\n.\\)?"
-			     diff))
-          (let ((diff-letter (match-string 1 diff)))
-            (if (not (match-beginning 2))
-                ;; Empty diff: file contents is the same as the HEAD
-                ;; revision, but timestamps are different (eg, file
-                ;; was "touch"ed).  Update timestamp in index:
-                (prog1 'up-to-date
-                  (vc-git--call nil "add" "--refresh" "--"
-                                (file-relative-name file)))
-              (vc-git--state-code diff-letter)))
-	(if (vc-git--empty-db-p) 'added 'up-to-date)))))
+  ;; This assumes that status is known to be not `unregistered' because
+  ;; we've been successfully dispatched here from `vc-state', that
+  ;; means `vc-git-registered' returned t earlier once.  Bug#11757
+  (let ((diff (vc-git--run-command-string
+               file "diff-index" "-p" "--raw" "-z" "HEAD" "--")))
+    (if (and diff
+             (string-match ":[0-7]\\{6\\} [0-7]\\{6\\} [0-9a-f]\\{40\\} [0-9a-f]\\{40\\} \\([ADMUT]\\)\0[^\0]+\0\\(.*\n.\\)?"
+                           diff))
+        (let ((diff-letter (match-string 1 diff)))
+          (if (not (match-beginning 2))
+              ;; Empty diff: file contents is the same as the HEAD
+              ;; revision, but timestamps are different (eg, file
+              ;; was "touch"ed).  Update timestamp in index:
+              (prog1 'up-to-date
+                (vc-git--call nil "add" "--refresh" "--"
+                              (file-relative-name file)))
+            (vc-git--state-code diff-letter)))
+      (if (vc-git--empty-db-p) 'added 'up-to-date))))
 
 (defun vc-git-working-revision (_file)
   "Git-specific version of `vc-working-revision'."

bug#11757: Fwd: bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Michael Albinus]

[-- Attachment #1: Type: text/plain, Size: 41 bytes --]

Forwarded to debbugs, for the archives.


[-- Attachment #2: Type: message/rfc822, Size: 489005 bytes --]

[-- Attachment #2.1.1: Type: text/plain, Size: 3323 bytes --]

On 17.07.2012 11:20, Michael Albinus wrote:
> (*): There seems to be at least one `call-process' call in vc-git.el,
> which I regard as an error. Maybe you could correct this in your patch,
> too.

Added to the patch, as well as the ChangeLog entries.

> I haven't prepared test cases yet. The basic idea is to have a (test)
> file under git, and to apply some default scenarios with it. Not just
> open, edit, save, commit (that might be the most simple scenario), but
> something which reflects the usual workflow better. Escpecially,

The above is my usual workflow, actually, when repeated several times.

> keeping the file opened in an Emacs buffer, during several workflow
> cycles - this would give cached values the possibility to show their
> power (or not).

Since I have a clear picture in my mind why this wouldn't make a 
difference (for one, there's no time-based expiration), I'm having a 
hard time choosing a meaningful longer scenario.

So I'm just doing one scenario now. If you write a different one, I can 
do that next.

Scenario:
1. git init test (outside of Emacs)
2. find-file in this directory (creating the new file)
3. edit, save, `vc-next-action' (registering the new file)
4. repeat step 3 (makes first commit)
5. repeat step 4 (makes second commit)
6. `vc-rename-file'
7. `vc-next-action' (commit)
8. `vc-delete-file'

(This automatically closes the buffer and leaves the repo with 2 files 
removed from the disk and staged for deletion.)

> As we both agree, calling processes is the most time consuming
> action. We might concentrate on counting the number of process calls,
> the other Lisp-based actions are negligible. I would trace all vc-*
> function calls, and `process-file' (*), like this:
>
> (require 'trace)
> (dolist (elt (all-completions "vc-" obarray 'functionp))
>    (trace-function-background (intern elt)))
> (trace-function-background 'process-file)
>
> This returns also two different trace buffers, which could be compared
> by ediff easily, in order to see how vc behaves.

Done this twice, logs 1 and 3 - without the patch, 2 and 4 - with the 
patch. 1 ~ 3 and 2 ~ 4, so you may just as well compare only one pair.

The difference: a few getprop/setprop calls, and one full uncached 
`vc-git-registered' call in `vc-register' (after "git add" was called), 
all in favor of the patched version (which doesn't make the above calls).
The last one is interesting, because it shows that `vc-register' doesn't 
require `vc-git-registered' to return `t' before it assigns Git backend 
to the buffer.
So at the same point where the unpatched code calls `vc-git-registered' 
and it finally returns true, the patched code just assumes it's true, 
and doesn't call the function. :) A bit risky, but not wrong, at least 
in this case.

This would have been different if the file existed and was registered in 
the repository before step 2, then the first call to `vc-git-registered' 
would have returned `t' in both versions.

P.S. `ediff' says there are no differences after around 43% mark, but 
there are. For example, line 1021 in trace-3.log shows a call to 
`vc-git-registered', whereas the respective line 979 in trace-4.log 
shows that the call is skipped.
Same with `diff' in the console, it ignores these changes, no idea why. 
Maybe I just fail at diffing.

--Dmitry

[-- Attachment #2.1.2: vc-git.diff --]
[-- Type: text/plain, Size: 5595 bytes --]

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3ac7b2e..45c49c4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2012-07-18  Dmitry Gutov  <dgutov@yandex.ru>
+
+	* vc/vc-git.el (vc-git-state): Don't call `vc-git-registered',
+	assume it's always t.
+	(vc-git-registered): Remove caching, the function is only called
+	once.
+	(vc-git-branches): Use `vc-git--call' instead of `call-process'.
+
 2012-07-14  Dmitry Gutov  <dgutov@yandex.ru>
 
 	* progmodes/ruby-mode.el (ruby-parse-partial): No error when end
diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el
index 4dbc9ea..700adf1 100644
--- a/lisp/vc/vc-git.el
+++ b/lisp/vc/vc-git.el
@@ -173,31 +173,28 @@ matching the resulting Git log output, and KEYWORDS is a list of
 
 (defun vc-git-registered (file)
   "Check whether FILE is registered with git."
-  (or (vc-file-getprop file 'git-registered)
-      (vc-file-setprop
-       file 'git-registered
-       (let ((dir (vc-git-root file)))
-	 (when dir
-	   (with-temp-buffer
-	     (let* (process-file-side-effects
-		    ;; Do not use the `file-name-directory' here: git-ls-files
-		    ;; sometimes fails to return the correct status for relative
-		    ;; path specs.
-		    ;; See also: http://marc.info/?l=git&m=125787684318129&w=2
-		    (name (file-relative-name file dir))
-		    (str (ignore-errors
-			   (cd dir)
-			   (vc-git--out-ok "ls-files" "-c" "-z" "--" name)
-			   ;; If result is empty, use ls-tree to check for deleted
-			   ;; file.
-			   (when (eq (point-min) (point-max))
-			     (vc-git--out-ok "ls-tree" "--name-only" "-z" "HEAD"
-					     "--" name))
-			   (buffer-string))))
-	       (and str
-		    (> (length str) (length name))
-		    (string= (substring str 0 (1+ (length name)))
-			     (concat name "\0"))))))))))
+  (let ((dir (vc-git-root file)))
+    (when dir
+      (with-temp-buffer
+        (let* (process-file-side-effects
+               ;; Do not use the `file-name-directory' here: git-ls-files
+               ;; sometimes fails to return the correct status for relative
+               ;; path specs.
+               ;; See also: http://marc.info/?l=git&m=125787684318129&w=2
+               (name (file-relative-name file dir))
+               (str (ignore-errors
+                      (cd dir)
+                      (vc-git--out-ok "ls-files" "-c" "-z" "--" name)
+                      ;; If result is empty, use ls-tree to check for deleted
+                      ;; file.
+                      (when (eq (point-min) (point-max))
+                        (vc-git--out-ok "ls-tree" "--name-only" "-z" "HEAD"
+                                        "--" name))
+                      (buffer-string))))
+          (and str
+               (> (length str) (length name))
+               (string= (substring str 0 (1+ (length name)))
+                        (concat name "\0"))))))))
 
 (defun vc-git--state-code (code)
   "Convert from a string to a added/deleted/modified state."
@@ -218,23 +215,24 @@ matching the resulting Git log output, and KEYWORDS is a list of
   ;; is direct ancestor of corresponding upstream branch, and the file
   ;; was modified upstream.  But we can't check that without a network
   ;; operation.
-  (if (not (vc-git-registered file))
-      'unregistered
-    (let ((diff (vc-git--run-command-string
-                 file "diff-index" "-p" "--raw" "-z" "HEAD" "--")))
-      (if (and diff
-	       (string-match ":[0-7]\\{6\\} [0-7]\\{6\\} [0-9a-f]\\{40\\} [0-9a-f]\\{40\\} \\([ADMUT]\\)\0[^\0]+\0\\(.*\n.\\)?"
-			     diff))
-          (let ((diff-letter (match-string 1 diff)))
-            (if (not (match-beginning 2))
-                ;; Empty diff: file contents is the same as the HEAD
-                ;; revision, but timestamps are different (eg, file
-                ;; was "touch"ed).  Update timestamp in index:
-                (prog1 'up-to-date
-                  (vc-git--call nil "add" "--refresh" "--"
-                                (file-relative-name file)))
-              (vc-git--state-code diff-letter)))
-	(if (vc-git--empty-db-p) 'added 'up-to-date)))))
+  ;; This assumes that status is known to be not `unregistered' because
+  ;; we've been successfully dispatched here from `vc-state', that
+  ;; means `vc-git-registered' returned t earlier once.  Bug#11757
+  (let ((diff (vc-git--run-command-string
+               file "diff-index" "-p" "--raw" "-z" "HEAD" "--")))
+    (if (and diff
+             (string-match ":[0-7]\\{6\\} [0-7]\\{6\\} [0-9a-f]\\{40\\} [0-9a-f]\\{40\\} \\([ADMUT]\\)\0[^\0]+\0\\(.*\n.\\)?"
+                           diff))
+        (let ((diff-letter (match-string 1 diff)))
+          (if (not (match-beginning 2))
+              ;; Empty diff: file contents is the same as the HEAD
+              ;; revision, but timestamps are different (eg, file
+              ;; was "touch"ed).  Update timestamp in index:
+              (prog1 'up-to-date
+                (vc-git--call nil "add" "--refresh" "--"
+                              (file-relative-name file)))
+            (vc-git--state-code diff-letter)))
+      (if (vc-git--empty-db-p) 'added 'up-to-date))))
 
 (defun vc-git-working-revision (_file)
   "Git-specific version of `vc-working-revision'."
@@ -576,7 +574,7 @@ or an empty string if none."
   "Return the existing branches, as a list of strings.
 The car of the list is the current branch."
   (with-temp-buffer
-    (call-process vc-git-program nil t nil "branch")
+    (vc-git--call t "branch")
     (goto-char (point-min))
     (let (current-branch branches)
       (while (not (eobp))

[-- Attachment #2.1.3: trace-1.log --]
[-- Type: text/plain, Size: 115452 bytes --]

======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-find-file-hook: 
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=RCS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=RCS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-rcs-registered
| | | | 5 <- vc-find-backend-function: vc-rcs-registered
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=CVS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=CVS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-cvs-registered
| | | | 5 <- vc-find-backend-function: vc-cvs-registered
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SVN fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=SVN sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-svn-registered
| | | | 5 <- vc-find-backend-function: vc-svn-registered
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SCCS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=SCCS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-sccs-registered
| | | | 5 <- vc-find-backend-function: vc-sccs-registered
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Bzr fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Bzr sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-bzr-registered
| | | | 5 <- vc-find-backend-function: vc-bzr-registered
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Git fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Git sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-git-registered
| | | | 5 <- vc-find-backend-function: vc-git-registered
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered value=nil
| | | | | 6 <- vc-file-setprop: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Hg fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Hg sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-hg-registered
| | | | 5 <- vc-find-backend-function: vc-hg-registered
| | | | 5 -> vc-hg-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Mtn fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Mtn sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-mtn-registered
| | | | 5 <- vc-find-backend-function: vc-mtn-registered
| | | | 5 -> vc-mtn-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Arch fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Arch sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-arch-registered
| | | | 5 <- vc-find-backend-function: vc-arch-registered
| | | | 5 -> vc-arch-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| 2 <- vc-backend: nil
| 2 -> vc-backend: file-or-list="~/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="~/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="~/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="~/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="~/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="~/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="~/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="~/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="~/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="~/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="~/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="~/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="~/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="~/vc/test/README.txt" property=git-registered
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-git-root: file="~/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="~/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="~/vc/test/README.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="~/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | | 6 -> vc-file-setprop: file="~/vc/test/README.txt" property=git-registered value=nil
| | | | | 6 <- vc-file-setprop: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-hg-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="~/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="~/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-mtn-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-arch-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="~/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| 2 <- vc-backend: nil
1 <- vc-find-file-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-before-save: 
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered value=nil
| | | | | 6 <- vc-file-setprop: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-hg-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-mtn-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-arch-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| 2 <- vc-backend: nil
1 <- vc-before-save: nil
======================================================================
1 -> vc-after-save: 
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: none
| 2 <- vc-backend: nil
1 <- vc-after-save: nil
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: none
| | 3 <- vc-backend: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: none
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered value=nil
| | | | | 6 <- vc-file-setprop: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-hg-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-mtn-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-arch-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| | 3 -> vc-backend-for-registration: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=RCS fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=RCS sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-rcs-responsible-p
| | | | 5 <- vc-find-backend-function: vc-rcs-responsible-p
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=CVS fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=CVS sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-cvs-responsible-p
| | | | 5 <- vc-find-backend-function: vc-cvs-responsible-p
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SVN fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=SVN sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-svn-responsible-p
| | | | 5 <- vc-find-backend-function: vc-svn-responsible-p
| | | | 5 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | 5 <- vc-find-root: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SCCS fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=SCCS sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-sccs-responsible-p
| | | | 5 <- vc-find-backend-function: vc-sccs-responsible-p
| | | | 5 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | 5 <- vc-sccs-search-project-dir: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Bzr fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=Bzr sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-bzr-responsible-p
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-find-backend-function: vc-bzr-responsible-p
| | | | 5 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=bzr-root
| | | | 5 <- vc-file-getprop: nil
| | | | 5 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | 5 <- vc-find-root: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered value=nil
| | | | | 6 <- vc-file-setprop: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Git fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=Git sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-git-responsible-p
| | | | 5 <- vc-find-backend-function: vc-git-responsible-p
| | | | 5 -> vc-git-responsible-p: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | 5 <- vc-git-responsible-p: "~/vc/test/"
| | | 4 <- vc-call-backend: "~/vc/test/"
| | 3 <- vc-backend-for-registration: Git
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) unregistered nil)
| 2 -> vc-register: set-revision=nil vc-fileset=(Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) unregistered nil) comment=nil
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: none
| | 3 <- vc-backend: nil
| | 3 -> vc-buffer-sync: not-urgent=nil
| | 3 <- vc-buffer-sync: nil
| | 3 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| | 3 <- vc-file-clearprops: nil
| | 3 -> vc-call-backend: backend=Git function-name=init-revision args=nil
| | | 4 -> vc-find-backend-function: backend=Git fun=init-revision
| | | | 5 -> vc-make-backend-sym: backend=Git sym=init-revision
| | | | 5 <- vc-make-backend-sym: vc-git-init-revision
| | | | 5 -> vc-make-backend-sym: backend=default sym=init-revision
| | | | 5 <- vc-make-backend-sym: vc-default-init-revision
| | | 4 <- vc-find-backend-function: (vc-default-init-revision . Git)
| | | 4 -> vc-default-init-revision: backend=Git
| | | 4 <- vc-default-init-revision: "1.1"
| | 3 <- vc-call-backend: "1.1"
| | 3 -> vc-call-backend: backend=Git function-name=register args=(("c:/Users/gutov/vc/test/README.txt") "1.1" nil)
| | | 4 -> vc-find-backend-function: backend=Git fun=register
| | | | 5 -> vc-make-backend-sym: backend=Git sym=register
| | | | 5 <- vc-make-backend-sym: vc-git-register
| | | 4 <- vc-find-backend-function: vc-git-register
| | | 4 -> vc-git-register: files=("c:/Users/gutov/vc/test/README.txt") _rev="1.1" _comment=nil
| | | | 5 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("update-index" "--add" "--")
| | | | | 6 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("update-index" "--add" "--")
| | | | | | 7 -> vc-delistify: filelist=("update-index" "--add" "--")
| | | | | | 7 <- vc-delistify: "update-index --add --"
| | | | | | 7 -> vc-delistify: filelist=("README.txt")
| | | | | | 7 <- vc-delistify: "README.txt"
| | | | | | 7 -> vc-setup-buffer: buf="*vc*"
| | | | | | 7 <- vc-setup-buffer: nil
| | | | | | 7 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("update-index" "--add" "--" "README.txt")
| | | | | | 7 <- process-file: 0
| | | | | | 7 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt")) (quote ("update-index" "--add" "--" "README.txt")))
| | | | | | 7 <- vc-exec-after: nil
| | | | | 6 <- vc-do-command: 0
| | | | 5 <- vc-git-command: 0
| | | 4 <- vc-git-register: nil
| | 3 <- vc-call-backend: nil
| | 3 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=Git
| | 3 <- vc-file-setprop: Git
| | 3 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-resynch-window: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | | 5 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | | 6 -> vc-buffer-context: 
| | | | | | 7 -> vc-position-context: posn=7
| | | | | | 7 <- vc-position-context: (7 7 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-buffer-context: ((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-restore-buffer-context: context=((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | | | 7 -> vc-context-matches-p: posn=7 context=(7 7 #("
" 0 1 (fontified t)))
| | | | | | 7 <- vc-context-matches-p: t
| | | | | 6 <- vc-restore-buffer-context: nil
| | | | 5 <- vc-revert-buffer-internal: nil
| | | | 5 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | 6 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | 7 <- vc-file-getprop: Git
| | | | | 6 <- vc-backend: Git
| | | | | 6 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | 7 -> vc-find-backend-function: backend=Git fun=mode-line-string
| | | | | | | 8 -> vc-make-backend-sym: backend=Git sym=mode-line-string
| | | | | | | 8 <- vc-make-backend-sym: vc-git-mode-line-string
| | | | | | 7 <- vc-find-backend-function: vc-git-mode-line-string
| | | | | | 7 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: nil
| | | | | | | | 9 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | 10 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | | | | 10 <- vc-file-getprop: Git
| | | | | | | | 9 <- vc-backend: Git
| | | | | | | | 9 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | | 10 -> vc-find-backend-function: backend=Git fun=working-revision
| | | | | | | | | | 11 -> vc-make-backend-sym: backend=Git sym=working-revision
| | | | | | | | | | 11 <- vc-make-backend-sym: vc-git-working-revision
| | | | | | | | | 10 <- vc-find-backend-function: vc-git-working-revision
| | | | | | | | | 10 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | 11 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | | 13 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | | 13 <- process-file: 0
| | | | | | | | | | | 12 <- vc-git--call: 0
| | | | | | | | | | 11 <- vc-git--out-ok: t
| | | | | | | | | | 11 -> vc-kill-buffer-hook: 
| | | | | | | | | | 11 <- vc-kill-buffer-hook: nil
| | | | | | | | | 10 <- vc-git-working-revision: "master"
| | | | | | | | 9 <- vc-call-backend: "master"
| | | | | | | | 9 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision value="master"
| | | | | | | | 9 <- vc-file-setprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | | 8 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | 9 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | | 10 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | | | | 10 <- vc-file-getprop: nil
| | | | | | | | | 10 -> vc-state-refresh: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | | | 11 -> vc-call-backend: backend=Git function-name=state-heuristic args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | | | | 12 -> vc-find-backend-function: backend=Git fun=state-heuristic
| | | | | | | | | | | | 13 -> vc-make-backend-sym: backend=Git sym=state-heuristic
| | | | | | | | | | | | 13 <- vc-make-backend-sym: vc-git-state-heuristic
| | | | | | | | | | | | 13 -> vc-make-backend-sym: backend=default sym=state-heuristic
| | | | | | | | | | | | 13 <- vc-make-backend-sym: vc-default-state-heuristic
| | | | | | | | | | | 12 <- vc-find-backend-function: (vc-default-state-heuristic . Git)
| | | | | | | | | | | 12 -> vc-default-state-heuristic: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | | | 13 -> vc-call-backend: backend=Git function-name=state args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | | | | | | 14 -> vc-find-backend-function: backend=Git fun=state
| | | | | | | | | | | | | | 15 -> vc-make-backend-sym: backend=Git sym=state
| | | | | | | | | | | | | | 15 <- vc-make-backend-sym: vc-git-state
| | | | | | | | | | | | | 14 <- vc-find-backend-function: vc-git-state
| | | | | | | | | | | | | 14 -> vc-git-state: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | | | | | 15 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | | | | | | 16 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered
| | | | | | | | | | | | | | | 16 <- vc-file-getprop: nil
| | | | | | | | | | | | | | | 16 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | | | | | | | 17 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | | | | | | | | | | | 17 <- vc-file-getprop: nil
| | | | | | | | | | | | | | | | 17 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".git"
| | | | | | | | | | | | | | | | 17 <- vc-find-root: "~/vc/test/"
| | | | | | | | | | | | | | | | 17 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | | | | | | | | | | | 17 <- vc-file-setprop: "~/vc/test/"
| | | | | | | | | | | | | | | 16 <- vc-git-root: "~/vc/test/"
| | | | | | | | | | | | | | | 16 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | | | | | | | | | | 17 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | | | | | | | | | | | 18 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | | | | | | | | | | | 18 <- process-file: 0
| | | | | | | | | | | | | | | | 17 <- vc-git--call: 0
| | | | | | | | | | | | | | | 16 <- vc-git--out-ok: t
| | | | | | | | | | | | | | | 16 -> vc-kill-buffer-hook: 
| | | | | | | | | | | | | | | 16 <- vc-kill-buffer-hook: nil
| | | | | | | | | | | | | | | 16 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered value=t
| | | | | | | | | | | | | | | 16 <- vc-file-setprop: t
| | | | | | | | | | | | | | 15 <- vc-git-registered: t
| | | | | | | | | | | | | | 15 -> vc-git--run-command-string: file="c:/Users/gutov/vc/test/README.txt" args=("diff-index" "-p" "--raw" "-z" "HEAD" "--")
| | | | | | | | | | | | | | | 16 -> vc-git--out-ok: command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | | | | | | | | 17 -> vc-git--call: buffer=(t nil) command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | | | | | | | | | 18 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("diff-index" "-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | | | | | | | | | 18 <- process-file: 128
| | | | | | | | | | | | | | | | 17 <- vc-git--call: 128
| | | | | | | | | | | | | | | 16 <- vc-git--out-ok: nil
| | | | | | | | | | | | | | | 16 -> vc-kill-buffer-hook: 
| | | | | | | | | | | | | | | 16 <- vc-kill-buffer-hook: nil
| | | | | | | | | | | | | | 15 <- vc-git--run-command-string: nil
| | | | | | | | | | | | | | 15 -> vc-git--empty-db-p: 
| | | | | | | | | | | | | | | 16 -> vc-git--call: buffer=nil command="rev-parse" args=("--verify" "HEAD")
| | | | | | | | | | | | | | | | 17 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=nil display=nil args=("rev-parse" "--verify" "HEAD")
| | | | | | | | | | | | | | | | 17 <- process-file: 128
| | | | | | | | | | | | | | | 16 <- vc-git--call: 128
| | | | | | | | | | | | | | 15 <- vc-git--empty-db-p: t
| | | | | | | | | | | | | 14 <- vc-git-state: added
| | | | | | | | | | | | 13 <- vc-call-backend: added
| | | | | | | | | | | 12 <- vc-default-state-heuristic: added
| | | | | | | | | | 11 <- vc-call-backend: added
| | | | | | | | | | 11 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state value=added
| | | | | | | | | | 11 <- vc-file-setprop: added
| | | | | | | | | 10 <- vc-state-refresh: added
| | | | | | | | 9 <- vc-state: added
| | | | | | | | 9 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | | 10 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | | 10 <- vc-file-getprop: "master"
| | | | | | | | 9 <- vc-working-revision: "master"
| | | | | | | 8 <- vc-default-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system"))
| | | | | | 7 <- vc-git-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| | | | | 6 <- vc-call-backend: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-mode-line: Git
| | | 4 <- vc-resynch-window: nil
| | 3 <- vc-resynch-buffer: nil
| 2 <- vc-register: "Registering (c:/Users/gutov/vc/test/README.txt)... done"
1 <- vc-next-action: "Registering (c:/Users/gutov/vc/test/README.txt)... done"
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: Git
| | 3 <- vc-backend: Git
| | 3 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | 4 <- vc-file-getprop: added
| | 3 <- vc-state: added
| | 3 -> vc-checkout-model: backend=Git files="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-call-backend: backend=Git function-name=checkout-model args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Git fun=checkout-model
| | | | | 6 -> vc-make-backend-sym: backend=Git sym=checkout-model
| | | | | 6 <- vc-make-backend-sym: vc-git-checkout-model
| | | | 5 <- vc-find-backend-function: vc-git-checkout-model
| | | | 5 -> vc-git-checkout-model: _files="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-git-checkout-model: implicit
| | | 4 <- vc-call-backend: implicit
| | 3 <- vc-checkout-model: implicit
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) added implicit)
| 2 -> vc-compatible-state: p=added q=edited
| 2 <- vc-compatible-state: (edited added removed)
| 2 -> vc-checkin: files=("c:/Users/gutov/vc/test/README.txt") backend=Git rev=nil comment=nil initial-contents=nil
| | 3 -> vc-start-logentry: files=("c:/Users/gutov/vc/test/README.txt") comment=nil initial-contents=nil msg="Enter a change comment." logbuf="*vc-log*" mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] action=#[514 "\304\305\306.!\"\210\211\203.\0\307\310.\"\204.\0\311\262.\312C\313.\x1a\313\262.\x03\211\203^.\211@\314.!\203R.\315 \211\203N.\211@\316.!\211\203F.\317.\x02\"\203F.\211.\x06B\262.\210.A\266\202\202,.\210\202W.\211.B\262.\x01A\266\202\202.\0\210\320\300\321.\x06\301.\a%\210\322\323.\"\210\211\211\203\250.\211@\324\325\326\327.!8B\330BB\211\203\240.\211@\211@\211
>\204\230.\331\332.\v\".\x04A#\210\210.A\266\202\202\200.\210.A\266\202\202o.\210)\266.\304\333\306.!\"\207" [Git nil vc-touched-properties vc-file-prop-obarray message "Checking in %s..." vc-delistify string-match "[^	
 ]" "*** empty log message ***" t nil file-directory-p buffer-list buffer-file-name string-prefix-p vc-call-backend checkin mapc vc-delete-automatic-version-backups (vc-state . up-to-date) vc-checkout-time 5 file-attributes ((vc-working-revision)) put intern "Checking in %s...done"] 13 "

(fn FILES COMMENT)"] after-hook=vc-checkin-hook backend=Git
| | | 4 -> vc-dispatcher-browsing: 
| | | 4 <- vc-dispatcher-browsing: nil
| | | 4 -> vc-log-edit: fileset=("c:/Users/gutov/vc/test/README.txt") mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] backend=Git
| | | | 5 -> vc-call-backend: backend=Git function-name=log-edit-mode args=nil
| | | | | 6 -> vc-find-backend-function: backend=Git fun=log-edit-mode
| | | | | | 7 -> vc-make-backend-sym: backend=Git sym=log-edit-mode
| | | | | | 7 <- vc-make-backend-sym: vc-git-log-edit-mode
| | | | | | 7 -> vc-make-backend-sym: backend=default sym=log-edit-mode
| | | | | | 7 <- vc-make-backend-sym: vc-default-log-edit-mode
| | | | | 6 <- vc-find-backend-function: (vc-default-log-edit-mode . Git)
| | | | | 6 -> vc-default-log-edit-mode: backend=Git
| | | | | 6 <- vc-default-log-edit-mode: nil
| | | | 5 <- vc-call-backend: nil
| | | 4 <- vc-log-edit: nil
| | 3 <- vc-start-logentry: "Enter a change comment.  Type C-c C-c when done"
| 2 <- vc-checkin: "Enter a change comment.  Type C-c C-c when done"
1 <- vc-next-action: "Enter a change comment.  Type C-c C-c when done"
======================================================================
1 -> vc-finish-logentry: nocomment=nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
| 2 -> vc-buffer-sync: not-urgent=nil
| 2 <- vc-buffer-sync: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-call-backend: backend=Git function-name=checkin args=(("c:/Users/gutov/vc/test/README.txt") nil #("First commit
" 0 12 (fontified nil) 12 13 (fontified nil)))
| | 3 -> vc-find-backend-function: backend=Git fun=checkin
| | | 4 -> vc-make-backend-sym: backend=Git sym=checkin
| | | 4 <- vc-make-backend-sym: vc-git-checkin
| | 3 <- vc-find-backend-function: vc-git-checkin
| | 3 -> vc-git-checkin: files=("c:/Users/gutov/vc/test/README.txt") _rev=nil comment=#("First commit
" 0 12 (fontified nil) 12 13 (fontified nil))
| | | 4 -> vc-kill-buffer-hook: 
| | | 4 <- vc-kill-buffer-hook: nil
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("First commit
" 0 12 (fontified nil) 12 13 (fontified nil)) "--only" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("First commit
" 0 12 (fontified nil) 12 13 (fontified nil)) "--only" "--")
| | | | | 6 -> vc-delistify: filelist=("commit" "-m" #("First commit
" 0 12 (fontified nil) 12 13 (fontified nil)) "--only" "--")
| | | | | 6 <- vc-delistify: #("commit -m First commit
 --only --" 10 22 (fontified nil) 22 23 (fontified nil))
| | | | | 6 -> vc-delistify: filelist=("README.txt")
| | | | | 6 <- vc-delistify: "README.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("commit" "-m" #("First commit
" 0 12 (fontified nil) 12 13 (fontified nil)) "--only" "--" "README.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt")) (quote ("commit" "-m" #("First commit
" 0 12 (fontified nil) 12 13 (fontified nil)) "--only" "--" "README.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-checkin: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-delete-automatic-version-backups: file="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-version-backup-file-name: file="c:/Users/gutov/vc/test/README.txt" rev=nil manual=nil regexp=t
| | 3 <- vc-version-backup-file-name: "README\\.txt\\.~.+\\.~"
| 2 <- vc-delete-automatic-version-backups: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-kill-buffer-hook: 
| 2 <- vc-kill-buffer-hook: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | 5 -> vc-buffer-context: 
| | | | | 6 -> vc-position-context: posn=7
| | | | | 6 <- vc-position-context: (7 7 #("
" 0 1 (fontified t)))
| | | | 5 <- vc-buffer-context: ((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | 5 -> vc-restore-buffer-context: context=((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-context-matches-p: posn=7 context=(7 7 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-context-matches-p: t
| | | | 5 <- vc-restore-buffer-context: nil
| | | 4 <- vc-revert-buffer-internal: nil
| | | 4 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | 5 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | 6 <- vc-file-getprop: Git
| | | | 5 <- vc-backend: Git
| | | | 5 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | | | 6 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | 8 <- vc-file-getprop: nil
| | | | | | | 8 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | | | 9 <- vc-file-getprop: Git
| | | | | | | 8 <- vc-backend: Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | 9 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | 10 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | 11 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | 12 <- process-file: 0
| | | | | | | | | | 11 <- vc-git--call: 0
| | | | | | | | | 10 <- vc-git--out-ok: t
| | | | | | | | | 10 -> vc-kill-buffer-hook: 
| | | | | | | | | 10 <- vc-kill-buffer-hook: nil
| | | | | | | | 9 <- vc-git-working-revision: "master"
| | | | | | | 8 <- vc-call-backend: "master"
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision value="master"
| | | | | | | 8 <- vc-file-setprop: "master"
| | | | | | 7 <- vc-working-revision: "master"
| | | | | | 7 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | | | 9 <- vc-file-getprop: up-to-date
| | | | | | | 8 <- vc-state: up-to-date
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | 7 <- vc-default-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system"))
| | | | | 6 <- vc-git-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-call-backend: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | 4 <- vc-mode-line: Git
| | 3 <- vc-resynch-window: nil
| 2 <- vc-resynch-buffer: nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
1 <- vc-finish-logentry: nil
======================================================================
1 -> vc-before-save: 
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | 3 <- vc-file-getprop: up-to-date
| 2 <- vc-state: up-to-date
| 2 -> vc-checkout-model: backend=Git files=("c:/Users/gutov/vc/test/README.txt")
| | 3 -> vc-call-backend: backend=Git function-name=checkout-model args=(("c:/Users/gutov/vc/test/README.txt"))
| | | 4 -> vc-git-checkout-model: _files=("c:/Users/gutov/vc/test/README.txt")
| | | 4 <- vc-git-checkout-model: implicit
| | 3 <- vc-call-backend: implicit
| 2 <- vc-checkout-model: implicit
| 2 -> vc-call-backend: backend=Git function-name=make-version-backups-p args=("c:/Users/gutov/vc/test/README.txt")
| | 3 -> vc-find-backend-function: backend=Git fun=make-version-backups-p
| | | 4 -> vc-make-backend-sym: backend=Git sym=make-version-backups-p
| | | 4 <- vc-make-backend-sym: vc-git-make-version-backups-p
| | | 4 -> vc-make-backend-sym: backend=default sym=make-version-backups-p
| | | 4 <- vc-make-backend-sym: vc-default-make-version-backups-p
| | 3 <- vc-find-backend-function: (vc-default-make-version-backups-p . Git)
| | 3 -> vc-default-make-version-backups-p: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | 3 <- vc-default-make-version-backups-p: nil
| 2 <- vc-call-backend: nil
1 <- vc-before-save: nil
======================================================================
1 -> vc-after-save: 
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-checkout-time
| 2 <- vc-file-getprop: (20486 8502 0 0)
| 2 -> vc-checkout-model: backend=Git files=("c:/Users/gutov/vc/test/README.txt")
| | 3 -> vc-call-backend: backend=Git function-name=checkout-model args=(("c:/Users/gutov/vc/test/README.txt"))
| | | 4 -> vc-git-checkout-model: _files=("c:/Users/gutov/vc/test/README.txt")
| | | 4 <- vc-git-checkout-model: implicit
| | 3 <- vc-call-backend: implicit
| 2 <- vc-checkout-model: implicit
| 2 -> vc-state-refresh: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | 3 -> vc-call-backend: backend=Git function-name=state-heuristic args=("c:/Users/gutov/vc/test/README.txt")
| | | 4 -> vc-default-state-heuristic: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | 5 -> vc-call-backend: backend=Git function-name=state args=("c:/Users/gutov/vc/test/README.txt")
| | | | | 6 -> vc-git-state: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered
| | | | | | | 8 <- vc-file-getprop: t
| | | | | | 7 <- vc-git-registered: t
| | | | | | 7 -> vc-git--run-command-string: file="c:/Users/gutov/vc/test/README.txt" args=("diff-index" "-p" "--raw" "-z" "HEAD" "--")
| | | | | | | 8 -> vc-git--out-ok: command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | 9 -> vc-git--call: buffer=(t nil) command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | 10 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("diff-index" "-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | 10 <- process-file: 0
| | | | | | | | 9 <- vc-git--call: 0
| | | | | | | 8 <- vc-git--out-ok: t
| | | | | | | 8 -> vc-kill-buffer-hook: 
| | | | | | | 8 <- vc-kill-buffer-hook: nil
| | | | | | 7 <- vc-git--run-command-string: ":100644 100644 940a58c00bbf0caeb5369eccaaae0e55be775acf 0000000000000000000000000000000000000000 M.README.txt.\0diff --git a/README.txt b/README.txt
index 940a58c..3bf86b2 100644
--- a/README.txt
+++ b/README.txt
@@ -1 +1,3 @@
 Hello!
+
+Hello again!
"
| | | | | | 7 -> vc-git--state-code: code="M"
| | | | | | 7 <- vc-git--state-code: edited
| | | | | 6 <- vc-git-state: edited
| | | | 5 <- vc-call-backend: edited
| | | 4 <- vc-default-state-heuristic: edited
| | 3 <- vc-call-backend: edited
| | 3 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state value=edited
| | 3 <- vc-file-setprop: edited
| 2 <- vc-state-refresh: edited
| 2 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | 3 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | 4 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | 5 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | 6 <- vc-file-getprop: "master"
| | | | 5 <- vc-working-revision: "master"
| | | | 5 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | 7 <- vc-file-getprop: edited
| | | | | 6 <- vc-state: edited
| | | | | 6 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | 7 <- vc-file-getprop: "master"
| | | | | 6 <- vc-working-revision: "master"
| | | | 5 <- vc-default-mode-line-string: #("Git:master" 0 10 (help-echo "Locally modified file under the Git version control system"))
| | | 4 <- vc-git-mode-line-string: #("Git:master" 0 10 (help-echo "Locally modified file under the Git version control system
Current branch: master"))
| | 3 <- vc-call-backend: #("Git:master" 0 10 (help-echo "Locally modified file under the Git version control system
Current branch: master"))
| 2 <- vc-mode-line: Git
1 <- vc-after-save: nil
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: Git
| | 3 <- vc-backend: Git
| | 3 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | 4 <- vc-file-getprop: edited
| | 3 <- vc-state: edited
| | 3 -> vc-checkout-model: backend=Git files="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-call-backend: backend=Git function-name=checkout-model args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-checkout-model: _files="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-git-checkout-model: implicit
| | | 4 <- vc-call-backend: implicit
| | 3 <- vc-checkout-model: implicit
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) edited implicit)
| 2 -> vc-compatible-state: p=edited q=edited
| 2 <- vc-compatible-state: t
| 2 -> vc-checkin: files=("c:/Users/gutov/vc/test/README.txt") backend=Git rev=nil comment=nil initial-contents=nil
| | 3 -> vc-start-logentry: files=("c:/Users/gutov/vc/test/README.txt") comment=nil initial-contents=nil msg="Enter a change comment." logbuf="*vc-log*" mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] action=#[514 "\304\305\306.!\"\210\211\203.\0\307\310.\"\204.\0\311\262.\312C\313.\x1a\313\262.\x03\211\203^.\211@\314.!\203R.\315 \211\203N.\211@\316.!\211\203F.\317.\x02\"\203F.\211.\x06B\262.\210.A\266\202\202,.\210\202W.\211.B\262.\x01A\266\202\202.\0\210\320\300\321.\x06\301.\a%\210\322\323.\"\210\211\211\203\250.\211@\324\325\326\327.!8B\330BB\211\203\240.\211@\211@\211
>\204\230.\331\332.\v\".\x04A#\210\210.A\266\202\202\200.\210.A\266\202\202o.\210)\266.\304\333\306.!\"\207" [Git nil vc-touched-properties vc-file-prop-obarray message "Checking in %s..." vc-delistify string-match "[^	
 ]" "*** empty log message ***" t nil file-directory-p buffer-list buffer-file-name string-prefix-p vc-call-backend checkin mapc vc-delete-automatic-version-backups (vc-state . up-to-date) vc-checkout-time 5 file-attributes ((vc-working-revision)) put intern "Checking in %s...done"] 13 "

(fn FILES COMMENT)"] after-hook=vc-checkin-hook backend=Git
| | | 4 -> vc-dispatcher-browsing: 
| | | 4 <- vc-dispatcher-browsing: nil
| | | 4 -> vc-log-edit: fileset=("c:/Users/gutov/vc/test/README.txt") mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] backend=Git
| | | | 5 -> vc-call-backend: backend=Git function-name=log-edit-mode args=nil
| | | | | 6 -> vc-default-log-edit-mode: backend=Git
| | | | | 6 <- vc-default-log-edit-mode: nil
| | | | 5 <- vc-call-backend: nil
| | | 4 <- vc-log-edit: nil
| | 3 <- vc-start-logentry: "Enter a change comment.  Type C-c C-c when done"
| 2 <- vc-checkin: "Enter a change comment.  Type C-c C-c when done"
1 <- vc-next-action: "Enter a change comment.  Type C-c C-c when done"
======================================================================
1 -> vc-finish-logentry: nocomment=nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
| 2 -> vc-buffer-sync: not-urgent=nil
| 2 <- vc-buffer-sync: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-call-backend: backend=Git function-name=checkin args=(("c:/Users/gutov/vc/test/README.txt") nil #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)))
| | 3 -> vc-git-checkin: files=("c:/Users/gutov/vc/test/README.txt") _rev=nil comment=#("Second!
" 0 7 (fontified nil) 7 8 (fontified nil))
| | | 4 -> vc-kill-buffer-hook: 
| | | 4 <- vc-kill-buffer-hook: nil
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 -> vc-delistify: filelist=("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 <- vc-delistify: #("commit -m Second!
 --only --" 10 17 (fontified nil) 17 18 (fontified nil))
| | | | | 6 -> vc-delistify: filelist=("README.txt")
| | | | | 6 <- vc-delistify: "README.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "README.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt")) (quote ("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "README.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-checkin: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-delete-automatic-version-backups: file="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-version-backup-file-name: file="c:/Users/gutov/vc/test/README.txt" rev=nil manual=nil regexp=t
| | 3 <- vc-version-backup-file-name: "README\\.txt\\.~.+\\.~"
| 2 <- vc-delete-automatic-version-backups: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-kill-buffer-hook: 
| 2 <- vc-kill-buffer-hook: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | 5 -> vc-buffer-context: 
| | | | | 6 -> vc-position-context: posn=21
| | | | | 6 <- vc-position-context: (21 21 #("
" 0 1 (fontified t)))
| | | | 5 <- vc-buffer-context: ((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | 5 -> vc-restore-buffer-context: context=((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-context-matches-p: posn=21 context=(21 21 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-context-matches-p: t
| | | | 5 <- vc-restore-buffer-context: nil
| | | 4 <- vc-revert-buffer-internal: nil
| | | 4 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | 5 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | 6 <- vc-file-getprop: Git
| | | | 5 <- vc-backend: Git
| | | | 5 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | | | 6 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | 8 <- vc-file-getprop: nil
| | | | | | | 8 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | | | 9 <- vc-file-getprop: Git
| | | | | | | 8 <- vc-backend: Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | 9 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | 10 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | 11 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | 12 <- process-file: 0
| | | | | | | | | | 11 <- vc-git--call: 0
| | | | | | | | | 10 <- vc-git--out-ok: t
| | | | | | | | | 10 -> vc-kill-buffer-hook: 
| | | | | | | | | 10 <- vc-kill-buffer-hook: nil
| | | | | | | | 9 <- vc-git-working-revision: "master"
| | | | | | | 8 <- vc-call-backend: "master"
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision value="master"
| | | | | | | 8 <- vc-file-setprop: "master"
| | | | | | 7 <- vc-working-revision: "master"
| | | | | | 7 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | | | 9 <- vc-file-getprop: up-to-date
| | | | | | | 8 <- vc-state: up-to-date
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | 7 <- vc-default-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system"))
| | | | | 6 <- vc-git-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-call-backend: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | 4 <- vc-mode-line: Git
| | 3 <- vc-resynch-window: nil
| 2 <- vc-resynch-buffer: nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
1 <- vc-finish-logentry: nil
======================================================================
1 -> vc-menu-map-filter: orig-binding=vc-menu-map
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-call-backend: backend=Git function-name=extra-menu args=nil
| | 3 -> vc-find-backend-function: backend=Git fun=extra-menu
| | | 4 -> vc-make-backend-sym: backend=Git sym=extra-menu
| | | 4 <- vc-make-backend-sym: vc-git-extra-menu
| | 3 <- vc-find-backend-function: vc-git-extra-menu
| | 3 -> vc-git-extra-menu: 
| | 3 <- vc-git-extra-menu: (keymap (git-ss menu-item "Show Stash..." vc-git-stash-show :help "Show stash contents") (git-st menu-item "Create Stash..." vc-git-stash :help "Stash away changes") (git-sn menu-item "Stash a Snapshot" vc-git-stash-snapshot :help "Stash the current state of the tree and keep the current state") (git-grep menu-item "Git grep..." vc-git-grep :help "Run the `git grep' command"))
| 2 <- vc-call-backend: (keymap (git-ss menu-item "Show Stash..." vc-git-stash-show :help "Show stash contents") (git-st menu-item "Create Stash..." vc-git-stash :help "Stash away changes") (git-sn menu-item "Stash a Snapshot" vc-git-stash-snapshot :help "Stash the current state of the tree and keep the current state") (git-grep menu-item "Git grep..." vc-git-grep :help "Run the `git grep' command"))
1 <- vc-menu-map-filter: (keymap (vc-dir menu-item "VC Dir" vc-dir :help "Show the VC status of files in a directory") (vc-register menu-item "Register" vc-register :help "Register file set into a version control system") (vc-next-action menu-item "Check In/Out" vc-next-action :help "Do the next logical version control operation on the current fileset") (vc-update menu-item "Update to Latest Version" vc-update :help "Update the current fileset's files to their tip revisions") (vc-revert menu-item "Revert to Base Version" vc-revert :help "Revert working copies of the selected file set to their repository contents") (undo menu-item "Undo Last Check-In" vc-rollback :help "Remove the most recent changeset committed to the repository") (vc-insert-header menu-item "Insert Header" vc-insert-headers :help "Insert headers into a file for use with a version control system.
") (separator2 #1="--") (vc-print-root-log menu-item "Show Top of the Tree History " vc-print-root-log :help "List the change log for the current tree in a window") (vc-print-log menu-item "Show History" vc-print-log :help "List the change log of the current file set in a window") (vc-log-in menu-item "Show Incoming Log" vc-log-incoming :help "Show a log of changes that will be received with a pull operation") (vc-log-out menu-item "Show Outgoing Log" vc-log-outgoing :help "Show a log of changes that will be sent with a push operation") (vc-update-change-log menu-item "Update ChangeLog" vc-update-change-log :help "Find change log file and add entries from recent version control logs") (vc-root-diff menu-item "Compare Tree with Base Version" vc-root-diff :help "Compare current tree with the base version") (vc-diff menu-item "Compare with Base Version" vc-diff :help "Compare file set with the base version") (vc-revision-other-window menu-item "Show Other Version" vc-revision-other-window :help "Visit another version of the current file in another window") (vc-rename-file menu-item "Rename File" vc-rename-file :help "Rename file") (vc-annotate menu-item "Annotate" vc-annotate :help "Display the edit history of the current file using colors") (separator1 #1#) (vc-create-tag menu-item "Create Tag" vc-create-tag :help "Create version tag") (vc-retrieve-tag menu-item "Retrieve Tag" vc-retrieve-tag :help "Retrieve tagged version or branch") "Version Control" (ext-menu-separator #1#) keymap (git-ss menu-item "Show Stash..." vc-git-stash-show :help "Show stash contents") (git-st menu-item "Create Stash..." vc-git-stash :help "Stash away changes") (git-sn menu-item "Stash a Snapshot" vc-git-stash-snapshot :help "Stash the current state of the tree and keep the current state") (git-grep menu-item "Git grep..." vc-git-grep :help "Run the `git grep' command"))
======================================================================
1 -> vc-rename-file: old="c:/Users/gutov/vc/test/README.txt" new="c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | 3 <- vc-file-getprop: up-to-date
| 2 <- vc-state: up-to-date
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-call-backend: backend=Git function-name=rename-file args=("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt")
| | 3 -> vc-find-backend-function: backend=Git fun=rename-file
| | | 4 -> vc-make-backend-sym: backend=Git sym=rename-file
| | | 4 <- vc-make-backend-sym: vc-git-rename-file
| | 3 <- vc-find-backend-function: vc-git-rename-file
| | 3 -> vc-git-rename-file: old="c:/Users/gutov/vc/test/README.txt" new="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt") flags=("mv" "-f" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt") flags=("mv" "-f" "--")
| | | | | 6 -> vc-delistify: filelist=("mv" "-f" "--")
| | | | | 6 <- vc-delistify: "mv -f --"
| | | | | 6 -> vc-delistify: filelist=("README.txt" "TODO.txt")
| | | | | 6 <- vc-delistify: "README.txt TODO.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("mv" "-f" "--" "README.txt" "TODO.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt")) (quote ("mv" "-f" "--" "README.txt" "TODO.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-rename-file: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/TODO.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/TODO.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/TODO.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/TODO.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-find-backend-function: backend=CVS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=CVS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-cvs-registered
| | | | 5 <- vc-find-backend-function: vc-cvs-registered
| | | | 5 -> vc-cvs-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-find-backend-function: backend=SVN fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=SVN sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-svn-registered
| | | | 5 <- vc-find-backend-function: vc-svn-registered
| | | | 5 -> vc-svn-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/TODO.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/TODO.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.TODO.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.TODO.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-find-backend-function: backend=Bzr fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Bzr sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-bzr-registered
| | | | 5 <- vc-find-backend-function: vc-bzr-registered
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=bzr-root
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/TODO.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-registered
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/TODO.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "TODO.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "TODO.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "TODO.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-registered value=t
| | | | | 6 <- vc-file-setprop: t
| | | | 5 <- vc-git-registered: t
| | | 4 <- vc-call-backend: t
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend value=Git
| | | 4 <- vc-file-setprop: Git
| | 3 <- vc-registered: t
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-mode-line: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | 3 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/TODO.txt")
| | | 4 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | | | | 7 <- vc-file-getprop: Git
| | | | | 6 <- vc-backend: Git
| | | | | 6 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | 7 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | 8 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | 9 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | 10 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | 10 <- process-file: 0
| | | | | | | | 9 <- vc-git--call: 0
| | | | | | | 8 <- vc-git--out-ok: t
| | | | | | | 8 -> vc-kill-buffer-hook: 
| | | | | | | 8 <- vc-kill-buffer-hook: nil
| | | | | | 7 <- vc-git-working-revision: "master"
| | | | | 6 <- vc-call-backend: "master"
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision value="master"
| | | | | 6 <- vc-file-setprop: "master"
| | | | 5 <- vc-working-revision: "master"
| | | | 5 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-state-refresh: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=state-heuristic args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | | | 9 -> vc-default-state-heuristic: backend=Git file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | 10 -> vc-call-backend: backend=Git function-name=state args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | | | | | 11 -> vc-git-state: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | | | 12 -> vc-git-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | | | | 13 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-registered
| | | | | | | | | | | | 13 <- vc-file-getprop: t
| | | | | | | | | | | 12 <- vc-git-registered: t
| | | | | | | | | | | 12 -> vc-git--run-command-string: file="c:/Users/gutov/vc/test/TODO.txt" args=("diff-index" "-p" "--raw" "-z" "HEAD" "--")
| | | | | | | | | | | | 13 -> vc-git--out-ok: command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "TODO.txt")
| | | | | | | | | | | | | 14 -> vc-git--call: buffer=(t nil) command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "TODO.txt")
| | | | | | | | | | | | | | 15 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("diff-index" "-p" "--raw" "-z" "HEAD" "--" "TODO.txt")
| | | | | | | | | | | | | | 15 <- process-file: 0
| | | | | | | | | | | | | 14 <- vc-git--call: 0
| | | | | | | | | | | | 13 <- vc-git--out-ok: t
| | | | | | | | | | | | 13 -> vc-kill-buffer-hook: 
| | | | | | | | | | | | 13 <- vc-kill-buffer-hook: nil
| | | | | | | | | | | 12 <- vc-git--run-command-string: ":000000 100644 0000000000000000000000000000000000000000 3bf86b2c8f3178e4ce8aa4cf255c0d9e260b6c12 A.TODO.txt.\0diff --git a/TODO.txt b/TODO.txt
new file mode 100644
index 0000000..3bf86b2
--- /dev/null
+++ b/TODO.txt
@@ -0,0 +1,3 @@
+Hello!
+
+Hello again!
"
| | | | | | | | | | | 12 -> vc-git--state-code: code="A"
| | | | | | | | | | | 12 <- vc-git--state-code: added
| | | | | | | | | | 11 <- vc-git-state: added
| | | | | | | | | 10 <- vc-call-backend: added
| | | | | | | | 9 <- vc-default-state-heuristic: added
| | | | | | | 8 <- vc-call-backend: added
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state value=added
| | | | | | | 8 <- vc-file-setprop: added
| | | | | | 7 <- vc-state-refresh: added
| | | | | 6 <- vc-state: added
| | | | | 6 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | | 7 <- vc-file-getprop: "master"
| | | | | 6 <- vc-working-revision: "master"
| | | | 5 <- vc-default-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system"))
| | | 4 <- vc-git-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| | 3 <- vc-call-backend: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| 2 <- vc-mode-line: Git
1 <- vc-rename-file: nil
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | 4 <- vc-file-getprop: Git
| | 3 <- vc-backend: Git
| | 3 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | | 4 <- vc-file-getprop: added
| | 3 <- vc-state: added
| | 3 -> vc-checkout-model: backend=Git files="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-call-backend: backend=Git function-name=checkout-model args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-git-checkout-model: _files="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 <- vc-git-checkout-model: implicit
| | | 4 <- vc-call-backend: implicit
| | 3 <- vc-checkout-model: implicit
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/TODO.txt") (#1#) added implicit)
| 2 -> vc-compatible-state: p=added q=edited
| 2 <- vc-compatible-state: (edited added removed)
| 2 -> vc-checkin: files=("c:/Users/gutov/vc/test/TODO.txt") backend=Git rev=nil comment=nil initial-contents=nil
| | 3 -> vc-start-logentry: files=("c:/Users/gutov/vc/test/TODO.txt") comment=nil initial-contents=nil msg="Enter a change comment." logbuf="*vc-log*" mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] action=#[514 "\304\305\306.!\"\210\211\203.\0\307\310.\"\204.\0\311\262.\312C\313.\x1a\313\262.\x03\211\203^.\211@\314.!\203R.\315 \211\203N.\211@\316.!\211\203F.\317.\x02\"\203F.\211.\x06B\262.\210.A\266\202\202,.\210\202W.\211.B\262.\x01A\266\202\202.\0\210\320\300\321.\x06\301.\a%\210\322\323.\"\210\211\211\203\250.\211@\324\325\326\327.!8B\330BB\211\203\240.\211@\211@\211
>\204\230.\331\332.\v\".\x04A#\210\210.A\266\202\202\200.\210.A\266\202\202o.\210)\266.\304\333\306.!\"\207" [Git nil vc-touched-properties vc-file-prop-obarray message "Checking in %s..." vc-delistify string-match "[^	
 ]" "*** empty log message ***" t nil file-directory-p buffer-list buffer-file-name string-prefix-p vc-call-backend checkin mapc vc-delete-automatic-version-backups (vc-state . up-to-date) vc-checkout-time 5 file-attributes ((vc-working-revision)) put intern "Checking in %s...done"] 13 "

(fn FILES COMMENT)"] after-hook=vc-checkin-hook backend=Git
| | | 4 -> vc-dispatcher-browsing: 
| | | 4 <- vc-dispatcher-browsing: nil
| | | 4 -> vc-log-edit: fileset=("c:/Users/gutov/vc/test/TODO.txt") mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] backend=Git
| | | | 5 -> vc-call-backend: backend=Git function-name=log-edit-mode args=nil
| | | | | 6 -> vc-default-log-edit-mode: backend=Git
| | | | | 6 <- vc-default-log-edit-mode: nil
| | | | 5 <- vc-call-backend: nil
| | | 4 <- vc-log-edit: nil
| | 3 <- vc-start-logentry: "Enter a change comment.  Type C-c C-c when done"
| 2 <- vc-checkin: "Enter a change comment.  Type C-c C-c when done"
1 <- vc-next-action: "Enter a change comment.  Type C-c C-c when done"
======================================================================
1 -> vc-finish-logentry: nocomment=nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
| 2 -> vc-buffer-sync: not-urgent=nil
| 2 <- vc-buffer-sync: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/TODO.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-call-backend: backend=Git function-name=checkin args=(("c:/Users/gutov/vc/test/TODO.txt") nil #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)))
| | 3 -> vc-git-checkin: files=("c:/Users/gutov/vc/test/TODO.txt") _rev=nil comment=#("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil))
| | | 4 -> vc-kill-buffer-hook: 
| | | 4 <- vc-kill-buffer-hook: nil
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/TODO.txt") flags=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/TODO.txt") flags=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 -> vc-delistify: filelist=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 <- vc-delistify: #("commit -m Renamed
 --only --" 10 17 (fontified nil) 17 18 (fontified nil))
| | | | | 6 -> vc-delistify: filelist=("TODO.txt")
| | | | | 6 <- vc-delistify: "TODO.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "TODO.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/TODO.txt")) (quote ("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "TODO.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-checkin: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-delete-automatic-version-backups: file="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-version-backup-file-name: file="c:/Users/gutov/vc/test/TODO.txt" rev=nil manual=nil regexp=t
| | 3 <- vc-version-backup-file-name: "TODO\\.txt\\.~.+\\.~"
| 2 <- vc-delete-automatic-version-backups: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/TODO.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-kill-buffer-hook: 
| 2 <- vc-kill-buffer-hook: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/TODO.txt" keep=t noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/TODO.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | 5 -> vc-buffer-context: 
| | | | | 6 -> vc-position-context: posn=22
| | | | | 6 <- vc-position-context: (22 21 "")
| | | | | 6 -> vc-position-context: posn=#<marker at 22 in TODO.txt>
| | | | | 6 <- vc-position-context: (#<marker at 22 in TODO.txt> 21 "")
| | | | 5 <- vc-buffer-context: ((22 21 #1="") (#<marker at 22 in TODO.txt> 21 #1#) nil)
| | | | 5 -> vc-restore-buffer-context: context=((22 21 #1="") (#<marker at 21 in TODO.txt> 21 #1#) nil)
| | | | | 6 -> vc-context-matches-p: posn=21 context=(22 21 "")
| | | | | 6 <- vc-context-matches-p: t
| | | | 5 <- vc-restore-buffer-context: nil
| | | 4 <- vc-revert-buffer-internal: nil
| | | 4 -> vc-mode-line: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | | 5 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | | | 6 <- vc-file-getprop: Git
| | | | 5 <- vc-backend: Git
| | | | 5 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | 6 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | | | 8 <- vc-file-getprop: nil
| | | | | | | 8 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | | | | | | 9 <- vc-file-getprop: Git
| | | | | | | 8 <- vc-backend: Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | | | 9 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | 10 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | 11 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | 12 <- process-file: 0
| | | | | | | | | | 11 <- vc-git--call: 0
| | | | | | | | | 10 <- vc-git--out-ok: t
| | | | | | | | | 10 -> vc-kill-buffer-hook: 
| | | | | | | | | 10 <- vc-kill-buffer-hook: nil
| | | | | | | | 9 <- vc-git-working-revision: "master"
| | | | | | | 8 <- vc-call-backend: "master"
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision value="master"
| | | | | | | 8 <- vc-file-setprop: "master"
| | | | | | 7 <- vc-working-revision: "master"
| | | | | | 7 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | 8 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | | | | | | | 9 <- vc-file-getprop: up-to-date
| | | | | | | 8 <- vc-state: up-to-date
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | 7 <- vc-default-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system"))
| | | | | 6 <- vc-git-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-call-backend: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | 4 <- vc-mode-line: Git
| | 3 <- vc-resynch-window: nil
| 2 <- vc-resynch-buffer: nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
1 <- vc-finish-logentry: nil
======================================================================
1 -> vc-delete-file: file="c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-find-backend-function: backend=Git fun=delete-file
| | 3 -> vc-make-backend-sym: backend=Git sym=delete-file
| | 3 <- vc-make-backend-sym: vc-git-delete-file
| 2 <- vc-find-backend-function: vc-git-delete-file
| 2 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | 3 <- vc-file-getprop: up-to-date
| 2 <- vc-state: up-to-date
| 2 -> vc-call-backend: backend=Git function-name=delete-file args=("c:/Users/gutov/vc/test/TODO.txt")
| | 3 -> vc-find-backend-function: backend=Git fun=delete-file
| | | 4 -> vc-make-backend-sym: backend=Git sym=delete-file
| | | 4 <- vc-make-backend-sym: vc-git-delete-file
| | 3 <- vc-find-backend-function: vc-git-delete-file
| | 3 -> vc-git-delete-file: file="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list="c:/Users/gutov/vc/test/TODO.txt" flags=("rm" "-f" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list="c:/Users/gutov/vc/test/TODO.txt" flags=("rm" "-f" "--")
| | | | | 6 -> vc-delistify: filelist=("rm" "-f" "--")
| | | | | 6 <- vc-delistify: "rm -f --"
| | | | | 6 -> vc-delistify: filelist=("TODO.txt")
| | | | | 6 <- vc-delistify: "TODO.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("rm" "-f" "--" "TODO.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote "c:/Users/gutov/vc/test/TODO.txt") (quote ("rm" "-f" "--" "TODO.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-delete-file: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/TODO.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/TODO.txt" keep=nil noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/TODO.txt" keep=nil noquery=t reset-vc-info=nil
| | | 4 -> vc-kill-buffer-hook: 
| | | | 5 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 <- vc-file-clearprops: nil
| | | 4 <- vc-kill-buffer-hook: nil
| | 3 <- vc-resynch-window: t
| 2 <- vc-resynch-buffer: nil
1 <- vc-delete-file: nil

[-- Attachment #2.1.4: trace-2.log --]
[-- Type: text/plain, Size: 111198 bytes --]

======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-find-file-hook: 
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=RCS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=RCS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-rcs-registered
| | | | 5 <- vc-find-backend-function: vc-rcs-registered
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=CVS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=CVS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-cvs-registered
| | | | 5 <- vc-find-backend-function: vc-cvs-registered
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SVN fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=SVN sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-svn-registered
| | | | 5 <- vc-find-backend-function: vc-svn-registered
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SCCS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=SCCS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-sccs-registered
| | | | 5 <- vc-find-backend-function: vc-sccs-registered
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Bzr fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Bzr sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-bzr-registered
| | | | 5 <- vc-find-backend-function: vc-bzr-registered
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Git fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Git sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-git-registered
| | | | 5 <- vc-find-backend-function: vc-git-registered
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Hg fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Hg sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-hg-registered
| | | | 5 <- vc-find-backend-function: vc-hg-registered
| | | | 5 -> vc-hg-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Mtn fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Mtn sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-mtn-registered
| | | | 5 <- vc-find-backend-function: vc-mtn-registered
| | | | 5 -> vc-mtn-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Arch fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Arch sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-arch-registered
| | | | 5 <- vc-find-backend-function: vc-arch-registered
| | | | 5 -> vc-arch-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| 2 <- vc-backend: nil
| 2 -> vc-backend: file-or-list="~/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="~/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="~/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="~/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="~/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="~/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="~/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="~/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="~/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="~/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="~/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="~/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="~/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="~/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="~/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="~/vc/test/README.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="~/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-hg-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="~/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="~/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-mtn-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-arch-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="~/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| 2 <- vc-backend: nil
1 <- vc-find-file-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-before-save: 
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-hg-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-mtn-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-arch-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| 2 <- vc-backend: nil
1 <- vc-before-save: nil
======================================================================
1 -> vc-after-save: 
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: none
| 2 <- vc-backend: nil
1 <- vc-after-save: nil
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: none
| | 3 <- vc-backend: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: none
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-hg-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-mtn-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-arch-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| | 3 -> vc-backend-for-registration: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=RCS fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=RCS sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-rcs-responsible-p
| | | | 5 <- vc-find-backend-function: vc-rcs-responsible-p
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=CVS fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=CVS sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-cvs-responsible-p
| | | | 5 <- vc-find-backend-function: vc-cvs-responsible-p
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SVN fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=SVN sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-svn-responsible-p
| | | | 5 <- vc-find-backend-function: vc-svn-responsible-p
| | | | 5 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | 5 <- vc-find-root: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SCCS fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=SCCS sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-sccs-responsible-p
| | | | 5 <- vc-find-backend-function: vc-sccs-responsible-p
| | | | 5 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | 5 <- vc-sccs-search-project-dir: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Bzr fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=Bzr sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-bzr-responsible-p
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-find-backend-function: vc-bzr-responsible-p
| | | | 5 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=bzr-root
| | | | 5 <- vc-file-getprop: nil
| | | | 5 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | 5 <- vc-find-root: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Git fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=Git sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-git-responsible-p
| | | | 5 <- vc-find-backend-function: vc-git-responsible-p
| | | | 5 -> vc-git-responsible-p: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | 5 <- vc-git-responsible-p: "~/vc/test/"
| | | 4 <- vc-call-backend: "~/vc/test/"
| | 3 <- vc-backend-for-registration: Git
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) unregistered nil)
| 2 -> vc-register: set-revision=nil vc-fileset=(Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) unregistered nil) comment=nil
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: none
| | 3 <- vc-backend: nil
| | 3 -> vc-buffer-sync: not-urgent=nil
| | 3 <- vc-buffer-sync: nil
| | 3 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| | 3 <- vc-file-clearprops: nil
| | 3 -> vc-call-backend: backend=Git function-name=init-revision args=nil
| | | 4 -> vc-find-backend-function: backend=Git fun=init-revision
| | | | 5 -> vc-make-backend-sym: backend=Git sym=init-revision
| | | | 5 <- vc-make-backend-sym: vc-git-init-revision
| | | | 5 -> vc-make-backend-sym: backend=default sym=init-revision
| | | | 5 <- vc-make-backend-sym: vc-default-init-revision
| | | 4 <- vc-find-backend-function: (vc-default-init-revision . Git)
| | | 4 -> vc-default-init-revision: backend=Git
| | | 4 <- vc-default-init-revision: "1.1"
| | 3 <- vc-call-backend: "1.1"
| | 3 -> vc-call-backend: backend=Git function-name=register args=(("c:/Users/gutov/vc/test/README.txt") "1.1" nil)
| | | 4 -> vc-find-backend-function: backend=Git fun=register
| | | | 5 -> vc-make-backend-sym: backend=Git sym=register
| | | | 5 <- vc-make-backend-sym: vc-git-register
| | | 4 <- vc-find-backend-function: vc-git-register
| | | 4 -> vc-git-register: files=("c:/Users/gutov/vc/test/README.txt") _rev="1.1" _comment=nil
| | | | 5 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("update-index" "--add" "--")
| | | | | 6 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("update-index" "--add" "--")
| | | | | | 7 -> vc-delistify: filelist=("update-index" "--add" "--")
| | | | | | 7 <- vc-delistify: "update-index --add --"
| | | | | | 7 -> vc-delistify: filelist=("README.txt")
| | | | | | 7 <- vc-delistify: "README.txt"
| | | | | | 7 -> vc-setup-buffer: buf="*vc*"
| | | | | | 7 <- vc-setup-buffer: nil
| | | | | | 7 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("update-index" "--add" "--" "README.txt")
| | | | | | 7 <- process-file: 0
| | | | | | 7 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt")) (quote ("update-index" "--add" "--" "README.txt")))
| | | | | | 7 <- vc-exec-after: nil
| | | | | 6 <- vc-do-command: 0
| | | | 5 <- vc-git-command: 0
| | | 4 <- vc-git-register: nil
| | 3 <- vc-call-backend: nil
| | 3 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=Git
| | 3 <- vc-file-setprop: Git
| | 3 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-resynch-window: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | | 5 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | | 6 -> vc-buffer-context: 
| | | | | | 7 -> vc-position-context: posn=7
| | | | | | 7 <- vc-position-context: (7 7 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-buffer-context: ((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-restore-buffer-context: context=((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | | | 7 -> vc-context-matches-p: posn=7 context=(7 7 #("
" 0 1 (fontified t)))
| | | | | | 7 <- vc-context-matches-p: t
| | | | | 6 <- vc-restore-buffer-context: nil

| | | | 5 <- vc-revert-buffer-internal: nil
| | | | 5 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | 6 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | 7 <- vc-file-getprop: Git
| | | | | 6 <- vc-backend: Git
| | | | | 6 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | 7 -> vc-find-backend-function: backend=Git fun=mode-line-string
| | | | | | | 8 -> vc-make-backend-sym: backend=Git sym=mode-line-string
| | | | | | | 8 <- vc-make-backend-sym: vc-git-mode-line-string
| | | | | | 7 <- vc-find-backend-function: vc-git-mode-line-string
| | | | | | 7 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: nil
| | | | | | | | 9 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | 10 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | | | | 10 <- vc-file-getprop: Git
| | | | | | | | 9 <- vc-backend: Git
| | | | | | | | 9 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | | 10 -> vc-find-backend-function: backend=Git fun=working-revision
| | | | | | | | | | 11 -> vc-make-backend-sym: backend=Git sym=working-revision
| | | | | | | | | | 11 <- vc-make-backend-sym: vc-git-working-revision
| | | | | | | | | 10 <- vc-find-backend-function: vc-git-working-revision
| | | | | | | | | 10 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | 11 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | | 13 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | | 13 <- process-file: 0
| | | | | | | | | | | 12 <- vc-git--call: 0
| | | | | | | | | | 11 <- vc-git--out-ok: t
| | | | | | | | | | 11 -> vc-kill-buffer-hook: 
| | | | | | | | | | 11 <- vc-kill-buffer-hook: nil
| | | | | | | | | 10 <- vc-git-working-revision: "master"
| | | | | | | | 9 <- vc-call-backend: "master"
| | | | | | | | 9 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision value="master"
| | | | | | | | 9 <- vc-file-setprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | | 8 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | 9 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | | 10 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | | | | 10 <- vc-file-getprop: nil
| | | | | | | | | 10 -> vc-state-refresh: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | | | 11 -> vc-call-backend: backend=Git function-name=state-heuristic args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | | | | 12 -> vc-find-backend-function: backend=Git fun=state-heuristic
| | | | | | | | | | | | 13 -> vc-make-backend-sym: backend=Git sym=state-heuristic
| | | | | | | | | | | | 13 <- vc-make-backend-sym: vc-git-state-heuristic
| | | | | | | | | | | | 13 -> vc-make-backend-sym: backend=default sym=state-heuristic
| | | | | | | | | | | | 13 <- vc-make-backend-sym: vc-default-state-heuristic
| | | | | | | | | | | 12 <- vc-find-backend-function: (vc-default-state-heuristic . Git)
| | | | | | | | | | | 12 -> vc-default-state-heuristic: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | | | 13 -> vc-call-backend: backend=Git function-name=state args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | | | | | | 14 -> vc-find-backend-function: backend=Git fun=state
| | | | | | | | | | | | | | 15 -> vc-make-backend-sym: backend=Git sym=state
| | | | | | | | | | | | | | 15 <- vc-make-backend-sym: vc-git-state
| | | | | | | | | | | | | 14 <- vc-find-backend-function: vc-git-state
| | | | | | | | | | | | | 14 -> vc-git-state: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | | | | | 15 -> vc-git--run-command-string: file="c:/Users/gutov/vc/test/README.txt" args=("diff-index" "-p" "--raw" "-z" "HEAD" "--")
| | | | | | | | | | | | | | | 16 -> vc-git--out-ok: command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | | | | | | | | 17 -> vc-git--call: buffer=(t nil) command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | | | | | | | | | 18 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("diff-index" "-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | | | | | | | | | 18 <- process-file: 128
| | | | | | | | | | | | | | | | 17 <- vc-git--call: 128
| | | | | | | | | | | | | | | 16 <- vc-git--out-ok: nil
| | | | | | | | | | | | | | | 16 -> vc-kill-buffer-hook: 
| | | | | | | | | | | | | | | 16 <- vc-kill-buffer-hook: nil
| | | | | | | | | | | | | | 15 <- vc-git--run-command-string: nil
| | | | | | | | | | | | | | 15 -> vc-git--empty-db-p: 
| | | | | | | | | | | | | | | 16 -> vc-git--call: buffer=nil command="rev-parse" args=("--verify" "HEAD")
| | | | | | | | | | | | | | | | 17 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=nil display=nil args=("rev-parse" "--verify" "HEAD")
| | | | | | | | | | | | | | | | 17 <- process-file: 128
| | | | | | | | | | | | | | | 16 <- vc-git--call: 128
| | | | | | | | | | | | | | 15 <- vc-git--empty-db-p: t
| | | | | | | | | | | | | 14 <- vc-git-state: added
| | | | | | | | | | | | 13 <- vc-call-backend: added
| | | | | | | | | | | 12 <- vc-default-state-heuristic: added
| | | | | | | | | | 11 <- vc-call-backend: added
| | | | | | | | | | 11 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state value=added
| | | | | | | | | | 11 <- vc-file-setprop: added
| | | | | | | | | 10 <- vc-state-refresh: added
| | | | | | | | 9 <- vc-state: added
| | | | | | | | 9 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | | 10 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | | 10 <- vc-file-getprop: "master"
| | | | | | | | 9 <- vc-working-revision: "master"
| | | | | | | 8 <- vc-default-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system"))
| | | | | | 7 <- vc-git-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| | | | | 6 <- vc-call-backend: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-mode-line: Git
| | | 4 <- vc-resynch-window: nil
| | 3 <- vc-resynch-buffer: nil
| 2 <- vc-register: "Registering (c:/Users/gutov/vc/test/README.txt)... done"
1 <- vc-next-action: "Registering (c:/Users/gutov/vc/test/README.txt)... done"
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: Git
| | 3 <- vc-backend: Git
| | 3 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | 4 <- vc-file-getprop: added
| | 3 <- vc-state: added
| | 3 -> vc-checkout-model: backend=Git files="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-call-backend: backend=Git function-name=checkout-model args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Git fun=checkout-model
| | | | | 6 -> vc-make-backend-sym: backend=Git sym=checkout-model
| | | | | 6 <- vc-make-backend-sym: vc-git-checkout-model
| | | | 5 <- vc-find-backend-function: vc-git-checkout-model
| | | | 5 -> vc-git-checkout-model: _files="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-git-checkout-model: implicit
| | | 4 <- vc-call-backend: implicit
| | 3 <- vc-checkout-model: implicit
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) added implicit)
| 2 -> vc-compatible-state: p=added q=edited
| 2 <- vc-compatible-state: (edited added removed)
| 2 -> vc-checkin: files=("c:/Users/gutov/vc/test/README.txt") backend=Git rev=nil comment=nil initial-contents=nil
| | 3 -> vc-start-logentry: files=("c:/Users/gutov/vc/test/README.txt") comment=nil initial-contents=nil msg="Enter a change comment." logbuf="*vc-log*" mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] action=#[514 "\304\305\306.!\"\210\211\203.\0\307\310.\"\204.\0\311\262.\312C\313.\x1a\313\262.\x03\211\203^.\211@\314.!\203R.\315 \211\203N.\211@\316.!\211\203F.\317.\x02\"\203F.\211.\x06B\262.\210.A\266\202\202,.\210\202W.\211.B\262.\x01A\266\202\202.\0\210\320\300\321.\x06\301.\a%\210\322\323.\"\210\211\211\203\250.\211@\324\325\326\327.!8B\330BB\211\203\240.\211@\211@\211
>\204\230.\331\332.\v\".\x04A#\210\210.A\266\202\202\200.\210.A\266\202\202o.\210)\266.\304\333\306.!\"\207" [Git nil vc-touched-properties vc-file-prop-obarray message "Checking in %s..." vc-delistify string-match "[^	
 ]" "*** empty log message ***" t nil file-directory-p buffer-list buffer-file-name string-prefix-p vc-call-backend checkin mapc vc-delete-automatic-version-backups (vc-state . up-to-date) vc-checkout-time 5 file-attributes ((vc-working-revision)) put intern "Checking in %s...done"] 13 "

(fn FILES COMMENT)"] after-hook=vc-checkin-hook backend=Git
| | | 4 -> vc-dispatcher-browsing: 
| | | 4 <- vc-dispatcher-browsing: nil
| | | 4 -> vc-log-edit: fileset=("c:/Users/gutov/vc/test/README.txt") mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] backend=Git
| | | | 5 -> vc-call-backend: backend=Git function-name=log-edit-mode args=nil
| | | | | 6 -> vc-find-backend-function: backend=Git fun=log-edit-mode
| | | | | | 7 -> vc-make-backend-sym: backend=Git sym=log-edit-mode
| | | | | | 7 <- vc-make-backend-sym: vc-git-log-edit-mode
| | | | | | 7 -> vc-make-backend-sym: backend=default sym=log-edit-mode
| | | | | | 7 <- vc-make-backend-sym: vc-default-log-edit-mode
| | | | | 6 <- vc-find-backend-function: (vc-default-log-edit-mode . Git)
| | | | | 6 -> vc-default-log-edit-mode: backend=Git
| | | | | 6 <- vc-default-log-edit-mode: nil
| | | | 5 <- vc-call-backend: nil
| | | 4 <- vc-log-edit: nil
| | 3 <- vc-start-logentry: "Enter a change comment.  Type C-c C-c when done"
| 2 <- vc-checkin: "Enter a change comment.  Type C-c C-c when done"
1 <- vc-next-action: "Enter a change comment.  Type C-c C-c when done"
======================================================================
1 -> vc-finish-logentry: nocomment=nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
| 2 -> vc-buffer-sync: not-urgent=nil
| 2 <- vc-buffer-sync: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-call-backend: backend=Git function-name=checkin args=(("c:/Users/gutov/vc/test/README.txt") nil #("First commit
" 0 12 (fontified nil) 12 13 (fontified nil)))
| | 3 -> vc-find-backend-function: backend=Git fun=checkin
| | | 4 -> vc-make-backend-sym: backend=Git sym=checkin
| | | 4 <- vc-make-backend-sym: vc-git-checkin
| | 3 <- vc-find-backend-function: vc-git-checkin
| | 3 -> vc-git-checkin: files=("c:/Users/gutov/vc/test/README.txt") _rev=nil comment=#("First commit
" 0 12 (fontified nil) 12 13 (fontified nil))
| | | 4 -> vc-kill-buffer-hook: 
| | | 4 <- vc-kill-buffer-hook: nil
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("First commit
" 0 12 (fontified nil) 12 13 (fontified nil)) "--only" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("First commit
" 0 12 (fontified nil) 12 13 (fontified nil)) "--only" "--")
| | | | | 6 -> vc-delistify: filelist=("commit" "-m" #("First commit
" 0 12 (fontified nil) 12 13 (fontified nil)) "--only" "--")
| | | | | 6 <- vc-delistify: #("commit -m First commit
 --only --" 10 22 (fontified nil) 22 23 (fontified nil))
| | | | | 6 -> vc-delistify: filelist=("README.txt")
| | | | | 6 <- vc-delistify: "README.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("commit" "-m" #("First commit
" 0 12 (fontified nil) 12 13 (fontified nil)) "--only" "--" "README.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt")) (quote ("commit" "-m" #("First commit
" 0 12 (fontified nil) 12 13 (fontified nil)) "--only" "--" "README.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-checkin: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-delete-automatic-version-backups: file="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-version-backup-file-name: file="c:/Users/gutov/vc/test/README.txt" rev=nil manual=nil regexp=t
| | 3 <- vc-version-backup-file-name: "README\\.txt\\.~.+\\.~"
| 2 <- vc-delete-automatic-version-backups: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-kill-buffer-hook: 
| 2 <- vc-kill-buffer-hook: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | 5 -> vc-buffer-context: 
| | | | | 6 -> vc-position-context: posn=7
| | | | | 6 <- vc-position-context: (7 7 #("
" 0 1 (fontified t)))
| | | | 5 <- vc-buffer-context: ((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | 5 -> vc-restore-buffer-context: context=((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-context-matches-p: posn=7 context=(7 7 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-context-matches-p: t
| | | | 5 <- vc-restore-buffer-context: nil
| | | 4 <- vc-revert-buffer-internal: nil
| | | 4 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | 5 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | 6 <- vc-file-getprop: Git
| | | | 5 <- vc-backend: Git
| | | | 5 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | | | 6 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | 8 <- vc-file-getprop: nil
| | | | | | | 8 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | | | 9 <- vc-file-getprop: Git
| | | | | | | 8 <- vc-backend: Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | 9 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | 10 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | 11 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | 12 <- process-file: 0
| | | | | | | | | | 11 <- vc-git--call: 0
| | | | | | | | | 10 <- vc-git--out-ok: t
| | | | | | | | | 10 -> vc-kill-buffer-hook: 
| | | | | | | | | 10 <- vc-kill-buffer-hook: nil
| | | | | | | | 9 <- vc-git-working-revision: "master"
| | | | | | | 8 <- vc-call-backend: "master"
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision value="master"
| | | | | | | 8 <- vc-file-setprop: "master"
| | | | | | 7 <- vc-working-revision: "master"
| | | | | | 7 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | | | 9 <- vc-file-getprop: up-to-date
| | | | | | | 8 <- vc-state: up-to-date
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | 7 <- vc-default-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system"))
| | | | | 6 <- vc-git-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-call-backend: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | 4 <- vc-mode-line: Git
| | 3 <- vc-resynch-window: nil
| 2 <- vc-resynch-buffer: nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
1 <- vc-finish-logentry: nil
======================================================================
1 -> vc-before-save: 
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | 3 <- vc-file-getprop: up-to-date
| 2 <- vc-state: up-to-date
| 2 -> vc-checkout-model: backend=Git files=("c:/Users/gutov/vc/test/README.txt")
| | 3 -> vc-call-backend: backend=Git function-name=checkout-model args=(("c:/Users/gutov/vc/test/README.txt"))
| | | 4 -> vc-git-checkout-model: _files=("c:/Users/gutov/vc/test/README.txt")
| | | 4 <- vc-git-checkout-model: implicit
| | 3 <- vc-call-backend: implicit
| 2 <- vc-checkout-model: implicit
| 2 -> vc-call-backend: backend=Git function-name=make-version-backups-p args=("c:/Users/gutov/vc/test/README.txt")
| | 3 -> vc-find-backend-function: backend=Git fun=make-version-backups-p
| | | 4 -> vc-make-backend-sym: backend=Git sym=make-version-backups-p
| | | 4 <- vc-make-backend-sym: vc-git-make-version-backups-p
| | | 4 -> vc-make-backend-sym: backend=default sym=make-version-backups-p
| | | 4 <- vc-make-backend-sym: vc-default-make-version-backups-p
| | 3 <- vc-find-backend-function: (vc-default-make-version-backups-p . Git)
| | 3 -> vc-default-make-version-backups-p: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | 3 <- vc-default-make-version-backups-p: nil
| 2 <- vc-call-backend: nil
1 <- vc-before-save: nil
======================================================================
1 -> vc-after-save: 
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-checkout-time
| 2 <- vc-file-getprop: (20486 8817 0 0)
| 2 -> vc-checkout-model: backend=Git files=("c:/Users/gutov/vc/test/README.txt")
| | 3 -> vc-call-backend: backend=Git function-name=checkout-model args=(("c:/Users/gutov/vc/test/README.txt"))
| | | 4 -> vc-git-checkout-model: _files=("c:/Users/gutov/vc/test/README.txt")
| | | 4 <- vc-git-checkout-model: implicit
| | 3 <- vc-call-backend: implicit
| 2 <- vc-checkout-model: implicit
| 2 -> vc-state-refresh: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | 3 -> vc-call-backend: backend=Git function-name=state-heuristic args=("c:/Users/gutov/vc/test/README.txt")
| | | 4 -> vc-default-state-heuristic: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | 5 -> vc-call-backend: backend=Git function-name=state args=("c:/Users/gutov/vc/test/README.txt")
| | | | | 6 -> vc-git-state: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-git--run-command-string: file="c:/Users/gutov/vc/test/README.txt" args=("diff-index" "-p" "--raw" "-z" "HEAD" "--")
| | | | | | | 8 -> vc-git--out-ok: command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | 9 -> vc-git--call: buffer=(t nil) command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | 10 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("diff-index" "-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | 10 <- process-file: 0
| | | | | | | | 9 <- vc-git--call: 0
| | | | | | | 8 <- vc-git--out-ok: t
| | | | | | | 8 -> vc-kill-buffer-hook: 
| | | | | | | 8 <- vc-kill-buffer-hook: nil
| | | | | | 7 <- vc-git--run-command-string: ":100644 100644 940a58c00bbf0caeb5369eccaaae0e55be775acf 0000000000000000000000000000000000000000 M.README.txt.\0diff --git a/README.txt b/README.txt
index 940a58c..3bf86b2 100644
--- a/README.txt
+++ b/README.txt
@@ -1 +1,3 @@
 Hello!
+
+Hello again!
"
| | | | | | 7 -> vc-git--state-code: code="M"
| | | | | | 7 <- vc-git--state-code: edited
| | | | | 6 <- vc-git-state: edited
| | | | 5 <- vc-call-backend: edited
| | | 4 <- vc-default-state-heuristic: edited
| | 3 <- vc-call-backend: edited
| | 3 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state value=edited
| | 3 <- vc-file-setprop: edited
| 2 <- vc-state-refresh: edited
| 2 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | 3 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | 4 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | 5 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | 6 <- vc-file-getprop: "master"
| | | | 5 <- vc-working-revision: "master"
| | | | 5 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | 7 <- vc-file-getprop: edited
| | | | | 6 <- vc-state: edited
| | | | | 6 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | 7 <- vc-file-getprop: "master"
| | | | | 6 <- vc-working-revision: "master"
| | | | 5 <- vc-default-mode-line-string: #("Git:master" 0 10 (help-echo "Locally modified file under the Git version control system"))
| | | 4 <- vc-git-mode-line-string: #("Git:master" 0 10 (help-echo "Locally modified file under the Git version control system
Current branch: master"))
| | 3 <- vc-call-backend: #("Git:master" 0 10 (help-echo "Locally modified file under the Git version control system
Current branch: master"))
| 2 <- vc-mode-line: Git
1 <- vc-after-save: nil
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: Git
| | 3 <- vc-backend: Git
| | 3 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | 4 <- vc-file-getprop: edited
| | 3 <- vc-state: edited
| | 3 -> vc-checkout-model: backend=Git files="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-call-backend: backend=Git function-name=checkout-model args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-checkout-model: _files="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-git-checkout-model: implicit
| | | 4 <- vc-call-backend: implicit
| | 3 <- vc-checkout-model: implicit
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) edited implicit)
| 2 -> vc-compatible-state: p=edited q=edited
| 2 <- vc-compatible-state: t
| 2 -> vc-checkin: files=("c:/Users/gutov/vc/test/README.txt") backend=Git rev=nil comment=nil initial-contents=nil
| | 3 -> vc-start-logentry: files=("c:/Users/gutov/vc/test/README.txt") comment=nil initial-contents=nil msg="Enter a change comment." logbuf="*vc-log*" mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] action=#[514 "\304\305\306.!\"\210\211\203.\0\307\310.\"\204.\0\311\262.\312C\313.\x1a\313\262.\x03\211\203^.\211@\314.!\203R.\315 \211\203N.\211@\316.!\211\203F.\317.\x02\"\203F.\211.\x06B\262.\210.A\266\202\202,.\210\202W.\211.B\262.\x01A\266\202\202.\0\210\320\300\321.\x06\301.\a%\210\322\323.\"\210\211\211\203\250.\211@\324\325\326\327.!8B\330BB\211\203\240.\211@\211@\211
>\204\230.\331\332.\v\".\x04A#\210\210.A\266\202\202\200.\210.A\266\202\202o.\210)\266.\304\333\306.!\"\207" [Git nil vc-touched-properties vc-file-prop-obarray message "Checking in %s..." vc-delistify string-match "[^	
 ]" "*** empty log message ***" t nil file-directory-p buffer-list buffer-file-name string-prefix-p vc-call-backend checkin mapc vc-delete-automatic-version-backups (vc-state . up-to-date) vc-checkout-time 5 file-attributes ((vc-working-revision)) put intern "Checking in %s...done"] 13 "

(fn FILES COMMENT)"] after-hook=vc-checkin-hook backend=Git
| | | 4 -> vc-dispatcher-browsing: 
| | | 4 <- vc-dispatcher-browsing: nil
| | | 4 -> vc-log-edit: fileset=("c:/Users/gutov/vc/test/README.txt") mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] backend=Git
| | | | 5 -> vc-call-backend: backend=Git function-name=log-edit-mode args=nil
| | | | | 6 -> vc-default-log-edit-mode: backend=Git
| | | | | 6 <- vc-default-log-edit-mode: nil
| | | | 5 <- vc-call-backend: nil
| | | 4 <- vc-log-edit: nil
| | 3 <- vc-start-logentry: "Enter a change comment.  Type C-c C-c when done"
| 2 <- vc-checkin: "Enter a change comment.  Type C-c C-c when done"
1 <- vc-next-action: "Enter a change comment.  Type C-c C-c when done"
======================================================================
1 -> vc-finish-logentry: nocomment=nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
| 2 -> vc-buffer-sync: not-urgent=nil
| 2 <- vc-buffer-sync: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-call-backend: backend=Git function-name=checkin args=(("c:/Users/gutov/vc/test/README.txt") nil #("Second
" 0 6 (fontified nil) 6 7 (fontified nil)))
| | 3 -> vc-git-checkin: files=("c:/Users/gutov/vc/test/README.txt") _rev=nil comment=#("Second
" 0 6 (fontified nil) 6 7 (fontified nil))
| | | 4 -> vc-kill-buffer-hook: 
| | | 4 <- vc-kill-buffer-hook: nil
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("Second
" 0 6 (fontified nil) 6 7 (fontified nil)) "--only" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("Second
" 0 6 (fontified nil) 6 7 (fontified nil)) "--only" "--")
| | | | | 6 -> vc-delistify: filelist=("commit" "-m" #("Second
" 0 6 (fontified nil) 6 7 (fontified nil)) "--only" "--")
| | | | | 6 <- vc-delistify: #("commit -m Second
 --only --" 10 16 (fontified nil) 16 17 (fontified nil))
| | | | | 6 -> vc-delistify: filelist=("README.txt")
| | | | | 6 <- vc-delistify: "README.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("commit" "-m" #("Second
" 0 6 (fontified nil) 6 7 (fontified nil)) "--only" "--" "README.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt")) (quote ("commit" "-m" #("Second
" 0 6 (fontified nil) 6 7 (fontified nil)) "--only" "--" "README.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-checkin: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-delete-automatic-version-backups: file="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-version-backup-file-name: file="c:/Users/gutov/vc/test/README.txt" rev=nil manual=nil regexp=t
| | 3 <- vc-version-backup-file-name: "README\\.txt\\.~.+\\.~"
| 2 <- vc-delete-automatic-version-backups: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-kill-buffer-hook: 
| 2 <- vc-kill-buffer-hook: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | 5 -> vc-buffer-context: 
| | | | | 6 -> vc-position-context: posn=21
| | | | | 6 <- vc-position-context: (21 21 #("
" 0 1 (fontified t)))
| | | | 5 <- vc-buffer-context: ((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | 5 -> vc-restore-buffer-context: context=((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-context-matches-p: posn=21 context=(21 21 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-context-matches-p: t
| | | | 5 <- vc-restore-buffer-context: nil
| | | 4 <- vc-revert-buffer-internal: nil
| | | 4 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | 5 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | 6 <- vc-file-getprop: Git
| | | | 5 <- vc-backend: Git
| | | | 5 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | | | 6 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | 8 <- vc-file-getprop: nil
| | | | | | | 8 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | | | 9 <- vc-file-getprop: Git
| | | | | | | 8 <- vc-backend: Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | 9 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | 10 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | 11 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | 12 <- process-file: 0
| | | | | | | | | | 11 <- vc-git--call: 0
| | | | | | | | | 10 <- vc-git--out-ok: t
| | | | | | | | | 10 -> vc-kill-buffer-hook: 
| | | | | | | | | 10 <- vc-kill-buffer-hook: nil
| | | | | | | | 9 <- vc-git-working-revision: "master"
| | | | | | | 8 <- vc-call-backend: "master"
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision value="master"
| | | | | | | 8 <- vc-file-setprop: "master"
| | | | | | 7 <- vc-working-revision: "master"
| | | | | | 7 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | | | 9 <- vc-file-getprop: up-to-date
| | | | | | | 8 <- vc-state: up-to-date
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | 7 <- vc-default-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system"))
| | | | | 6 <- vc-git-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-call-backend: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | 4 <- vc-mode-line: Git
| | 3 <- vc-resynch-window: nil
| 2 <- vc-resynch-buffer: nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
1 <- vc-finish-logentry: nil
======================================================================
1 -> vc-menu-map-filter: orig-binding=vc-menu-map
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-call-backend: backend=Git function-name=extra-menu args=nil
| | 3 -> vc-find-backend-function: backend=Git fun=extra-menu
| | | 4 -> vc-make-backend-sym: backend=Git sym=extra-menu
| | | 4 <- vc-make-backend-sym: vc-git-extra-menu
| | 3 <- vc-find-backend-function: vc-git-extra-menu
| | 3 -> vc-git-extra-menu: 
| | 3 <- vc-git-extra-menu: (keymap (git-ss menu-item "Show Stash..." vc-git-stash-show :help "Show stash contents") (git-st menu-item "Create Stash..." vc-git-stash :help "Stash away changes") (git-sn menu-item "Stash a Snapshot" vc-git-stash-snapshot :help "Stash the current state of the tree and keep the current state") (git-grep menu-item "Git grep..." vc-git-grep :help "Run the `git grep' command"))
| 2 <- vc-call-backend: (keymap (git-ss menu-item "Show Stash..." vc-git-stash-show :help "Show stash contents") (git-st menu-item "Create Stash..." vc-git-stash :help "Stash away changes") (git-sn menu-item "Stash a Snapshot" vc-git-stash-snapshot :help "Stash the current state of the tree and keep the current state") (git-grep menu-item "Git grep..." vc-git-grep :help "Run the `git grep' command"))
1 <- vc-menu-map-filter: (keymap (vc-dir menu-item "VC Dir" vc-dir :help "Show the VC status of files in a directory") (vc-register menu-item "Register" vc-register :help "Register file set into a version control system") (vc-next-action menu-item "Check In/Out" vc-next-action :help "Do the next logical version control operation on the current fileset") (vc-update menu-item "Update to Latest Version" vc-update :help "Update the current fileset's files to their tip revisions") (vc-revert menu-item "Revert to Base Version" vc-revert :help "Revert working copies of the selected file set to their repository contents") (undo menu-item "Undo Last Check-In" vc-rollback :help "Remove the most recent changeset committed to the repository") (vc-insert-header menu-item "Insert Header" vc-insert-headers :help "Insert headers into a file for use with a version control system.
") (separator2 #1="--") (vc-print-root-log menu-item "Show Top of the Tree History " vc-print-root-log :help "List the change log for the current tree in a window") (vc-print-log menu-item "Show History" vc-print-log :help "List the change log of the current file set in a window") (vc-log-in menu-item "Show Incoming Log" vc-log-incoming :help "Show a log of changes that will be received with a pull operation") (vc-log-out menu-item "Show Outgoing Log" vc-log-outgoing :help "Show a log of changes that will be sent with a push operation") (vc-update-change-log menu-item "Update ChangeLog" vc-update-change-log :help "Find change log file and add entries from recent version control logs") (vc-root-diff menu-item "Compare Tree with Base Version" vc-root-diff :help "Compare current tree with the base version") (vc-diff menu-item "Compare with Base Version" vc-diff :help "Compare file set with the base version") (vc-revision-other-window menu-item "Show Other Version" vc-revision-other-window :help "Visit another version of the current file in another window") (vc-rename-file menu-item "Rename File" vc-rename-file :help "Rename file") (vc-annotate menu-item "Annotate" vc-annotate :help "Display the edit history of the current file using colors") (separator1 #1#) (vc-create-tag menu-item "Create Tag" vc-create-tag :help "Create version tag") (vc-retrieve-tag menu-item "Retrieve Tag" vc-retrieve-tag :help "Retrieve tagged version or branch") "Version Control" (ext-menu-separator #1#) keymap (git-ss menu-item "Show Stash..." vc-git-stash-show :help "Show stash contents") (git-st menu-item "Create Stash..." vc-git-stash :help "Stash away changes") (git-sn menu-item "Stash a Snapshot" vc-git-stash-snapshot :help "Stash the current state of the tree and keep the current state") (git-grep menu-item "Git grep..." vc-git-grep :help "Run the `git grep' command"))
======================================================================
1 -> vc-rename-file: old="c:/Users/gutov/vc/test/README.txt" new="c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | 3 <- vc-file-getprop: up-to-date
| 2 <- vc-state: up-to-date
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-call-backend: backend=Git function-name=rename-file args=("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt")
| | 3 -> vc-find-backend-function: backend=Git fun=rename-file
| | | 4 -> vc-make-backend-sym: backend=Git sym=rename-file
| | | 4 <- vc-make-backend-sym: vc-git-rename-file
| | 3 <- vc-find-backend-function: vc-git-rename-file
| | 3 -> vc-git-rename-file: old="c:/Users/gutov/vc/test/README.txt" new="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt") flags=("mv" "-f" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt") flags=("mv" "-f" "--")
| | | | | 6 -> vc-delistify: filelist=("mv" "-f" "--")
| | | | | 6 <- vc-delistify: "mv -f --"
| | | | | 6 -> vc-delistify: filelist=("README.txt" "TODO.txt")
| | | | | 6 <- vc-delistify: "README.txt TODO.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("mv" "-f" "--" "README.txt" "TODO.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt")) (quote ("mv" "-f" "--" "README.txt" "TODO.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-rename-file: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/TODO.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/TODO.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/TODO.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/TODO.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-find-backend-function: backend=CVS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=CVS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-cvs-registered
| | | | 5 <- vc-find-backend-function: vc-cvs-registered
| | | | 5 -> vc-cvs-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-find-backend-function: backend=SVN fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=SVN sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-svn-registered
| | | | 5 <- vc-find-backend-function: vc-svn-registered
| | | | 5 -> vc-svn-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/TODO.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/TODO.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.TODO.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.TODO.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-find-backend-function: backend=Bzr fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Bzr sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-bzr-registered
| | | | 5 <- vc-find-backend-function: vc-bzr-registered
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=bzr-root
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/TODO.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/TODO.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "TODO.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "TODO.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "TODO.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-git-registered: t
| | | 4 <- vc-call-backend: t
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend value=Git
| | | 4 <- vc-file-setprop: Git
| | 3 <- vc-registered: t
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-mode-line: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | 3 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/TODO.txt")
| | | 4 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | | | | 7 <- vc-file-getprop: Git
| | | | | 6 <- vc-backend: Git
| | | | | 6 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | 7 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | 8 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | 9 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | 10 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | 10 <- process-file: 0
| | | | | | | | 9 <- vc-git--call: 0
| | | | | | | 8 <- vc-git--out-ok: t
| | | | | | | 8 -> vc-kill-buffer-hook: 
| | | | | | | 8 <- vc-kill-buffer-hook: nil
| | | | | | 7 <- vc-git-working-revision: "master"
| | | | | 6 <- vc-call-backend: "master"
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision value="master"
| | | | | 6 <- vc-file-setprop: "master"
| | | | 5 <- vc-working-revision: "master"
| | | | 5 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-state-refresh: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=state-heuristic args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | | | 9 -> vc-default-state-heuristic: backend=Git file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | 10 -> vc-call-backend: backend=Git function-name=state args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | | | | | 11 -> vc-git-state: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | | | 12 -> vc-git--run-command-string: file="c:/Users/gutov/vc/test/TODO.txt" args=("diff-index" "-p" "--raw" "-z" "HEAD" "--")
| | | | | | | | | | | | 13 -> vc-git--out-ok: command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "TODO.txt")
| | | | | | | | | | | | | 14 -> vc-git--call: buffer=(t nil) command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "TODO.txt")
| | | | | | | | | | | | | | 15 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("diff-index" "-p" "--raw" "-z" "HEAD" "--" "TODO.txt")
| | | | | | | | | | | | | | 15 <- process-file: 0
| | | | | | | | | | | | | 14 <- vc-git--call: 0
| | | | | | | | | | | | 13 <- vc-git--out-ok: t
| | | | | | | | | | | | 13 -> vc-kill-buffer-hook: 
| | | | | | | | | | | | 13 <- vc-kill-buffer-hook: nil
| | | | | | | | | | | 12 <- vc-git--run-command-string: ":000000 100644 0000000000000000000000000000000000000000 3bf86b2c8f3178e4ce8aa4cf255c0d9e260b6c12 A.TODO.txt.\0diff --git a/TODO.txt b/TODO.txt
new file mode 100644
index 0000000..3bf86b2
--- /dev/null
+++ b/TODO.txt
@@ -0,0 +1,3 @@
+Hello!
+
+Hello again!
"
| | | | | | | | | | | 12 -> vc-git--state-code: code="A"
| | | | | | | | | | | 12 <- vc-git--state-code: added
| | | | | | | | | | 11 <- vc-git-state: added
| | | | | | | | | 10 <- vc-call-backend: added
| | | | | | | | 9 <- vc-default-state-heuristic: added
| | | | | | | 8 <- vc-call-backend: added
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state value=added
| | | | | | | 8 <- vc-file-setprop: added
| | | | | | 7 <- vc-state-refresh: added
| | | | | 6 <- vc-state: added
| | | | | 6 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | | 7 <- vc-file-getprop: "master"
| | | | | 6 <- vc-working-revision: "master"
| | | | 5 <- vc-default-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system"))
| | | 4 <- vc-git-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| | 3 <- vc-call-backend: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| 2 <- vc-mode-line: Git
1 <- vc-rename-file: nil
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | 4 <- vc-file-getprop: Git
| | 3 <- vc-backend: Git
| | 3 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | | 4 <- vc-file-getprop: added
| | 3 <- vc-state: added
| | 3 -> vc-checkout-model: backend=Git files="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-call-backend: backend=Git function-name=checkout-model args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-git-checkout-model: _files="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 <- vc-git-checkout-model: implicit
| | | 4 <- vc-call-backend: implicit
| | 3 <- vc-checkout-model: implicit
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/TODO.txt") (#1#) added implicit)
| 2 -> vc-compatible-state: p=added q=edited
| 2 <- vc-compatible-state: (edited added removed)
| 2 -> vc-checkin: files=("c:/Users/gutov/vc/test/TODO.txt") backend=Git rev=nil comment=nil initial-contents=nil
| | 3 -> vc-start-logentry: files=("c:/Users/gutov/vc/test/TODO.txt") comment=nil initial-contents=nil msg="Enter a change comment." logbuf="*vc-log*" mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] action=#[514 "\304\305\306.!\"\210\211\203.\0\307\310.\"\204.\0\311\262.\312C\313.\x1a\313\262.\x03\211\203^.\211@\314.!\203R.\315 \211\203N.\211@\316.!\211\203F.\317.\x02\"\203F.\211.\x06B\262.\210.A\266\202\202,.\210\202W.\211.B\262.\x01A\266\202\202.\0\210\320\300\321.\x06\301.\a%\210\322\323.\"\210\211\211\203\250.\211@\324\325\326\327.!8B\330BB\211\203\240.\211@\211@\211
>\204\230.\331\332.\v\".\x04A#\210\210.A\266\202\202\200.\210.A\266\202\202o.\210)\266.\304\333\306.!\"\207" [Git nil vc-touched-properties vc-file-prop-obarray message "Checking in %s..." vc-delistify string-match "[^	
 ]" "*** empty log message ***" t nil file-directory-p buffer-list buffer-file-name string-prefix-p vc-call-backend checkin mapc vc-delete-automatic-version-backups (vc-state . up-to-date) vc-checkout-time 5 file-attributes ((vc-working-revision)) put intern "Checking in %s...done"] 13 "

(fn FILES COMMENT)"] after-hook=vc-checkin-hook backend=Git
| | | 4 -> vc-dispatcher-browsing: 
| | | 4 <- vc-dispatcher-browsing: nil
| | | 4 -> vc-log-edit: fileset=("c:/Users/gutov/vc/test/TODO.txt") mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] backend=Git
| | | | 5 -> vc-call-backend: backend=Git function-name=log-edit-mode args=nil
| | | | | 6 -> vc-default-log-edit-mode: backend=Git
| | | | | 6 <- vc-default-log-edit-mode: nil
| | | | 5 <- vc-call-backend: nil
| | | 4 <- vc-log-edit: nil
| | 3 <- vc-start-logentry: "Enter a change comment.  Type C-c C-c when done"
| 2 <- vc-checkin: "Enter a change comment.  Type C-c C-c when done"
1 <- vc-next-action: "Enter a change comment.  Type C-c C-c when done"
======================================================================
1 -> vc-finish-logentry: nocomment=nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
| 2 -> vc-buffer-sync: not-urgent=nil
| 2 <- vc-buffer-sync: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/TODO.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-call-backend: backend=Git function-name=checkin args=(("c:/Users/gutov/vc/test/TODO.txt") nil #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)))
| | 3 -> vc-git-checkin: files=("c:/Users/gutov/vc/test/TODO.txt") _rev=nil comment=#("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil))
| | | 4 -> vc-kill-buffer-hook: 
| | | 4 <- vc-kill-buffer-hook: nil
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/TODO.txt") flags=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/TODO.txt") flags=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 -> vc-delistify: filelist=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 <- vc-delistify: #("commit -m Renamed
 --only --" 10 17 (fontified nil) 17 18 (fontified nil))
| | | | | 6 -> vc-delistify: filelist=("TODO.txt")
| | | | | 6 <- vc-delistify: "TODO.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "TODO.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/TODO.txt")) (quote ("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "TODO.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-checkin: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-delete-automatic-version-backups: file="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-version-backup-file-name: file="c:/Users/gutov/vc/test/TODO.txt" rev=nil manual=nil regexp=t
| | 3 <- vc-version-backup-file-name: "TODO\\.txt\\.~.+\\.~"
| 2 <- vc-delete-automatic-version-backups: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/TODO.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-kill-buffer-hook: 
| 2 <- vc-kill-buffer-hook: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/TODO.txt" keep=t noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/TODO.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | 5 -> vc-buffer-context: 
| | | | | 6 -> vc-position-context: posn=21
| | | | | 6 <- vc-position-context: (21 21 #("
" 0 1 (fontified t)))
| | | | 5 <- vc-buffer-context: ((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | 5 -> vc-restore-buffer-context: context=((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-context-matches-p: posn=21 context=(21 21 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-context-matches-p: t
| | | | 5 <- vc-restore-buffer-context: nil
| | | 4 <- vc-revert-buffer-internal: nil
| | | 4 -> vc-mode-line: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | | 5 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | | | 6 <- vc-file-getprop: Git
| | | | 5 <- vc-backend: Git
| | | | 5 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | 6 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | | | 8 <- vc-file-getprop: nil
| | | | | | | 8 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | | | | | | 9 <- vc-file-getprop: Git
| | | | | | | 8 <- vc-backend: Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | | | 9 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | 10 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | 11 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | 12 <- process-file: 0
| | | | | | | | | | 11 <- vc-git--call: 0
| | | | | | | | | 10 <- vc-git--out-ok: t
| | | | | | | | | 10 -> vc-kill-buffer-hook: 
| | | | | | | | | 10 <- vc-kill-buffer-hook: nil
| | | | | | | | 9 <- vc-git-working-revision: "master"
| | | | | | | 8 <- vc-call-backend: "master"
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision value="master"
| | | | | | | 8 <- vc-file-setprop: "master"
| | | | | | 7 <- vc-working-revision: "master"
| | | | | | 7 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | 8 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | | | | | | | 9 <- vc-file-getprop: up-to-date
| | | | | | | 8 <- vc-state: up-to-date
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | 7 <- vc-default-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system"))
| | | | | 6 <- vc-git-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-call-backend: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | 4 <- vc-mode-line: Git
| | 3 <- vc-resynch-window: nil
| 2 <- vc-resynch-buffer: nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
1 <- vc-finish-logentry: nil
======================================================================
1 -> vc-delete-file: file="c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-find-backend-function: backend=Git fun=delete-file
| | 3 -> vc-make-backend-sym: backend=Git sym=delete-file
| | 3 <- vc-make-backend-sym: vc-git-delete-file
| 2 <- vc-find-backend-function: vc-git-delete-file
| 2 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | 3 <- vc-file-getprop: up-to-date
| 2 <- vc-state: up-to-date
| 2 -> vc-call-backend: backend=Git function-name=delete-file args=("c:/Users/gutov/vc/test/TODO.txt")
| | 3 -> vc-find-backend-function: backend=Git fun=delete-file
| | | 4 -> vc-make-backend-sym: backend=Git sym=delete-file
| | | 4 <- vc-make-backend-sym: vc-git-delete-file
| | 3 <- vc-find-backend-function: vc-git-delete-file
| | 3 -> vc-git-delete-file: file="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list="c:/Users/gutov/vc/test/TODO.txt" flags=("rm" "-f" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list="c:/Users/gutov/vc/test/TODO.txt" flags=("rm" "-f" "--")
| | | | | 6 -> vc-delistify: filelist=("rm" "-f" "--")
| | | | | 6 <- vc-delistify: "rm -f --"
| | | | | 6 -> vc-delistify: filelist=("TODO.txt")
| | | | | 6 <- vc-delistify: "TODO.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("rm" "-f" "--" "TODO.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote "c:/Users/gutov/vc/test/TODO.txt") (quote ("rm" "-f" "--" "TODO.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-delete-file: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/TODO.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/TODO.txt" keep=nil noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/TODO.txt" keep=nil noquery=t reset-vc-info=nil
| | | 4 -> vc-kill-buffer-hook: 
| | | | 5 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 <- vc-file-clearprops: nil
| | | 4 <- vc-kill-buffer-hook: nil
| | 3 <- vc-resynch-window: t
| 2 <- vc-resynch-buffer: nil
1 <- vc-delete-file: nil

[-- Attachment #2.1.5: trace-3.log --]
[-- Type: text/plain, Size: 115203 bytes --]

======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-find-file-hook: 
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=RCS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=RCS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-rcs-registered
| | | | 5 <- vc-find-backend-function: vc-rcs-registered
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=CVS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=CVS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-cvs-registered
| | | | 5 <- vc-find-backend-function: vc-cvs-registered
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SVN fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=SVN sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-svn-registered
| | | | 5 <- vc-find-backend-function: vc-svn-registered
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SCCS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=SCCS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-sccs-registered
| | | | 5 <- vc-find-backend-function: vc-sccs-registered
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Bzr fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Bzr sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-bzr-registered
| | | | 5 <- vc-find-backend-function: vc-bzr-registered
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Git fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Git sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-git-registered
| | | | 5 <- vc-find-backend-function: vc-git-registered
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered value=nil
| | | | | 6 <- vc-file-setprop: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Hg fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Hg sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-hg-registered
| | | | 5 <- vc-find-backend-function: vc-hg-registered
| | | | 5 -> vc-hg-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Mtn fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Mtn sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-mtn-registered
| | | | 5 <- vc-find-backend-function: vc-mtn-registered
| | | | 5 -> vc-mtn-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Arch fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Arch sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-arch-registered
| | | | 5 <- vc-find-backend-function: vc-arch-registered
| | | | 5 -> vc-arch-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| 2 <- vc-backend: nil
| 2 -> vc-backend: file-or-list="~/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="~/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="~/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="~/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="~/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="~/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="~/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="~/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="~/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="~/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="~/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="~/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="~/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="~/vc/test/README.txt" property=git-registered
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-git-root: file="~/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="~/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="~/vc/test/README.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="~/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | | 6 -> vc-file-setprop: file="~/vc/test/README.txt" property=git-registered value=nil
| | | | | 6 <- vc-file-setprop: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-hg-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="~/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="~/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-mtn-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-arch-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="~/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| 2 <- vc-backend: nil
1 <- vc-find-file-hook: nil
======================================================================
1 -> vc-before-save: 
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered value=nil
| | | | | 6 <- vc-file-setprop: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-hg-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-mtn-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-arch-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| 2 <- vc-backend: nil
1 <- vc-before-save: nil
======================================================================
1 -> vc-after-save: 
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: none
| 2 <- vc-backend: nil
1 <- vc-after-save: nil
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: none
| | 3 <- vc-backend: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: none
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered value=nil
| | | | | 6 <- vc-file-setprop: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-hg-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-mtn-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-arch-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| | 3 -> vc-backend-for-registration: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=RCS fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=RCS sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-rcs-responsible-p
| | | | 5 <- vc-find-backend-function: vc-rcs-responsible-p
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=CVS fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=CVS sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-cvs-responsible-p
| | | | 5 <- vc-find-backend-function: vc-cvs-responsible-p
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SVN fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=SVN sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-svn-responsible-p
| | | | 5 <- vc-find-backend-function: vc-svn-responsible-p
| | | | 5 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | 5 <- vc-find-root: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SCCS fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=SCCS sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-sccs-responsible-p
| | | | 5 <- vc-find-backend-function: vc-sccs-responsible-p
| | | | 5 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | 5 <- vc-sccs-search-project-dir: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Bzr fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=Bzr sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-bzr-responsible-p
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-find-backend-function: vc-bzr-responsible-p
| | | | 5 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=bzr-root
| | | | 5 <- vc-file-getprop: nil
| | | | 5 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | 5 <- vc-find-root: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered value=nil
| | | | | 6 <- vc-file-setprop: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Git fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=Git sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-git-responsible-p
| | | | 5 <- vc-find-backend-function: vc-git-responsible-p
| | | | 5 -> vc-git-responsible-p: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | 5 <- vc-git-responsible-p: "~/vc/test/"
| | | 4 <- vc-call-backend: "~/vc/test/"
| | 3 <- vc-backend-for-registration: Git
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) unregistered nil)
| 2 -> vc-register: set-revision=nil vc-fileset=(Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) unregistered nil) comment=nil
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: none
| | 3 <- vc-backend: nil
| | 3 -> vc-buffer-sync: not-urgent=nil
| | 3 <- vc-buffer-sync: nil
| | 3 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| | 3 <- vc-file-clearprops: nil
| | 3 -> vc-call-backend: backend=Git function-name=init-revision args=nil
| | | 4 -> vc-find-backend-function: backend=Git fun=init-revision
| | | | 5 -> vc-make-backend-sym: backend=Git sym=init-revision
| | | | 5 <- vc-make-backend-sym: vc-git-init-revision
| | | | 5 -> vc-make-backend-sym: backend=default sym=init-revision
| | | | 5 <- vc-make-backend-sym: vc-default-init-revision
| | | 4 <- vc-find-backend-function: (vc-default-init-revision . Git)
| | | 4 -> vc-default-init-revision: backend=Git
| | | 4 <- vc-default-init-revision: "1.1"
| | 3 <- vc-call-backend: "1.1"
| | 3 -> vc-call-backend: backend=Git function-name=register args=(("c:/Users/gutov/vc/test/README.txt") "1.1" nil)
| | | 4 -> vc-find-backend-function: backend=Git fun=register
| | | | 5 -> vc-make-backend-sym: backend=Git sym=register
| | | | 5 <- vc-make-backend-sym: vc-git-register
| | | 4 <- vc-find-backend-function: vc-git-register
| | | 4 -> vc-git-register: files=("c:/Users/gutov/vc/test/README.txt") _rev="1.1" _comment=nil
| | | | 5 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("update-index" "--add" "--")
| | | | | 6 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("update-index" "--add" "--")
| | | | | | 7 -> vc-delistify: filelist=("update-index" "--add" "--")
| | | | | | 7 <- vc-delistify: "update-index --add --"
| | | | | | 7 -> vc-delistify: filelist=("README.txt")
| | | | | | 7 <- vc-delistify: "README.txt"
| | | | | | 7 -> vc-setup-buffer: buf="*vc*"
| | | | | | 7 <- vc-setup-buffer: nil
| | | | | | 7 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("update-index" "--add" "--" "README.txt")
| | | | | | 7 <- process-file: 0
| | | | | | 7 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt")) (quote ("update-index" "--add" "--" "README.txt")))
| | | | | | 7 <- vc-exec-after: nil
| | | | | 6 <- vc-do-command: 0
| | | | 5 <- vc-git-command: 0
| | | 4 <- vc-git-register: nil
| | 3 <- vc-call-backend: nil
| | 3 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=Git
| | 3 <- vc-file-setprop: Git
| | 3 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-resynch-window: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | | 5 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | | 6 -> vc-buffer-context: 
| | | | | | 7 -> vc-position-context: posn=7
| | | | | | 7 <- vc-position-context: (7 7 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-buffer-context: ((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-restore-buffer-context: context=((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | | | 7 -> vc-context-matches-p: posn=7 context=(7 7 #("
" 0 1 (fontified t)))
| | | | | | 7 <- vc-context-matches-p: t
| | | | | 6 <- vc-restore-buffer-context: nil
| | | | 5 <- vc-revert-buffer-internal: nil
| | | | 5 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | 6 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | 7 <- vc-file-getprop: Git
| | | | | 6 <- vc-backend: Git
| | | | | 6 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | 7 -> vc-find-backend-function: backend=Git fun=mode-line-string
| | | | | | | 8 -> vc-make-backend-sym: backend=Git sym=mode-line-string
| | | | | | | 8 <- vc-make-backend-sym: vc-git-mode-line-string
| | | | | | 7 <- vc-find-backend-function: vc-git-mode-line-string
| | | | | | 7 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: nil
| | | | | | | | 9 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | 10 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | | | | 10 <- vc-file-getprop: Git
| | | | | | | | 9 <- vc-backend: Git
| | | | | | | | 9 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | | 10 -> vc-find-backend-function: backend=Git fun=working-revision
| | | | | | | | | | 11 -> vc-make-backend-sym: backend=Git sym=working-revision
| | | | | | | | | | 11 <- vc-make-backend-sym: vc-git-working-revision
| | | | | | | | | 10 <- vc-find-backend-function: vc-git-working-revision
| | | | | | | | | 10 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | 11 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | | 13 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | | 13 <- process-file: 0
| | | | | | | | | | | 12 <- vc-git--call: 0
| | | | | | | | | | 11 <- vc-git--out-ok: t
| | | | | | | | | | 11 -> vc-kill-buffer-hook: 
| | | | | | | | | | 11 <- vc-kill-buffer-hook: nil
| | | | | | | | | 10 <- vc-git-working-revision: "master"
| | | | | | | | 9 <- vc-call-backend: "master"
| | | | | | | | 9 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision value="master"
| | | | | | | | 9 <- vc-file-setprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | | 8 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | 9 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | | 10 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | | | | 10 <- vc-file-getprop: nil
| | | | | | | | | 10 -> vc-state-refresh: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | | | 11 -> vc-call-backend: backend=Git function-name=state-heuristic args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | | | | 12 -> vc-find-backend-function: backend=Git fun=state-heuristic
| | | | | | | | | | | | 13 -> vc-make-backend-sym: backend=Git sym=state-heuristic
| | | | | | | | | | | | 13 <- vc-make-backend-sym: vc-git-state-heuristic
| | | | | | | | | | | | 13 -> vc-make-backend-sym: backend=default sym=state-heuristic
| | | | | | | | | | | | 13 <- vc-make-backend-sym: vc-default-state-heuristic
| | | | | | | | | | | 12 <- vc-find-backend-function: (vc-default-state-heuristic . Git)
| | | | | | | | | | | 12 -> vc-default-state-heuristic: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | | | 13 -> vc-call-backend: backend=Git function-name=state args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | | | | | | 14 -> vc-find-backend-function: backend=Git fun=state
| | | | | | | | | | | | | | 15 -> vc-make-backend-sym: backend=Git sym=state
| | | | | | | | | | | | | | 15 <- vc-make-backend-sym: vc-git-state
| | | | | | | | | | | | | 14 <- vc-find-backend-function: vc-git-state
| | | | | | | | | | | | | 14 -> vc-git-state: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | | | | | 15 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | | | | | | 16 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered
| | | | | | | | | | | | | | | 16 <- vc-file-getprop: nil
| | | | | | | | | | | | | | | 16 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | | | | | | | 17 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | | | | | | | | | | | 17 <- vc-file-getprop: nil
| | | | | | | | | | | | | | | | 17 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".git"
| | | | | | | | | | | | | | | | 17 <- vc-find-root: "~/vc/test/"
| | | | | | | | | | | | | | | | 17 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | | | | | | | | | | | 17 <- vc-file-setprop: "~/vc/test/"
| | | | | | | | | | | | | | | 16 <- vc-git-root: "~/vc/test/"
| | | | | | | | | | | | | | | 16 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | | | | | | | | | | 17 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | | | | | | | | | | | 18 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | | | | | | | | | | | 18 <- process-file: 0
| | | | | | | | | | | | | | | | 17 <- vc-git--call: 0
| | | | | | | | | | | | | | | 16 <- vc-git--out-ok: t
| | | | | | | | | | | | | | | 16 -> vc-kill-buffer-hook: 
| | | | | | | | | | | | | | | 16 <- vc-kill-buffer-hook: nil
| | | | | | | | | | | | | | | 16 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered value=t
| | | | | | | | | | | | | | | 16 <- vc-file-setprop: t
| | | | | | | | | | | | | | 15 <- vc-git-registered: t
| | | | | | | | | | | | | | 15 -> vc-git--run-command-string: file="c:/Users/gutov/vc/test/README.txt" args=("diff-index" "-p" "--raw" "-z" "HEAD" "--")
| | | | | | | | | | | | | | | 16 -> vc-git--out-ok: command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | | | | | | | | 17 -> vc-git--call: buffer=(t nil) command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | | | | | | | | | 18 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("diff-index" "-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | | | | | | | | | 18 <- process-file: 128
| | | | | | | | | | | | | | | | 17 <- vc-git--call: 128
| | | | | | | | | | | | | | | 16 <- vc-git--out-ok: nil
| | | | | | | | | | | | | | | 16 -> vc-kill-buffer-hook: 
| | | | | | | | | | | | | | | 16 <- vc-kill-buffer-hook: nil
| | | | | | | | | | | | | | 15 <- vc-git--run-command-string: nil
| | | | | | | | | | | | | | 15 -> vc-git--empty-db-p: 
| | | | | | | | | | | | | | | 16 -> vc-git--call: buffer=nil command="rev-parse" args=("--verify" "HEAD")
| | | | | | | | | | | | | | | | 17 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=nil display=nil args=("rev-parse" "--verify" "HEAD")
| | | | | | | | | | | | | | | | 17 <- process-file: 128
| | | | | | | | | | | | | | | 16 <- vc-git--call: 128
| | | | | | | | | | | | | | 15 <- vc-git--empty-db-p: t
| | | | | | | | | | | | | 14 <- vc-git-state: added
| | | | | | | | | | | | 13 <- vc-call-backend: added
| | | | | | | | | | | 12 <- vc-default-state-heuristic: added
| | | | | | | | | | 11 <- vc-call-backend: added
| | | | | | | | | | 11 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state value=added
| | | | | | | | | | 11 <- vc-file-setprop: added
| | | | | | | | | 10 <- vc-state-refresh: added
| | | | | | | | 9 <- vc-state: added
| | | | | | | | 9 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | | 10 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | | 10 <- vc-file-getprop: "master"
| | | | | | | | 9 <- vc-working-revision: "master"
| | | | | | | 8 <- vc-default-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system"))
| | | | | | 7 <- vc-git-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| | | | | 6 <- vc-call-backend: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-mode-line: Git
| | | 4 <- vc-resynch-window: nil
| | 3 <- vc-resynch-buffer: nil
| 2 <- vc-register: "Registering (c:/Users/gutov/vc/test/README.txt)... done"
1 <- vc-next-action: "Registering (c:/Users/gutov/vc/test/README.txt)... done"
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: Git
| | 3 <- vc-backend: Git
| | 3 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | 4 <- vc-file-getprop: added
| | 3 <- vc-state: added
| | 3 -> vc-checkout-model: backend=Git files="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-call-backend: backend=Git function-name=checkout-model args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Git fun=checkout-model
| | | | | 6 -> vc-make-backend-sym: backend=Git sym=checkout-model
| | | | | 6 <- vc-make-backend-sym: vc-git-checkout-model
| | | | 5 <- vc-find-backend-function: vc-git-checkout-model
| | | | 5 -> vc-git-checkout-model: _files="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-git-checkout-model: implicit
| | | 4 <- vc-call-backend: implicit
| | 3 <- vc-checkout-model: implicit
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) added implicit)
| 2 -> vc-compatible-state: p=added q=edited
| 2 <- vc-compatible-state: (edited added removed)
| 2 -> vc-checkin: files=("c:/Users/gutov/vc/test/README.txt") backend=Git rev=nil comment=nil initial-contents=nil
| | 3 -> vc-start-logentry: files=("c:/Users/gutov/vc/test/README.txt") comment=nil initial-contents=nil msg="Enter a change comment." logbuf="*vc-log*" mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] action=#[514 "\304\305\306.!\"\210\211\203.\0\307\310.\"\204.\0\311\262.\312C\313.\x1a\313\262.\x03\211\203^.\211@\314.!\203R.\315 \211\203N.\211@\316.!\211\203F.\317.\x02\"\203F.\211.\x06B\262.\210.A\266\202\202,.\210\202W.\211.B\262.\x01A\266\202\202.\0\210\320\300\321.\x06\301.\a%\210\322\323.\"\210\211\211\203\250.\211@\324\325\326\327.!8B\330BB\211\203\240.\211@\211@\211
>\204\230.\331\332.\v\".\x04A#\210\210.A\266\202\202\200.\210.A\266\202\202o.\210)\266.\304\333\306.!\"\207" [Git nil vc-touched-properties vc-file-prop-obarray message "Checking in %s..." vc-delistify string-match "[^	
 ]" "*** empty log message ***" t nil file-directory-p buffer-list buffer-file-name string-prefix-p vc-call-backend checkin mapc vc-delete-automatic-version-backups (vc-state . up-to-date) vc-checkout-time 5 file-attributes ((vc-working-revision)) put intern "Checking in %s...done"] 13 "

(fn FILES COMMENT)"] after-hook=vc-checkin-hook backend=Git
| | | 4 -> vc-dispatcher-browsing: 
| | | 4 <- vc-dispatcher-browsing: nil
| | | 4 -> vc-log-edit: fileset=("c:/Users/gutov/vc/test/README.txt") mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] backend=Git
| | | | 5 -> vc-call-backend: backend=Git function-name=log-edit-mode args=nil
| | | | | 6 -> vc-find-backend-function: backend=Git fun=log-edit-mode
| | | | | | 7 -> vc-make-backend-sym: backend=Git sym=log-edit-mode
| | | | | | 7 <- vc-make-backend-sym: vc-git-log-edit-mode
| | | | | | 7 -> vc-make-backend-sym: backend=default sym=log-edit-mode
| | | | | | 7 <- vc-make-backend-sym: vc-default-log-edit-mode
| | | | | 6 <- vc-find-backend-function: (vc-default-log-edit-mode . Git)
| | | | | 6 -> vc-default-log-edit-mode: backend=Git
| | | | | 6 <- vc-default-log-edit-mode: nil
| | | | 5 <- vc-call-backend: nil
| | | 4 <- vc-log-edit: nil
| | 3 <- vc-start-logentry: "Enter a change comment.  Type C-c C-c when done"
| 2 <- vc-checkin: "Enter a change comment.  Type C-c C-c when done"
1 <- vc-next-action: "Enter a change comment.  Type C-c C-c when done"
======================================================================
1 -> vc-finish-logentry: nocomment=nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
| 2 -> vc-buffer-sync: not-urgent=nil
| 2 <- vc-buffer-sync: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-call-backend: backend=Git function-name=checkin args=(("c:/Users/gutov/vc/test/README.txt") nil #("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil)))
| | 3 -> vc-find-backend-function: backend=Git fun=checkin
| | | 4 -> vc-make-backend-sym: backend=Git sym=checkin
| | | 4 <- vc-make-backend-sym: vc-git-checkin
| | 3 <- vc-find-backend-function: vc-git-checkin
| | 3 -> vc-git-checkin: files=("c:/Users/gutov/vc/test/README.txt") _rev=nil comment=#("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil))
| | | 4 -> vc-kill-buffer-hook: 
| | | 4 <- vc-kill-buffer-hook: nil
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil)) "--only" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil)) "--only" "--")
| | | | | 6 -> vc-delistify: filelist=("commit" "-m" #("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil)) "--only" "--")
| | | | | 6 <- vc-delistify: #("commit -m First commit!
 --only --" 10 23 (fontified nil) 23 24 (fontified nil))
| | | | | 6 -> vc-delistify: filelist=("README.txt")
| | | | | 6 <- vc-delistify: "README.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("commit" "-m" #("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil)) "--only" "--" "README.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt")) (quote ("commit" "-m" #("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil)) "--only" "--" "README.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-checkin: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-delete-automatic-version-backups: file="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-version-backup-file-name: file="c:/Users/gutov/vc/test/README.txt" rev=nil manual=nil regexp=t
| | 3 <- vc-version-backup-file-name: "README\\.txt\\.~.+\\.~"
| 2 <- vc-delete-automatic-version-backups: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-kill-buffer-hook: 
| 2 <- vc-kill-buffer-hook: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | 5 -> vc-buffer-context: 
| | | | | 6 -> vc-position-context: posn=7
| | | | | 6 <- vc-position-context: (7 7 #("
" 0 1 (fontified t)))
| | | | 5 <- vc-buffer-context: ((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | 5 -> vc-restore-buffer-context: context=((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-context-matches-p: posn=7 context=(7 7 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-context-matches-p: t
| | | | 5 <- vc-restore-buffer-context: nil
| | | 4 <- vc-revert-buffer-internal: nil
| | | 4 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | 5 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | 6 <- vc-file-getprop: Git
| | | | 5 <- vc-backend: Git
| | | | 5 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | | | 6 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | 8 <- vc-file-getprop: nil
| | | | | | | 8 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | | | 9 <- vc-file-getprop: Git
| | | | | | | 8 <- vc-backend: Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | 9 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | 10 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | 11 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | 12 <- process-file: 0
| | | | | | | | | | 11 <- vc-git--call: 0
| | | | | | | | | 10 <- vc-git--out-ok: t
| | | | | | | | | 10 -> vc-kill-buffer-hook: 
| | | | | | | | | 10 <- vc-kill-buffer-hook: nil
| | | | | | | | 9 <- vc-git-working-revision: "master"
| | | | | | | 8 <- vc-call-backend: "master"
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision value="master"
| | | | | | | 8 <- vc-file-setprop: "master"
| | | | | | 7 <- vc-working-revision: "master"
| | | | | | 7 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | | | 9 <- vc-file-getprop: up-to-date
| | | | | | | 8 <- vc-state: up-to-date
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | 7 <- vc-default-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system"))
| | | | | 6 <- vc-git-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-call-backend: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | 4 <- vc-mode-line: Git
| | 3 <- vc-resynch-window: nil
| 2 <- vc-resynch-buffer: nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
1 <- vc-finish-logentry: nil
======================================================================
1 -> vc-before-save: 
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | 3 <- vc-file-getprop: up-to-date
| 2 <- vc-state: up-to-date
| 2 -> vc-checkout-model: backend=Git files=("c:/Users/gutov/vc/test/README.txt")
| | 3 -> vc-call-backend: backend=Git function-name=checkout-model args=(("c:/Users/gutov/vc/test/README.txt"))
| | | 4 -> vc-git-checkout-model: _files=("c:/Users/gutov/vc/test/README.txt")
| | | 4 <- vc-git-checkout-model: implicit
| | 3 <- vc-call-backend: implicit
| 2 <- vc-checkout-model: implicit
| 2 -> vc-call-backend: backend=Git function-name=make-version-backups-p args=("c:/Users/gutov/vc/test/README.txt")
| | 3 -> vc-find-backend-function: backend=Git fun=make-version-backups-p
| | | 4 -> vc-make-backend-sym: backend=Git sym=make-version-backups-p
| | | 4 <- vc-make-backend-sym: vc-git-make-version-backups-p
| | | 4 -> vc-make-backend-sym: backend=default sym=make-version-backups-p
| | | 4 <- vc-make-backend-sym: vc-default-make-version-backups-p
| | 3 <- vc-find-backend-function: (vc-default-make-version-backups-p . Git)
| | 3 -> vc-default-make-version-backups-p: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | 3 <- vc-default-make-version-backups-p: nil
| 2 <- vc-call-backend: nil
1 <- vc-before-save: nil
======================================================================
1 -> vc-after-save: 
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-checkout-time
| 2 <- vc-file-getprop: (20486 10663 0 0)
| 2 -> vc-checkout-model: backend=Git files=("c:/Users/gutov/vc/test/README.txt")
| | 3 -> vc-call-backend: backend=Git function-name=checkout-model args=(("c:/Users/gutov/vc/test/README.txt"))
| | | 4 -> vc-git-checkout-model: _files=("c:/Users/gutov/vc/test/README.txt")
| | | 4 <- vc-git-checkout-model: implicit
| | 3 <- vc-call-backend: implicit
| 2 <- vc-checkout-model: implicit
| 2 -> vc-state-refresh: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | 3 -> vc-call-backend: backend=Git function-name=state-heuristic args=("c:/Users/gutov/vc/test/README.txt")
| | | 4 -> vc-default-state-heuristic: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | 5 -> vc-call-backend: backend=Git function-name=state args=("c:/Users/gutov/vc/test/README.txt")
| | | | | 6 -> vc-git-state: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-registered
| | | | | | | 8 <- vc-file-getprop: t
| | | | | | 7 <- vc-git-registered: t
| | | | | | 7 -> vc-git--run-command-string: file="c:/Users/gutov/vc/test/README.txt" args=("diff-index" "-p" "--raw" "-z" "HEAD" "--")
| | | | | | | 8 -> vc-git--out-ok: command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | 9 -> vc-git--call: buffer=(t nil) command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | 10 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("diff-index" "-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | 10 <- process-file: 0
| | | | | | | | 9 <- vc-git--call: 0
| | | | | | | 8 <- vc-git--out-ok: t
| | | | | | | 8 -> vc-kill-buffer-hook: 
| | | | | | | 8 <- vc-kill-buffer-hook: nil
| | | | | | 7 <- vc-git--run-command-string: ":100644 100644 940a58c00bbf0caeb5369eccaaae0e55be775acf 0000000000000000000000000000000000000000 M.README.txt.\0diff --git a/README.txt b/README.txt
index 940a58c..3bf86b2 100644
--- a/README.txt
+++ b/README.txt
@@ -1 +1,3 @@
 Hello!
+
+Hello again!
"
| | | | | | 7 -> vc-git--state-code: code="M"
| | | | | | 7 <- vc-git--state-code: edited
| | | | | 6 <- vc-git-state: edited
| | | | 5 <- vc-call-backend: edited
| | | 4 <- vc-default-state-heuristic: edited
| | 3 <- vc-call-backend: edited
| | 3 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state value=edited
| | 3 <- vc-file-setprop: edited
| 2 <- vc-state-refresh: edited
| 2 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | 3 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | 4 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | 5 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | 6 <- vc-file-getprop: "master"
| | | | 5 <- vc-working-revision: "master"
| | | | 5 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | 7 <- vc-file-getprop: edited
| | | | | 6 <- vc-state: edited
| | | | | 6 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | 7 <- vc-file-getprop: "master"
| | | | | 6 <- vc-working-revision: "master"
| | | | 5 <- vc-default-mode-line-string: #("Git:master" 0 10 (help-echo "Locally modified file under the Git version control system"))
| | | 4 <- vc-git-mode-line-string: #("Git:master" 0 10 (help-echo "Locally modified file under the Git version control system
Current branch: master"))
| | 3 <- vc-call-backend: #("Git:master" 0 10 (help-echo "Locally modified file under the Git version control system
Current branch: master"))
| 2 <- vc-mode-line: Git
1 <- vc-after-save: nil
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: Git
| | 3 <- vc-backend: Git
| | 3 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | 4 <- vc-file-getprop: edited
| | 3 <- vc-state: edited
| | 3 -> vc-checkout-model: backend=Git files="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-call-backend: backend=Git function-name=checkout-model args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-checkout-model: _files="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-git-checkout-model: implicit
| | | 4 <- vc-call-backend: implicit
| | 3 <- vc-checkout-model: implicit
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) edited implicit)
| 2 -> vc-compatible-state: p=edited q=edited
| 2 <- vc-compatible-state: t
| 2 -> vc-checkin: files=("c:/Users/gutov/vc/test/README.txt") backend=Git rev=nil comment=nil initial-contents=nil
| | 3 -> vc-start-logentry: files=("c:/Users/gutov/vc/test/README.txt") comment=nil initial-contents=nil msg="Enter a change comment." logbuf="*vc-log*" mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] action=#[514 "\304\305\306.!\"\210\211\203.\0\307\310.\"\204.\0\311\262.\312C\313.\x1a\313\262.\x03\211\203^.\211@\314.!\203R.\315 \211\203N.\211@\316.!\211\203F.\317.\x02\"\203F.\211.\x06B\262.\210.A\266\202\202,.\210\202W.\211.B\262.\x01A\266\202\202.\0\210\320\300\321.\x06\301.\a%\210\322\323.\"\210\211\211\203\250.\211@\324\325\326\327.!8B\330BB\211\203\240.\211@\211@\211
>\204\230.\331\332.\v\".\x04A#\210\210.A\266\202\202\200.\210.A\266\202\202o.\210)\266.\304\333\306.!\"\207" [Git nil vc-touched-properties vc-file-prop-obarray message "Checking in %s..." vc-delistify string-match "[^	
 ]" "*** empty log message ***" t nil file-directory-p buffer-list buffer-file-name string-prefix-p vc-call-backend checkin mapc vc-delete-automatic-version-backups (vc-state . up-to-date) vc-checkout-time 5 file-attributes ((vc-working-revision)) put intern "Checking in %s...done"] 13 "

(fn FILES COMMENT)"] after-hook=vc-checkin-hook backend=Git
| | | 4 -> vc-dispatcher-browsing: 
| | | 4 <- vc-dispatcher-browsing: nil
| | | 4 -> vc-log-edit: fileset=("c:/Users/gutov/vc/test/README.txt") mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] backend=Git
| | | | 5 -> vc-call-backend: backend=Git function-name=log-edit-mode args=nil
| | | | | 6 -> vc-default-log-edit-mode: backend=Git
| | | | | 6 <- vc-default-log-edit-mode: nil
| | | | 5 <- vc-call-backend: nil
| | | 4 <- vc-log-edit: nil
| | 3 <- vc-start-logentry: "Enter a change comment.  Type C-c C-c when done"
| 2 <- vc-checkin: "Enter a change comment.  Type C-c C-c when done"
1 <- vc-next-action: "Enter a change comment.  Type C-c C-c when done"
======================================================================
1 -> vc-finish-logentry: nocomment=nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
| 2 -> vc-buffer-sync: not-urgent=nil
| 2 <- vc-buffer-sync: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-call-backend: backend=Git function-name=checkin args=(("c:/Users/gutov/vc/test/README.txt") nil #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)))
| | 3 -> vc-git-checkin: files=("c:/Users/gutov/vc/test/README.txt") _rev=nil comment=#("Second!
" 0 7 (fontified nil) 7 8 (fontified nil))
| | | 4 -> vc-kill-buffer-hook: 
| | | 4 <- vc-kill-buffer-hook: nil
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 -> vc-delistify: filelist=("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 <- vc-delistify: #("commit -m Second!
 --only --" 10 17 (fontified nil) 17 18 (fontified nil))
| | | | | 6 -> vc-delistify: filelist=("README.txt")
| | | | | 6 <- vc-delistify: "README.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "README.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt")) (quote ("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "README.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-checkin: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-delete-automatic-version-backups: file="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-version-backup-file-name: file="c:/Users/gutov/vc/test/README.txt" rev=nil manual=nil regexp=t
| | 3 <- vc-version-backup-file-name: "README\\.txt\\.~.+\\.~"
| 2 <- vc-delete-automatic-version-backups: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-kill-buffer-hook: 
| 2 <- vc-kill-buffer-hook: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | 5 -> vc-buffer-context: 
| | | | | 6 -> vc-position-context: posn=21
| | | | | 6 <- vc-position-context: (21 21 #("
" 0 1 (fontified t)))
| | | | 5 <- vc-buffer-context: ((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | 5 -> vc-restore-buffer-context: context=((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-context-matches-p: posn=21 context=(21 21 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-context-matches-p: t
| | | | 5 <- vc-restore-buffer-context: nil
| | | 4 <- vc-revert-buffer-internal: nil
| | | 4 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | 5 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | 6 <- vc-file-getprop: Git
| | | | 5 <- vc-backend: Git
| | | | 5 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | | | 6 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | 8 <- vc-file-getprop: nil
| | | | | | | 8 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | | | 9 <- vc-file-getprop: Git
| | | | | | | 8 <- vc-backend: Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | 9 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | 10 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | 11 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | 12 <- process-file: 0
| | | | | | | | | | 11 <- vc-git--call: 0
| | | | | | | | | 10 <- vc-git--out-ok: t
| | | | | | | | | 10 -> vc-kill-buffer-hook: 
| | | | | | | | | 10 <- vc-kill-buffer-hook: nil
| | | | | | | | 9 <- vc-git-working-revision: "master"
| | | | | | | 8 <- vc-call-backend: "master"
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision value="master"
| | | | | | | 8 <- vc-file-setprop: "master"
| | | | | | 7 <- vc-working-revision: "master"
| | | | | | 7 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | | | 9 <- vc-file-getprop: up-to-date
| | | | | | | 8 <- vc-state: up-to-date
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | 7 <- vc-default-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system"))
| | | | | 6 <- vc-git-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-call-backend: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | 4 <- vc-mode-line: Git
| | 3 <- vc-resynch-window: nil
| 2 <- vc-resynch-buffer: nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
1 <- vc-finish-logentry: nil
======================================================================
1 -> vc-rename-file: old="c:/Users/gutov/vc/test/README.txt" new="c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | 3 <- vc-file-getprop: up-to-date
| 2 <- vc-state: up-to-date
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-call-backend: backend=Git function-name=rename-file args=("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt")
| | 3 -> vc-find-backend-function: backend=Git fun=rename-file
| | | 4 -> vc-make-backend-sym: backend=Git sym=rename-file
| | | 4 <- vc-make-backend-sym: vc-git-rename-file
| | 3 <- vc-find-backend-function: vc-git-rename-file
| | 3 -> vc-git-rename-file: old="c:/Users/gutov/vc/test/README.txt" new="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt") flags=("mv" "-f" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt") flags=("mv" "-f" "--")
| | | | | 6 -> vc-delistify: filelist=("mv" "-f" "--")
| | | | | 6 <- vc-delistify: "mv -f --"
| | | | | 6 -> vc-delistify: filelist=("README.txt" "TODO.txt")
| | | | | 6 <- vc-delistify: "README.txt TODO.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("mv" "-f" "--" "README.txt" "TODO.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt")) (quote ("mv" "-f" "--" "README.txt" "TODO.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-rename-file: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/TODO.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/TODO.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/TODO.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/TODO.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-find-backend-function: backend=CVS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=CVS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-cvs-registered
| | | | 5 <- vc-find-backend-function: vc-cvs-registered
| | | | 5 -> vc-cvs-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-find-backend-function: backend=SVN fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=SVN sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-svn-registered
| | | | 5 <- vc-find-backend-function: vc-svn-registered
| | | | 5 -> vc-svn-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/TODO.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/TODO.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.TODO.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.TODO.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-find-backend-function: backend=Bzr fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Bzr sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-bzr-registered
| | | | 5 <- vc-find-backend-function: vc-bzr-registered
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=bzr-root
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/TODO.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-registered
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/TODO.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "TODO.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "TODO.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "TODO.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-registered value=t
| | | | | 6 <- vc-file-setprop: t
| | | | 5 <- vc-git-registered: t
| | | 4 <- vc-call-backend: t
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend value=Git
| | | 4 <- vc-file-setprop: Git
| | 3 <- vc-registered: t
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-mode-line: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | 3 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/TODO.txt")
| | | 4 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | | | | 7 <- vc-file-getprop: Git
| | | | | 6 <- vc-backend: Git
| | | | | 6 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | 7 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | 8 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | 9 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | 10 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | 10 <- process-file: 0
| | | | | | | | 9 <- vc-git--call: 0
| | | | | | | 8 <- vc-git--out-ok: t
| | | | | | | 8 -> vc-kill-buffer-hook: 
| | | | | | | 8 <- vc-kill-buffer-hook: nil
| | | | | | 7 <- vc-git-working-revision: "master"
| | | | | 6 <- vc-call-backend: "master"
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision value="master"
| | | | | 6 <- vc-file-setprop: "master"
| | | | 5 <- vc-working-revision: "master"
| | | | 5 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-state-refresh: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=state-heuristic args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | | | 9 -> vc-default-state-heuristic: backend=Git file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | 10 -> vc-call-backend: backend=Git function-name=state args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | | | | | 11 -> vc-git-state: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | | | 12 -> vc-git-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | | | | 13 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-registered
| | | | | | | | | | | | 13 <- vc-file-getprop: t
| | | | | | | | | | | 12 <- vc-git-registered: t
| | | | | | | | | | | 12 -> vc-git--run-command-string: file="c:/Users/gutov/vc/test/TODO.txt" args=("diff-index" "-p" "--raw" "-z" "HEAD" "--")
| | | | | | | | | | | | 13 -> vc-git--out-ok: command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "TODO.txt")
| | | | | | | | | | | | | 14 -> vc-git--call: buffer=(t nil) command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "TODO.txt")
| | | | | | | | | | | | | | 15 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("diff-index" "-p" "--raw" "-z" "HEAD" "--" "TODO.txt")
| | | | | | | | | | | | | | 15 <- process-file: 0
| | | | | | | | | | | | | 14 <- vc-git--call: 0
| | | | | | | | | | | | 13 <- vc-git--out-ok: t
| | | | | | | | | | | | 13 -> vc-kill-buffer-hook: 
| | | | | | | | | | | | 13 <- vc-kill-buffer-hook: nil
| | | | | | | | | | | 12 <- vc-git--run-command-string: ":000000 100644 0000000000000000000000000000000000000000 3bf86b2c8f3178e4ce8aa4cf255c0d9e260b6c12 A.TODO.txt.\0diff --git a/TODO.txt b/TODO.txt
new file mode 100644
index 0000000..3bf86b2
--- /dev/null
+++ b/TODO.txt
@@ -0,0 +1,3 @@
+Hello!
+
+Hello again!
"
| | | | | | | | | | | 12 -> vc-git--state-code: code="A"
| | | | | | | | | | | 12 <- vc-git--state-code: added
| | | | | | | | | | 11 <- vc-git-state: added
| | | | | | | | | 10 <- vc-call-backend: added
| | | | | | | | 9 <- vc-default-state-heuristic: added
| | | | | | | 8 <- vc-call-backend: added
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state value=added
| | | | | | | 8 <- vc-file-setprop: added
| | | | | | 7 <- vc-state-refresh: added
| | | | | 6 <- vc-state: added
| | | | | 6 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | | 7 <- vc-file-getprop: "master"
| | | | | 6 <- vc-working-revision: "master"
| | | | 5 <- vc-default-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system"))
| | | 4 <- vc-git-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| | 3 <- vc-call-backend: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| 2 <- vc-mode-line: Git
1 <- vc-rename-file: nil
======================================================================
1 -> vc-menu-map-filter: orig-binding=vc-menu-map
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-call-backend: backend=Git function-name=extra-menu args=nil
| | 3 -> vc-find-backend-function: backend=Git fun=extra-menu
| | | 4 -> vc-make-backend-sym: backend=Git sym=extra-menu
| | | 4 <- vc-make-backend-sym: vc-git-extra-menu
| | 3 <- vc-find-backend-function: vc-git-extra-menu
| | 3 -> vc-git-extra-menu: 
| | 3 <- vc-git-extra-menu: (keymap (git-ss menu-item "Show Stash..." vc-git-stash-show :help "Show stash contents") (git-st menu-item "Create Stash..." vc-git-stash :help "Stash away changes") (git-sn menu-item "Stash a Snapshot" vc-git-stash-snapshot :help "Stash the current state of the tree and keep the current state") (git-grep menu-item "Git grep..." vc-git-grep :help "Run the `git grep' command"))
| 2 <- vc-call-backend: (keymap (git-ss menu-item "Show Stash..." vc-git-stash-show :help "Show stash contents") (git-st menu-item "Create Stash..." vc-git-stash :help "Stash away changes") (git-sn menu-item "Stash a Snapshot" vc-git-stash-snapshot :help "Stash the current state of the tree and keep the current state") (git-grep menu-item "Git grep..." vc-git-grep :help "Run the `git grep' command"))
1 <- vc-menu-map-filter: (keymap (vc-dir menu-item "VC Dir" vc-dir :help "Show the VC status of files in a directory") (vc-register menu-item "Register" vc-register :help "Register file set into a version control system") (vc-next-action menu-item "Check In/Out" vc-next-action :help "Do the next logical version control operation on the current fileset") (vc-update menu-item "Update to Latest Version" vc-update :help "Update the current fileset's files to their tip revisions") (vc-revert menu-item "Revert to Base Version" vc-revert :help "Revert working copies of the selected file set to their repository contents") (undo menu-item "Undo Last Check-In" vc-rollback :help "Remove the most recent changeset committed to the repository") (vc-insert-header menu-item "Insert Header" vc-insert-headers :help "Insert headers into a file for use with a version control system.
") (separator2 #1="--") (vc-print-root-log menu-item "Show Top of the Tree History " vc-print-root-log :help "List the change log for the current tree in a window") (vc-print-log menu-item "Show History" vc-print-log :help "List the change log of the current file set in a window") (vc-log-in menu-item "Show Incoming Log" vc-log-incoming :help "Show a log of changes that will be received with a pull operation") (vc-log-out menu-item "Show Outgoing Log" vc-log-outgoing :help "Show a log of changes that will be sent with a push operation") (vc-update-change-log menu-item "Update ChangeLog" vc-update-change-log :help "Find change log file and add entries from recent version control logs") (vc-root-diff menu-item "Compare Tree with Base Version" vc-root-diff :help "Compare current tree with the base version") (vc-diff menu-item "Compare with Base Version" vc-diff :help "Compare file set with the base version") (vc-revision-other-window menu-item "Show Other Version" vc-revision-other-window :help "Visit another version of the current file in another window") (vc-rename-file menu-item "Rename File" vc-rename-file :help "Rename file") (vc-annotate menu-item "Annotate" vc-annotate :help "Display the edit history of the current file using colors") (separator1 #1#) (vc-create-tag menu-item "Create Tag" vc-create-tag :help "Create version tag") (vc-retrieve-tag menu-item "Retrieve Tag" vc-retrieve-tag :help "Retrieve tagged version or branch") "Version Control" (ext-menu-separator #1#) keymap (git-ss menu-item "Show Stash..." vc-git-stash-show :help "Show stash contents") (git-st menu-item "Create Stash..." vc-git-stash :help "Stash away changes") (git-sn menu-item "Stash a Snapshot" vc-git-stash-snapshot :help "Stash the current state of the tree and keep the current state") (git-grep menu-item "Git grep..." vc-git-grep :help "Run the `git grep' command"))
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | 4 <- vc-file-getprop: Git
| | 3 <- vc-backend: Git
| | 3 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | | 4 <- vc-file-getprop: added
| | 3 <- vc-state: added
| | 3 -> vc-checkout-model: backend=Git files="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-call-backend: backend=Git function-name=checkout-model args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-git-checkout-model: _files="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 <- vc-git-checkout-model: implicit
| | | 4 <- vc-call-backend: implicit
| | 3 <- vc-checkout-model: implicit
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/TODO.txt") (#1#) added implicit)
| 2 -> vc-compatible-state: p=added q=edited
| 2 <- vc-compatible-state: (edited added removed)
| 2 -> vc-checkin: files=("c:/Users/gutov/vc/test/TODO.txt") backend=Git rev=nil comment=nil initial-contents=nil
| | 3 -> vc-start-logentry: files=("c:/Users/gutov/vc/test/TODO.txt") comment=nil initial-contents=nil msg="Enter a change comment." logbuf="*vc-log*" mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] action=#[514 "\304\305\306.!\"\210\211\203.\0\307\310.\"\204.\0\311\262.\312C\313.\x1a\313\262.\x03\211\203^.\211@\314.!\203R.\315 \211\203N.\211@\316.!\211\203F.\317.\x02\"\203F.\211.\x06B\262.\210.A\266\202\202,.\210\202W.\211.B\262.\x01A\266\202\202.\0\210\320\300\321.\x06\301.\a%\210\322\323.\"\210\211\211\203\250.\211@\324\325\326\327.!8B\330BB\211\203\240.\211@\211@\211
>\204\230.\331\332.\v\".\x04A#\210\210.A\266\202\202\200.\210.A\266\202\202o.\210)\266.\304\333\306.!\"\207" [Git nil vc-touched-properties vc-file-prop-obarray message "Checking in %s..." vc-delistify string-match "[^	
 ]" "*** empty log message ***" t nil file-directory-p buffer-list buffer-file-name string-prefix-p vc-call-backend checkin mapc vc-delete-automatic-version-backups (vc-state . up-to-date) vc-checkout-time 5 file-attributes ((vc-working-revision)) put intern "Checking in %s...done"] 13 "

(fn FILES COMMENT)"] after-hook=vc-checkin-hook backend=Git
| | | 4 -> vc-dispatcher-browsing: 
| | | 4 <- vc-dispatcher-browsing: nil
| | | 4 -> vc-log-edit: fileset=("c:/Users/gutov/vc/test/TODO.txt") mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] backend=Git
| | | | 5 -> vc-call-backend: backend=Git function-name=log-edit-mode args=nil
| | | | | 6 -> vc-default-log-edit-mode: backend=Git
| | | | | 6 <- vc-default-log-edit-mode: nil
| | | | 5 <- vc-call-backend: nil
| | | 4 <- vc-log-edit: nil
| | 3 <- vc-start-logentry: "Enter a change comment.  Type C-c C-c when done"
| 2 <- vc-checkin: "Enter a change comment.  Type C-c C-c when done"
1 <- vc-next-action: "Enter a change comment.  Type C-c C-c when done"
======================================================================
1 -> vc-finish-logentry: nocomment=nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
| 2 -> vc-buffer-sync: not-urgent=nil
| 2 <- vc-buffer-sync: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/TODO.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-call-backend: backend=Git function-name=checkin args=(("c:/Users/gutov/vc/test/TODO.txt") nil #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)))
| | 3 -> vc-git-checkin: files=("c:/Users/gutov/vc/test/TODO.txt") _rev=nil comment=#("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil))
| | | 4 -> vc-kill-buffer-hook: 
| | | 4 <- vc-kill-buffer-hook: nil
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/TODO.txt") flags=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/TODO.txt") flags=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 -> vc-delistify: filelist=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 <- vc-delistify: #("commit -m Renamed
 --only --" 10 17 (fontified nil) 17 18 (fontified nil))
| | | | | 6 -> vc-delistify: filelist=("TODO.txt")
| | | | | 6 <- vc-delistify: "TODO.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "TODO.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/TODO.txt")) (quote ("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "TODO.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-checkin: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-delete-automatic-version-backups: file="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-version-backup-file-name: file="c:/Users/gutov/vc/test/TODO.txt" rev=nil manual=nil regexp=t
| | 3 <- vc-version-backup-file-name: "TODO\\.txt\\.~.+\\.~"
| 2 <- vc-delete-automatic-version-backups: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/TODO.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-kill-buffer-hook: 
| 2 <- vc-kill-buffer-hook: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/TODO.txt" keep=t noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/TODO.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | 5 -> vc-buffer-context: 
| | | | | 6 -> vc-position-context: posn=21
| | | | | 6 <- vc-position-context: (21 21 #("
" 0 1 (fontified t)))
| | | | 5 <- vc-buffer-context: ((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | 5 -> vc-restore-buffer-context: context=((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-context-matches-p: posn=21 context=(21 21 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-context-matches-p: t
| | | | 5 <- vc-restore-buffer-context: nil
| | | 4 <- vc-revert-buffer-internal: nil
| | | 4 -> vc-mode-line: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | | 5 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | | | 6 <- vc-file-getprop: Git
| | | | 5 <- vc-backend: Git
| | | | 5 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | 6 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | | | 8 <- vc-file-getprop: nil
| | | | | | | 8 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | | | | | | 9 <- vc-file-getprop: Git
| | | | | | | 8 <- vc-backend: Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | | | 9 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | 10 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | 11 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | 12 <- process-file: 0
| | | | | | | | | | 11 <- vc-git--call: 0
| | | | | | | | | 10 <- vc-git--out-ok: t
| | | | | | | | | 10 -> vc-kill-buffer-hook: 
| | | | | | | | | 10 <- vc-kill-buffer-hook: nil
| | | | | | | | 9 <- vc-git-working-revision: "master"
| | | | | | | 8 <- vc-call-backend: "master"
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision value="master"
| | | | | | | 8 <- vc-file-setprop: "master"
| | | | | | 7 <- vc-working-revision: "master"
| | | | | | 7 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | 8 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | | | | | | | 9 <- vc-file-getprop: up-to-date
| | | | | | | 8 <- vc-state: up-to-date
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | 7 <- vc-default-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system"))
| | | | | 6 <- vc-git-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-call-backend: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | 4 <- vc-mode-line: Git
| | 3 <- vc-resynch-window: nil
| 2 <- vc-resynch-buffer: nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
1 <- vc-finish-logentry: nil
======================================================================
1 -> vc-delete-file: file="c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-find-backend-function: backend=Git fun=delete-file
| | 3 -> vc-make-backend-sym: backend=Git sym=delete-file
| | 3 <- vc-make-backend-sym: vc-git-delete-file
| 2 <- vc-find-backend-function: vc-git-delete-file
| 2 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | 3 <- vc-file-getprop: up-to-date
| 2 <- vc-state: up-to-date
| 2 -> vc-call-backend: backend=Git function-name=delete-file args=("c:/Users/gutov/vc/test/TODO.txt")
| | 3 -> vc-find-backend-function: backend=Git fun=delete-file
| | | 4 -> vc-make-backend-sym: backend=Git sym=delete-file
| | | 4 <- vc-make-backend-sym: vc-git-delete-file
| | 3 <- vc-find-backend-function: vc-git-delete-file
| | 3 -> vc-git-delete-file: file="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list="c:/Users/gutov/vc/test/TODO.txt" flags=("rm" "-f" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list="c:/Users/gutov/vc/test/TODO.txt" flags=("rm" "-f" "--")
| | | | | 6 -> vc-delistify: filelist=("rm" "-f" "--")
| | | | | 6 <- vc-delistify: "rm -f --"
| | | | | 6 -> vc-delistify: filelist=("TODO.txt")
| | | | | 6 <- vc-delistify: "TODO.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("rm" "-f" "--" "TODO.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote "c:/Users/gutov/vc/test/TODO.txt") (quote ("rm" "-f" "--" "TODO.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-delete-file: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/TODO.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/TODO.txt" keep=nil noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/TODO.txt" keep=nil noquery=t reset-vc-info=nil
| | | 4 -> vc-kill-buffer-hook: 
| | | | 5 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 <- vc-file-clearprops: nil
| | | 4 <- vc-kill-buffer-hook: nil
| | 3 <- vc-resynch-window: t
| 2 <- vc-resynch-buffer: nil
1 <- vc-delete-file: nil

[-- Attachment #2.1.6: trace-4.log --]
[-- Type: text/plain, Size: 111082 bytes --]

======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-kill-buffer-hook: 
1 <- vc-kill-buffer-hook: nil
======================================================================
1 -> vc-find-file-hook: 
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=RCS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=RCS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-rcs-registered
| | | | 5 <- vc-find-backend-function: vc-rcs-registered
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=CVS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=CVS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-cvs-registered
| | | | 5 <- vc-find-backend-function: vc-cvs-registered
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SVN fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=SVN sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-svn-registered
| | | | 5 <- vc-find-backend-function: vc-svn-registered
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SCCS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=SCCS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-sccs-registered
| | | | 5 <- vc-find-backend-function: vc-sccs-registered
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Bzr fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Bzr sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-bzr-registered
| | | | 5 <- vc-find-backend-function: vc-bzr-registered
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Git fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Git sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-git-registered
| | | | 5 <- vc-find-backend-function: vc-git-registered
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Hg fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Hg sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-hg-registered
| | | | 5 <- vc-find-backend-function: vc-hg-registered
| | | | 5 -> vc-hg-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Mtn fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Mtn sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-mtn-registered
| | | | 5 <- vc-find-backend-function: vc-mtn-registered
| | | | 5 -> vc-mtn-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Arch fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Arch sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-arch-registered
| | | | 5 <- vc-find-backend-function: vc-arch-registered
| | | | 5 -> vc-arch-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| 2 <- vc-backend: nil
| 2 -> vc-backend: file-or-list="~/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="~/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="~/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="~/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="~/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="~/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="~/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="~/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="~/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="~/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="~/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="~/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "~/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="~/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="~/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="~/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="~/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="~/vc/test/README.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="~/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-hg-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="~/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="~/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-mtn-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("~/vc/test/README.txt")
| | | | 5 -> vc-arch-registered: file="~/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="~/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="~/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| 2 <- vc-backend: nil
1 <- vc-find-file-hook: nil
======================================================================
1 -> vc-before-save: 
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-hg-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-mtn-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-arch-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| 2 <- vc-backend: nil
1 <- vc-before-save: nil
======================================================================
1 -> vc-after-save: 
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: none
| 2 <- vc-backend: nil
1 <- vc-after-save: nil
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: none
| | 3 <- vc-backend: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: none
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Hg function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-hg-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-hg-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".hg"
| | | | | | 7 <- vc-find-root: nil
| | | | | 6 <- vc-hg-root: nil
| | | | 5 <- vc-hg-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Mtn function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-mtn-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="_MTN/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-mtn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Arch function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-arch-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness="{arch}/=tagging-method"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-arch-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=none
| | | 4 <- vc-file-setprop: none
| | 3 <- vc-registered: nil
| | 3 -> vc-backend-for-registration: file="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/README.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/README.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=RCS fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=RCS sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-rcs-responsible-p
| | | | 5 <- vc-find-backend-function: vc-rcs-responsible-p
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-cvs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=CVS fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=CVS sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-cvs-responsible-p
| | | | 5 <- vc-find-backend-function: vc-cvs-responsible-p
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-svn-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SVN fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=SVN sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-svn-responsible-p
| | | | 5 <- vc-find-backend-function: vc-svn-responsible-p
| | | | 5 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".svn"
| | | | 5 <- vc-find-root: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/README.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.README.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=SCCS fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=SCCS sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-sccs-responsible-p
| | | | 5 <- vc-find-backend-function: vc-sccs-responsible-p
| | | | 5 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="README.txt"
| | | | 5 <- vc-sccs-search-project-dir: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Bzr fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=Bzr sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-bzr-responsible-p
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-find-backend-function: vc-bzr-responsible-p
| | | | 5 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=bzr-root
| | | | 5 <- vc-file-getprop: nil
| | | | 5 -> vc-find-root: file="c:/Users/gutov/vc/test/README.txt" witness=".bzr/checkout/format"
| | | | 5 <- vc-find-root: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "README.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-git--out-ok: command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-tree" args=("--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-tree" "--name-only" "-z" "HEAD" "--" "README.txt")
| | | | | | | 8 <- process-file: 128
| | | | | | 7 <- vc-git--call: 128
| | | | | 6 <- vc-git--out-ok: nil
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-git-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=responsible-p args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Git fun=responsible-p
| | | | | 6 -> vc-make-backend-sym: backend=Git sym=responsible-p
| | | | | 6 <- vc-make-backend-sym: vc-git-responsible-p
| | | | 5 <- vc-find-backend-function: vc-git-responsible-p
| | | | 5 -> vc-git-responsible-p: file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | 5 <- vc-git-responsible-p: "~/vc/test/"
| | | 4 <- vc-call-backend: "~/vc/test/"
| | 3 <- vc-backend-for-registration: Git
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) unregistered nil)
| 2 -> vc-register: set-revision=nil vc-fileset=(Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) unregistered nil) comment=nil
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: none
| | 3 <- vc-backend: nil
| | 3 -> vc-buffer-sync: not-urgent=nil
| | 3 <- vc-buffer-sync: nil
| | 3 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| | 3 <- vc-file-clearprops: nil
| | 3 -> vc-call-backend: backend=Git function-name=init-revision args=nil
| | | 4 -> vc-find-backend-function: backend=Git fun=init-revision
| | | | 5 -> vc-make-backend-sym: backend=Git sym=init-revision
| | | | 5 <- vc-make-backend-sym: vc-git-init-revision
| | | | 5 -> vc-make-backend-sym: backend=default sym=init-revision
| | | | 5 <- vc-make-backend-sym: vc-default-init-revision
| | | 4 <- vc-find-backend-function: (vc-default-init-revision . Git)
| | | 4 -> vc-default-init-revision: backend=Git
| | | 4 <- vc-default-init-revision: "1.1"
| | 3 <- vc-call-backend: "1.1"
| | 3 -> vc-call-backend: backend=Git function-name=register args=(("c:/Users/gutov/vc/test/README.txt") "1.1" nil)
| | | 4 -> vc-find-backend-function: backend=Git fun=register
| | | | 5 -> vc-make-backend-sym: backend=Git sym=register
| | | | 5 <- vc-make-backend-sym: vc-git-register
| | | 4 <- vc-find-backend-function: vc-git-register
| | | 4 -> vc-git-register: files=("c:/Users/gutov/vc/test/README.txt") _rev="1.1" _comment=nil
| | | | 5 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("update-index" "--add" "--")
| | | | | 6 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("update-index" "--add" "--")
| | | | | | 7 -> vc-delistify: filelist=("update-index" "--add" "--")
| | | | | | 7 <- vc-delistify: "update-index --add --"
| | | | | | 7 -> vc-delistify: filelist=("README.txt")
| | | | | | 7 <- vc-delistify: "README.txt"
| | | | | | 7 -> vc-setup-buffer: buf="*vc*"
| | | | | | 7 <- vc-setup-buffer: nil
| | | | | | 7 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("update-index" "--add" "--" "README.txt")
| | | | | | 7 <- process-file: 0
| | | | | | 7 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt")) (quote ("update-index" "--add" "--" "README.txt")))
| | | | | | 7 <- vc-exec-after: nil
| | | | | 6 <- vc-do-command: 0
| | | | 5 <- vc-git-command: 0
| | | 4 <- vc-git-register: nil
| | 3 <- vc-call-backend: nil
| | 3 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend value=Git
| | 3 <- vc-file-setprop: Git
| | 3 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-resynch-window: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | | 5 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | | 6 -> vc-buffer-context: 
| | | | | | 7 -> vc-position-context: posn=7
| | | | | | 7 <- vc-position-context: (7 7 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-buffer-context: ((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-restore-buffer-context: context=((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | | | 7 -> vc-context-matches-p: posn=7 context=(7 7 #("
" 0 1 (fontified t)))
| | | | | | 7 <- vc-context-matches-p: t
| | | | | 6 <- vc-restore-buffer-context: nil
| | | | 5 <- vc-revert-buffer-internal: nil
| | | | 5 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | 6 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | 7 <- vc-file-getprop: Git
| | | | | 6 <- vc-backend: Git
| | | | | 6 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | 7 -> vc-find-backend-function: backend=Git fun=mode-line-string
| | | | | | | 8 -> vc-make-backend-sym: backend=Git sym=mode-line-string
| | | | | | | 8 <- vc-make-backend-sym: vc-git-mode-line-string
| | | | | | 7 <- vc-find-backend-function: vc-git-mode-line-string
| | | | | | 7 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: nil
| | | | | | | | 9 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | 10 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | | | | 10 <- vc-file-getprop: Git
| | | | | | | | 9 <- vc-backend: Git
| | | | | | | | 9 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | | 10 -> vc-find-backend-function: backend=Git fun=working-revision
| | | | | | | | | | 11 -> vc-make-backend-sym: backend=Git sym=working-revision
| | | | | | | | | | 11 <- vc-make-backend-sym: vc-git-working-revision
| | | | | | | | | 10 <- vc-find-backend-function: vc-git-working-revision
| | | | | | | | | 10 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | 11 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | | 13 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | | 13 <- process-file: 0
| | | | | | | | | | | 12 <- vc-git--call: 0
| | | | | | | | | | 11 <- vc-git--out-ok: t
| | | | | | | | | | 11 -> vc-kill-buffer-hook: 
| | | | | | | | | | 11 <- vc-kill-buffer-hook: nil
| | | | | | | | | 10 <- vc-git-working-revision: "master"
| | | | | | | | 9 <- vc-call-backend: "master"
| | | | | | | | 9 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision value="master"
| | | | | | | | 9 <- vc-file-setprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | | 8 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | 9 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | | 10 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | | | | 10 <- vc-file-getprop: nil
| | | | | | | | | 10 -> vc-state-refresh: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | | | 11 -> vc-call-backend: backend=Git function-name=state-heuristic args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | | | | 12 -> vc-find-backend-function: backend=Git fun=state-heuristic
| | | | | | | | | | | | 13 -> vc-make-backend-sym: backend=Git sym=state-heuristic
| | | | | | | | | | | | 13 <- vc-make-backend-sym: vc-git-state-heuristic
| | | | | | | | | | | | 13 -> vc-make-backend-sym: backend=default sym=state-heuristic
| | | | | | | | | | | | 13 <- vc-make-backend-sym: vc-default-state-heuristic
| | | | | | | | | | | 12 <- vc-find-backend-function: (vc-default-state-heuristic . Git)
| | | | | | | | | | | 12 -> vc-default-state-heuristic: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | | | 13 -> vc-call-backend: backend=Git function-name=state args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | | | | | | 14 -> vc-find-backend-function: backend=Git fun=state
| | | | | | | | | | | | | | 15 -> vc-make-backend-sym: backend=Git sym=state
| | | | | | | | | | | | | | 15 <- vc-make-backend-sym: vc-git-state
| | | | | | | | | | | | | 14 <- vc-find-backend-function: vc-git-state
| | | | | | | | | | | | | 14 -> vc-git-state: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | | | | | | 15 -> vc-git--run-command-string: file="c:/Users/gutov/vc/test/README.txt" args=("diff-index" "-p" "--raw" "-z" "HEAD" "--")
| | | | | | | | | | | | | | | 16 -> vc-git--out-ok: command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | | | | | | | | 17 -> vc-git--call: buffer=(t nil) command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | | | | | | | | | 18 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("diff-index" "-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | | | | | | | | | 18 <- process-file: 128
| | | | | | | | | | | | | | | | 17 <- vc-git--call: 128
| | | | | | | | | | | | | | | 16 <- vc-git--out-ok: nil
| | | | | | | | | | | | | | | 16 -> vc-kill-buffer-hook: 
| | | | | | | | | | | | | | | 16 <- vc-kill-buffer-hook: nil
| | | | | | | | | | | | | | 15 <- vc-git--run-command-string: nil
| | | | | | | | | | | | | | 15 -> vc-git--empty-db-p: 
| | | | | | | | | | | | | | | 16 -> vc-git--call: buffer=nil command="rev-parse" args=("--verify" "HEAD")
| | | | | | | | | | | | | | | | 17 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=nil display=nil args=("rev-parse" "--verify" "HEAD")
| | | | | | | | | | | | | | | | 17 <- process-file: 128
| | | | | | | | | | | | | | | 16 <- vc-git--call: 128
| | | | | | | | | | | | | | 15 <- vc-git--empty-db-p: t
| | | | | | | | | | | | | 14 <- vc-git-state: added
| | | | | | | | | | | | 13 <- vc-call-backend: added
| | | | | | | | | | | 12 <- vc-default-state-heuristic: added
| | | | | | | | | | 11 <- vc-call-backend: added
| | | | | | | | | | 11 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state value=added
| | | | | | | | | | 11 <- vc-file-setprop: added
| | | | | | | | | 10 <- vc-state-refresh: added
| | | | | | | | 9 <- vc-state: added
| | | | | | | | 9 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | | 10 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | | 10 <- vc-file-getprop: "master"
| | | | | | | | 9 <- vc-working-revision: "master"
| | | | | | | 8 <- vc-default-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system"))
| | | | | | 7 <- vc-git-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| | | | | 6 <- vc-call-backend: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-mode-line: Git
| | | 4 <- vc-resynch-window: nil
| | 3 <- vc-resynch-buffer: nil
| 2 <- vc-register: "Registering (c:/Users/gutov/vc/test/README.txt)... done"
1 <- vc-next-action: "Registering (c:/Users/gutov/vc/test/README.txt)... done"
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: Git
| | 3 <- vc-backend: Git
| | 3 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | 4 <- vc-file-getprop: added
| | 3 <- vc-state: added
| | 3 -> vc-checkout-model: backend=Git files="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-call-backend: backend=Git function-name=checkout-model args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-find-backend-function: backend=Git fun=checkout-model
| | | | | 6 -> vc-make-backend-sym: backend=Git sym=checkout-model
| | | | | 6 <- vc-make-backend-sym: vc-git-checkout-model
| | | | 5 <- vc-find-backend-function: vc-git-checkout-model
| | | | 5 -> vc-git-checkout-model: _files="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-git-checkout-model: implicit
| | | 4 <- vc-call-backend: implicit
| | 3 <- vc-checkout-model: implicit
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) added implicit)
| 2 -> vc-compatible-state: p=added q=edited
| 2 <- vc-compatible-state: (edited added removed)
| 2 -> vc-checkin: files=("c:/Users/gutov/vc/test/README.txt") backend=Git rev=nil comment=nil initial-contents=nil
| | 3 -> vc-start-logentry: files=("c:/Users/gutov/vc/test/README.txt") comment=nil initial-contents=nil msg="Enter a change comment." logbuf="*vc-log*" mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] action=#[514 "\304\305\306.!\"\210\211\203.\0\307\310.\"\204.\0\311\262.\312C\313.\x1a\313\262.\x03\211\203^.\211@\314.!\203R.\315 \211\203N.\211@\316.!\211\203F.\317.\x02\"\203F.\211.\x06B\262.\210.A\266\202\202,.\210\202W.\211.B\262.\x01A\266\202\202.\0\210\320\300\321.\x06\301.\a%\210\322\323.\"\210\211\211\203\250.\211@\324\325\326\327.!8B\330BB\211\203\240.\211@\211@\211
>\204\230.\331\332.\v\".\x04A#\210\210.A\266\202\202\200.\210.A\266\202\202o.\210)\266.\304\333\306.!\"\207" [Git nil vc-touched-properties vc-file-prop-obarray message "Checking in %s..." vc-delistify string-match "[^	
 ]" "*** empty log message ***" t nil file-directory-p buffer-list buffer-file-name string-prefix-p vc-call-backend checkin mapc vc-delete-automatic-version-backups (vc-state . up-to-date) vc-checkout-time 5 file-attributes ((vc-working-revision)) put intern "Checking in %s...done"] 13 "

(fn FILES COMMENT)"] after-hook=vc-checkin-hook backend=Git
| | | 4 -> vc-dispatcher-browsing: 
| | | 4 <- vc-dispatcher-browsing: nil
| | | 4 -> vc-log-edit: fileset=("c:/Users/gutov/vc/test/README.txt") mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] backend=Git
| | | | 5 -> vc-call-backend: backend=Git function-name=log-edit-mode args=nil
| | | | | 6 -> vc-find-backend-function: backend=Git fun=log-edit-mode
| | | | | | 7 -> vc-make-backend-sym: backend=Git sym=log-edit-mode
| | | | | | 7 <- vc-make-backend-sym: vc-git-log-edit-mode
| | | | | | 7 -> vc-make-backend-sym: backend=default sym=log-edit-mode
| | | | | | 7 <- vc-make-backend-sym: vc-default-log-edit-mode
| | | | | 6 <- vc-find-backend-function: (vc-default-log-edit-mode . Git)
| | | | | 6 -> vc-default-log-edit-mode: backend=Git
| | | | | 6 <- vc-default-log-edit-mode: nil
| | | | 5 <- vc-call-backend: nil
| | | 4 <- vc-log-edit: nil
| | 3 <- vc-start-logentry: "Enter a change comment.  Type C-c C-c when done"
| 2 <- vc-checkin: "Enter a change comment.  Type C-c C-c when done"
1 <- vc-next-action: "Enter a change comment.  Type C-c C-c when done"
======================================================================
1 -> vc-finish-logentry: nocomment=nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
| 2 -> vc-buffer-sync: not-urgent=nil
| 2 <- vc-buffer-sync: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-call-backend: backend=Git function-name=checkin args=(("c:/Users/gutov/vc/test/README.txt") nil #("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil)))
| | 3 -> vc-find-backend-function: backend=Git fun=checkin
| | | 4 -> vc-make-backend-sym: backend=Git sym=checkin
| | | 4 <- vc-make-backend-sym: vc-git-checkin
| | 3 <- vc-find-backend-function: vc-git-checkin
| | 3 -> vc-git-checkin: files=("c:/Users/gutov/vc/test/README.txt") _rev=nil comment=#("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil))
| | | 4 -> vc-kill-buffer-hook: 
| | | 4 <- vc-kill-buffer-hook: nil
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil)) "--only" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil)) "--only" "--")
| | | | | 6 -> vc-delistify: filelist=("commit" "-m" #("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil)) "--only" "--")
| | | | | 6 <- vc-delistify: #("commit -m First commit!
 --only --" 10 23 (fontified nil) 23 24 (fontified nil))
| | | | | 6 -> vc-delistify: filelist=("README.txt")
| | | | | 6 <- vc-delistify: "README.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("commit" "-m" #("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil)) "--only" "--" "README.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt")) (quote ("commit" "-m" #("First commit!
" 0 13 (fontified nil) 13 14 (fontified nil)) "--only" "--" "README.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-checkin: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-delete-automatic-version-backups: file="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-version-backup-file-name: file="c:/Users/gutov/vc/test/README.txt" rev=nil manual=nil regexp=t
| | 3 <- vc-version-backup-file-name: "README\\.txt\\.~.+\\.~"
| 2 <- vc-delete-automatic-version-backups: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-kill-buffer-hook: 
| 2 <- vc-kill-buffer-hook: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | 5 -> vc-buffer-context: 
| | | | | 6 -> vc-position-context: posn=7
| | | | | 6 <- vc-position-context: (7 7 #("
" 0 1 (fontified t)))
| | | | 5 <- vc-buffer-context: ((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | 5 -> vc-restore-buffer-context: context=((7 7 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-context-matches-p: posn=7 context=(7 7 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-context-matches-p: t
| | | | 5 <- vc-restore-buffer-context: nil
| | | 4 <- vc-revert-buffer-internal: nil
| | | 4 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | 5 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | 6 <- vc-file-getprop: Git
| | | | 5 <- vc-backend: Git
| | | | 5 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | | | 6 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | 8 <- vc-file-getprop: nil
| | | | | | | 8 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | | | 9 <- vc-file-getprop: Git
| | | | | | | 8 <- vc-backend: Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | 9 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | 10 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | 11 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | 12 <- process-file: 0
| | | | | | | | | | 11 <- vc-git--call: 0
| | | | | | | | | 10 <- vc-git--out-ok: t
| | | | | | | | | 10 -> vc-kill-buffer-hook: 
| | | | | | | | | 10 <- vc-kill-buffer-hook: nil
| | | | | | | | 9 <- vc-git-working-revision: "master"
| | | | | | | 8 <- vc-call-backend: "master"
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision value="master"
| | | | | | | 8 <- vc-file-setprop: "master"
| | | | | | 7 <- vc-working-revision: "master"
| | | | | | 7 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | | | 9 <- vc-file-getprop: up-to-date
| | | | | | | 8 <- vc-state: up-to-date
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | 7 <- vc-default-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system"))
| | | | | 6 <- vc-git-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-call-backend: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | 4 <- vc-mode-line: Git
| | 3 <- vc-resynch-window: nil
| 2 <- vc-resynch-buffer: nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
1 <- vc-finish-logentry: nil
======================================================================
1 -> vc-before-save: 
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | 3 <- vc-file-getprop: up-to-date
| 2 <- vc-state: up-to-date
| 2 -> vc-checkout-model: backend=Git files=("c:/Users/gutov/vc/test/README.txt")
| | 3 -> vc-call-backend: backend=Git function-name=checkout-model args=(("c:/Users/gutov/vc/test/README.txt"))
| | | 4 -> vc-git-checkout-model: _files=("c:/Users/gutov/vc/test/README.txt")
| | | 4 <- vc-git-checkout-model: implicit
| | 3 <- vc-call-backend: implicit
| 2 <- vc-checkout-model: implicit
| 2 -> vc-call-backend: backend=Git function-name=make-version-backups-p args=("c:/Users/gutov/vc/test/README.txt")
| | 3 -> vc-find-backend-function: backend=Git fun=make-version-backups-p
| | | 4 -> vc-make-backend-sym: backend=Git sym=make-version-backups-p
| | | 4 <- vc-make-backend-sym: vc-git-make-version-backups-p
| | | 4 -> vc-make-backend-sym: backend=default sym=make-version-backups-p
| | | 4 <- vc-make-backend-sym: vc-default-make-version-backups-p
| | 3 <- vc-find-backend-function: (vc-default-make-version-backups-p . Git)
| | 3 -> vc-default-make-version-backups-p: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | 3 <- vc-default-make-version-backups-p: nil
| 2 <- vc-call-backend: nil
1 <- vc-before-save: nil
======================================================================
1 -> vc-after-save: 
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-checkout-time
| 2 <- vc-file-getprop: (20486 10517 0 0)
| 2 -> vc-checkout-model: backend=Git files=("c:/Users/gutov/vc/test/README.txt")
| | 3 -> vc-call-backend: backend=Git function-name=checkout-model args=(("c:/Users/gutov/vc/test/README.txt"))
| | | 4 -> vc-git-checkout-model: _files=("c:/Users/gutov/vc/test/README.txt")
| | | 4 <- vc-git-checkout-model: implicit
| | 3 <- vc-call-backend: implicit
| 2 <- vc-checkout-model: implicit
| 2 -> vc-state-refresh: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | 3 -> vc-call-backend: backend=Git function-name=state-heuristic args=("c:/Users/gutov/vc/test/README.txt")
| | | 4 -> vc-default-state-heuristic: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | 5 -> vc-call-backend: backend=Git function-name=state args=("c:/Users/gutov/vc/test/README.txt")
| | | | | 6 -> vc-git-state: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-git--run-command-string: file="c:/Users/gutov/vc/test/README.txt" args=("diff-index" "-p" "--raw" "-z" "HEAD" "--")
| | | | | | | 8 -> vc-git--out-ok: command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | 9 -> vc-git--call: buffer=(t nil) command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | 10 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("diff-index" "-p" "--raw" "-z" "HEAD" "--" "README.txt")
| | | | | | | | | 10 <- process-file: 0
| | | | | | | | 9 <- vc-git--call: 0
| | | | | | | 8 <- vc-git--out-ok: t
| | | | | | | 8 -> vc-kill-buffer-hook: 
| | | | | | | 8 <- vc-kill-buffer-hook: nil
| | | | | | 7 <- vc-git--run-command-string: ":100644 100644 940a58c00bbf0caeb5369eccaaae0e55be775acf 0000000000000000000000000000000000000000 M.README.txt.\0diff --git a/README.txt b/README.txt
index 940a58c..3bf86b2 100644
--- a/README.txt
+++ b/README.txt
@@ -1 +1,3 @@
 Hello!
+
+Hello again!
"
| | | | | | 7 -> vc-git--state-code: code="M"
| | | | | | 7 <- vc-git--state-code: edited
| | | | | 6 <- vc-git-state: edited
| | | | 5 <- vc-call-backend: edited
| | | 4 <- vc-default-state-heuristic: edited
| | 3 <- vc-call-backend: edited
| | 3 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state value=edited
| | 3 <- vc-file-setprop: edited
| 2 <- vc-state-refresh: edited
| 2 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | 3 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | 4 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | 5 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | 6 <- vc-file-getprop: "master"
| | | | 5 <- vc-working-revision: "master"
| | | | 5 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | 7 <- vc-file-getprop: edited
| | | | | 6 <- vc-state: edited
| | | | | 6 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | 7 <- vc-file-getprop: "master"
| | | | | 6 <- vc-working-revision: "master"
| | | | 5 <- vc-default-mode-line-string: #("Git:master" 0 10 (help-echo "Locally modified file under the Git version control system"))
| | | 4 <- vc-git-mode-line-string: #("Git:master" 0 10 (help-echo "Locally modified file under the Git version control system
Current branch: master"))
| | 3 <- vc-call-backend: #("Git:master" 0 10 (help-echo "Locally modified file under the Git version control system
Current branch: master"))
| 2 <- vc-mode-line: Git
1 <- vc-after-save: nil
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | 4 <- vc-file-getprop: Git
| | 3 <- vc-backend: Git
| | 3 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | 4 <- vc-file-getprop: edited
| | 3 <- vc-state: edited
| | 3 -> vc-checkout-model: backend=Git files="c:/Users/gutov/vc/test/README.txt"
| | | 4 -> vc-call-backend: backend=Git function-name=checkout-model args=("c:/Users/gutov/vc/test/README.txt")
| | | | 5 -> vc-git-checkout-model: _files="c:/Users/gutov/vc/test/README.txt"
| | | | 5 <- vc-git-checkout-model: implicit
| | | 4 <- vc-call-backend: implicit
| | 3 <- vc-checkout-model: implicit
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/README.txt") (#1#) edited implicit)
| 2 -> vc-compatible-state: p=edited q=edited
| 2 <- vc-compatible-state: t
| 2 -> vc-checkin: files=("c:/Users/gutov/vc/test/README.txt") backend=Git rev=nil comment=nil initial-contents=nil
| | 3 -> vc-start-logentry: files=("c:/Users/gutov/vc/test/README.txt") comment=nil initial-contents=nil msg="Enter a change comment." logbuf="*vc-log*" mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] action=#[514 "\304\305\306.!\"\210\211\203.\0\307\310.\"\204.\0\311\262.\312C\313.\x1a\313\262.\x03\211\203^.\211@\314.!\203R.\315 \211\203N.\211@\316.!\211\203F.\317.\x02\"\203F.\211.\x06B\262.\210.A\266\202\202,.\210\202W.\211.B\262.\x01A\266\202\202.\0\210\320\300\321.\x06\301.\a%\210\322\323.\"\210\211\211\203\250.\211@\324\325\326\327.!8B\330BB\211\203\240.\211@\211@\211
>\204\230.\331\332.\v\".\x04A#\210\210.A\266\202\202\200.\210.A\266\202\202o.\210)\266.\304\333\306.!\"\207" [Git nil vc-touched-properties vc-file-prop-obarray message "Checking in %s..." vc-delistify string-match "[^	
 ]" "*** empty log message ***" t nil file-directory-p buffer-list buffer-file-name string-prefix-p vc-call-backend checkin mapc vc-delete-automatic-version-backups (vc-state . up-to-date) vc-checkout-time 5 file-attributes ((vc-working-revision)) put intern "Checking in %s...done"] 13 "

(fn FILES COMMENT)"] after-hook=vc-checkin-hook backend=Git
| | | 4 -> vc-dispatcher-browsing: 
| | | 4 <- vc-dispatcher-browsing: nil
| | | 4 -> vc-log-edit: fileset=("c:/Users/gutov/vc/test/README.txt") mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] backend=Git
| | | | 5 -> vc-call-backend: backend=Git function-name=log-edit-mode args=nil
| | | | | 6 -> vc-default-log-edit-mode: backend=Git
| | | | | 6 <- vc-default-log-edit-mode: nil
| | | | 5 <- vc-call-backend: nil
| | | 4 <- vc-log-edit: nil
| | 3 <- vc-start-logentry: "Enter a change comment.  Type C-c C-c when done"
| 2 <- vc-checkin: "Enter a change comment.  Type C-c C-c when done"
1 <- vc-next-action: "Enter a change comment.  Type C-c C-c when done"
======================================================================
1 -> vc-finish-logentry: nocomment=nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
| 2 -> vc-buffer-sync: not-urgent=nil
| 2 <- vc-buffer-sync: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-call-backend: backend=Git function-name=checkin args=(("c:/Users/gutov/vc/test/README.txt") nil #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)))
| | 3 -> vc-git-checkin: files=("c:/Users/gutov/vc/test/README.txt") _rev=nil comment=#("Second!
" 0 7 (fontified nil) 7 8 (fontified nil))
| | | 4 -> vc-kill-buffer-hook: 
| | | 4 <- vc-kill-buffer-hook: nil
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt") flags=("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 -> vc-delistify: filelist=("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 <- vc-delistify: #("commit -m Second!
 --only --" 10 17 (fontified nil) 17 18 (fontified nil))
| | | | | 6 -> vc-delistify: filelist=("README.txt")
| | | | | 6 <- vc-delistify: "README.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "README.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt")) (quote ("commit" "-m" #("Second!
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "README.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-checkin: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-delete-automatic-version-backups: file="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-version-backup-file-name: file="c:/Users/gutov/vc/test/README.txt" rev=nil manual=nil regexp=t
| | 3 <- vc-version-backup-file-name: "README\\.txt\\.~.+\\.~"
| 2 <- vc-delete-automatic-version-backups: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/README.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/README.txt"
| 2 -> vc-kill-buffer-hook: 
| 2 <- vc-kill-buffer-hook: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/README.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | 5 -> vc-buffer-context: 
| | | | | 6 -> vc-position-context: posn=21
| | | | | 6 <- vc-position-context: (21 21 #("
" 0 1 (fontified t)))
| | | | 5 <- vc-buffer-context: ((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | 5 -> vc-restore-buffer-context: context=((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-context-matches-p: posn=21 context=(21 21 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-context-matches-p: t
| | | | 5 <- vc-restore-buffer-context: nil
| | | 4 <- vc-revert-buffer-internal: nil
| | | 4 -> vc-mode-line: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | 5 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | 6 <- vc-file-getprop: Git
| | | | 5 <- vc-backend: Git
| | | | 5 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/README.txt")
| | | | | 6 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/README.txt"
| | | | | | 7 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | 8 <- vc-file-getprop: nil
| | | | | | | 8 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | | | | | | | 9 <- vc-file-getprop: Git
| | | | | | | 8 <- vc-backend: Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/README.txt")
| | | | | | | | 9 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | | | 10 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | 11 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | 12 <- process-file: 0
| | | | | | | | | | 11 <- vc-git--call: 0
| | | | | | | | | 10 <- vc-git--out-ok: t
| | | | | | | | | 10 -> vc-kill-buffer-hook: 
| | | | | | | | | 10 <- vc-kill-buffer-hook: nil
| | | | | | | | 9 <- vc-git-working-revision: "master"
| | | | | | | 8 <- vc-call-backend: "master"
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision value="master"
| | | | | | | 8 <- vc-file-setprop: "master"
| | | | | | 7 <- vc-working-revision: "master"
| | | | | | 7 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/README.txt"
| | | | | | | 8 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | | | | | | | 9 <- vc-file-getprop: up-to-date
| | | | | | | 8 <- vc-state: up-to-date
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/README.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | 7 <- vc-default-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system"))
| | | | | 6 <- vc-git-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-call-backend: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | 4 <- vc-mode-line: Git
| | 3 <- vc-resynch-window: nil
| 2 <- vc-resynch-buffer: nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
1 <- vc-finish-logentry: nil
======================================================================
1 -> vc-menu-map-filter: orig-binding=vc-menu-map
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-call-backend: backend=Git function-name=extra-menu args=nil
| | 3 -> vc-find-backend-function: backend=Git fun=extra-menu
| | | 4 -> vc-make-backend-sym: backend=Git sym=extra-menu
| | | 4 <- vc-make-backend-sym: vc-git-extra-menu
| | 3 <- vc-find-backend-function: vc-git-extra-menu
| | 3 -> vc-git-extra-menu: 
| | 3 <- vc-git-extra-menu: (keymap (git-ss menu-item "Show Stash..." vc-git-stash-show :help "Show stash contents") (git-st menu-item "Create Stash..." vc-git-stash :help "Stash away changes") (git-sn menu-item "Stash a Snapshot" vc-git-stash-snapshot :help "Stash the current state of the tree and keep the current state") (git-grep menu-item "Git grep..." vc-git-grep :help "Run the `git grep' command"))
| 2 <- vc-call-backend: (keymap (git-ss menu-item "Show Stash..." vc-git-stash-show :help "Show stash contents") (git-st menu-item "Create Stash..." vc-git-stash :help "Stash away changes") (git-sn menu-item "Stash a Snapshot" vc-git-stash-snapshot :help "Stash the current state of the tree and keep the current state") (git-grep menu-item "Git grep..." vc-git-grep :help "Run the `git grep' command"))
1 <- vc-menu-map-filter: (keymap (vc-dir menu-item "VC Dir" vc-dir :help "Show the VC status of files in a directory") (vc-register menu-item "Register" vc-register :help "Register file set into a version control system") (vc-next-action menu-item "Check In/Out" vc-next-action :help "Do the next logical version control operation on the current fileset") (vc-update menu-item "Update to Latest Version" vc-update :help "Update the current fileset's files to their tip revisions") (vc-revert menu-item "Revert to Base Version" vc-revert :help "Revert working copies of the selected file set to their repository contents") (undo menu-item "Undo Last Check-In" vc-rollback :help "Remove the most recent changeset committed to the repository") (vc-insert-header menu-item "Insert Header" vc-insert-headers :help "Insert headers into a file for use with a version control system.
") (separator2 #1="--") (vc-print-root-log menu-item "Show Top of the Tree History " vc-print-root-log :help "List the change log for the current tree in a window") (vc-print-log menu-item "Show History" vc-print-log :help "List the change log of the current file set in a window") (vc-log-in menu-item "Show Incoming Log" vc-log-incoming :help "Show a log of changes that will be received with a pull operation") (vc-log-out menu-item "Show Outgoing Log" vc-log-outgoing :help "Show a log of changes that will be sent with a push operation") (vc-update-change-log menu-item "Update ChangeLog" vc-update-change-log :help "Find change log file and add entries from recent version control logs") (vc-root-diff menu-item "Compare Tree with Base Version" vc-root-diff :help "Compare current tree with the base version") (vc-diff menu-item "Compare with Base Version" vc-diff :help "Compare file set with the base version") (vc-revision-other-window menu-item "Show Other Version" vc-revision-other-window :help "Visit another version of the current file in another window") (vc-rename-file menu-item "Rename File" vc-rename-file :help "Rename file") (vc-annotate menu-item "Annotate" vc-annotate :help "Display the edit history of the current file using colors") (separator1 #1#) (vc-create-tag menu-item "Create Tag" vc-create-tag :help "Create version tag") (vc-retrieve-tag menu-item "Retrieve Tag" vc-retrieve-tag :help "Retrieve tagged version or branch") "Version Control" (ext-menu-separator #1#) keymap (git-ss menu-item "Show Stash..." vc-git-stash-show :help "Show stash contents") (git-st menu-item "Create Stash..." vc-git-stash :help "Stash away changes") (git-sn menu-item "Stash a Snapshot" vc-git-stash-snapshot :help "Stash the current state of the tree and keep the current state") (git-grep menu-item "Git grep..." vc-git-grep :help "Run the `git grep' command"))
======================================================================
1 -> vc-rename-file: old="c:/Users/gutov/vc/test/README.txt" new="c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-state: file="c:/Users/gutov/vc/test/README.txt" backend=nil
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-state
| | 3 <- vc-file-getprop: up-to-date
| 2 <- vc-state: up-to-date
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/README.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/README.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-call-backend: backend=Git function-name=rename-file args=("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt")
| | 3 -> vc-find-backend-function: backend=Git fun=rename-file
| | | 4 -> vc-make-backend-sym: backend=Git sym=rename-file
| | | 4 <- vc-make-backend-sym: vc-git-rename-file
| | 3 <- vc-find-backend-function: vc-git-rename-file
| | 3 -> vc-git-rename-file: old="c:/Users/gutov/vc/test/README.txt" new="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt") flags=("mv" "-f" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt") flags=("mv" "-f" "--")
| | | | | 6 -> vc-delistify: filelist=("mv" "-f" "--")
| | | | | 6 <- vc-delistify: "mv -f --"
| | | | | 6 -> vc-delistify: filelist=("README.txt" "TODO.txt")
| | | | | 6 <- vc-delistify: "README.txt TODO.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("mv" "-f" "--" "README.txt" "TODO.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/README.txt" "c:/Users/gutov/vc/test/TODO.txt")) (quote ("mv" "-f" "--" "README.txt" "TODO.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-rename-file: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/README.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: nil
| | 3 -> vc-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | 4 <- vc-file-getprop: nil
| | | 4 -> vc-call-backend: backend=RCS function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-rcs-registered: f="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-default-registered: backend=RCS file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=RCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-rcs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/TODO.txt" templates=("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s,v" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/TODO.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%s%s,v" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/TODO.txt,v"
| | | | | | | 8 -> vc-possible-master: s="%sRCS/%s" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/RCS/TODO.txt"
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-rcs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=CVS function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-find-backend-function: backend=CVS fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=CVS sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-cvs-registered
| | | | 5 <- vc-find-backend-function: vc-cvs-registered
| | | | 5 -> vc-cvs-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 <- vc-cvs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SVN function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-find-backend-function: backend=SVN fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=SVN sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-svn-registered
| | | | 5 <- vc-find-backend-function: vc-svn-registered
| | | | 5 -> vc-svn-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/TODO.txt" witness=".svn"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-svn-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=SCCS function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-sccs-registered: f="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-default-registered: backend=SCCS file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-make-backend-sym: backend=SCCS sym=master-templates
| | | | | | 7 <- vc-make-backend-sym: vc-sccs-master-templates
| | | | | | 7 -> vc-check-master-templates: file="c:/Users/gutov/vc/test/TODO.txt" templates=("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)
| | | | | | | 8 -> vc-possible-master: s="%sSCCS/s.%s" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/SCCS/s.TODO.txt"
| | | | | | | 8 -> vc-possible-master: s="%ss.%s" dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | 8 <- vc-possible-master: "c:/Users/gutov/vc/test/s.TODO.txt"
| | | | | | | 8 -> vc-possible-master: s=vc-sccs-search-project-dir dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | | 9 -> vc-sccs-search-project-dir: dirname="c:/Users/gutov/vc/test/" basename="TODO.txt"
| | | | | | | | 9 <- vc-sccs-search-project-dir: nil
| | | | | | | 8 <- vc-possible-master: nil
| | | | | | 7 <- vc-check-master-templates: (nil nil nil)
| | | | | 6 <- vc-default-registered: nil
| | | | 5 <- vc-sccs-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Bzr function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-find-backend-function: backend=Bzr fun=registered
| | | | | 6 -> vc-make-backend-sym: backend=Bzr sym=registered
| | | | | 6 <- vc-make-backend-sym: vc-bzr-registered
| | | | 5 <- vc-find-backend-function: vc-bzr-registered
| | | | 5 -> vc-bzr-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=bzr-root
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-find-root: file="c:/Users/gutov/vc/test/TODO.txt" witness=".bzr/checkout/format"
| | | | | 6 <- vc-find-root: nil
| | | | 5 <- vc-bzr-registered: nil
| | | 4 <- vc-call-backend: nil
| | | 4 -> vc-call-backend: backend=Git function-name=registered args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-git-registered: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-git-root: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-root
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-find-root: file="c:/Users/gutov/vc/test/TODO.txt" witness=".git"
| | | | | | 7 <- vc-find-root: "~/vc/test/"
| | | | | | 7 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=git-root value="~/vc/test/"
| | | | | | 7 <- vc-file-setprop: "~/vc/test/"
| | | | | 6 <- vc-git-root: "~/vc/test/"
| | | | | 6 -> vc-git--out-ok: command="ls-files" args=("-c" "-z" "--" "TODO.txt")
| | | | | | 7 -> vc-git--call: buffer=(t nil) command="ls-files" args=("-c" "-z" "--" "TODO.txt")
| | | | | | | 8 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("ls-files" "-c" "-z" "--" "TODO.txt")
| | | | | | | 8 <- process-file: 0
| | | | | | 7 <- vc-git--call: 0
| | | | | 6 <- vc-git--out-ok: t
| | | | | 6 -> vc-kill-buffer-hook: 
| | | | | 6 <- vc-kill-buffer-hook: nil
| | | | 5 <- vc-git-registered: t
| | | 4 <- vc-call-backend: t
| | | 4 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend value=Git
| | | 4 <- vc-file-setprop: Git
| | 3 <- vc-registered: t
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-mode-line: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | 3 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/TODO.txt")
| | | 4 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | 6 <- vc-file-getprop: nil
| | | | | 6 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | | | | 7 <- vc-file-getprop: Git
| | | | | 6 <- vc-backend: Git
| | | | | 6 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | 7 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | 8 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | 9 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | 10 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | 10 <- process-file: 0
| | | | | | | | 9 <- vc-git--call: 0
| | | | | | | 8 <- vc-git--out-ok: t
| | | | | | | 8 -> vc-kill-buffer-hook: 
| | | | | | | 8 <- vc-kill-buffer-hook: nil
| | | | | | 7 <- vc-git-working-revision: "master"
| | | | | 6 <- vc-call-backend: "master"
| | | | | 6 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision value="master"
| | | | | 6 <- vc-file-setprop: "master"
| | | | 5 <- vc-working-revision: "master"
| | | | 5 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | | | | | 7 <- vc-file-getprop: nil
| | | | | | 7 -> vc-state-refresh: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=state-heuristic args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | | | 9 -> vc-default-state-heuristic: backend=Git file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | 10 -> vc-call-backend: backend=Git function-name=state args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | | | | | 11 -> vc-git-state: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | | | 12 -> vc-git--run-command-string: file="c:/Users/gutov/vc/test/TODO.txt" args=("diff-index" "-p" "--raw" "-z" "HEAD" "--")
| | | | | | | | | | | | 13 -> vc-git--out-ok: command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "TODO.txt")
| | | | | | | | | | | | | 14 -> vc-git--call: buffer=(t nil) command="diff-index" args=("-p" "--raw" "-z" "HEAD" "--" "TODO.txt")
| | | | | | | | | | | | | | 15 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("diff-index" "-p" "--raw" "-z" "HEAD" "--" "TODO.txt")
| | | | | | | | | | | | | | 15 <- process-file: 0
| | | | | | | | | | | | | 14 <- vc-git--call: 0
| | | | | | | | | | | | 13 <- vc-git--out-ok: t
| | | | | | | | | | | | 13 -> vc-kill-buffer-hook: 
| | | | | | | | | | | | 13 <- vc-kill-buffer-hook: nil
| | | | | | | | | | | 12 <- vc-git--run-command-string: ":000000 100644 0000000000000000000000000000000000000000 3bf86b2c8f3178e4ce8aa4cf255c0d9e260b6c12 A.TODO.txt.\0diff --git a/TODO.txt b/TODO.txt
new file mode 100644
index 0000000..3bf86b2
--- /dev/null
+++ b/TODO.txt
@@ -0,0 +1,3 @@
+Hello!
+
+Hello again!
"
| | | | | | | | | | | 12 -> vc-git--state-code: code="A"
| | | | | | | | | | | 12 <- vc-git--state-code: added
| | | | | | | | | | 11 <- vc-git-state: added
| | | | | | | | | 10 <- vc-call-backend: added
| | | | | | | | 9 <- vc-default-state-heuristic: added
| | | | | | | 8 <- vc-call-backend: added
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state value=added
| | | | | | | 8 <- vc-file-setprop: added
| | | | | | 7 <- vc-state-refresh: added
| | | | | 6 <- vc-state: added
| | | | | 6 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | 7 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | | 7 <- vc-file-getprop: "master"
| | | | | 6 <- vc-working-revision: "master"
| | | | 5 <- vc-default-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system"))
| | | 4 <- vc-git-mode-line-string: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| | 3 <- vc-call-backend: #("Git@master" 0 10 (help-echo "Locally added file under the Git version control system
Current branch: master"))
| 2 <- vc-mode-line: Git
1 <- vc-rename-file: nil
======================================================================
1 -> vc-next-action: verbose=nil
| 2 -> vc-deduce-fileset: observer=nil allow-unregistered=t state-model-only-files=state-model-only-files
| | 3 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | 4 <- vc-file-getprop: Git
| | 3 <- vc-backend: Git
| | 3 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | 4 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | | 4 <- vc-file-getprop: added
| | 3 <- vc-state: added
| | 3 -> vc-checkout-model: backend=Git files="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-call-backend: backend=Git function-name=checkout-model args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | 5 -> vc-git-checkout-model: _files="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 <- vc-git-checkout-model: implicit
| | | 4 <- vc-call-backend: implicit
| | 3 <- vc-checkout-model: implicit
| 2 <- vc-deduce-fileset: (Git (#1="c:/Users/gutov/vc/test/TODO.txt") (#1#) added implicit)
| 2 -> vc-compatible-state: p=added q=edited
| 2 <- vc-compatible-state: (edited added removed)
| 2 -> vc-checkin: files=("c:/Users/gutov/vc/test/TODO.txt") backend=Git rev=nil comment=nil initial-contents=nil
| | 3 -> vc-start-logentry: files=("c:/Users/gutov/vc/test/TODO.txt") comment=nil initial-contents=nil msg="Enter a change comment." logbuf="*vc-log*" mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] action=#[514 "\304\305\306.!\"\210\211\203.\0\307\310.\"\204.\0\311\262.\312C\313.\x1a\313\262.\x03\211\203^.\211@\314.!\203R.\315 \211\203N.\211@\316.!\211\203F.\317.\x02\"\203F.\211.\x06B\262.\210.A\266\202\202,.\210\202W.\211.B\262.\x01A\266\202\202.\0\210\320\300\321.\x06\301.\a%\210\322\323.\"\210\211\211\203\250.\211@\324\325\326\327.!8B\330BB\211\203\240.\211@\211@\211
>\204\230.\331\332.\v\".\x04A#\210\210.A\266\202\202\200.\210.A\266\202\202o.\210)\266.\304\333\306.!\"\207" [Git nil vc-touched-properties vc-file-prop-obarray message "Checking in %s..." vc-delistify string-match "[^	
 ]" "*** empty log message ***" t nil file-directory-p buffer-list buffer-file-name string-prefix-p vc-call-backend checkin mapc vc-delete-automatic-version-backups (vc-state . up-to-date) vc-checkout-time 5 file-attributes ((vc-working-revision)) put intern "Checking in %s...done"] 13 "

(fn FILES COMMENT)"] after-hook=vc-checkin-hook backend=Git
| | | 4 -> vc-dispatcher-browsing: 
| | | 4 <- vc-dispatcher-browsing: nil
| | | 4 -> vc-log-edit: fileset=("c:/Users/gutov/vc/test/TODO.txt") mode=#[0 "\301\300\302\"\207" [Git vc-call-backend log-edit-mode] 3 "

(fn)"] backend=Git
| | | | 5 -> vc-call-backend: backend=Git function-name=log-edit-mode args=nil
| | | | | 6 -> vc-default-log-edit-mode: backend=Git
| | | | | 6 <- vc-default-log-edit-mode: nil
| | | | 5 <- vc-call-backend: nil
| | | 4 <- vc-log-edit: nil
| | 3 <- vc-start-logentry: "Enter a change comment.  Type C-c C-c when done"
| 2 <- vc-checkin: "Enter a change comment.  Type C-c C-c when done"
1 <- vc-next-action: "Enter a change comment.  Type C-c C-c when done"
======================================================================
1 -> vc-finish-logentry: nocomment=nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
| 2 -> vc-buffer-sync: not-urgent=nil
| 2 <- vc-buffer-sync: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/TODO.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-call-backend: backend=Git function-name=checkin args=(("c:/Users/gutov/vc/test/TODO.txt") nil #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)))
| | 3 -> vc-git-checkin: files=("c:/Users/gutov/vc/test/TODO.txt") _rev=nil comment=#("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil))
| | | 4 -> vc-kill-buffer-hook: 
| | | 4 <- vc-kill-buffer-hook: nil
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list=("c:/Users/gutov/vc/test/TODO.txt") flags=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list=("c:/Users/gutov/vc/test/TODO.txt") flags=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 -> vc-delistify: filelist=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--")
| | | | | 6 <- vc-delistify: #("commit -m Renamed
 --only --" 10 17 (fontified nil) 17 18 (fontified nil))
| | | | | 6 -> vc-delistify: filelist=("TODO.txt")
| | | | | 6 <- vc-delistify: "TODO.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "TODO.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote ("c:/Users/gutov/vc/test/TODO.txt")) (quote ("commit" "-m" #("Renamed
" 0 7 (fontified nil) 7 8 (fontified nil)) "--only" "--" "TODO.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-checkin: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-delete-automatic-version-backups: file="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-version-backup-file-name: file="c:/Users/gutov/vc/test/TODO.txt" rev=nil manual=nil regexp=t
| | 3 <- vc-version-backup-file-name: "TODO\\.txt\\.~.+\\.~"
| 2 <- vc-delete-automatic-version-backups: nil
| 2 -> vc-delistify: filelist=("c:/Users/gutov/vc/test/TODO.txt")
| 2 <- vc-delistify: "c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-kill-buffer-hook: 
| 2 <- vc-kill-buffer-hook: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/TODO.txt" keep=t noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/TODO.txt" keep=t noquery=t reset-vc-info=nil
| | | 4 -> vc-revert-buffer-internal: arg=t no-confirm=t
| | | | 5 -> vc-buffer-context: 
| | | | | 6 -> vc-position-context: posn=21
| | | | | 6 <- vc-position-context: (21 21 #("
" 0 1 (fontified t)))
| | | | 5 <- vc-buffer-context: ((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | 5 -> vc-restore-buffer-context: context=((21 21 #("
" 0 1 (fontified t))) nil nil)
| | | | | 6 -> vc-context-matches-p: posn=21 context=(21 21 #("
" 0 1 (fontified t)))
| | | | | 6 <- vc-context-matches-p: t
| | | | 5 <- vc-restore-buffer-context: nil
| | | 4 <- vc-revert-buffer-internal: nil
| | | 4 -> vc-mode-line: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | | 5 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | | | 6 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | | | 6 <- vc-file-getprop: Git
| | | | 5 <- vc-backend: Git
| | | | 5 -> vc-call-backend: backend=Git function-name=mode-line-string args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | 6 -> vc-git-mode-line-string: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | 7 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | | | | | | 8 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | | | 8 <- vc-file-getprop: nil
| | | | | | | 8 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | | | | | | | 9 <- vc-file-getprop: Git
| | | | | | | 8 <- vc-backend: Git
| | | | | | | 8 -> vc-call-backend: backend=Git function-name=working-revision args=("c:/Users/gutov/vc/test/TODO.txt")
| | | | | | | | 9 -> vc-git-working-revision: _file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | | | 10 -> vc-git--out-ok: command="symbolic-ref" args=("HEAD")
| | | | | | | | | | 11 -> vc-git--call: buffer=(t nil) command="symbolic-ref" args=("HEAD")
| | | | | | | | | | | 12 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=(t nil) display=nil args=("symbolic-ref" "HEAD")
| | | | | | | | | | | 12 <- process-file: 0
| | | | | | | | | | 11 <- vc-git--call: 0
| | | | | | | | | 10 <- vc-git--out-ok: t
| | | | | | | | | 10 -> vc-kill-buffer-hook: 
| | | | | | | | | 10 <- vc-kill-buffer-hook: nil
| | | | | | | | 9 <- vc-git-working-revision: "master"
| | | | | | | 8 <- vc-call-backend: "master"
| | | | | | | 8 -> vc-file-setprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision value="master"
| | | | | | | 8 <- vc-file-setprop: "master"
| | | | | | 7 <- vc-working-revision: "master"
| | | | | | 7 -> vc-default-mode-line-string: backend=Git file="c:/Users/gutov/vc/test/TODO.txt"
| | | | | | | 8 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | | | | | | | 9 <- vc-file-getprop: up-to-date
| | | | | | | 8 <- vc-state: up-to-date
| | | | | | | 8 -> vc-working-revision: file="c:/Users/gutov/vc/test/TODO.txt" backend=Git
| | | | | | | | 9 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-working-revision
| | | | | | | | 9 <- vc-file-getprop: "master"
| | | | | | | 8 <- vc-working-revision: "master"
| | | | | | 7 <- vc-default-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system"))
| | | | | 6 <- vc-git-mode-line-string: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | | 5 <- vc-call-backend: #("Git-master" 0 10 (help-echo "Up to date file under the Git version control system
Current branch: master"))
| | | 4 <- vc-mode-line: Git
| | 3 <- vc-resynch-window: nil
| 2 <- vc-resynch-buffer: nil
| 2 -> vc-dispatcher-browsing: 
| 2 <- vc-dispatcher-browsing: nil
1 <- vc-finish-logentry: nil
======================================================================
1 -> vc-delete-file: file="c:/Users/gutov/vc/test/TODO.txt"
| 2 -> vc-backend: file-or-list="c:/Users/gutov/vc/test/TODO.txt"
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-backend
| | 3 <- vc-file-getprop: Git
| 2 <- vc-backend: Git
| 2 -> vc-find-backend-function: backend=Git fun=delete-file
| | 3 -> vc-make-backend-sym: backend=Git sym=delete-file
| | 3 <- vc-make-backend-sym: vc-git-delete-file
| 2 <- vc-find-backend-function: vc-git-delete-file
| 2 -> vc-state: file="c:/Users/gutov/vc/test/TODO.txt" backend=nil
| | 3 -> vc-file-getprop: file="c:/Users/gutov/vc/test/TODO.txt" property=vc-state
| | 3 <- vc-file-getprop: up-to-date
| 2 <- vc-state: up-to-date
| 2 -> vc-call-backend: backend=Git function-name=delete-file args=("c:/Users/gutov/vc/test/TODO.txt")
| | 3 -> vc-find-backend-function: backend=Git fun=delete-file
| | | 4 -> vc-make-backend-sym: backend=Git sym=delete-file
| | | 4 <- vc-make-backend-sym: vc-git-delete-file
| | 3 <- vc-find-backend-function: vc-git-delete-file
| | 3 -> vc-git-delete-file: file="c:/Users/gutov/vc/test/TODO.txt"
| | | 4 -> vc-git-command: buffer=nil okstatus=0 file-or-list="c:/Users/gutov/vc/test/TODO.txt" flags=("rm" "-f" "--")
| | | | 5 -> vc-do-command: buffer="*vc*" okstatus=0 command="C:/Program Files (x86)/Git/bin/git.exe" file-or-list="c:/Users/gutov/vc/test/TODO.txt" flags=("rm" "-f" "--")
| | | | | 6 -> vc-delistify: filelist=("rm" "-f" "--")
| | | | | 6 <- vc-delistify: "rm -f --"
| | | | | 6 -> vc-delistify: filelist=("TODO.txt")
| | | | | 6 <- vc-delistify: "TODO.txt"
| | | | | 6 -> vc-setup-buffer: buf="*vc*"
| | | | | 6 <- vc-setup-buffer: nil
| | | | | 6 -> process-file: program="C:/Program Files (x86)/Git/bin/git.exe" infile=nil buffer=t display=nil args=("rm" "-f" "--" "TODO.txt")
| | | | | 6 <- process-file: 0
| | | | | 6 -> vc-exec-after: code=(run-hook-with-args (quote vc-post-command-functions) (quote "C:/Program Files (x86)/Git/bin/git.exe") (quote "c:/Users/gutov/vc/test/TODO.txt") (quote ("rm" "-f" "--" "TODO.txt")))
| | | | | 6 <- vc-exec-after: nil
| | | | 5 <- vc-do-command: 0
| | | 4 <- vc-git-command: 0
| | 3 <- vc-git-delete-file: 0
| 2 <- vc-call-backend: 0
| 2 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/TODO.txt"
| 2 <- vc-file-clearprops: nil
| 2 -> vc-resynch-buffer: file="c:/Users/gutov/vc/test/TODO.txt" keep=nil noquery=t reset-vc-info=nil
| | 3 -> vc-resynch-window: file="c:/Users/gutov/vc/test/TODO.txt" keep=nil noquery=t reset-vc-info=nil
| | | 4 -> vc-kill-buffer-hook: 
| | | | 5 -> vc-file-clearprops: file="c:/Users/gutov/vc/test/TODO.txt"
| | | | 5 <- vc-file-clearprops: nil
| | | 4 <- vc-kill-buffer-hook: nil
| | 3 <- vc-resynch-window: t
| 2 <- vc-resynch-buffer: nil
1 <- vc-delete-file: nil

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Michael Albinus]

Dmitry Gutov <dgutov@yandex.ru> writes:

> So I'm just doing one scenario now. If you write a different one, I
> can do that next.
>
> Scenario:
> 1. git init test (outside of Emacs)
> 2. find-file in this directory (creating the new file)
> 3. edit, save, `vc-next-action' (registering the new file)
> 4. repeat step 3 (makes first commit)
> 5. repeat step 4 (makes second commit)
> 6. `vc-rename-file'
> 7. `vc-next-action' (commit)
> 8. `vc-delete-file'

This scenario seems to be sufficient.

> Done this twice, logs 1 and 3 - without the patch, 2 and 4 - with the
> patch. 1 ~ 3 and 2 ~ 4, so you may just as well compare only one pair.
>
> The difference: a few getprop/setprop calls, and one full uncached
> vc-git-registered' call in `vc-register' (after "git add" was called),
> all in favor of the patched version (which doesn't make the above
> calls).

Yes. Just naively counting `process-file' calls, the unpatched version
uses 27 calls, and the patched version needs 26. This is likely, because
the patched version doesn't call `vc-git-registered' in `vc-git-state'.

> This would have been different if the file existed and was registered
> in the repository before step 2, then the first call to
> vc-git-registered' would have returned `t' in both versions.

Likely, it doesn't matter. Such a scenario is not what we can expect to
happen often (open an unregistered file in Emacs, it is registered
outside Emacs, and we try to register it inside Emacs). It will result
in an error, that's it.

Finally, I will apply your patch to vc-git.el. Thanks for all your
tests!

> P.S. `ediff' says there are no differences after around 43% mark, but
> there are. For example, line 1021 in trace-3.log shows a call to
> vc-git-registered', whereas the respective line 979 in trace-4.log
> shows that the call is skipped.

No problem here. That chunk is shown to me by ediff.

> --Dmitry

Best regards, Michael.

bug#11757: Acknowledgement (24.1.50; vc-git calls `process-file' too many times)

[Dmitry Gutov]

On 18.07.2012 18:38, Michael Albinus wrote:
> Finally, I will apply your patch to vc-git.el. Thanks for all your
> tests!

Cool, thanks! I'll try to close this now.

>> P.S. `ediff' says there are no differences after around 43% mark, but
>> there are. For example, line 1021 in trace-3.log shows a call to
>> vc-git-registered', whereas the respective line 979 in trace-4.log
>> shows that the call is skipped.
>
> No problem here. That chunk is shown to me by ediff.

Must be my version of diff, then.

--Dmitry