# HG changeset patch
# User iuc
# Date 1760532981 0
# Node ID 09965c91857346c60c3b21fce11791716a4cd536
# Parent  119f41ec0ada0f298299d23d0d5e29f12d4a3e3d
planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/edger commit 96699cdbdadf0a1c40fdbd87f870b47049c0449f

diff -r 119f41ec0ada -r 09965c918573 edger.R
--- a/edger.R	Wed Oct 15 10:24:03 2025 +0000
+++ b/edger.R	Wed Oct 15 12:56:21 2025 +0000
@@ -88,6 +88,17 @@
 # Sanitise file base names coming from factors or contrasts
 sanitise_basename <- function(string) {
     string <- gsub("[/^]", "_", string)
+    # If string is longer than 200 characters, truncate intelligently
+    if (nchar(string) > 200) {
+        # Keep first 80 characters, last 80 characters, and add hash in middle
+        start_part <- substr(string, 1, 80)
+        end_part <- substr(string, nchar(string) - 79, nchar(string))
+        # Create a simple hash of the full string using built-in functions
+        hash_input <- utf8ToInt(string)
+        hash_value <- sum(hash_input * seq_along(hash_input)) %% 99999999
+        hash_str <- sprintf("%08d", hash_value)
+        string <- paste0(start_part, "_", hash_str, "_", end_part)
+    }
     return(string)
 }
 
diff -r 119f41ec0ada -r 09965c918573 edger.xml
--- a/edger.xml	Wed Oct 15 10:24:03 2025 +0000
+++ b/edger.xml	Wed Oct 15 12:56:21 2025 +0000
@@ -4,7 +4,7 @@
     </description>
     <macros>
         <token name="@TOOL_VERSION@">3.36.0</token>
-        <token name="@VERSION_SUFFIX@">6</token>
+        <token name="@VERSION_SUFFIX@">7</token>
     </macros>
     <edam_topics>
         <edam_topic>topic_3308</edam_topic>