.'delete.gif)
.'delete.gif)
';
}
$uploadControl .= ' ';
}
my $image = $storage->isImage($file) ? $storage->getThumbnailUrl($file) : $storage->getFileIconUrl($file);
$uploadControl .= '';
return $output;
}
@@ -121,7 +121,7 @@ sub cut {
my $pageURL = shift || $self->session->url->getRequestedUrl;
my $i18n = WebGUI::International->new($self->session,'Icon');
my $output = '';
+ $output .= '.'cut.gif "'.$i18n->get('Cut').'")
';
return $output;
}
@@ -169,7 +169,7 @@ sub delete {
}
my $i18n = WebGUI::International->new($self->session,'Icon');
my $output = '';
+ $output .= '.'delete.gif "'.$i18n->get('Delete').'")
';
return $output;
}
@@ -184,7 +184,7 @@ Generates an icon that can be used to drag content.
sub drag {
my $self = shift;
my $i18n = WebGUI::International->new($self->session,'Icon');
- return '.'drag.gif "'.$i18n->get('Drag').'")
.'drag.gif "'.$i18n->get('Drag').'")
.'edit.gif "'.$i18n->get('Edit').'")
';
return $output;
}
@@ -235,7 +235,7 @@ sub export {
my $pageURL = shift || $self->session->url->getRequestedUrl;
my $i18n = WebGUI::International->new($self->session,'Icon');
my $output = '';
+ $output .= '.'export.gif "'.$i18n->get('Export').'")
';
return $output;
}
@@ -286,7 +286,7 @@ sub locked {
my $pageURL = shift || $self->session->url->getRequestedUrl;
my $i18n = WebGUI::International->new($self->session,'Icon');
my $output = '';
+ $output .= '.'locked.gif "'.$i18n->get('locked').'")
';
return $output;
}
@@ -312,7 +312,7 @@ sub manage {
my $pageURL = shift || $self->session->url->getRequestedUrl;
my $i18n = WebGUI::International->new($self->session,'Icon');
my $output = '';
+ $output .= '.'manage.gif "'.$i18n->get('Manage').'")
';
return $output;
}
@@ -338,7 +338,7 @@ sub moveBottom {
my $pageURL = shift || $self->session->url->getRequestedUrl;
my $i18n = WebGUI::International->new($self->session,'Icon');
my $output = '';
+ $output .= '.'moveBottom.gif "'.$i18n->get('Move To Bottom').'")
';
return $output;
}
@@ -366,7 +366,7 @@ sub moveDown {
my $i18n = WebGUI::International->new($self->session,'Icon');
my $output = '';
$output .= '' unless $disabled;
- $output .= '.'moveDown.gif "'.$i18n->get('Move Down').'")
';
+ $output .= '.'moveDown.gif "'.$i18n->get('Move Down').'")
';
$output .= '' unless $disabled;
$output .= '
.'moveLeft.gif "'.$i18n->get('Move Left').'")
';
return $output;
}
@@ -420,7 +420,7 @@ sub moveRight {
my $pageURL = shift || $self->session->url->getRequestedUrl;
my $i18n = WebGUI::International->new($self->session,'Icon');
my $output = '';
+ $output .= '.'moveRight.gif "'.$i18n->get('Move Right').'")
';
return $output;
}
@@ -446,7 +446,7 @@ sub moveTop {
my $pageURL = shift || $self->session->url->getRequestedUrl;
my $i18n = WebGUI::International->new($self->session,'Icon');
my $output = '';
+ $output .= '.'moveTop.gif "'.$i18n->get('Move To Top').'")
';
return $output;
}
@@ -474,7 +474,7 @@ sub moveUp {
my $i18n = WebGUI::International->new($self->session,'Icon');
my $output = '';
$output .= '' unless $disabled;
- $output .= '.'moveUp.gif "'.$i18n->get('Move Up').'")
';
+ $output .= '.'moveUp.gif "'.$i18n->get('Move Up').'")
';
$output .= '' unless $disabled;
$output .= '
.'shortcut.gif "'.$i18n->get('Create Shortcut').'")
';
return $output;
}
@@ -562,7 +562,7 @@ sub view {
my $pageURL = shift || $self->session->url->getRequestedUrl;
my $i18n = WebGUI::International->new($self->session,'Icon');
my $output = '';
+ $output .= '.'view.gif "'.$i18n->get('View').'")
';
return $output;
}
diff --git a/lib/WebGUI/i18n/English/Form_Textarea.pm b/lib/WebGUI/i18n/English/Form_Textarea.pm
new file mode 100644
index 000000000..a3050e644
--- /dev/null
+++ b/lib/WebGUI/i18n/English/Form_Textarea.pm
@@ -0,0 +1,12 @@
+package WebGUI::i18n::English::Form_Textarea; ##Be sure to change the package name to match the filename
+
+our $I18N = { ##hashref of hashes
+ 'drag to resize' => {
+ message => q|Drag to Resize|,
+ lastUpdated => 0,
+ context => q|alt tag for the text area drag icon|
+ },
+
+};
+
+1;
diff --git a/lib/WebGUI/i18n/English/WebGUI.pm b/lib/WebGUI/i18n/English/WebGUI.pm
index 3365ad02c..f381d38c1 100644
--- a/lib/WebGUI/i18n/English/WebGUI.pm
+++ b/lib/WebGUI/i18n/English/WebGUI.pm
@@ -137,11 +137,6 @@ our $I18N = {
context => q|Title of the statistics viewer for the admin console.|
},
- '463' => {
- message => q|Text Area Rows|,
- lastUpdated => 1031514049
- },
-
'451' => {
message => q|is required.|,
lastUpdated => 1031514049
@@ -2557,11 +2552,6 @@ The headings of columns on things like message boards and user contributions.
lastUpdated => 1078243385
},
- '464' => {
- message => q|Text Area Columns|,
- lastUpdated => 1031514049
- },
-
'363' => {
message => q|Page Template Position|,
lastUpdated => 1034736999
@@ -3525,16 +3515,6 @@ and tracked by WebGUI.|,
lastUpdated => 1120239343,
},
- '463 description' => {
- message => q|How many rows of characters will be displayed in textareas on the site.|,
- lastUpdated => 1120239343,
- },
-
- '464 description' => {
- message => q|How many columns of characters will be displayed in textareas on the site. |,
- lastUpdated => 1120239343,
- },
-
'465 description' => {
message => q|How many characters can be displayed at once in text boxes on the site. |,
lastUpdated => 1120239343,
diff --git a/www/extras/resizeable_textarea.js b/www/extras/resizeable_textarea.js
new file mode 100644
index 000000000..c956b1ae3
--- /dev/null
+++ b/www/extras/resizeable_textarea.js
@@ -0,0 +1,165 @@
+/* -*-mode: Java; coding: latin-1;-*- Time-stamp: "2005-05-13 20:47:10 ADT"
+
+ "Resizeable textarea functions" by Sean M. Burke, sburke@cpan.org, 2005
+
+ You can use, modify, and redistribute this only under the terms of the
+ Perl Artistic License:
+ http://www.perl.com/pub/a/language/misc/Artistic.html
+
+*/
+
+var // Configurables:
+ tar_Drag_increments = 15, // number of pixels that we grow by
+
+ // Sizes (in pixels) that no draggable textarea should exceed:
+ tar_Min_Height = 120, tar_Min_Width = 120,
+ tar_Max_Height = 1400, tar_Max_Width = 1400
+;
+
+// End of configurables
+
+//==========================================================================
+var tar_Textarea, tar_Orig_width, tar_Orig_height, tar_Grip, tar_Cursor_start_x, tar_Cursor_start_y;
+
+function tar_drag_start (event, textarea_id) {
+ Textarea = tar_id(textarea_id);
+
+ if(! tar_find_draggable(event) ) return;
+
+ tar_add_class(Grip, "activedrag");
+
+ Cursor_start_x = event.clientX;
+ Cursor_start_y = event.clientY;
+ Orig_width = parseInt( Textarea.style.width , 10 );
+ Orig_height = parseInt( Textarea.style.height , 10 );
+
+ // Capture mousemove and mouseup events on the page.
+ document.addEventListener("mousemove", tar_drag_move, true);
+ document.addEventListener("mouseup", tar_drag_stop, true);
+
+ event.preventDefault();
+ return;
+}
+
+// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+
+function tar_drag_move(event) {
+ var
+ new_width = event.clientX - Cursor_start_x + Orig_width ,
+ new_height = event.clientY - Cursor_start_y + Orig_height;
+
+ new_width = tar_constrain_range(tar_Min_Width ,new_width , tar_Max_Width, tar_Drag_increments);;
+ new_height = tar_constrain_range(tar_Min_Height,new_height, tar_Max_Height, tar_Drag_increments);;
+
+ Textarea.style.width = new_width+'px';
+ Textarea.style.height = new_height+'px';
+
+ event.preventDefault();
+ return;
+}
+
+// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+
+function tar_drag_stop(event) {
+ // Stop capturing the mousemove and mouseup events.
+ tar_remove_class(Grip, "activedrag");
+ document.removeEventListener("mousemove", tar_drag_move, true);
+ document.removeEventListener("mouseup", tar_drag_stop, true);
+ return;
+}
+
+// = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
+
+function tar_constrain_range (min, i, max, incr) {
+ if(incr) i = Math.floor(i/incr) * incr;
+ return(
+ (i > max) ? max
+ :(i < min) ? min
+ : i
+ );
+}
+
+// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+
+function tar_find_draggable (event) {
+ if(!event) throw tar_complaining("No event?!");
+
+ var el = event.target;
+ if(!el) {
+ if(window.event) throw tar_complaining(
+"Your browser is too old to allow textarea resizing. Upgrade at getfirefox.com"
+ );
+ // Modern browsers implement the DOM Events model, dammit!
+
+ throw tar_complaining("No event target?!");
+ }
+
+ //trace("Dragging ", el.tagName, "#", el.id);
+
+ if (el.nodeType == document.TEXT_NODE) el = el.parentNode;
+ while(el) {
+ if( el.tagName == "BODY" ) { el = false; break; }
+ if( tar_has_class(el, 'draggable') ) break; // found it!
+ el = el.parentNode;
+ }
+ if(!el) return false; // undraggable
+ Grip = el;
+ return true;
+}
+
+
+// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
+// Misc library functions:
+
+function tar_has_class (el, classname) {
+ return(
+ (" " + (el.className || '') + " ").indexOf(classname) >= 0
+ );
+}
+
+function tar_add_class (el, newclass) {
+ var classes = (el.className || '').split(" ");
+ classes.push(newclass);
+ el.className = classes.join(" ");
+ return el;
+}
+
+function tar_remove_class (el, endclass) {
+ if(!el.className) return el;
+ var classes = el.className.split(" ");
+ for(var i = 0; i < classes.length; i++) {
+ if(classes[i] == endclass) classes[i] = '';
+ }
+ el.className = classes.join(" ");
+ return el;
+}
+
+function tar_id (name) { // find element with the given ID, else exception.
+ var object = tar_id_try(name);
+ if( ! object ) throw tar_complaining("Failed to find element with id='"
+ + name + "' in " + document.location );
+ return object;
+}
+
+function tar_id_try (name) {
+ var object = document.getElementById(name);
+ return object;
+}
+
+function tar_complaining () {
+ var _ = [];
+ for(var i = 0; i < arguments.length; i++) { _.push(arguments[i]) }
+ _ = _.join("");
+ if(! _.length) out = "Unknown error!?!";
+ void alert(_);
+ return new Error(_,_);
+}
+
+// And a sanity-check:
+if(!document.getElementById) throw tar_complaining(
+"Your browser is too old to show this page quite right. Upgrade at getfirefox.com"
+);
+
+
+//End
+
.'/drag.gif "'.$i18n->get(")
';
+ }
my $value = $self->fixMacros($self->fixTags($self->fixSpecialCharacters($self->get("value"))));
- return '';
+ my $style = "width: ".$self->get('width')."px; height: ".$self->get('height')."px; ".$self->get("style");
+ return ''.$resize;
}
diff --git a/lib/WebGUI/Operation/Settings.pm b/lib/WebGUI/Operation/Settings.pm
index 25314ad94..368429e8b 100644
--- a/lib/WebGUI/Operation/Settings.pm
+++ b/lib/WebGUI/Operation/Settings.pm
@@ -135,18 +135,6 @@ sub www_editSettings {
-options=>WebGUI::Asset::RichEdit->getList($session),
-defaultValue=>["PBrichedit000000000001"]
);
- $tabform->getTab("ui")->integer(
- -name=>"textAreaRows",
- -label=>$i18n->get(463),
- -hoverHelp=>$i18n->get('463 description'),
- -value=>$session->setting->get("textAreaRows")
- );
- $tabform->getTab("ui")->integer(
- -name=>"textAreaCols",
- -label=>$i18n->get(464),
- -hoverHelp=>$i18n->get('464 description'),
- -value=>$session->setting->get("textAreaCols")
- );
$tabform->getTab("ui")->integer(
-name=>"textBoxSize",
-label=>$i18n->get(465),
diff --git a/lib/WebGUI/Session/Icon.pm b/lib/WebGUI/Session/Icon.pm
index e883c2eab..f7477ec9e 100644
--- a/lib/WebGUI/Session/Icon.pm
+++ b/lib/WebGUI/Session/Icon.pm
@@ -54,13 +54,13 @@ These subroutines are available from this package:
#-------------------------------------------------------------------
-=head2 _getBaseURL ( )
+=head2 getBaseURL ( )
Returns the base URL for this user's toolbar icon set.
=cut
-sub _getBaseURL {
+sub getBaseURL {
my $self = shift;
my $url = $self->session->config->get("extrasURL").'/toolbar/';
if ($self->session->user->profileField("toolbar") ne "useLanguageDefault") {
@@ -95,7 +95,7 @@ sub copy {
my $pageURL = shift || $self->session->url->getRequestedUrl;
my $i18n = WebGUI::International->new($self->session,'Icon');
my $output = '.'copy.gif "'.$i18n->get('Copy').'")
.'copy.gif "'.$i18n->get('Copy').'")
.'cut.gif "'.$i18n->get('Cut').'")
.'delete.gif "'.$i18n->get('Delete').'")
.'edit.gif "'.$i18n->get('Edit').'")
.'export.gif "'.$i18n->get('Export').'")
.'locked.gif "'.$i18n->get('locked').'")
.'manage.gif "'.$i18n->get('Manage').'")
.'moveBottom.gif "'.$i18n->get('Move To Bottom').'")
.'moveLeft.gif "'.$i18n->get('Move Left').'")
.'moveRight.gif "'.$i18n->get('Move Right').'")
.'moveTop.gif "'.$i18n->get('Move To Top').'")
.'shortcut.gif "'.$i18n->get('Create Shortcut').'")
.'view.gif "'.$i18n->get('View').'")