# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1055794902 0
# Node ID b521a93dd16bcc92f8eb5716f281582ac38cac65
# Parent  fc00b549e161aa3fed1ff06036d0779e925b3798
(cvs-global-menu): Define as a function as well.

diff -r fc00b549e161 -r b521a93dd16b lisp/pcvs-defs.el
--- a/lisp/pcvs-defs.el	Mon Jun 16 18:54:23 2003 +0000
+++ b/lisp/pcvs-defs.el	Mon Jun 16 20:21:42 2003 +0000
@@ -1,6 +1,7 @@
 ;;; pcvs-defs.el --- variable definitions for PCL-CVS
 
-;; Copyright (C) 1991, 92, 93, 94, 95, 96, 97, 98, 99, 2000  Free Software Foundation, Inc.
+;; Copyright (C) 1991, 92, 93, 94, 95, 96, 97, 98, 99, 2000, 2003
+;;           Free Software Foundation, Inc.
 
 ;; Author: Stefan Monnier <monnier@cs.yale.edu>
 ;; Keywords: pcl-cvs
@@ -479,7 +480,7 @@
     (define-key m [examine]
       '(menu-item "Examine Directory" cvs-examine
 		  :help "Examine the current state of a workarea"))
-    m))
+    (fset 'cvs-global-menu m)))
 
 
 ;; cvs-1.10 and above can take file arguments in other directories