equal
deleted
inserted
replaced
1846 ] |
1846 ] |
1847 |
1847 |
1848 "Modified: / 26.9.2001 / 17:38:06 / cg" |
1848 "Modified: / 26.9.2001 / 17:38:06 / cg" |
1849 ! |
1849 ! |
1850 |
1850 |
|
1851 browseMethodsContainingInName |
|
1852 "ask for a piece of text and |
|
1853 open a browser on all methods where that piece is contained in the selector" |
|
1854 |
|
1855 |pieceOfText| |
|
1856 |
|
1857 pieceOfText := Dialog request:'Browse methods containing in name:'. |
|
1858 pieceOfText isEmptyOrNil ifTrue:[^ self]. |
|
1859 |
|
1860 self browseMethodsContainingInName:pieceOfText |
|
1861 ! |
|
1862 |
|
1863 browseMethodsContainingInName:pieceOfText |
|
1864 "open a browser on all methods where that piece is contained in the selector" |
|
1865 |
|
1866 (SystemBrowser default |
|
1867 browseMethodsForWhich:[:m | |
|
1868 (m selector ? '') includesString:pieceOfText caseSensitive:false |
|
1869 ] |
|
1870 title:('Methods with "%1" in name' bindWith:pieceOfText) |
|
1871 ) autoSearch:pieceOfText ignoreCase:true |
|
1872 ! |
|
1873 |
1851 browseMethodsContainingInSource |
1874 browseMethodsContainingInSource |
1852 "ask for a piece of text and |
1875 "ask for a piece of text and |
1853 open a browser on all methods where that piece is contained in the source" |
1876 open a browser on all methods where that piece is contained in the source" |
1854 |
1877 |
1855 |pieceOfText| |
1878 |pieceOfText| |
1867 browseMethodsForWhich:[:m | |
1890 browseMethodsForWhich:[:m | |
1868 (m source ? '') includesString:pieceOfText caseSensitive:false |
1891 (m source ? '') includesString:pieceOfText caseSensitive:false |
1869 ] |
1892 ] |
1870 title:('Methods containing "%1"' bindWith:pieceOfText) |
1893 title:('Methods containing "%1"' bindWith:pieceOfText) |
1871 ) autoSearch:pieceOfText ignoreCase:true |
1894 ) autoSearch:pieceOfText ignoreCase:true |
|
1895 ! |
|
1896 |
|
1897 browseMethodsContainingItInName |
|
1898 "open a browser on all methods where the selected text is part of the selector" |
|
1899 |
|
1900 |selectedText| |
|
1901 |
|
1902 selectedText := self selectedTextOrSyntaxElement. |
|
1903 selectedText notEmptyOrNil ifTrue:[ |
|
1904 selectedText := selectedText withoutSeparators. |
|
1905 selectedText notEmpty ifTrue:[ |
|
1906 self browseMethodsContainingInName:selectedText. |
|
1907 ] |
|
1908 ]. |
1872 ! |
1909 ! |
1873 |
1910 |
1874 browseMethodsContainingItInSource |
1911 browseMethodsContainingItInSource |
1875 "open a browser on all methods where the selected text is contained in the source" |
1912 "open a browser on all methods where the selected text is contained in the source" |
1876 |
1913 |
2066 ('Browse Pool' browseSharedPoolOfIt ) |
2103 ('Browse Pool' browseSharedPoolOfIt ) |
2067 ('Senders of It' browseSendersOfIt ) |
2104 ('Senders of It' browseSendersOfIt ) |
2068 ('Implementors of It' browseImplementorsOfIt ImplementorsOfIt ) |
2105 ('Implementors of It' browseImplementorsOfIt ImplementorsOfIt ) |
2069 ('References to It' browseReferencesToIt ) |
2106 ('References to It' browseReferencesToIt ) |
2070 ('Classes Containing It in Name' browseClassesContainingItInName ) |
2107 ('Classes Containing It in Name' browseClassesContainingItInName ) |
|
2108 ('Methods Containing It in Name' browseMethodsContainingItInName ) |
2071 ('Methods Containing It in Source' browseMethodsContainingItInSource ) |
2109 ('Methods Containing It in Source' browseMethodsContainingItInSource ) |
2072 ('-' ) |
2110 ('-' ) |
2073 ('TimeIt' timeIt ) |
2111 ('TimeIt' timeIt ) |
2074 ('SpyOnIt' spyOnIt )) |
2112 ('SpyOnIt' spyOnIt )) |
2075 resources:resources |
2113 resources:resources |
2081 ('Browse It' browseIt BrowseIt ) |
2119 ('Browse It' browseIt BrowseIt ) |
2082 ('Browse Pool' browseSharedPoolOfIt ) |
2120 ('Browse Pool' browseSharedPoolOfIt ) |
2083 ('Senders of...' browseSendersOf ) |
2121 ('Senders of...' browseSendersOf ) |
2084 ('Implementors of...' browseImplementorsOf ImplementorsOf ) |
2122 ('Implementors of...' browseImplementorsOf ImplementorsOf ) |
2085 ('References to...' browseReferencesTo ) |
2123 ('References to...' browseReferencesTo ) |
2086 ('Classes Containing in Name...' browseClassesContainingInName ) |
2124 ('Classes Containing in Name...' browseClassesContainingInName ) |
|
2125 ('Methods Containing in Name...' browseMethodsContainingInName ) |
2087 ('Methods Containing in Source...' browseMethodsWithString ) |
2126 ('Methods Containing in Source...' browseMethodsWithString ) |
2088 ('-' ) |
2127 ('-' ) |
2089 ('TimeIt' timeIt ) |
2128 ('TimeIt' timeIt ) |
2090 ('SpyOnIt' spyOnIt )) |
2129 ('SpyOnIt' spyOnIt )) |
2091 resources:resources |
2130 resources:resources |