zshrc: Remove webservice functions

Signed-off-by: Frank Terbeck <ft@bewatermyfriend.org>

diff --git a/doc/grmlzshrc.t2t b/doc/grmlzshrc.t2t
index 6b6bcaf..3d50a91 100644 (file)
--- a/doc/grmlzshrc.t2t
+++ b/doc/grmlzshrc.t2t
@@ -450,9 +450,6 @@ Lists files in current directory, which have been accessed within the
 last N days. N is an integer to be passed as first and only argument.
 If no argument is specified N is set to 1.
 
 last N days. N is an integer to be passed as first and only argument.
 If no argument is specified N is set to 1.
 

-: **agoogle()**
-Searches for USENET postings from authors using google groups.
-

 : **allulimit()**
 Sets all ulimit values to "unlimited".
 
 : **allulimit()**
 Sets all ulimit values to "unlimited".
 


@@ -507,13 +504,6 @@ in it, including file names starting with ".".
 : **dchange()**
 Shows the changelog of given package in $PAGER.
 
 : **dchange()**
 Shows the changelog of given package in $PAGER.
 

-: **debbug()**
-Searches the Debian bug tracking system (bugs.debian.org) for Bug numbers,
-email addresses of submitters or any string given on the command line.
-
-: **debbugm()**
-Shows bug report for debian given by number in mailbox format.
-

 : **debian2hd()**
 Tells the user to use grml-debootstrap, if she wants to install debian to
 harddisk.
 : **debian2hd()**
 Tells the user to use grml-debootstrap, if she wants to install debian to
 harddisk.


@@ -523,10 +513,6 @@ A trick from $LINUX-KERNELSOURCE/Documentation/power/swsusp.txt. It brings
 back interactive responsiveness after suspend, when the system is swapping
 heavily.
 
 back interactive responsiveness after suspend, when the system is swapping
 heavily.
 

