1 files changed, 0 insertions, 8 deletions

diff --git a/lisp/language/tibet-util.el b/lisp/language/tibet-util.el
index eb5f4d85790..90aced86858 100644
--- a/lisp/language/tibet-util.el
+++ b/lisp/language/tibet-util.el
@@ -311,14 +311,6 @@ are decomposed into normal Tibetan character sequences."
             idx (1+ idx)))
     new))
 
-;;;###autoload
-(defun tibetan-composition-function (from to font-object string)
-  (or (and font-object
-           (font-shape-text from to font-object string))
-      (if string
-          (tibetan-compose-string string)
-        (tibetan-compose-region from to))))
-
 ;;;
 ;;; This variable is used to avoid repeated decomposition.
 ;;;