From 32084462958a98d8980432c004bf7832482ff9d8 Mon Sep 17 00:00:00 2001
From: Tim Steiner <tsteiner2@unl.edu>
Date: Thu, 27 Oct 2011 21:00:48 +0000
Subject: [PATCH] [gh-204] Merging from testing into staging -c1147

git-svn-id: file:///tmp/wdn_thm_drupal/branches/drupal-7.x/staging@1215 20a16fea-79d4-4915-8869-1ea9d5ebf173
---
 sites/all/modules/unl/unl_site_creation.php | 23 ++++++++++++++++++++-
 1 file changed, 22 insertions(+), 1 deletion(-)

diff --git a/sites/all/modules/unl/unl_site_creation.php b/sites/all/modules/unl/unl_site_creation.php
index b9ee839f..7c3fd4bd 100644
--- a/sites/all/modules/unl/unl_site_creation.php
+++ b/sites/all/modules/unl/unl_site_creation.php
@@ -432,13 +432,34 @@ function unl_site_alias_list($form, &$form_state) {
 }
 
 function unl_site_alias_list_submit($form, &$form_state) {
-  $site_alias_ids = array();
+  $site_alias_ids = array(-1);
   foreach ($form_state['values']['aliases'] as $site_alias_id => $alias) {
     if ($alias['remove']) {
       $site_alias_ids[] = $site_alias_id;
     }
   }
 
+  $query = db_select('unl_sites_aliases', 'a');
+  $query->join('unl_sites', 's', 'a.site_id = s.site_id');
+  $data = $query
+    ->fields('a', array('site_alias_id', 'base_uri', 'path'))
+    ->fields('s', array('db_prefix'))
+    ->condition('site_alias_id', $site_alias_ids, 'IN')
+    ->execute()
+    ->fetchAll();
+  
+  $site_alias_ids = array(-1);
+  foreach ($data as $row) {
+    $alias_url = $row->base_uri . $row->path;
+    $primary_base_url = unl_site_variable_get($row->db_prefix, 'unl_primary_base_url', '');
+    if ($primary_base_url == $alias_url) {
+      drupal_set_message("Cannot delete the alias $alias_url.  It is currently the Primary Base URL for a site.", 'error');
+      continue;
+    }
+    $site_alias_ids[] = $row->site_alias_id;
+    drupal_set_message("The alias $alias_url was scheduled for removal.");
+  }
+  
   db_update('unl_sites_aliases')
     ->fields(array('installed' => 3))
     ->condition('site_alias_id', $site_alias_ids, 'IN')
-- 
GitLab