From 678a6ce4b73b2b839539020d4c44f79bfda15ed5 Mon Sep 17 00:00:00 2001
From: "taha@xian" <taha@chepec.se>
Date: Sun, 5 Nov 2017 00:36:14 +0100
Subject: [PATCH] Fixed circ dependency created in last commit

Goofed and declared dependency on photoec in previous commit. Fixed it by removing it and the non-exported function that used it.
Note to self: this package should not import any of my other packages.
---
 DESCRIPTION              |  5 ++---
 R/AddColumn2Data-nm2eV.R | 29 -----------------------------
 man/AddColumnEnergy.Rd   | 18 ------------------
 3 files changed, 2 insertions(+), 50 deletions(-)
 delete mode 100644 R/AddColumn2Data-nm2eV.R
 delete mode 100644 man/AddColumnEnergy.Rd

diff --git a/DESCRIPTION b/DESCRIPTION
index 9f42b4f..4442bd0 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: common
 Type: Package
 Title: chepec common
-Version: 0.0.0.9005
+Version: 0.0.0.9006
 Description: Commonly used functions and scripts.
 Authors@R: person("Taha", "Ahmed", email = "taha@chepec.se", role = c("aut", "cre"))
 License: GPL-3
@@ -9,5 +9,4 @@ LazyData: TRUE
 RoxygenNote: 6.0.1
 Imports: 
    xtable,
-   utils,
-   photoec
+   utils
diff --git a/R/AddColumn2Data-nm2eV.R b/R/AddColumn2Data-nm2eV.R
deleted file mode 100644
index 2ae002b..0000000
--- a/R/AddColumn2Data-nm2eV.R
+++ /dev/null
@@ -1,29 +0,0 @@
-#' AddColumnEnergy
-#'
-#' A poorly documented function.
-#' To be honest I don't remember what it's for. Not exported.
-#'
-#' @param path.to.folder full path to folder containing data files
-#'
-#' @return Writes to file.
-AddColumnEnergy <- function(path.to.folder) {
-  txt.files <-
-     list.files(path = path.to.folder, pattern = "\\.txt$",
-                full.names = TRUE)
-  # message(txt.files)
-  for (f in 1:length(txt.files)) {
-     this.file <- txt.files[f]
-     # read the file contents into df
-     this.data <-
-        utils::read.table(this.file, header = T,
-                   col.names = c("wavelength", "intensity"))
-     # add energy (eV) as third column
-     this.data$energy <- photoec::wavelength2energy(this.data$wavelength)
-     # message(head(this.data))
-     utils::write.table(this.data,
-                 file = this.file,
-                 sep = "\t",
-                 col.names = c("#Wave", "#Intensity", "#Energy"),
-                 row.names = FALSE)
-  }
-}
diff --git a/man/AddColumnEnergy.Rd b/man/AddColumnEnergy.Rd
deleted file mode 100644
index f1d7da7..0000000
--- a/man/AddColumnEnergy.Rd
+++ /dev/null
@@ -1,18 +0,0 @@
-% Generated by roxygen2: do not edit by hand
-% Please edit documentation in R/AddColumn2Data-nm2eV.R
-\name{AddColumnEnergy}
-\alias{AddColumnEnergy}
-\title{AddColumnEnergy}
-\usage{
-AddColumnEnergy(path.to.folder)
-}
-\arguments{
-\item{path.to.folder}{full path to folder containing data files}
-}
-\value{
-Writes to file.
-}
-\description{
-A poorly documented function.
-To be honest I don't remember what it's for. Not exported.
-}