Package: subversion
Version: 1.4.0-5
Severity: normal
The problems described below also occurr with a the backport from
backports.org, 1.3.2-5~bpo1, within emacs21 from sarge or an
emacs-snapshot backport. Therefore it's likely that this also affects
sarge.
- If I mark a single file with `m', the marked file with a green font
shows up one line above the old place, hiding the file that was above
it before marking, and the unmarked entry is still there. I need to
press `g' to bring things in line again. Marking with `* M' or
similar doesn't have this effect
- when editing the commit message, there's a problem with line wrapping.
The buffer starts with lines that indicate the files to commit, each
prepended with two # signs, and a short explanation that everything
commented that way will not end up in the log message.
Now, when the message I type below is line-wrapped, the second line is
again started with two ## signs.
The following problem I only observed with the testing version,
backported to sarge:
- Each time after committing, I get an error message 'Unknown action ""
for <filename>'. It looks like it first successfully commits, but
then wants to do "something else" and find that there's an empty
list of tasks left.
Here's a backtrace:
Debugger entered--Lisp error: (error "Unknown action 'unknown for shapepar.xml")
signal(error ("Unknown action 'unknown for shapepar.xml"))
error("Unknown action '%s for %s" unknown "shapepar.xml")
(cond ((equal action ...) (setq tag-string " <committed>")) ((equal action
...) (setq tag-string " <added>")) ((equal action ...) (setq tag-string "
<deleted>")) ((equal action ...) (setq tag-string " <replaced>")) ((equal
action ...) (svn-status-line-info->set-propmark line-info
svn-status-file-modified-after-save-flag)) ((equal action ...)
(svn-status-line-info->set-filemark line-info 65)
(svn-status-line-info->set-localrev line-info 0)) ((equal action ...)
(svn-status-line-info->set-filemark line-info 68)) (t (error "Unknown action
'%s for %s" action ...)))
(let ((tag-string)) (svn-status-goto-file-name
(svn-status-line-info->filename line-info)) (when (and ...
svn-status-commit-rev-number) (svn-status-line-info->set-localrev line-info
svn-status-commit-rev-number) (svn-status-line-info->set-lastchangerev
line-info svn-status-commit-rev-number)) (cond (... ...) (... ...) (... ...)
(... ...) (... ...) (... ... ...) (... ...) (t ...)) (when tag-string
(svn-status-line-info->set-filemark line-info 32)
(svn-status-line-info->set-propmark line-info 32)) (let (...) (delete-region
... ...) (svn-insert-line-in-status-buffer line-info) (backward-char 1) (when
tag-string ...) (delete-char 1)))
svn-status-annotate-status-buffer-entry(unknown ((nil nil) 77 nil
"shapepar.xml" 6836 2898 "robin" nil nil nil nil))
(progn (setq action (cadar cmd-list))
(svn-status-annotate-status-buffer-entry action (car st-info)))
(if found (progn (setq action ...) (svn-status-annotate-status-buffer-entry
action ...)) (message "did not find %s" (caar cmd-list)))
(while cmd-list (unless st-info (setq st-info svn-status-info)) (setq found
nil) (while (and ... st-info) (setq found ...) (unless found ...)) (unless
found (message "continue to search for %s" ...) (setq st-info svn-status-info)
(while ... ... ...)) (if found (progn ... ...) (message "did not find %s" ...))
(setq cmd-list (cdr cmd-list)))
(let ((st-info) (found) (action) (fname ...) (fname-pos ...) (column ...))
(setq cmd-list (sort cmd-list ...)) (while cmd-list (unless st-info ...) (setq
found nil) (while ... ... ...) (unless found ... ... ...) (if found ... ...)
(setq cmd-list ...)) (if fname (progn ... ... ...) (goto-char ...)))
(save-excursion (set-buffer svn-status-buffer-name) (let (... ... ... ... ...
...) (setq cmd-list ...) (while cmd-list ... ... ... ... ... ...) (if fname ...
...)))
svn-status-update-with-command-list((("bertragen." unknown) ("shapepar.xml"
unknown)))
(cond ((eq svn-process-cmd ...) (svn-process-sentinel-fixup-path-seperators)
(svn-parse-status-result) (set-buffer act-buf) (svn-status-update-buffer) (when
svn-status-update-previous-process-output ... ... ... ... ... ...) (when
svn-status-display-new-status-buffer ... ...)) ((eq svn-process-cmd ...)
(svn-status-show-process-output ... t) (pop-to-buffer
svn-status-last-output-buffer-name) (svn-log-view-mode) (forward-line 3)
(font-lock-fontify-buffer) (message "svn log finished")) ((eq svn-process-cmd
...) (svn-status-show-process-output ... t) (message "svn info finished")) ((eq
svn-process-cmd ...) (svn-status-parse-info-result)) ((eq svn-process-cmd ...)
(svn-status-show-process-output ... t) (message "svn blame finished")) ((eq
svn-process-cmd ...) (svn-process-sentinel-fixup-path-seperators)
(svn-status-remove-temp-file-maybe) (when ... ...)
(svn-status-update-with-command-list ...) (run-hooks ...) (setq
svn-status-files-to-commit nil svn-status-recursive-commit nil) (message "svn
commit finished")) ((eq svn-process-cmd ...) (svn-status-show-process-output
... t) (svn-status-update) (message "svn update finished")) ((eq
svn-process-cmd ...) (svn-status-update-with-command-list ...) (message "svn
add finished")) ((eq svn-process-cmd ...) (svn-status-update) (message "svn
mkdir finished")) ((eq svn-process-cmd ...) (when ... ...) (svn-status-update)
(message "svn revert finished")) ((eq svn-process-cmd ...) (svn-status-update)
(message "svn resolved finished")) ((eq svn-process-cmd ...)
(svn-status-update) (message "svn mv finished")) ((eq svn-process-cmd ...)
(svn-status-update-with-command-list ...) (message "svn rm finished")) ((eq
svn-process-cmd ...) (message "svn cleanup finished")) ((eq svn-process-cmd
...) (svn-status-show-process-output ... t) (message "svn proplist finished"))
((eq svn-process-cmd ...) (svn-status-property-parse-property-names)) ((eq
svn-process-cmd ...) (svn-status-remove-temp-file-maybe) (if ... ... ...)) ((eq
svn-process-cmd ...) (svn-status-update)))
(cond ((string= event "finished\n") (cond ... ... ... ... ... ... ... ... ...
... ... ... ... ... ... ... ... ...)) ((string= event "killed\n") (message "svn
process killed")) ((string-match "exited abnormally" event) (while ...)
(goto-char ...) (message "svn failed: %s" ...)) (t (message "svn process had
unknown event: %s" event)) (svn-status-show-process-output nil t))
(let ((act-buf ...)) (set-buffer (process-buffer process)) (setq
svn-status-mode-line-process-status "") (svn-status-update-mode-line) (cond
(... ...) (... ...) (... ... ... ...) (t ...) (svn-status-show-process-output
nil t)))
svn-process-sentinel(#<process svn> "finished\n")
Regards, Frank
-- System Information:
Debian Release: 3.1
APT prefers unstable
APT policy: (99, 'unstable')
Architecture: i386 (i686)
Kernel: Linux 2.6.16-2-686
Locale: [EMAIL PROTECTED], [EMAIL PROTECTED] (charmap=ISO-8859-15)
Versions of packages subversion depends on:
ii libapr0 2.0.54-5sarge1 the Apache Portable Runtime
ii libc6 2.3.2.ds1-22sarge4 GNU C Library: Shared libraries an
ii libsvn0 1.3.2-5~bpo1 Shared libraries used by Subversio
-- no debconf information
--
Dr. Frank Küster
Single Molecule Spectroscopy, Protein Folding @ Inst. f. Biochemie, Univ. Zürich
Debian Developer (teTeX/TeXLive)