-: **dmoz()**
-Searches for the first argument (optional) in the Open Directory Project
-(See http://www.dmoz.org/docs/en/about.html).
-

 : **dnews()**
 Shows the NEWS file for the given package in $PAGER.
 
 : **dnews()**
 Shows the NEWS file for the given package in $PAGER.
 


@@ -534,9 +520,6 @@ Shows the NEWS file for the given package in $PAGER.
 Takes packagename as argument. Sets current working directory to
 /usr/share/doc/<packagename> and prints out a directory listing.
 
 Takes packagename as argument. Sets current working directory to
 /usr/share/doc/<packagename> and prints out a directory listing.
 

-: **dwicti()**
-Looks up the first argument (optional) in the german Wiktionary
-which is an online dictionary (See: http://de.wiktionary.org/).

 
 : **edalias()**
 Edit given alias.
 
 : **edalias()**
 Edit given alias.


@@ -544,25 +527,12 @@ Edit given alias.
 : **edfunc()**
 Edit given shell function.
 
 : **edfunc()**
 Edit given shell function.
 

-: **ewicti()**
-Looks up the first argument (optional in the english Wiktionary
-which is an online dictionary (See: http://en.wiktionary.org/).
-

 : **freload()**
 Reloads an autoloadable shell function (See autoload in zshbuiltins(1)).
 
 : **get_tw_cli()**
 Fetches 3ware RAID controller software using get_3ware(1).
 
 : **freload()**
 Reloads an autoloadable shell function (See autoload in zshbuiltins(1)).
 
 : **get_tw_cli()**
 Fetches 3ware RAID controller software using get_3ware(1).
 

-: **gex()**
-Performs an exact (i. e. quoted) web search using Google.
-
-: **ggogle()**
-Searches the arguments on Google Groups, a web to USENET gateway.
-
-: **google()**
-Searches the search engine Google using arguments as search string.
-

 : **hex()**
 Prints the hexadecimal representation of the number supplied as argument
 (base ten only).
 : **hex()**
 Prints the hexadecimal representation of the number supplied as argument
 (base ten only).


@@ -629,9 +599,6 @@ expression optionally given as argument (Needs qma(1)).
 Creates directory including parent directories, if necessary. Then changes
 current working directory to it.
 
 Creates directory including parent directories, if necessary. Then changes
 current working directory to it.
 

-: **mggogle()**
-Searches Google Groups for a USENET message-ID.
-

 : **minimal-shell()**
 Spawns a minimally set up MirBSD Korn shell. It references no files in /usr,
 so that file system can be unmounted.
 : **minimal-shell()**
 Spawns a minimally set up MirBSD Korn shell. It references no files in /usr,
 so that file system can be unmounted.


@@ -641,9 +608,6 @@ Lists files in current directory, which have been modified within the
 last N days. N is an integer to be passed as first and only argument.
 If no argument is specified N is set to 1.
 
 last N days. N is an integer to be passed as first and only argument.
 If no argument is specified N is set to 1.
 

-: **netcraft()**
-Asks netcraft.com for informations about the site given as argument.
-

 : **nt()**
 A helper function for the "e" glob qualifier to list all files newer
 than a reference file.
 : **nt()**
 A helper function for the "e" glob qualifier to list all files newer
 than a reference file.


@@ -656,10 +620,6 @@ Example usages:
 % ls -l *(e:'nt /reference/file':)
 ```
 
 % ls -l *(e:'nt /reference/file':)
 ```
 

-: **oleo()**
-Translates the given word using the english - german online
-dictionary dict.leo.org.
-

 : **peval()**
 Evaluates a perl expression; useful as command line
 calculator, therefore also available as "calc".
 : **peval()**
 Evaluates a perl expression; useful as command line
 calculator, therefore also available as "calc".


@@ -729,9 +689,6 @@ Example usage:
 % Restart ssh
 ```
 
 % Restart ssh
 ```
 

-: **swiki()**
-Searches articles in the german Wikipedia for the term given as argument.
-

 : **trans()**
 Translates a word from german to english (-D) or vice versa (-E).
 
 : **trans()**
 Translates a word from german to english (-D) or vice versa (-E).
 


@@ -755,17 +712,6 @@ Searches the history for a given pattern and lists the results by date.
 The first argument is the search pattern. The second and third ones are
 optional and denote a search range (default: -100).
 
 The first argument is the search pattern. The second and third ones are
 optional and denote a search range (default: -100).
 

-: **wikide()**
-Looks up the argument on Wikipedia (german).
-
-: **wikien()**
-Looks up the argument on Wikipedia (english).
-
-: **wodeb()**
-Searches the list of official debian packages for the term given as
-first argument. The optional second argument denotes the distribution
-(stable, testing or unstable) and defaults to unstable.
-

 : **xcat()**
 Tries to cat(1) file(s) given as parameter(s). Always returns true.
 See also xunfunction() below.
 : **xcat()**
 Tries to cat(1) file(s) given as parameter(s). Always returns true.
 See also xunfunction() below.

diff --git a/etc/zsh/zshrc b/etc/zsh/zshrc
index 5777af8..3ab328b 100644 (file)
--- a/etc/zsh/zshrc
+++ b/etc/zsh/zshrc
@@ -2550,102 +2550,6 @@ fi
 
 # useful functions
 
 
 # useful functions
 

-# searching
-#f4# Search for newspostings from authors
-agoogle() { ${=BROWSER} "http://groups.google.com/groups?as_uauthors=$*" ; }
-#f4# Search Debian Bug Tracking System
-debbug()  {
-    emulate -L zsh
-    setopt extendedglob
-    if [[ $# -eq 1 ]]; then
-        case "$1" in
-            ([0-9]##)
-            ${=BROWSER} "http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=$1"
-            ;;
-            (*@*)
-            ${=BROWSER} "http://bugs.debian.org/cgi-bin/pkgreport.cgi?submitter=$1"
-            ;;
-            (*)
-            ${=BROWSER} "http://bugs.debian.org/$*"
-            ;;
-        esac
-    else
-        print "$0 needs one argument"
-        return 1
-    fi
-}
-#f4# Search Debian Bug Tracking System in mbox format
-debbugm() {
-    emulate -L zsh
-    bts show --mbox $1
-}
-#f4# Search DMOZ
-dmoz()    {
-    emulate -L zsh
-    ${=BROWSER} http://search.dmoz.org/cgi-bin/search\?search=${1// /_}
-}
-#f4# Search German   Wiktionary
-dwicti()  {
-    emulate -L zsh
-    ${=BROWSER} http://de.wiktionary.org/wiki/${(C)1// /_}
-}
-#f4# Search English  Wiktionary
-ewicti()  {
-    emulate -L zsh
-    ${=BROWSER} http://en.wiktionary.org/wiki/${(C)1// /_}
-}
-#f4# Search Google Groups
-ggogle()  {
-    emulate -L zsh
-    ${=BROWSER} "http://groups.google.com/groups?q=$*"
-}
-#f4# Search Google
-google()  {
-    emulate -L zsh
-    ${=BROWSER} "http://www.google.com/search?&num=100&q=$*"
-}
-#f4# Search Google Groups for MsgID
-mggogle() {
-    emulate -L zsh
-    ${=BROWSER} "http://groups.google.com/groups?selm=$*"
-}
-#f4# Search Netcraft
-netcraft(){
-    emulate -L zsh
-    ${=BROWSER} "http://toolbar.netcraft.com/site_report?url=$1"
-}
-#f4# Use German Wikipedia's full text search
-swiki()   {
-    emulate -L zsh
-    ${=BROWSER} http://de.wikipedia.org/wiki/Spezial:Search/${(C)1}
-}
-#f4# search \kbd{dict.leo.org}
-oleo()    {
-    emulate -L zsh
-    ${=BROWSER} "http://dict.leo.org/?search=$*"
-}
-#f4# Search German   Wikipedia
-wikide()  {
-    emulate -L zsh
-    ${=BROWSER} http://de.wikipedia.org/wiki/"${(C)*}"
-}
-#f4# Search English  Wikipedia
-wikien()  {
-    emulate -L zsh
-    ${=BROWSER} http://en.wikipedia.org/wiki/"${(C)*}"
-}
-#f4# Search official debs
-wodeb()   {
-    emulate -L zsh
-    ${=BROWSER} "http://packages.debian.org/search?keywords=$1&searchon=contents&suite=${2:=unstable}&section=all"
-}
-
-#m# f4 gex() Exact search via Google
-check_com google && gex () {
-    google "\"[ $1]\" $*"
-}
-
-# misc

 #f5# Backup \kbd{file {\rm to} file\_timestamp}
 bk() {
     emulate -L zsh
 #f5# Backup \kbd{file {\rm to} file\_timestamp}
 bk() {
     emulate -L zsh