From ca842dc528a0401108b78c3ab804285a6b35df1d Mon Sep 17 00:00:00 2001
From: James Cocker <purplespider@users.noreply.github.com>
Date: Fri, 23 Feb 2024 17:23:04 +0000
Subject: [PATCH] Added SiteTreeURLSegmentField.ss template with Copy button

---
 README.md                                     |  1 +
 .../CMS/Forms/SiteTreeURLSegmentField.ss      | 30 +++++++++++++++++++
 2 files changed, 31 insertions(+)
 create mode 100644 templates/SilverStripe/CMS/Forms/SiteTreeURLSegmentField.ss

diff --git a/README.md b/README.md
index be41839..a9cfaa4 100644
--- a/README.md
+++ b/README.md
@@ -53,6 +53,7 @@ While it is possible to disable specific tweaks by removing the individual exten
 ## Templates
 * __Email.ss:__ Sets font to sans-serif
 * __ForgotPasswordEmail.ss:__ Changes the wording and format of the forgotten password e-mail to make it a bit friendlier. 
+* __SiteTreeURLSegmentField.ss:__ Adds a "Copy URL" button. To help stop users from copying the draft link.
 
 ## Modules
 * __[wilr/silverstripe-googlesitemaps](https://github.com/wilr/silverstripe-googlesitemaps):__ Lets CMS users set certain (e.g. hidden) pages to not be indexed.
diff --git a/templates/SilverStripe/CMS/Forms/SiteTreeURLSegmentField.ss b/templates/SilverStripe/CMS/Forms/SiteTreeURLSegmentField.ss
new file mode 100644
index 0000000..a05634f
--- /dev/null
+++ b/templates/SilverStripe/CMS/Forms/SiteTreeURLSegmentField.ss
@@ -0,0 +1,30 @@
+<div class="preview-holder">
+    <a class="URL-link" href="$URL" target="_blank">
+        $URL
+    </a>
+    <div class="btn-group">
+        <button onclick="navigator.clipboard.writeText('{$URLPrefix}{$Value}')" role="button" type="button" class="btn btn-outline-secondary font-icon-link">Copy</button>
+        <% if not $IsReadonly %>
+        <button role="button" type="button" class="btn btn-outline-secondary edit">
+            <%t SilverStripe\CMS\Forms\SiteTreeURLSegmentField.Edit 'Edit' %>
+        </button>
+        <% end_if %>    
+    </div>
+</div>
+
+<div class="edit-holder">
+    <div class="input-group">
+        <input $AttributesHTML />
+        <div class="input-group-append">
+            <button role="button" data-icon="accept" type="button" class="btn btn-primary update">
+                <%t SilverStripe\CMS\Forms\SiteTreeURLSegmentField.OK 'OK' %>
+            </button>
+        </div>
+        <div class="input-group-append">
+            <button role="button" data-icon="cancel" type="button" class="btn btn-outline-secondary btn-sm input-group-append cancel">
+                <%t SilverStripe\CMS\Forms\SiteTreeURLSegmentField.Cancel 'Cancel' %>
+            </button>
+        </div>
+    </div>
+    <% if $HelpText %><p class="form__field-description">$HelpText</p><% end_if %>
+</div>
\ No newline at end of file