sellout/vc-pijul - Change NSNBNI5SHINOBOYDEWGSLDRXSPMTPA2GSLU26WKVUO72TZUDUEYQC

Fix vc-pijul-state

Created by sellout on October 9, 2022

NSNBNI5SHINOBOYDEWGSLDRXSPMTPA2GSLU26WKVUO72TZUDUEYQC

Dependencies

In channels

main

Change contents

Deletion in vc-pijul.el at line 240 [4.4]
B:BD[3.29] → [3.29:50]
```
    (forward-line 1)
```

Deletion in vc-pijul.el at line 241 [4.4]

B:BD[4.8925] → [5.1728:1760]

B:BD[5.1760] → [2.4671:4736]

     ((looking-at "No changes")
      (if (vc-pijul-registered file) 'up-to-date 'unregistered))

Replacement in vc-pijul.el at line 243 [4.4]

∅:D[2.4820] → [5.1910:1967]

B:BD[5.1910] → [5.1910:1967]

B:BD[5.1967] → [2.4821:4923]

∅:D[2.4923] → [5.2069:2343]

B:BD[5.2069] → [5.2069:2343]

     ((looking-at " * \\([^ \n]+\\) *-> *\\([^ \n]+\\)")
      ;; The paths printed by Pijul are relative to the root
      (let* ((root (vc-pijul-root file))
             (f (expand-file-name file))
             (f1 (expand-file-name (match-string 1) root))
             (f2 (expand-file-name (match-string 2) root)))
        (cond
         ((equal f f1) 'removed)
         ((equal f f2) 'added)
         (t nil))))
     (t nil))))

[2.4820]

[4.9558]

     ((progn (forward-line 1) (looking-at "Error: Path not in repository: "))
      nil)
     (t 'up-to-date))))

Replacement in vc-pijul.el at line 493 [4.4]

B:BD[2.9535] → [2.9535:9578]

  (vc-pijul-do-command 'mv 0 nil old new))

[2.9535]

[4.17868]

  (vc-pijul-do-command 'move 0 nil old new))