Bring Tiger branch up to version 0.9.5:

 - Merge in revisions up to r592 from trunk
 - Rewrite code where appropriate to use Tiger-compaible methods (no easy object enumeriation, no @properties, etc)
 - Remove printing again - problems printing, and template engine is 10.5-only
 - Rework xibs as nibs, and ensure everything looks and works correctly on Tiger; revert interface elements where necessary.
 - Add a method to check whether the app is being run on 10.5+, and show appropriate warning about interface and features
 - Alter strings and change sparkle URL to Tiger-specific appcast

1 files changed, 287 insertions, 0 deletions

diff --git a/Source/SPTextViewAdditions.m b/Source/SPTextViewAdditions.m
new file mode 100644
index 00000000..885e51df
--- /dev/null
+++ b/Source/SPTextViewAdditions.m
@@ -0,0 +1,287 @@
+//
+//  SPTextViewAdditions.m
+//  sequel-pro
+//
+//  Created by Hans-Jörg Bibiko on April 05, 2009
+//
+//  This program is free software; you can redistribute it and/or modify
+//  it under the terms of the GNU General Public License as published by
+//  the Free Software Foundation; either version 2 of the License, or
+//  (at your option) any later version.
+//
+//  This program is distributed in the hope that it will be useful,
+//  but WITHOUT ANY WARRANTY; without even the implied warranty of
+//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+//  GNU General Public License for more details.
+//
+//  You should have received a copy of the GNU General Public License
+//  along with this program; if not, write to the Free Software
+//  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+//
+//  More info at <http://code.google.com/p/sequel-pro/>
+
+#import "SPStringAdditions.h"
+
+@implementation NSTextView (SPTextViewAdditions)
+
+/*
+ * Returns the range of the current word.
+ *   finds: [| := caret]  |word  wo|rd  word|
+ * If | is in between whitespaces nothing will be selected.
+ */
+- (NSRange)getRangeForCurrentWord
+{
+
+	NSRange curRange = [self selectedRange];
+	unsigned long curLocation = curRange.location;
+
+	[self moveWordLeft:self];
+	[self moveWordRightAndModifySelection:self];
+	
+	unsigned long newStartRange = [self selectedRange].location;
+	unsigned long newEndRange = newStartRange + [self selectedRange].length;
+	
+	// if current location does not intersect with found range
+	// then caret is at the begin of a word -> change strategy
+	if(curLocation < newStartRange || curLocation > newEndRange)
+	{
+		[self setSelectedRange:curRange];
+		[self moveWordRightAndModifySelection:self];
+	}
+	
+	if([[[self string] substringWithRange:[self selectedRange]] rangeOfCharacterFromSet:[NSCharacterSet whitespaceAndNewlineCharacterSet]].location != NSNotFound)
+		[self setSelectedRange:curRange];
+	
+	NSRange wordRange = [self selectedRange];
+	
+	[self setSelectedRange:curRange];
+	
+	return(wordRange);
+	
+}
+
+/*
+ * Select current word.
+ *   finds: [| := caret]  |word  wo|rd  word|
+ * If | is in between whitespaces nothing will be selected.
+ */
+- (IBAction)selectCurrentWord:(id)sender
+{
+	[self setSelectedRange:[self getRangeForCurrentWord]];
+}
+
+/*
+ * Select current line.
+ */
+- (IBAction)selectCurrentLine:(id)sender
+{
+	[self doCommandBySelector:@selector(moveToBeginningOfLine:)];
+	[self doCommandBySelector:@selector(moveToEndOfLineAndModifySelection:)];
+}
+
+/*
+ * Change selection or current word to upper case and preserves the selection.
+ */
+- (IBAction)doSelectionUpperCase:(id)sender
+{
+	NSRange curRange = [self selectedRange];
+	NSRange selRange = (curRange.length) ? curRange : [self getRangeForCurrentWord];
+	[self setSelectedRange:selRange];
+	[self insertText:[[[self string] substringWithRange:selRange] uppercaseString]];
+	[self setSelectedRange:curRange];
+}
+
+/*
+ * Change selection or current word to lower case and preserves the selection.
+ */
+- (IBAction)doSelectionLowerCase:(id)sender
+{
+	NSRange curRange = [self selectedRange];
+	NSRange selRange = (curRange.length) ? curRange : [self getRangeForCurrentWord];
+	[self setSelectedRange:selRange];
+	[self insertText:[[[self string] substringWithRange:selRange] lowercaseString]];
+	[self setSelectedRange:curRange];
+}
+
+/*
+ * Change selection or current word to title case and preserves the selection.
+ */
+- (IBAction)doSelectionTitleCase:(id)sender
+{
+	NSRange curRange = [self selectedRange];
+	NSRange selRange = (curRange.length) ? curRange : [self getRangeForCurrentWord];
+	[self setSelectedRange:selRange];
+	[self insertText:[[[self string] substringWithRange:selRange] capitalizedString]];
+	[self setSelectedRange:curRange];
+}
+
+/*
+ * Change selection or current word according to Unicode's NFD and preserves the selection.
+ */
+- (IBAction)doDecomposedStringWithCanonicalMapping:(id)sender
+{
+	NSRange curRange = [self selectedRange];
+	NSRange selRange = (curRange.length) ? curRange : [self getRangeForCurrentWord];
+	[self setSelectedRange:selRange];
+	NSString* convString = [[[self string] substringWithRange:selRange] decomposedStringWithCanonicalMapping];
+	[self insertText:convString];
+	
+	// correct range for combining characters
+	if(curRange.length)
+		[self setSelectedRange:NSMakeRange(selRange.location, [convString length])];
+	else
+	// if no selection place the caret at the end of the current word
+	{
+		NSRange newRange = [self getRangeForCurrentWord];
+		[self setSelectedRange:NSMakeRange(newRange.location + newRange.length, 0)];
+	}
+}
+
+/*
+ * Change selection or current word according to Unicode's NFKD and preserves the selection.
+ */
+- (IBAction)doDecomposedStringWithCompatibilityMapping:(id)sender
+{
+	NSRange curRange = [self selectedRange];
+	NSRange selRange = (curRange.length) ? curRange : [self getRangeForCurrentWord];
+	[self setSelectedRange:selRange];
+	NSString* convString = [[[self string] substringWithRange:selRange] decomposedStringWithCompatibilityMapping];
+	[self insertText:convString];
+	
+	// correct range for combining characters
+	if(curRange.length)
+		[self setSelectedRange:NSMakeRange(selRange.location, [convString length])];
+	else
+	// if no selection place the caret at the end of the current word
+	{
+		NSRange newRange = [self getRangeForCurrentWord];
+		[self setSelectedRange:NSMakeRange(newRange.location + newRange.length, 0)];
+	}
+}
+
+/*
+ * Change selection or current word according to Unicode's NFC and preserves the selection.
+ */
+- (IBAction)doPrecomposedStringWithCanonicalMapping:(id)sender
+{
+	NSRange curRange = [self selectedRange];
+	NSRange selRange = (curRange.length) ? curRange : [self getRangeForCurrentWord];
+	[self setSelectedRange:selRange];
+	NSString* convString = [[[self string] substringWithRange:selRange] precomposedStringWithCanonicalMapping];
+	[self insertText:convString];
+	
+	// correct range for combining characters
+	if(curRange.length)
+		[self setSelectedRange:NSMakeRange(selRange.location, [convString length])];
+	else
+	// if no selection place the caret at the end of the current word
+	{
+		NSRange newRange = [self getRangeForCurrentWord];
+		[self setSelectedRange:NSMakeRange(newRange.location + newRange.length, 0)];
+	}
+}
+
+- (IBAction)doRemoveDiacritics:(id)sender
+{
+
+	NSRange curRange = [self selectedRange];
+	NSRange selRange = (curRange.length) ? curRange : [self getRangeForCurrentWord];
+	[self setSelectedRange:selRange];
+	NSString* convString = [[[self string] substringWithRange:selRange] decomposedStringWithCanonicalMapping];
+	NSArray* chars;
+	chars = [convString componentsSeparatedByCharactersInSet:[NSCharacterSet nonBaseCharacterSet]];
+	NSString* cleanString = [chars componentsJoinedByString:@""];
+	[self insertText:cleanString];
+	if(curRange.length)
+		[self setSelectedRange:NSMakeRange(selRange.location, [cleanString length])];
+	else
+	// if no selection place the caret at the end of the current word
+	{
+		NSRange newRange = [self getRangeForCurrentWord];
+		[self setSelectedRange:NSMakeRange(newRange.location + newRange.length, 0)];
+	}
+	
+}
+
+/*
+ * Change selection or current word according to Unicode's NFKC to title case and preserves the selection.
+ */
+- (IBAction)doPrecomposedStringWithCompatibilityMapping:(id)sender
+{
+	NSRange curRange = [self selectedRange];
+	NSRange selRange = (curRange.length) ? curRange : [self getRangeForCurrentWord];
+	[self setSelectedRange:selRange];
+	NSString* convString = [[[self string] substringWithRange:selRange] precomposedStringWithCompatibilityMapping];
+	[self insertText:convString];
+	
+	// correct range for combining characters
+	if(curRange.length)
+		[self setSelectedRange:NSMakeRange(selRange.location, [convString length])];
+	else
+	// if no selection place the caret at the end of the current word
+	{
+		NSRange newRange = [self getRangeForCurrentWord];
+		[self setSelectedRange:NSMakeRange(newRange.location + newRange.length, 0)];
+	}
+}
+
+
+/*
+ * Transpose adjacent characters, or if a selection is given reverse the selected characters.
+ * If the caret is at the absolute end of the text field it transpose the two last charaters.
+ * If the caret is at the absolute beginnng of the text field do nothing.
+ * TODO: not yet combining-diacritics-safe
+ */
+- (IBAction)doTranspose:(id)sender
+{
+	NSRange curRange = [self selectedRange];
+	NSRange workingRange = curRange;
+	
+	if(!curRange.length)
+		@try // caret is in between two chars
+		{
+			if(curRange.location+1 > [[self string] length])
+			{
+				// caret is at the end of a text field
+				// transpose last two characters
+				[self moveLeftAndModifySelection:self];
+				[self moveLeftAndModifySelection:self];
+				workingRange = [self selectedRange];
+			}
+			else if(curRange.location == 0)
+			{
+				// caret is at the beginning of the text field
+				// do nothing
+				workingRange.length = 0;
+			}
+			else
+			{
+				// caret is in between two characters
+				// reverse adjacent characters 
+				NSRange twoCharRange = NSMakeRange(curRange.location-1, 2);
+				[self setSelectedRange:twoCharRange];
+				workingRange = twoCharRange;
+			}
+		}
+		@catch(id ae)
+		{ workingRange.length = 0; }
+
+	
+	
+	// reverse string : TODO not yet combining diacritics safe!
+	if(workingRange.length > 1)
+	{
+		NSMutableString *reversedStr;
+		unsigned long len = workingRange.length;
+		reversedStr = [NSMutableString stringWithCapacity:len];
+		while (len > 0)
+			[reversedStr appendString:
+				[NSString stringWithFormat:@"%C", [[self string] characterAtIndex:--len+workingRange.location]]];
+
+		[self insertText:reversedStr];
+		[self setSelectedRange:curRange];
+	}
+}
+
+@end
+