From 2e9ff8e5185eb3c4305368cf9e1fd14de2ed8f15 Mon Sep 17 00:00:00 2001
From: Frank Terbeck <ft@bewatermyfriend.org>
Date: Tue, 29 Nov 2011 14:47:02 +0100
Subject: [PATCH] zshrc: Remove peval and calc

Signed-off-by: Frank Terbeck <ft@bewatermyfriend.org>
---
 doc/grmlzshrc.t2t | 8 --------
 etc/zsh/zshrc     | 8 --------
 2 files changed, 16 deletions(-)

diff --git a/doc/grmlzshrc.t2t b/doc/grmlzshrc.t2t
index db4239b..3792c17 100644
--- a/doc/grmlzshrc.t2t
+++ b/doc/grmlzshrc.t2t
@@ -609,10 +609,6 @@ Example usages:
 % ls -l *(e:'nt /reference/file':)
 ```
 
-: **peval()**
-Evaluates a perl expression; useful as command line
-calculator, therefore also available as "calc".
-
 : **profile()**
 Runs a command in $SHELL with profiling enabled (See startup variable
 ZSH_PROFILE_RC above).
@@ -785,10 +781,6 @@ available packages are fetched from the location(s) specified in
 /etc/apt/sources.list. An update should always be performed before an
 upgrade or dist-upgrade; run by sudo, if necessary.
 
-: **calc** (//peval//)
-Evaluates a perl expression (see peval() above); useful as a command line
-calculator.
-
 : **CH** (//./configure --help//)
 Lists available compilation options for building program from source.
 
diff --git a/etc/zsh/zshrc b/etc/zsh/zshrc
index d60a208..933f7ab 100644
--- a/etc/zsh/zshrc
+++ b/etc/zsh/zshrc
@@ -2218,14 +2218,6 @@ hex() {
     [[ -n "$1" ]] && printf "%x\n" $1 || { print 'Usage: hex <number-to-convert>' ; return 1 }
 }
 
-# calculate (or eval at all ;-)) with perl => p[erl-]eval
-# hint: also take a look at zcalc -> 'autoload zcalc' -> 'man zshmodules | less -p MATHFUNC'
-peval() {
-    [[ -n "$1" ]] && CALC="$*" || print "Usage: calc [expression]"
-    perl -e "print eval($CALC),\"\n\";"
-}
-functions peval &>/dev/null && alias calc=peval
-
 # spawn a minimally set up mksh - useful if you want to umount /usr/.
 minimal-shell() {
     emulate -L zsh
-- 
2.1.4