Index: openacs-4/packages/acs-tcl/tcl/application-data-link-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/application-data-link-procs.tcl,v
diff -u -r1.19 -r1.19.2.1
--- openacs-4/packages/acs-tcl/tcl/application-data-link-procs.tcl	25 Jul 2018 18:21:18 -0000	1.19
+++ openacs-4/packages/acs-tcl/tcl/application-data-link-procs.tcl	27 Feb 2020 16:11:39 -0000	1.19.2.1
@@ -297,7 +297,7 @@
     set refs [list]
     set http_url [string trimright [ad_url] /]/
     set https_url [string map {http https} $http_url]
-    set re "(?:\")(?:$http_url|$https_url|/)(?:o|image|file)/(\\d{1,8})"
+    set re "(?:\")(?:$http_url|$https_url|/)(?:o|image|file)/(\\d{1,10})"
     set ref_data [regexp -inline -all $re $text]
     foreach {discard ref} $ref_data {
             lappend refs $ref