# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 1019832021 0
# Node ID e772dea9fb2e8dd247f75f267aa2ab00b3a37cfa
# Parent  d995856e52ba68b1cfd103f01446f459faaa3974
Remove Ada-specific example code.

diff -r d995856e52ba -r e772dea9fb2e lisp/find-file.el
--- a/lisp/find-file.el	Fri Apr 26 14:39:42 2002 +0000
+++ b/lisp/find-file.el	Fri Apr 26 14:40:21 2002 +0000
@@ -4,7 +4,7 @@
 ;; Maintainer: FSF
 ;; Keywords: c, matching, tools
 
-;; Copyright (C) 1994, 1995 Free Software Foundation, Inc.
+;; Copyright (C) 1994, 1995, 2002 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
 
@@ -945,7 +945,7 @@
 
 (defvar ff-function-name nil "Name of the function we are in.")
 
-(eval-when-compile (require 'ada-mode))
+;(eval-when-compile (require 'ada-mode))
 
 ;; bind with (setq ff-pre-load-hooks 'ff-which-function-are-we-in)
 ;;