gwh/slackbuilds
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Remove decency on parse-time.

Browse source
This commit is contained in:
Rémi Vanicat 2010-05-26 20:24:56 +02:00 committed by Phil Jackson
parent 87e196ed10
commit 19cb16c32d
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
magit.el
View file

@ -66,7 +66,6 @@
;; - 'Subsetting', only looking at a subset of all files. ;; - 'Subsetting', only looking at a subset of all files.
(eval-when-compile (require 'cl)) (eval-when-compile (require 'cl))
(eval-when-compile (require 'parse-time))
(require 'log-edit) (require 'log-edit)
(require 'easymenu) (require 'easymenu)
(require 'diff-mode) (require 'diff-mode)
@ -2123,7 +2122,7 @@ in the corresponding directories."
(goto-char (magit-section-beginning hunk)) (goto-char (magit-section-beginning hunk))
(if (not (looking-at "@@+ .* \\+\\([0-9]+\\),[0-9]+ @@+")) (if (not (looking-at "@@+ .* \\+\\([0-9]+\\),[0-9]+ @@+"))
(error "Hunk header not found")) (error "Hunk header not found"))
(let ((target (parse-integer (match-string 1)))) (let ((target (string-to-number (match-string 1))))
(forward-line) (forward-line)
(while (< (line-number-at-pos) line) (while (< (line-number-at-pos) line)
;; XXX - deal with combined diffs ;; XXX - deal with combined diffs