# HG changeset patch # User Glenn Morris # Date 1207018695 0 # Node ID f6fe1c1d8ba65087a8add834a7ad3f51e677f57b # Parent 53831e54bf444e54ce821a8311f8649de54a12c4 (vc-responsible-backend): Declare as function. diff -r 53831e54bf44 -r f6fe1c1d8ba6 lisp/vc-hooks.el --- a/lisp/vc-hooks.el Tue Apr 01 02:57:33 2008 +0000 +++ b/lisp/vc-hooks.el Tue Apr 01 02:58:15 2008 +0000 @@ -6,8 +6,6 @@ ;; Author: FSF (see vc.el for full credits) ;; Maintainer: Andre Spiegel -;; $Id$ - ;; This file is part of GNU Emacs. ;; GNU Emacs is free software; you can redistribute it and/or modify @@ -1060,12 +1058,14 @@ (defalias 'vc-menu-map vc-menu-map) +(declare-function vc-responsible-backend "vc" (file &optional register)) + (defun vc-menu-map-filter (orig-binding) (if (and (symbolp orig-binding) (fboundp orig-binding)) (setq orig-binding (indirect-function orig-binding))) (let ((ext-binding (when vc-mode - (vc-call-backend + (vc-call-backend (if buffer-file-name (vc-backend buffer-file-name) (vc-responsible-backend default-directory))