Control: tags -1 + patch
Hi,
I've verified that the following patch, extracted from upstream, fixes
this issue:
Index: develock-el-0.39/develock.el
===================================================================
--- develock-el-0.39.orig/develock.el 2014-11-28 07:35:04.000000000 -0800
+++ develock-el-0.39/develock.el 2014-11-28 07:39:15.519099017 -0800
@@ -1802,10 +1802,8 @@
(defun develock-Orig-c-indent-line (&optional syntax quiet ignore-point-pos)
"This function should be redefined to the genuine `c-indent-line'."
- (require 'cc-engine)
- (let* ((fn (symbol-function (if (fboundp 'ad-Orig-c-indent-line)
- 'ad-Orig-c-indent-line
- 'c-indent-line)))
+ (let* ((fn (or (ad-real-orig-definition 'c-indent-line)
+ (symbol-function 'c-indent-line)))
;; Checking how many arguments `c-indent-line' accepts.
(nargs (length (ad-arglist fn))))
(cond ((= nargs 4)
@@ -1823,7 +1821,9 @@
Identical to `c-indent-line', but the optional arguments QUIET and
IGNORE-POINT-POS are ignored."
(funcall ,fn syntax))))))
- (if (featurep 'bytecomp)
+ (if (and (featurep 'bytecomp)
+ (eq (car-safe (symbol-function 'develock-Orig-c-indent-line))
+ 'lambda))
(byte-compile 'develock-Orig-c-indent-line))
(develock-Orig-c-indent-line syntax quiet ignore-point-pos))
--
Matt
--
To UNSUBSCRIBE, email to debian-bugs-rc-requ...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org
