[elpa] externals/auto-overlays b76de5a 06/93: Version 0.11.2 of the predictive completion package.

[Stefan Monnier]

branch: externals/auto-overlays
commit b76de5ab0c489a623ac1b1810e5cded571703de3
Author: Toby Cubitt <toby-predictive@dr-qubit.org>
Commit: tsc25 <tsc25@cantab.net>

    Version 0.11.2 of the predictive completion package.
---
 auto-overlays-compat.el | 48 ++++++++++++++++++++++++++++++++++++++++++++++++
 auto-overlays.el        |  4 ++--
 2 files changed, 50 insertions(+), 2 deletions(-)

diff --git a/auto-overlays-compat.el b/auto-overlays-compat.el
new file mode 100644
index 0000000..30e7134
--- /dev/null
+++ b/auto-overlays-compat.el
@@ -0,0 +1,48 @@
+
+;;; auto-overlays-compat.el --- compatability functions for predictive package
+
+
+;; Copyright (C) 2006 Toby Cubitt
+
+;; Author: Toby Cubitt <toby-predictive@dr-qubit.org>
+;; Version: 0.1
+;; Keywords: auto-overlay, automatic, overlays, compatability
+;; URL: http://www.dr-qubit.org/emacs.php
+
+
+;; This file is part of the Emacs Automatic Overlays package.
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 2
+;; of the License, or (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+;; MA 02110-1301, USA.
+;; Boston, MA 02111-1307 USA
+
+
+;;; Change Log:
+;;
+;; Version 0.1
+;; * initial release
+
+
+;;; Code:
+
+(provide 'auto-overlays-compat)
+
+
+(defun auto-overlays-compat-line-number-at-pos (pos)
+  "Return (narrowed) buffer line number at position POS.
+\(Defaults to the point.\)"
+  (1+ (count-lines (point-min) pos))
+)
+
+;;; completion-ui-compat.el ends here
diff --git a/auto-overlays.el b/auto-overlays.el
index 17cf87d..81435c7 100644
--- a/auto-overlays.el
+++ b/auto-overlays.el
@@ -934,9 +934,9 @@ properties)."
 ;;;                       Compatibility Stuff
 
 (unless (fboundp 'line-number-at-pos)
-  (require 'predictive-compat)
+  (require 'auto-overlays-compat)
   (defalias 'line-number-at-pos
-            'predictive-compat-line-number-at-pos)
+            'auto-overlays-compat-line-number-at-pos)
 )